📄 linkkey.s
字号:
.module LinkKey.c
.area text(rom, con, rel)
.dbfile E:\ICC_H\SoftExt.H
.dbfunc e speaData _speaData fV
; y -> y+4
; j -> y+0
; i -> R10
; len -> R12
; dat -> y+16
.even
_speaData::
xcall push_arg4
xcall push_gset4
sbiw R28,8
ldd R12,y+20
.dbline -1
.dbline 116
; /*********************************************************************
; 微 雪 电 子 WaveShare http://www.waveShare.net
;
; 目 的: 测试"LinkKeyBoard"模块
;
; 目标系统: 基于任何AVR单片机
;
; 应用软件: ICCAVR
;
; 版 本: Version 1.0
;
; 圆版时间: 2005-03-2
;
; 开发人员: SEE
;
; 说 明: 若用于商业用途，请保留此段文字或注明代码来源
;
; 深 圳 微 雪 电 子 保 留 所 有 的 版 权
; *********************************************************************/
;
; /*01010101010101010101010101010101010101010101010101010101010101010101
; ----------------------------------------------------------------------
; 版本更新记录：
;
; ----------------------------------------------------------------------
;
; 接入模块： LinkKeyBoard
; 接口说明： LinkKeyBoard M16SmartGuider
; K0 --------- PA0
; K1 --------- PA1
; K2 --------- PA2
; K3 --------- PA3
; K4 --------- PA4
; K5 --------- PA5
; K6 --------- PA6
; K7 --------- PA7
; ----------------------------------------------------------------------
; 注意事项：
; * 将相应的LED-SW短接使能
; ----------------------------------------------------------------------
; 10101010101010101010101010101010101010101010101010101010101010101010*/
;
; #include <iom16v.h>
; #include "E:\ICC_H\CmmICC.H"
;
; #define LED_DDR DDRB
; #define LED_PORT PORTB
; #define KEY_DDR DDRA
; #define KEY_PORT PORTA
; #define KEY_PIN PINA
;
; /*--------------------------------------------------------------------
; 函数名称：
; 函数功能：键盘检测
; 注意事项：
; 提示说明：
; 输 入：
; 返 回：
; --------------------------------------------------------------------*/
; void scanKey()
; {
;
; KEY_DDR = 0X01;
; KEY_PORT = 0xFE;
; delay50us(1);
; if(KEY_PIN==0xFC)
; LED_PORT=0x01;
; if(KEY_PIN==0xFA)
; LED_PORT=0x02;
; if(KEY_PIN==0xF6)
; LED_PORT=0x03;
; if(KEY_PIN==0xEE)
; LED_PORT=0x04;
; if(KEY_PIN==0xDE)
; LED_PORT=0x05;
; if(KEY_PIN==0xBE)
; LED_PORT=0x06;
; if(KEY_PIN==0x7E)
; LED_PORT=0x07;
;
; KEY_DDR = 0X02;
; KEY_PORT = 0xFD;
; delay50us(1);
; if(KEY_PIN==0xF9)
; LED_PORT=0x08;
; if(KEY_PIN==0xF5)
; LED_PORT=0x09;
; if(KEY_PIN==0xED)
; LED_PORT=0x0A;
; if(KEY_PIN==0xDD)
; LED_PORT=0x0B;
; if(KEY_PIN==0xBD)
; LED_PORT=0x0C;
; if(KEY_PIN==0x7D)
; LED_PORT=0x0D;
;
; KEY_DDR = 0X04;
; KEY_PORT = 0xFB;
; delay50us(1);
; if(KEY_PIN==0xF3)
; LED_PORT=0x0E;
; if(KEY_PIN==0xEB)
; LED_PORT=0x10;
; if(KEY_PIN==0xDB)
; LED_PORT=0x11;
; if(KEY_PIN==0xBB)
; LED_PORT=0x12;
; if(KEY_PIN==0x7B)
; LED_PORT=0x13;
;
; KEY_DDR = 0X08;
; KEY_PORT = 0xF7;
; delay50us(1);
; if(KEY_PIN==0xE7)
; LED_PORT=0x14;
; if(KEY_PIN==0xD7)
.dbline 119
; LED_PORT=0x15;
; if(KEY_PIN==0xB7)
; LED_PORT=0x16;
clr R10
ldi R20,1
ldi R21,0
ldi R22,0
ldi R23,0
movw R30,R28
std z+0,R20
std z+1,R21
std z+2,R22
std z+3,R23
xjmp L5
L2:
.dbline 120
.dbline 121
movw R30,R28
ldd R2,z+0
ldd R3,z+1
ldd R4,z+2
ldd R5,z+3
movw R30,R28
ldd R6,z+16
ldd R7,z+17
ldd R8,z+18
ldd R9,z+19
st -y,R5
st -y,R4
st -y,R3
st -y,R2
movw R16,R6
movw R18,R8
xcall div32u
movw R30,R28
std z+4,R16
std z+5,R17
std z+6,R18
std z+7,R19
.dbline 122
ldi R20,10
ldi R21,0
ldi R22,0
ldi R23,0
movw R30,R28
ldd R2,z+4
ldd R3,z+5
ldd R4,z+6
ldd R5,z+7
st -y,R23
st -y,R22
st -y,R21
st -y,R20
movw R16,R2
movw R18,R4
xcall mod32u
ldi R24,<_dataElem
ldi R25,>_dataElem
mov R30,R10
clr R31
add R30,R24
adc R31,R25
std z+0,R16
.dbline 123
movw R30,R28
ldd R2,z+0
ldd R3,z+1
ldd R4,z+2
ldd R5,z+3
ldi R20,10
ldi R21,0
ldi R22,0
ldi R23,0
st -y,R5
st -y,R4
st -y,R3
st -y,R2
movw R16,R20
movw R18,R22
xcall empy32u
movw R30,R28
std z+0,R16
std z+1,R17
std z+2,R18
std z+3,R19
.dbline 124
L3:
.dbline 119
inc R10
L5:
.dbline 119
cp R10,R12
brsh X0
xjmp L2
X0:
.dbline -2
.dbline 125
; if(KEY_PIN==0x77)
; LED_PORT=0x17;
;
; KEY_DDR = 0X10;
; KEY_PORT = 0xEF;
; delay50us(1);
L1:
adiw R28,8
xcall pop_gset4
adiw R28,4
.dbline 0 ; func end
ret
.dbsym l y 4 l
.dbsym l j 0 l
.dbsym r i 10 c
.dbsym r len 12 C
.dbsym l dat 16 l
.dbend
.dbfile E:\ICC_H\HardExt.H
.dbfunc e delay50us _delay50us fV
; j -> R20
; t -> R16,R17
.even
_delay50us::
xcall push_gset1
.dbline -1
.dbline 98
.dbline 100
xjmp L10
L7:
.dbline 101
clr R20
xjmp L14
L11:
.dbline 102
L12:
.dbline 101
inc R20
L14:
.dbline 101
cpi R20,70
brlo L11
L8:
.dbline 100
subi R16,1
sbci R17,0
L10:
.dbline 100
clr R2
clr R3
cp R2,R16
cpc R3,R17
brlt L7
.dbline -2
.dbline 103
L6:
xcall pop_gset1
.dbline 0 ; func end
ret
.dbsym r j 20 c
.dbsym r t 16 I
.dbend
.dbfunc e delay50ms _delay50ms fV
; i -> R20,R21
; t -> R16,R17
.even
_delay50ms::
xcall push_gset1
.dbline -1
.dbline 113
.dbline 115
xjmp L19
L16:
.dbline 116
clr R20
clr R21
xjmp L23
L20:
.dbline 117
L21:
.dbline 116
subi R20,255 ; offset = 1
sbci R21,255
L23:
.dbline 116
cpi R20,162
ldi R30,205
cpc R21,R30
brlo L20
L17:
.dbline 115
subi R16,1
sbci R17,0
L19:
.dbline 115
clr R2
clr R3
cp R2,R16
cpc R3,R17
brlt L16
.dbline -2
.dbline 118
L15:
xcall pop_gset1
.dbline 0 ; func end
ret
.dbsym r i 20 i
.dbsym r t 16 I
.dbend
.dbfile E:\ProductPro\M16SD\ICCAVR\LinkKeyBoard\LinkKeyBoard\LinkKey.c
.dbfunc e scanKey _scanKey fV
.even
_scanKey::
.dbline -1
.dbline 61
.dbline 63
ldi R24,1
out 0x1a,R24
.dbline 64
ldi R24,254
out 0x1b,R24
.dbline 65
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 66
in R24,0x19
cpi R24,252
brne L25
.dbline 67
ldi R24,1
out 0x18,R24
L25:
.dbline 68
in R24,0x19
cpi R24,250
brne L27
.dbline 69
ldi R24,2
out 0x18,R24
L27:
.dbline 70
in R24,0x19
cpi R24,246
brne L29
.dbline 71
ldi R24,3
out 0x18,R24
L29:
.dbline 72
in R24,0x19
cpi R24,238
brne L31
.dbline 73
ldi R24,4
out 0x18,R24
L31:
.dbline 74
in R24,0x19
cpi R24,222
brne L33
.dbline 75
ldi R24,5
out 0x18,R24
L33:
.dbline 76
in R24,0x19
cpi R24,190
brne L35
.dbline 77
ldi R24,6
out 0x18,R24
L35:
.dbline 78
in R24,0x19
cpi R24,126
brne L37
.dbline 79
ldi R24,7
out 0x18,R24
L37:
.dbline 81
ldi R24,2
out 0x1a,R24
.dbline 82
ldi R24,253
out 0x1b,R24
.dbline 83
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 84
in R24,0x19
cpi R24,249
brne L39
.dbline 85
ldi R24,8
out 0x18,R24
L39:
.dbline 86
in R24,0x19
cpi R24,245
brne L41
.dbline 87
ldi R24,9
out 0x18,R24
L41:
.dbline 88
in R24,0x19
cpi R24,237
brne L43
.dbline 89
ldi R24,10
out 0x18,R24
L43:
.dbline 90
in R24,0x19
cpi R24,221
brne L45
.dbline 91
ldi R24,11
out 0x18,R24
L45:
.dbline 92
in R24,0x19
cpi R24,189
brne L47
.dbline 93
ldi R24,12
out 0x18,R24
L47:
.dbline 94
in R24,0x19
cpi R24,125
brne L49
.dbline 95
ldi R24,13
out 0x18,R24
L49:
.dbline 97
ldi R24,4
out 0x1a,R24
.dbline 98
ldi R24,251
out 0x1b,R24
.dbline 99
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 100
in R24,0x19
cpi R24,243
brne L51
.dbline 101
ldi R24,14
out 0x18,R24
L51:
.dbline 102
in R24,0x19
cpi R24,235
brne L53
.dbline 103
ldi R24,16
out 0x18,R24
L53:
.dbline 104
in R24,0x19
cpi R24,219
brne L55
.dbline 105
ldi R24,17
out 0x18,R24
L55:
.dbline 106
in R24,0x19
cpi R24,187
brne L57
.dbline 107
ldi R24,18
out 0x18,R24
L57:
.dbline 108
in R24,0x19
cpi R24,123
brne L59
.dbline 109
ldi R24,19
out 0x18,R24
L59:
.dbline 111
ldi R24,8
out 0x1a,R24
.dbline 112
ldi R24,247
out 0x1b,R24
.dbline 113
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 114
in R24,0x19
cpi R24,231
brne L61
.dbline 115
ldi R24,20
out 0x18,R24
L61:
.dbline 116
in R24,0x19
cpi R24,215
brne L63
.dbline 117
ldi R24,21
out 0x18,R24
L63:
.dbline 118
in R24,0x19
cpi R24,183
brne L65
.dbline 119
ldi R24,22
out 0x18,R24
L65:
.dbline 120
in R24,0x19
cpi R24,119
brne L67
.dbline 121
ldi R24,23
out 0x18,R24
L67:
.dbline 123
ldi R24,16
out 0x1a,R24
.dbline 124
ldi R24,239
out 0x1b,R24
.dbline 125
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 126
; if(KEY_PIN==0xCF)
in R24,0x19
cpi R24,207
brne L69
.dbline 127
; LED_PORT=0x18;
ldi R24,24
out 0x18,R24
L69:
.dbline 128
; if(KEY_PIN==0xAF)
in R24,0x19
cpi R24,175
brne L71
.dbline 129
; LED_PORT=0x19;
ldi R24,25
out 0x18,R24
L71:
.dbline 130
; if(KEY_PIN==0x6F)
in R24,0x19
cpi R24,111
brne L73
.dbline 131
; LED_PORT=0x1A;
ldi R24,26
out 0x18,R24
L73:
.dbline 133
;
; KEY_DDR = 0X20;
ldi R24,32
out 0x1a,R24
.dbline 134
; KEY_PORT = 0xDF;
ldi R24,223
out 0x1b,R24
.dbline 135
; delay50us(1);
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 136
; if(KEY_PIN==0x9F)
in R24,0x19
cpi R24,159
brne L75
.dbline 137
; LED_PORT=0x1B;
ldi R24,27
out 0x18,R24
L75:
.dbline 138
; if(KEY_PIN==0x5F)
in R24,0x19
cpi R24,95
brne L77
.dbline 139
; LED_PORT=0x1C;
ldi R24,28
out 0x18,R24
L77:
.dbline 141
ldi R24,64
out 0x1a,R24
.dbline 142
ldi R24,191
out 0x1b,R24
.dbline 143
ldi R16,1
ldi R17,0
xcall _delay50us
.dbline 144
in R24,0x19
cpi R24,63
brne L79
.dbline 145
ldi R24,29
out 0x18,R24
L79:
.dbline -2
.dbline 146
;
; KEY_DDR = 0X40;
; KEY_PORT = 0xBF;
; delay50us(1);
; if(KEY_PIN==0x3F)
; LED_PORT=0x1D;
; }
L24:
.dbline 0 ; func end
ret
.dbend
.dbfunc e main _main fV
.even
_main::
.dbline -1
.dbline 156
; /*--------------------------------------------------------------------
; 函数名称：
; 函数功能：
; 注意事项：
; 提示说明：
; 输 入：
; 返 回：
; --------------------------------------------------------------------*/
; void main()
; {
.dbline 157
; LED_DDR = 0XFF;
ldi R24,255
out 0x17,R24
xjmp L83
L82:
.dbline 159
xcall _scanKey
L83:
.dbline 158
xjmp L82
X1:
.dbline -2
.dbline 160
; while(1)
; scanKey();
; }
L81:
.dbline 0 ; func end
ret
.dbend
.area bss(ram, con, rel)
.dbfile E:\ProductPro\M16SD\ICCAVR\LinkKeyBoard\LinkKeyBoard\LinkKey.c
_dataElem::
.blkb 6
.dbfile E:\ICC_H\SoftExt.H
.dbsym e dataElem _dataElem A[6:6]c
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -