📄 keyboard.s
字号:
.module keyboard.c
.area lit(rom, con, rel)
_unshifted::
.byte 13,9
.byte 14,124
.byte 21,'q
.byte 22,49
.byte 26,'z
.byte 27,'s
.byte 28,'a
.byte 29,'w
.byte 30,50
.byte 33,'c
.byte 34,'x
.byte 35,'d
.byte 36,'e
.byte 37,52
.byte 38,51
.byte 41,32
.byte 42,'v
.byte 43,'f
.byte 44,'t
.byte 45,'r
.byte 46,53
.byte 49,'n
.byte 50,'b
.byte 51,'h
.byte 52,'g
.byte 53,'y
.byte 54,54
.byte 57,44
.byte 58,'m
.byte 59,'j
.byte 60,'u
.byte 61,55
.byte 62,56
.byte 'A,44
.byte 'B,'k
.byte 'C,'i
.byte 'D,'o
.byte 'E,48
.byte 'F,57
.byte 'I,46
.byte 'J,45
.byte 'K,'l
.byte 'L,63
.byte 'M,'p
.byte 'N,43
.byte 'R,63
.byte 'T,63
.byte 'U,92
.byte 'Z,13
.byte 91,63
.byte 93,92
.byte 'a,60
.byte 'f,8
.byte 'i,49
.byte 'k,52
.byte 'l,55
.byte 'p,48
.byte 'q,44
.byte 'r,50
.byte 's,53
.byte 't,54
.byte 'u,56
.byte 'y,43
.byte 'z,51
.byte 123,45
.byte 124,42
.byte 125,57
.byte 0,0
.dbfile C:\DOCUME~1\Administrator\桌面\ps2/scancode.h
.dbsym e unshifted _unshifted A[136:68:2]kc
_shifted::
.byte 13,9
.byte 14,63
.byte 21,'Q
.byte 22,33
.byte 26,'Z
.byte 27,'S
.byte 28,'A
.byte 29,'W
.byte 30,34
.byte 33,'C
.byte 34,'X
.byte 35,'D
.byte 36,'E
.byte 37,63
.byte 38,35
.byte 41,32
.byte 42,'V
.byte 43,'F
.byte 44,'T
.byte 45,'R
.byte 46,37
.byte 49,'N
.byte 50,'B
.byte 51,'H
.byte 52,'G
.byte 53,'Y
.byte 54,38
.byte 57,'L
.byte 58,'M
.byte 59,'J
.byte 60,'U
.byte 61,47
.byte 62,40
.byte 'A,59
.byte 'B,'K
.byte 'C,'I
.byte 'D,'O
.byte 'E,61
.byte 'F,41
.byte 'I,58
.byte 'J,95
.byte 'K,'L
.byte 'L,63
.byte 'M,'P
.byte 'N,63
.byte 'R,63
.byte 'T,63
.byte 'U,96
.byte 'Z,13
.byte 91,94
.byte 93,42
.byte 'a,62
.byte 'f,8
.byte 'i,49
.byte 'k,52
.byte 'l,55
.byte 'p,48
.byte 'q,44
.byte 'r,50
.byte 's,53
.byte 't,54
.byte 'u,56
.byte 'y,43
.byte 'z,51
.byte 123,45
.byte 124,42
.byte 125,57
.byte 0,0
.dbsym e shifted _shifted A[136:68:2]kc
.area text(rom, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\ps2/scancode.h
.dbfile C:\DOCUME~1\Administrator\桌面\ps2\keyboard.c
.dbfunc e port_init _port_init fV
.even
_port_init::
.dbline -1
.dbline 29
; /*****************************
; ** low level kexboard routines VERSION 1.0
; ******************************/
; //ICC-AVR application builder : 2009-3-13 23:41:54
; // Target : M16
; // Crystal: 11.059Mhz
;
; #include <iom16v.h>
; #include <macros.h>
;
; // "kb.h"
; #include "scancode.h"
;
; #define BUFF_SIZE 64
; #define CLOCK 2
; #define DATAPIN 3
;
; #define ISC00 0
; #define ISC01 1
;
; // Declare your global variables here
; unsigned char edge, bitcount; // 0 = neg. 1 = pos.
;
; unsigned char kb_buffer[BUFF_SIZE];
; unsigned char *inpt, *outpt;
; unsigned char buffcnt;
;
; void port_init(void)
; {
.dbline 30
; PORTA = 0x00;
clr R2
out 0x1b,R2
.dbline 31
; DDRA = 0x00;
out 0x1a,R2
.dbline 32
; PORTB = 0x00;
out 0x18,R2
.dbline 33
; DDRB = 0x00;
out 0x17,R2
.dbline 34
; PORTC = 0x00; //m103 output only
out 0x15,R2
.dbline 35
; DDRC = 0x00;
out 0x14,R2
.dbline 36
; PORTD = 0x00;
out 0x12,R2
.dbline 37
; DDRD = 0x00;
out 0x11,R2
.dbline -2
L1:
.dbline 0 ; func end
ret
.dbend
.dbfunc e InitKeyBoard _InitKeyBoard fV
.even
_InitKeyBoard::
.dbline -1
.dbline 42
; }
;
;
; void InitKeyBoard(void)
; {
.dbline 43
; inpt = kb_buffer; // Initialize buffer
ldi R24,<_kb_buffer
ldi R25,>_kb_buffer
sts _inpt+1,R25
sts _inpt,R24
.dbline 44
; outpt = kb_buffer;
sts _outpt+1,R25
sts _outpt,R24
.dbline 45
; buffcnt = 0;
clr R2
sts _buffcnt,R2
.dbline 48
;
; //MCUCR = 2; // INT0 interrupt on falling edge
; edge = 0; // 0 = falling edge 1 = rising edge
sts _edge,R2
.dbline 49
; bitcount = 11;
ldi R24,11
sts _bitcount,R24
.dbline -2
L2:
.dbline 0 ; func end
ret
.dbend
.dbfunc e put_kbbuff _put_kbbuff fV
; c -> R16
.even
_put_kbbuff::
.dbline -1
.dbline 55
; //#asm("sei") // interrupt enable
; }
;
;
; void put_kbbuff(unsigned char c)
; {
.dbline 56
; if (buffcnt<BUFF_SIZE) // If buffer not full
lds R24,_buffcnt
cpi R24,64
brsh L4
.dbline 57
; {
.dbline 58
; *inpt = c; // Put character into buffer
lds R30,_inpt
lds R31,_inpt+1
std z+0,R16
.dbline 59
; inpt++; // Increment pointer
lds R24,_inpt
lds R25,_inpt+1
adiw R24,1
sts _inpt+1,R25
sts _inpt,R24
.dbline 61
;
; buffcnt++;
lds R24,_buffcnt
subi R24,255 ; addi 1
sts _buffcnt,R24
.dbline 63
;
; if (inpt >= kb_buffer + BUFF_SIZE) // Pointer wrapping
ldi R24,<_kb_buffer+64
ldi R25,>_kb_buffer+64
lds R2,_inpt
lds R3,_inpt+1
cp R2,R24
cpc R3,R25
brlo L6
.dbline 64
; inpt = kb_buffer;
ldi R24,<_kb_buffer
ldi R25,>_kb_buffer
sts _inpt+1,R25
sts _inpt,R24
L6:
.dbline 65
L4:
.dbline -2
L3:
.dbline 0 ; func end
ret
.dbsym r c 16 c
.dbend
.dbfunc e getchar_kb _getchar_kb fI
; byte -> R16,R17
.even
_getchar_kb::
.dbline -1
.dbline 69
; }
; }
;
; int getchar_kb(void)
; {
L10:
.dbline 71
L11:
.dbline 71
; int byte;
; while(buffcnt == 0); // Wait for data
lds R2,_buffcnt
tst R2
breq L10
.dbline 73
;
; byte = *outpt; // Get byte
lds R30,_outpt
lds R31,_outpt+1
ldd R16,z+0
clr R17
.dbline 74
; outpt++; // Increment pointer
movw R24,R30
adiw R24,1
sts _outpt+1,R25
sts _outpt,R24
.dbline 76
;
; if (outpt >= kb_buffer + BUFF_SIZE) // Pointer wrapping
ldi R24,<_kb_buffer+64
ldi R25,>_kb_buffer+64
lds R2,_outpt
lds R3,_outpt+1
cp R2,R24
cpc R3,R25
brlo L13
.dbline 77
; outpt = kb_buffer;
ldi R24,<_kb_buffer
ldi R25,>_kb_buffer
sts _outpt+1,R25
sts _outpt,R24
L13:
.dbline 79
;
; buffcnt--; // Decrement buffer count
lds R24,_buffcnt
subi R24,1
sts _buffcnt,R24
.dbline 81
;
; return byte;
.dbline -2
L9:
.dbline 0 ; func end
ret
.dbsym r byte 16 I
.dbend
.dbfunc e print_hexbyte _print_hexbyte fV
; l -> R20
; h -> R22
; i -> R20
.even
_print_hexbyte::
xcall push_gset2
mov R20,R16
.dbline -1
.dbline 85
; }
;
; void print_hexbyte(unsigned char i) //???
; {
.dbline 88
; unsigned char h, l;
;
; h = i & 0xF0; // High nibble
mov R22,R20
andi R22,240
.dbline 89
; h = h>>4;
mov R24,R22
swap R24
andi R24,#0x0F
mov R22,R24
.dbline 90
; h = h + '0';
subi R22,208 ; addi 48
.dbline 92
;
; if (h > '9')
ldi R24,57
cp R24,R22
brsh L17
.dbline 93
; h = h + 7;
subi R22,249 ; addi 7
L17:
.dbline 95
;
; l = (i & 0x0F)+'0'; // Low nibble
mov R24,R20
andi R24,15
subi R24,208 ; addi 48
mov R20,R24
.dbline 96
; if (l > '9')
ldi R24,57
cp R24,R20
brsh L19
.dbline 97
; l = l + 7;
subi R20,249 ; addi 7
L19:
.dbline 99
;
; put_kbbuff(h);
mov R16,R22
xcall _put_kbbuff
.dbline 100
; put_kbbuff(l);
mov R16,R20
xcall _put_kbbuff
.dbline -2
L16:
xcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r l 20 c
.dbsym r h 22 c
.dbsym r i 20 c
.dbend
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\ps2\keyboard.c
L22:
.blkb 1
.area idata
.byte 0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\ps2\keyboard.c
L23:
.blkb 1
.area idata
.byte 0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\ps2\keyboard.c
L24:
.blkb 1
.area idata
.byte 0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\ps2\keyboard.c
.area text(rom, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\ps2\keyboard.c
.dbfunc e decode _decode fV
.dbsym s mode L24 c
.dbsym s shift L23 c
.dbsym s is_up L22 c
; i -> R22
; sc -> R20
.even
_decode::
xcall push_gset2
mov R20,R16
.dbline -1
.dbline 104
; }
;
; void decode(unsigned char sc)
; {
.dbline 108
; static unsigned char is_up=0, shift = 0, mode = 0;
; unsigned char i;
;
; if (!is_up) // Last data received was the up-key identifier
lds R2,L22
tst R2
breq X2
xjmp L25
X2:
.dbline 109
; {
.dbline 110
; switch (sc)
mov R22,R20
clr R23
cpi R22,18
ldi R30,0
cpc R23,R30
breq L31
ldi R24,18
ldi R25,0
cp R24,R22
cpc R25,R23
brlt L60
L59:
cpi R22,5
ldi R30,0
cpc R23,R30
breq L33
xjmp L27
L60:
cpi R22,89
ldi R30,0
cpc R23,R30
breq L32
cpi R22,89
ldi R30,0
cpc R23,R30
brlt L27
L61:
cpi R22,240
ldi R30,0
cpc R23,R30
breq L30
xjmp L27
X0:
.dbline 111
; {
L30:
.dbline 113
; case 0xF0 : // The up-key identifier
; is_up = 1;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -