📄 zdsmjp.s
字号:
.module zdsmjp.c
.area text(rom, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
.area data(ram, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
_num::
.blkb 1
.area idata
.byte 0
.area data(ram, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
.dbsym e num _num c
.area vector(rom, abs)
.org 32
jmp _miao
.area data(ram, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
.area code(ram, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
.area lit(rom, con, rel)
_table::
.word 63
.word 6
.word 91
.word 79
.word 102
.word 109
.word 125
.word 7
.word 127
.word 111
.word 119
.word 124
.word 57
.word 94
.word 121
.word 113
.dbsym e table _table A[32:16]kI
.area text(rom, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
.dbfunc e delay _delay fV
; i -> R20,R21
; j -> R22,R23
; ms -> R16,R17
.even
_delay::
xcall push_xgsetF000
.dbline -1
.dbline 12
; #include <iom16v.h>
; #include <macros.h>
; #define uchar unsigned char
; #define uint unsigned int
; uchar num=0;uchar l;
; #pragma interrupt_handler miao:9
; #pragma data:code
; const table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d, 0x07,
; 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
;
; void delay(uint ms)
; {
.dbline 14
; uint i,j;
; for(i=0;i<ms;i++)
clr R20
clr R21
xjmp L5
L2:
.dbline 15
; {
.dbline 16
; for(j=0;j<1141;j++);
clr R22
clr R23
xjmp L9
L6:
.dbline 16
L7:
.dbline 16
subi R22,255 ; offset = 1
sbci R23,255
L9:
.dbline 16
cpi R22,117
ldi R30,4
cpc R23,R30
brlo L6
X0:
.dbline 17
; }
L3:
.dbline 14
subi R20,255 ; offset = 1
sbci R21,255
L5:
.dbline 14
cp R20,R16
cpc R21,R17
brlo L2
X1:
.dbline -2
L1:
.dbline 0 ; func end
xjmp pop_xgsetF000
.dbsym r i 20 i
.dbsym r j 22 i
.dbsym r ms 16 i
.dbend
.dbfunc e show _show fV
; k -> R10
; j -> R12
.even
_show::
st -y,R10
st -y,R12
mov R10,R18
mov R12,R16
.dbline -1
.dbline 20
; }
; void show(uchar j,uchar k)
; {
.dbline 21
; PORTA|=BIT(3);
sbi 0x1b,3
.dbline 22
; PORTB=table[j];
ldi R24,<_table
ldi R25,>_table
mov R30,R12
clr R31
lsl R30
rol R31
add R30,R24
adc R31,R25
lpm R2,Z+
lpm R3,Z
out 0x18,R2
.dbline 23
; PORTA&=~BIT(3);
cbi 0x1b,3
.dbline 25
;
; PORTB=0XFF;
ldi R24,255
out 0x18,R24
.dbline 26
; PORTB&=~BIT(k);
ldi R16,1
mov R17,R10
xcall lsl8
mov R2,R16
com R2
in R3,0x18
and R3,R2
out 0x18,R3
.dbline 27
; PORTA|=BIT(4);
sbi 0x1b,4
.dbline 28
; PORTA&=~BIT(4);
cbi 0x1b,4
.dbline 29
; delay(80);//delay(1);
ldi R16,80
ldi R17,0
xcall _delay
.dbline -2
L10:
.dbline 0 ; func end
ld R12,y+
ld R10,y+
ret
.dbsym r k 10 c
.dbsym r j 12 c
.dbend
.dbfunc e key_press _key_press fc
; i -> R16
.even
_key_press::
.dbline -1
.dbline 32
; }
; uchar key_press()
; {
.dbline 34
; uchar i;
; DDRD=0XFF;
ldi R24,255
out 0x11,R24
.dbline 35
; PORTD=0XF0;
ldi R24,240
out 0x12,R24
.dbline 37
;
; DDRD=0X0F;
ldi R24,15
out 0x11,R24
.dbline 39
;
; i=PIND;
in R16,0x10
.dbline 40
; if(i==0XF0)
cpi R16,240
brne L12
X2:
.dbline 41
; {
.dbline 42
; DDRD=0XFF;
ldi R24,255
out 0x11,R24
.dbline 43
; return 0;
clr R16
xjmp L11
L12:
.dbline 46
; }
; else
; {
.dbline 47
; DDRD=0XFF;
ldi R24,255
out 0x11,R24
.dbline 48
; return 1;
ldi R16,1
.dbline -2
L11:
.dbline 0 ; func end
ret
.dbsym r i 16 c
.dbend
.dbfunc e key_scan _key_scan fc
; j -> R10
; key -> R20
; i -> R22
.even
_key_scan::
xcall push_xgsetF00C
.dbline -1
.dbline 53
; }
; }
;
; uchar key_scan()
; {
.dbline 54
; uchar key,i=0X7F,j;
ldi R22,127
.dbline 55
; delay(10);
ldi R16,10
ldi R17,0
xcall _delay
.dbline 56
; if(key_press())
xcall _key_press
tst R16
brne X24
xjmp L15
X24:
X3:
.dbline 57
; {
L17:
.dbline 59
; do
; {
.dbline 60
; i=(i<<1|i>>7);
mov R2,R22
lsr R2
lsr R2
lsr R2
lsr R2
lsr R2
lsr R2
lsr R2
mov R3,R22
lsl R3
or R3,R2
mov R22,R3
.dbline 61
; PORTD=i;
out 0x12,R3
.dbline 62
; DDRD=0X0F;
ldi R24,15
out 0x11,R24
.dbline 64
;
; key=PIND;
in R20,0x10
.dbline 65
; j=key&0XF0;
mov R24,R20
andi R24,240
mov R10,R24
.dbline 67
;
; }while(j==0XF0);
L18:
.dbline 67
mov R24,R10
cpi R24,240
breq L17
X4:
L20:
.dbline 69
;
; while(key_press());
L21:
.dbline 69
xcall _key_press
tst R16
brne L20
X5:
.dbline 70
; switch(key)
mov R22,R20
clr R23
cpi R22,183
ldi R30,0
cpc R23,R30
brne X25
xjmp L40
X25:
X6:
cpi R22,187
ldi R30,0
cpc R23,R30
brne X26
xjmp L36
X26:
X7:
cpi R22,189
ldi R30,0
cpc R23,R30
brne X27
xjmp L32
X27:
X8:
cpi R22,190
ldi R30,0
cpc R23,R30
brne X28
xjmp L28
X28:
X9:
ldi R24,190
ldi R25,0
cp R24,R22
cpc R25,R23
brlt L43
X10:
L42:
cpi R22,119
ldi R30,0
cpc R23,R30
brne X29
xjmp L41
X29:
X11:
cpi R22,123
ldi R30,0
cpc R23,R30
brne X30
xjmp L37
X30:
X12:
cpi R22,125
ldi R30,0
cpc R23,R30
brne X31
xjmp L33
X31:
X13:
cpi R22,126
ldi R30,0
cpc R23,R30
breq L29
X14:
xjmp L23
L43:
cpi R22,215
ldi R30,0
cpc R23,R30
brne X32
xjmp L39
X32:
X15:
cpi R22,219
ldi R30,0
cpc R23,R30
breq L35
X16:
cpi R22,221
ldi R30,0
cpc R23,R30
breq L31
X17:
cpi R22,222
ldi R30,0
cpc R23,R30
breq L27
X18:
cpi R22,215
ldi R30,0
cpc R23,R30
brge X33
xjmp L23
X33:
X19:
L44:
cpi R22,231
ldi R30,0
cpc R23,R30
breq L38
X20:
cpi R22,235
ldi R30,0
cpc R23,R30
breq L34
X21:
cpi R22,237
ldi R30,0
cpc R23,R30
breq L30
X22:
cpi R22,238
ldi R30,0
cpc R23,R30
breq L26
X23:
xjmp L23
L26:
.dbline 73
; {
; case 0xEE:
; key=0x0;
clr R20
.dbline 74
; break;
xjmp L16
L27:
.dbline 76
; case 0xDE:
; key=0x1;
ldi R20,1
.dbline 77
; break;
xjmp L16
L28:
.dbline 79
; case 0xBE:
; key=0x2;
ldi R20,2
.dbline 80
; break;
xjmp L16
L29:
.dbline 82
; case 0x7E:
; key=0x3;
ldi R20,3
.dbline 83
; break;
xjmp L16
L30:
.dbline 85
; case 0xED:
; key=0x4;
ldi R20,4
.dbline 86
; break;
xjmp L16
L31:
.dbline 88
; case 0xDD:
; key=0x5;
ldi R20,5
.dbline 89
; break;
xjmp L16
L32:
.dbline 91
; case 0xBD:
; key=0x6;
ldi R20,6
.dbline 92
; break;
xjmp L16
L33:
.dbline 94
; case 0x7D:
; key=0x7;
ldi R20,7
.dbline 95
; break;
xjmp L16
L34:
.dbline 97
; case 0xEB:
; key=0x8;
ldi R20,8
.dbline 98
; break;
xjmp L16
L35:
.dbline 100
; case 0xDB:
; key=0x9;
ldi R20,9
.dbline 101
; break;
xjmp L16
L36:
.dbline 103
; case 0xBB:
; key=0xA;
ldi R20,10
.dbline 104
; break;
xjmp L16
L37:
.dbline 106
; case 0x7B:
; key=0xB;
ldi R20,11
.dbline 107
; break;
xjmp L16
L38:
.dbline 109
; case 0xE7:
; key=0xC;
ldi R20,12
.dbline 110
; break;
xjmp L16
L39:
.dbline 112
; case 0xD7:
; key=0xD;
ldi R20,13
.dbline 113
; break;
xjmp L16
L40:
.dbline 115
; case 0xB7:
; key=0xE;
ldi R20,14
.dbline 116
; break;
xjmp L16
L41:
.dbline 118
; case 0x77:
; key=0xF;
ldi R20,15
.dbline 119
; break;
xjmp L16
L23:
.dbline 121
; default:
; key=16;
ldi R20,16
.dbline 122
; }
.dbline 123
; }
xjmp L16
L15:
.dbline 125
; else
; {
.dbline 126
; key=16;
ldi R20,16
.dbline 127
; }
L16:
.dbline 128
; return key;
mov R16,R20
.dbline -2
L14:
.dbline 0 ; func end
xjmp pop_xgsetF00C
.dbsym r j 10 c
.dbsym r key 20 c
.dbsym r i 22 c
.dbend
.dbfunc e miao _miao fV
.even
_miao::
st -y,R0
st -y,R1
st -y,R2
st -y,R3
st -y,R4
st -y,R5
st -y,R6
st -y,R7
st -y,R8
st -y,R9
st -y,R16
st -y,R17
st -y,R18
st -y,R19
st -y,R24
st -y,R25
st -y,R26
st -y,R27
st -y,R30
st -y,R31
in R0,0x3f
st -y,R0
.dbline -1
.dbline 131
; }
; void miao()
; {
.dbline 132
; if(num==60)
lds R24,_num
cpi R24,60
brne L46
X34:
.dbline 133
; num=0;
clr R2
sts _num,R2
L46:
.dbline 134
; num++;
lds R24,_num
subi R24,255 ; addi 1
sts _num,R24
.dbline 135
; TCNT1H=0X85;
ldi R24,133
out 0x2d,R24
.dbline 136
; TCNT1L=0XED;
ldi R24,237
out 0x2c,R24
.dbline 137
; if(key_press())
xcall _key_press
tst R16
breq L48
X35:
.dbline 138
; {
.dbline 139
; l=key_scan();
xcall _key_scan
sts _l,R16
.dbline 141
; //show(l,3);
; }
L48:
.dbline -2
L45:
.dbline 0 ; func end
ld R0,y+
out 0x3f,R0
ld R31,y+
ld R30,y+
ld R27,y+
ld R26,y+
ld R25,y+
ld R24,y+
ld R19,y+
ld R18,y+
ld R17,y+
ld R16,y+
ld R9,y+
ld R8,y+
ld R7,y+
ld R6,y+
ld R5,y+
ld R4,y+
ld R3,y+
ld R2,y+
ld R1,y+
ld R0,y+
reti
.dbend
.dbfunc e main _main fV
.even
_main::
.dbline -1
.dbline 144
; }
; void main()
; {
.dbline 145
; DDRB=0XFF;
ldi R24,255
out 0x17,R24
.dbline 146
; DDRA|=0X18;//573锁存端
in R24,0x1a
ori R24,24
out 0x1a,R24
.dbline 148
;
; TCCR1B=0X04;//T/C1控制寄存器B
ldi R24,4
out 0x2e,R24
.dbline 149
; TCNT1H=0X85;//计数寄存器(高位)
ldi R24,133
out 0x2d,R24
.dbline 150
; TCNT1L=0XED;//计数寄存器(低位)
ldi R24,237
out 0x2c,R24
.dbline 151
; TIMSK|=BIT(2);//T/C1中断屏蔽寄存器
in R24,0x39
ori R24,4
out 0x39,R24
.dbline 152
; SREG|=BIT(7);//总中断
bset 7
xjmp L52
L51:
.dbline 155
;
; while(1)
; {
.dbline 156
; show(num/10,1);
ldi R18,1
ldi R17,10
lds R16,_num
xcall div8u
xcall _show
.dbline 157
; show(num%10,0);
clr R18
ldi R17,10
lds R16,_num
xcall mod8u
xcall _show
.dbline 158
; show(l,3);
ldi R18,3
lds R16,_l
xcall _show
.dbline 159
; }
L52:
.dbline 154
xjmp L51
X36:
.dbline -2
L50:
.dbline 0 ; func end
ret
.dbend
.area bss(ram, con, rel)
.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\中断扫描键盘\zdsmjp.c
_l::
.blkb 1
.dbsym e l _l c
; }
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -