📄 ps2simplehard.lis
字号:
.module PS2SimpleHard.C
.area text(rom, con, rel)
0000 .dbfile D:\ICC_H\Software.H
0000 .dbfunc e speaData _speaData fV
0000 ; y -> y+4
0000 ; j -> y+0
0000 ; i -> R10
0000 ; len -> R12
0000 ; dat -> y+16
.even
0000 _speaData::
0000 0E940000 xcall push_arg4
0004 0E940000 xcall push_gset4
0008 2897 sbiw R28,8
000A CC88 ldd R12,y+20
000C .dbline -1
000C .dbline 116
000C ; /*********************************************************************
000C ; 微 雪 电 子 WaveShare http://www.waveShare.net
000C ;
000C ; 目 的: 建立使用PS2-PC键盘操作的示例程序
000C ;
000C ; 目标系统: 基于AVR单片机
000C ;
000C ; 应用软件: ICCAVR
000C ;
000C ; 版 本: Version 1.0
000C ;
000C ; 圆版时间: 2005-06-25
000C ;
000C ; 开发人员: SEE
000C ;
000C ; 说 明： 若用于商业用途，请保留此段文字或注明代码来源
000C ;
000C ; 深 圳 微 雪 电 子 保 留 所 有 的 版 权
000C ; *********************************************************************/
000C ;
000C ; /*01010101010101010101010101010101010101010101010101010101010101010101
000C ; ----------------------------------------------------------------------
000C ; 版本更新记录：
000C ;
000C ; ----------------------------------------------------------------------
000C ; 实验内容：
000C ; 按PC键盘，观察单片机读到的数据，使用PA/PB口的LED做指示。
000C ; ----------------------------------------------------------------------
000C ; 硬件连接：
000C ; 将PA/PB口的LED指示灯使用短路帽短接；
000C ; 将PC键盘插入PS2接口，将PD3与PS2.SDA使用短路帽短接，将PD4与PS2.SCK使用短路帽短接
000C ; ----------------------------------------------------------------------
000C ; 注意事项：
000C ; 详见M16SD说明书
000C ; ----------------------------------------------------------------------
000C ; 10101010101010101010101010101010101010101010101010101010101010101010*/
000C ;
000C ; #include <iom16v.h>
000C ; #include "D:\ICC_H\CmmICC.H"
000C ; #include "D:\ICC_H\PS2.H"
000C ;
000C ; #define PRESS_DATA_DDR DDRA
000C ; #define PRESS_DATA_PORT PORTA
000C ; #define SHIFT_DATA_DDR DDRB
000C ; #define SHIFT_DATA_PORT PORTB
000C ;
000C ; #define SET_SDA sbi(PORTD,4)
000C ; #define CLR_SDA cbi(PORTD,4)
000C ; #define GET_SDA gbi(PIND,4)
000C ; #define OUT_SDA sbi(DDRD,4)
000C ; #define IN_SDA cbi(DDRD,4)
000C ;
000C ; #define SET_SCK sbi(PORTD,3)
000C ; #define CLR_SCK cbi(PORTD,3)
000C ; #define GET_SCK gbi(PIND,3)
000C ; #define OUT_SCK sbi(DDRD,3)
000C ; #define IN_SCK cbi(DDRD,3)
000C ;
000C ; bool rcvF = 0; //是否收到字符标志
000C ; uint8 keyVal; //键值
000C ;
000C ; /*--------------------------------------------------------------------
000C ; 函数名称：
000C ; 函数功能：
000C ; 注意事项：
000C ; 提示说明：
000C ; 输 入：
000C ; 返 回：
000C ; --------------------------------------------------------------------*/
000C ; #pragma interrupt_handler int1_isr:3
000C ; void int1_isr(void)
000C ; {
000C ; static uint8 rcvBits = 0; //接收次数，中断次数
000C ; if((rcvBits>0) && (rcvBits<9))
000C ; {
000C ; keyVal=keyVal>>1; //数据是LSB格式
000C ; //IN_SDA; //当有对键盘有属性设置时，注意输入输出切换
000C ; //DELAY();
000C ; if(GET_SDA)
000C ; keyVal=keyVal|0x80;
000C ; }
000C ; rcvBits++;
000C ; while(!GET_SCK); //等待PS/2CLK拉高
000C ;
000C ; if(rcvBits>10)
000C ; {
000C ; rcvBits=0; //接收11次表示接收完一帧数据
000C ; rcvF=1; //标识有字符已经输入
000C ; }
000C ; }
000C ; /*--------------------------------------------------------------------
000C ; 函数名称：
000C ; 函数功能：
000C ; 注意事项：
000C ; 提示说明：
000C ; 输 入：
000C ; 返 回：
000C ; --------------------------------------------------------------------*/
000C ; void keyHandle(uint8 val)
000C ; {
000C ; uint8 i;
000C ; static bool isUp=0; //按键释放动作标志
000C ; static bool shift=0; //shift键按下标志
000C ; rcvF = 0;
000C ; PRESS_DATA_PORT = val; //状态指示
000C ; if(!isUp)
000C ; {
000C ; switch(val)
000C ; {
000C ; case 0xF0 : // a relase action
000C ; isUp = 1;
000C ; break;
000C ; case 0x12 : // Left shift
000C ; shift = 1;
000C ; break;
000C ; case 0x59 : // Right shift
000C .dbline 119
000C ; shift = 1;
000C ; break;
000C ; default:
000C AA24 clr R10
000E 41E0 ldi R20,1
0010 50E0 ldi R21,0
0012 60E0 ldi R22,0
0014 70E0 ldi R23,0
0016 FE01 movw R30,R28
0018 4083 std z+0,R20
001A 5183 std z+1,R21
001C 6283 std z+2,R22
001E 7383 std z+3,R23
0020 46C0 xjmp L5
0022 L2:
0022 .dbline 120
0022 .dbline 121
0022 FE01 movw R30,R28
0024 2080 ldd R2,z+0
0026 3180 ldd R3,z+1
0028 4280 ldd R4,z+2
002A 5380 ldd R5,z+3
002C FE01 movw R30,R28
002E 6088 ldd R6,z+16
0030 7188 ldd R7,z+17
0032 8288 ldd R8,z+18
0034 9388 ldd R9,z+19
0036 5A92 st -y,R5
0038 4A92 st -y,R4
003A 3A92 st -y,R3
003C 2A92 st -y,R2
003E 8301 movw R16,R6
0040 9401 movw R18,R8
0042 0E940000 xcall div32u
0046 FE01 movw R30,R28
0048 0483 std z+4,R16
004A 1583 std z+5,R17
004C 2683 std z+6,R18
004E 3783 std z+7,R19
0050 .dbline 122
0050 4AE0 ldi R20,10
0052 50E0 ldi R21,0
0054 60E0 ldi R22,0
0056 70E0 ldi R23,0
0058 FE01 movw R30,R28
005A 2480 ldd R2,z+4
005C 3580 ldd R3,z+5
005E 4680 ldd R4,z+6
0060 5780 ldd R5,z+7
0062 7A93 st -y,R23
0064 6A93 st -y,R22
0066 5A93 st -y,R21
0068 4A93 st -y,R20
006A 8101 movw R16,R2
006C 9201 movw R18,R4
006E 0E940000 xcall mod32u
0072 80E0 ldi R24,<_dataElem
0074 90E0 ldi R25,>_dataElem
0076 EA2D mov R30,R10
0078 FF27 clr R31
007A E80F add R30,R24
007C F91F adc R31,R25
007E 0083 std z+0,R16
0080 .dbline 123
0080 FE01 movw R30,R28
0082 2080 ldd R2,z+0
0084 3180 ldd R3,z+1
0086 4280 ldd R4,z+2
0088 5380 ldd R5,z+3
008A 4AE0 ldi R20,10
008C 50E0 ldi R21,0
008E 60E0 ldi R22,0
0090 70E0 ldi R23,0
0092 5A92 st -y,R5
0094 4A92 st -y,R4
0096 3A92 st -y,R3
0098 2A92 st -y,R2
009A 8A01 movw R16,R20
009C 9B01 movw R18,R22
009E 0E940000 xcall empy32u
00A2 FE01 movw R30,R28
00A4 0083 std z+0,R16
00A6 1183 std z+1,R17
00A8 2283 std z+2,R18
00AA 3383 std z+3,R19
00AC .dbline 124
00AC L3:
00AC .dbline 119
00AC A394 inc R10
00AE L5:
00AE .dbline 119
00AE AC14 cp R10,R12
00B0 08F4 brsh X0
00B2 B7CF xjmp L2
00B4 X0:
00B4 .dbline -2
00B4 L1:
00B4 2896 adiw R28,8
00B6 0E940000 xcall pop_gset4
00BA 2496 adiw R28,4
00BC .dbline 0 ; func end
00BC 0895 ret
00BE .dbsym l y 4 l
00BE .dbsym l j 0 l
00BE .dbsym r i 10 c
00BE .dbsym r len 12 C
00BE .dbsym l dat 16 l
00BE .dbend
00BE .dbfile D:\ICC_H\I2C.H
00BE .dbfunc e I2C_Start _I2C_Start fc
.even
00BE _I2C_Start::
00BE .dbline -1
00BE .dbline 126
00BE ; if(!shift) // If shift not pressed
00BE ; {
00BE ; /*
00BE ; for(i=0; unshifted[i][0]!=val && unshifted[i][0]; i++)
00BE ; ;
00BE ; 上述写法较为灵活，但KEIL非UNIXC标准，不能采用该写法
00BE ; */
00BE .dbline 127
00BE ; for(i=0; unshifted[i][0]!=val && i<59; i++)
00BE 84EA ldi R24,164
00C0 86BF out 0x36,R24
00C2 .dbline 128
00C2 L7:
00C2 .dbline 128
00C2 L8:
00C2 .dbline 128
00C2 ; ;
00C2 26B6 in R2,0x36
00C4 27FE sbrs R2,7
00C6 FDCF rjmp L7
00C8 .dbline 128
00C8 .dbline 128
00C8 .dbline 129
00C8 ; if(unshifted[i][0] == val)
00C8 81B1 in R24,0x1
00CA 887F andi R24,248
00CC 8830 cpi R24,8
00CE 11F0 breq L10
00D0 .dbline 130
00D0 ; ; //状态指示
00D0 0027 clr R16
00D2 01C0 xjmp L6
00D4 L10:
00D4 .dbline 131
00D4 ;
00D4 01E0 ldi R16,1
00D6 .dbline -2
00D6 L6:
00D6 .dbline 0 ; func end
00D6 0895 ret
00D8 .dbend
00D8 .dbfunc e I2C_Restart _I2C_Restart fc
.even
00D8 _I2C_Restart::
00D8 .dbline -1
00D8 .dbline 142
00D8 ; }
00D8 ; else // If shift pressed
00D8 ; {
00D8 ; /*
00D8 ; for(i=0; unshifted[i][0]!=val && unshifted[i][0]; i++)
00D8 ; ;
00D8 ; 上述写法较为灵活，但KEIL非UNIXC标准，不能采用该写法
00D8 ; */
00D8 ; for(i=0; shifted[i][0]!=val && i<59; i++)
00D8 ; ;
00D8 ; if(shifted[i][0] == val)
00D8 .dbline 143
00D8 ; SHIFT_DATA_PORT = val;//状态指示
00D8 84EA ldi R24,164
00DA 86BF out 0x36,R24
00DC .dbline 144
00DC L13:
00DC .dbline 144
00DC L14:
00DC .dbline 144
00DC ; }
00DC 26B6 in R2,0x36
00DE 27FE sbrs R2,7
00E0 FDCF rjmp L13
00E2 .dbline 144
00E2 .dbline 144
00E2 .dbline 145
00E2 ; }
00E2 81B1 in R24,0x1
00E4 887F andi R24,248
00E6 8031 cpi R24,16
00E8 11F0 breq L16
00EA .dbline 146
00EA ; }
00EA 0027 clr R16
00EC 01C0 xjmp L12
00EE L16:
00EE .dbline 147
00EE ; else
00EE 01E0 ldi R16,1
00F0 .dbline -2
00F0 L12:
00F0 .dbline 0 ; func end
00F0 0895 ret
00F2 .dbend
00F2 .dbfunc e I2C_SendWrDAdr _I2C_SendWrDAdr fc
00F2 ; wrDAdr -> R16
.even
00F2 _I2C_SendWrDAdr::
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -