📄 key.lst
字号:
< .EXTERNAL F_SP_Get_ADC
<
< .EXTERNAL F_SP_Set_P_TimerA_Ctrl
< .EXTERNAL F_SP_Set_P_TimerA_Data
< .EXTERNAL F_SP_Set_P_TimerB_Ctrl
< .EXTERNAL F_SP_Set_P_TimerB_Data
< .EXTERNAL F_SP_Set_P_INT_Ctrl
< .EXTERNAL F_SP_Set_P_INT_Clear
< .EXTERNAL F_SP_Set_P_SystemClock
< .EXTERNAL F_SP_Set_P_DAC_Ctrl
< .EXTERNAL F_SP_Set_P_ADC_Ctrl
<
<
<
< //--------------------------------------------
< SACM_MACRO1: .MACRO
<
< .ENDM
<
< SACM_MACRO2: .MACRO
<
< .ENDM
<
<
<
<
< //.define PC_Play_Enable_A2000 1 // Enable the PC-Play function for SACM-A2000 module
< //.define PC_Play_Enable_S480 1 // Enable the PC-Play function for SACM-S480 module
< //.define PC_Play_Enable_S240 1 // Enable the PC-Play function for SACM-S240 module
< //.define PC_Play_Enable_MS01 1 // Enable the PC-Play function for SACM-MS01 module
<
<
<
< //========================================================================================
< // End of hardware.inc
< //========================================================================================
.PUBLIC F_Key_Scan_Initial;
.PUBLIC F_Key_Scan_ServiceLoop;
.PUBLIC F_Key_Scan_ServiceLoop_2;
.PUBLIC F_Key_DebounceCnt_Down;
.PUBLIC _SP_GetCh;
.PUBLIC F_SP_GetCh;
.PUBLIC R_KeyStrobe;
//////////////////////////////////////////////////////////////////
// RAM Define Area
//////////////////////////////////////////////////////////////////
00000314 .RAM
00000314 00 00 .VAR R_DebounceReg; //for keyboard scan
.DEFINE C_DebounceCnt 0x0002;
00000315 00 00 .VAR R_DebounceCnt; //for keyboard scan
00000316 00 00 .VAR R_KeyBuf; //for keyboard scan
00000317 00 00 .VAR R_KeyStrobe; //for keyboard scan
000095F6 .CODE
//////////////////////////////////////////////////////////////////
// Function: Initialization for F_Key_Scan_ServiceLoop
//////////////////////////////////////////////////////////////////
F_Key_Scan_Initial:
000095F6 40 92 r1 = 0x0000; //
000095F7 19 D3 14 03 [R_DebounceReg] = r1; //
000095F9 19 D3 16 03 [R_KeyBuf] = r1; //
000095FB 19 D3 17 03 [R_KeyStrobe] = r1; //
000095FD 42 92 r1 = C_DebounceCnt; //
000095FE 19 D3 15 03 [R_DebounceCnt] = r1; //reset debounce counter
00009600 90 9A retf;
//////////////////////////////////////////////////////////////////
// Function: Get Key code from key pad(8 x 1 key pad)
// Input: Port IOA b7-b0
// Output: R_KeyStrobe b7-b0
// | | | |
// +Vcc --- x --- x ... x --- x ---
// | | | |
// IOA.7 IOA.0
// Note: 1)link F_DebounceCntDown is necessary
// Destory register: r1, r2
//////////////////////////////////////////////////////////////////
F_Key_Scan_ServiceLoop:
00009601 11 93 00 70 r1 = [P_IOA_Data]; // get key data from IOA
//r1 = [P_IOB_Data]; // get key data from IOB
00009603 09 B3 FF 00 r1 = r1 and 0xff; //
00009605 12 95 14 03 r2 = [R_DebounceReg]; //
00009607 19 D3 14 03 [R_DebounceReg] = r1; //
00009609 12 45 14 03 cmp r2,[R_DebounceReg]; //
0000960B 04 5E je L_KS_StableTwoSample; //
0000960C 42 92 r1 = C_DebounceCnt; //debounce time setting
0000960D 19 D3 15 03 [R_DebounceCnt] = r1; //
0000960F 90 9A retf; //
L_KS_StableTwoSample:
00009610 11 93 15 03 r1 = [R_DebounceCnt]; //
00009612 01 5E jz L_KS_StableOverDebounce; //
00009613 90 9A retf;
L_KS_StableOverDebounce:
00009614 19 D3 15 03 [R_DebounceCnt] = r1; //
00009616 12 95 14 03 r2 = [R_DebounceReg]; //
00009618 11 93 16 03 r1 = [R_KeyBuf]; //
0000961A 1A D5 16 03 [R_KeyBuf] = r2; //
0000961C 09 83 FF 00 r1 = r1 xor 0x00ff; //
0000961E 11 B3 16 03 r1 = r1 and [R_KeyBuf]; //
00009620 09 B3 FF 00 r1 = r1 and 0x00ff; //
00009622 11 A3 17 03 r1 = r1 or [R_KeyStrobe]; //
00009624 19 D3 17 03 [R_KeyStrobe] = r1; //save stable key code to R_KeyStrobe
00009626 90 9A retf;
//////////////////////////////////////////
//
//////////////////////////////////////////
F_Key_Scan_ServiceLoop_2:
00009627 11 93 01 70 r1 = [P_IOA_Buffer]; // PortA.7 low(scan line +Vcc)
00009629 09 B3 7F FF r1 &= 0xFF7F;
0000962B 19 D3 01 70 [P_IOA_Buffer] = r1;
0000962D 11 93 00 70 r1 = [P_IOA_Data]; // get key data from IOA
//r1 = [P_IOB_Data]; // get key data from IOB
0000962F 4F B2 r1 &= 0x000F; //
00009630 01 95 r2 = r1; // key from +Vcc
00009631 0A 87 FF FF r3 = r2 xor 0xffff; // Be a +Vcc mask
// delay here
00009633 00 EE nop;
00009634 00 EE nop;
00009635 00 EE nop;
00009636 11 93 01 70 r1 = [P_IOA_Buffer]; // PortA.7 high(scan line)
00009638 09 A3 80 00 r1 |= 0x0080; //
0000963A 19 D3 01 70 [P_IOA_Buffer] = r1; //
0000963C 11 93 00 70 r1 = [P_IOA_Data]; //
//r1 = [P_IOB_Data]; // get key data from IOB
0000963E 4F B2 r1 &= 0x000F; //
0000963F 02 83 r1 ^= r2; // possible bits by scan line
00009640 03 B3 r1 &= r3; // do +Vcc mask
00009641 59 93 r1 = r1 lsl 4; //
00009642 02 A3 r1 |= r2; //
//r2 = r2 lsl 4; //
//r1 |= r2; //
00009643 09 B3 FF 00 r1 = r1 and 0xFF; // mask bit[0..7]
00009645 12 95 14 03 r2 = [R_DebounceReg]; //
00009647 19 D3 14 03 [R_DebounceReg] = r1; //
00009649 12 45 14 03 cmp r2,[R_DebounceReg]; //
0000964B 04 5E je L_KS_StableTwoSample_2; //
0000964C 42 92 r1 = C_DebounceCnt; //debounce time setting
0000964D 19 D3 15 03 [R_DebounceCnt] = r1; //
0000964F 90 9A retf; //
L_KS_StableTwoSample_2:
00009650 11 93 15 03 r1 = [R_DebounceCnt]; //
00009652 01 5E jz L_KS_StableOverDebounce_2; //
00009653 90 9A retf;
L_KS_StableOverDebounce_2:
00009654 19 D3 15 03 [R_DebounceCnt] = r1; //
00009656 12 95 14 03 r2 = [R_DebounceReg]; //
00009658 11 93 16 03 r1 = [R_KeyBuf]; //
0000965A 1A D5 16 03 [R_KeyBuf] = r2; //
0000965C 09 83 FF 00 r1 = r1 xor 0x00ff; //
0000965E 11 B3 16 03 r1 = r1 and [R_KeyBuf]; //
00009660 09 B3 FF 00 r1 = r1 and 0x00ff; //
00009662 11 A3 17 03 r1 = r1 or [R_KeyStrobe]; //
00009664 19 D3 17 03 [R_KeyStrobe] = r1; //save stable key code to R_KeyStrobe
00009666 90 9A retf;
//////////////////////////////////////////////////////////////////
// Function: debounce counter down count
//////////////////////////////////////////////////////////////////
F_Key_DebounceCnt_Down:
00009667 11 93 15 03 r1 = [R_DebounceCnt]; // Debounce subroutine for F_IO_Key_Scan:
00009669 03 5E jz L_DebounceCntZero; // stop count if zero
0000966A 41 22 r1 -= 0x0001; //
0000966B 19 D3 15 03 [R_DebounceCnt] = r1; //
L_DebounceCntZero: //
0000966D 90 9A retf; //
//****************************************************************
// Function: Get Keycode for I/O Port
// Destory register: r1, r2
//****************************************************************
_SP_GetCh:
F_SP_GetCh:
//push BP,BP to [SP];
//BP = SP + 1;
0000966E 11 93 17 03 r1 = [R_KeyStrobe]; // Get Key code
00009670 40 94 r2 = 0x0000; // Clear KeyStrobe for next key
00009671 1A D5 17 03 [R_KeyStrobe] = r2; //
//pop BP,BP from [SP];
00009673 90 9A retf;
//========================================================================================
// End of key.asm
//========================================================================================
0 error(s), 0 warning(s).
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -