key.lst
来自「凌阳单片机的自检程序 包括io检测ad检测睡眠检测等」· LST 代码 · 共 445 行 · 第 1/2 页
LST
445 行
<
<
<
< .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
< //========================================================================================
.external F_SP_INT_64Hz
.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
//////////////////////////////////////////////////////////////////
000001AB .RAM
000001AB 00 00 .VAR R_DebounceReg; //for keyboard scan
.DEFINE C_DebounceCnt 0x0002;
000001AC 00 00 .VAR R_DebounceCnt; //for keyboard scan
000001AD 00 00 .VAR R_KeyBuf; //for keyboard scan
000001AE 00 00 .VAR R_KeyStrobe; //for keyboard scan
00008CC5 .CODE
//////////////////////////////////////////////////////////////////
// Function: Initialization for F_Key_Scan_ServiceLoop
//////////////////////////////////////////////////////////////////
F_Key_Scan_Initial:
00008CC5 40 92 r1 = 0x0000; //
00008CC6 19 D3 AB 01 [R_DebounceReg] = r1; //
00008CC8 19 D3 AD 01 [R_KeyBuf] = r1; //
00008CCA 19 D3 AE 01 [R_KeyStrobe] = r1; //
00008CCC 42 92 r1 = C_DebounceCnt; //
00008CCD 19 D3 AC 01 [R_DebounceCnt] = r1; //reset debounce counter
00008CCF 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:
00008CD0 11 93 00 70 r1 = [P_IOA_Data]; // get key data from IOA
//r1 = [P_IOB_Data]; // get key data from IOB
00008CD2 09 B3 FF 00 r1 = r1 and 0xff; //
00008CD4 12 95 AB 01 r2 = [R_DebounceReg]; //
00008CD6 19 D3 AB 01 [R_DebounceReg] = r1; //
00008CD8 12 45 AB 01 cmp r2,[R_DebounceReg]; //
00008CDA 04 5E je L_KS_StableTwoSample; //
00008CDB 42 92 r1 = C_DebounceCnt; //debounce time setting
00008CDC 19 D3 AC 01 [R_DebounceCnt] = r1; //
00008CDE 90 9A retf; //
L_KS_StableTwoSample:
00008CDF 11 93 AC 01 r1 = [R_DebounceCnt]; //
00008CE1 01 5E jz L_KS_StableOverDebounce; //
00008CE2 90 9A retf;
L_KS_StableOverDebounce:
00008CE3 19 D3 AC 01 [R_DebounceCnt] = r1; //
00008CE5 12 95 AB 01 r2 = [R_DebounceReg]; //
00008CE7 11 93 AD 01 r1 = [R_KeyBuf]; //
00008CE9 1A D5 AD 01 [R_KeyBuf] = r2; //
00008CEB 09 83 FF 00 r1 = r1 xor 0x00ff; //
00008CED 11 B3 AD 01 r1 = r1 and [R_KeyBuf]; //
00008CEF 09 B3 FF 00 r1 = r1 and 0x00ff; //
00008CF1 11 A3 AE 01 r1 = r1 or [R_KeyStrobe]; //
00008CF3 19 D3 AE 01 [R_KeyStrobe] = r1; //save stable key code to R_KeyStrobe
00008CF5 90 9A retf;
//////////////////////////////////////////
//
//////////////////////////////////////////
F_Key_Scan_ServiceLoop_2:
00008CF6 11 93 01 70 r1 = [P_IOA_Buffer]; // PortA.7 low(scan line +Vcc)
00008CF8 09 B3 7F FF r1 &= 0xFF7F;
00008CFA 19 D3 01 70 [P_IOA_Buffer] = r1;
00008CFC 11 93 00 70 r1 = [P_IOA_Data]; // get key data from IOA
//r1 = [P_IOB_Data]; // get key data from IOB
00008CFE 4F B2 r1 &= 0x000F; //
00008CFF 01 95 r2 = r1; // key from +Vcc
00008D00 0A 87 FF FF r3 = r2 xor 0xffff; // Be a +Vcc mask
// delay here
00008D02 00 EE nop;
00008D03 00 EE nop;
00008D04 00 EE nop;
00008D05 11 93 01 70 r1 = [P_IOA_Buffer]; // PortA.7 high(scan line)
00008D07 09 A3 80 00 r1 |= 0x0080; //
00008D09 19 D3 01 70 [P_IOA_Buffer] = r1; //
00008D0B 11 93 00 70 r1 = [P_IOA_Data]; //
//r1 = [P_IOB_Data]; // get key data from IOB
00008D0D 4F B2 r1 &= 0x000F; //
00008D0E 02 83 r1 ^= r2; // possible bits by scan line
00008D0F 03 B3 r1 &= r3; // do +Vcc mask
00008D10 59 93 r1 = r1 lsl 4; //
00008D11 02 A3 r1 |= r2; //
//r2 = r2 lsl 4; //
//r1 |= r2; //
00008D12 09 B3 FF 00 r1 = r1 and 0xFF; // mask bit[0..7]
00008D14 12 95 AB 01 r2 = [R_DebounceReg]; //
00008D16 19 D3 AB 01 [R_DebounceReg] = r1; //
00008D18 12 45 AB 01 cmp r2,[R_DebounceReg]; //
00008D1A 04 5E je L_KS_StableTwoSample_2; //
00008D1B 42 92 r1 = C_DebounceCnt; //debounce time setting
00008D1C 19 D3 AC 01 [R_DebounceCnt] = r1; //
00008D1E 90 9A retf; //
L_KS_StableTwoSample_2:
00008D1F 11 93 AC 01 r1 = [R_DebounceCnt]; //
00008D21 01 5E jz L_KS_StableOverDebounce_2; //
00008D22 90 9A retf;
L_KS_StableOverDebounce_2:
00008D23 19 D3 AC 01 [R_DebounceCnt] = r1; //
00008D25 12 95 AB 01 r2 = [R_DebounceReg]; //
00008D27 11 93 AD 01 r1 = [R_KeyBuf]; //
00008D29 1A D5 AD 01 [R_KeyBuf] = r2; //
00008D2B 09 83 FF 00 r1 = r1 xor 0x00ff; //
00008D2D 11 B3 AD 01 r1 = r1 and [R_KeyBuf]; //
00008D2F 09 B3 FF 00 r1 = r1 and 0x00ff; //
00008D31 11 A3 AE 01 r1 = r1 or [R_KeyStrobe]; //
00008D33 19 D3 AE 01 [R_KeyStrobe] = r1; //save stable key code to R_KeyStrobe
00008D35 90 9A retf;
//////////////////////////////////////////////////////////////////
// Function: debounce counter down count
//////////////////////////////////////////////////////////////////
F_Key_DebounceCnt_Down:
00008D36 11 93 AC 01 r1 = [R_DebounceCnt]; // Debounce subroutine for F_IO_Key_Scan:
00008D38 03 5E jz L_DebounceCntZero; // stop count if zero
00008D39 41 22 r1 -= 0x0001; //
00008D3A 19 D3 AC 01 [R_DebounceCnt] = r1; //
L_DebounceCntZero: //
00008D3C 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;
00008D3D 11 93 AE 01 r1 = [R_KeyStrobe]; // Get Key code
00008D3F 40 94 r2 = 0x0000; // Clear KeyStrobe for next key
00008D40 1A D5 AE 01 [R_KeyStrobe] = r2; //
//pop BP,BP from [SP];
00008D42 90 9A retf;
//========================================================================================
// End of key.asm
//========================================================================================
//========================================================================================
// End of key.asm
//========================================================================================
0 error(s), 0 warning(s).
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?