- org 00h
- main:
- mov keydata,#0 ;// 清零
- mov tmod ,#09h ;//设置定时0方式1,GATE=1
- mov r7,#0 ;//计数器,用来计数是否满8位
- mov r6,#0 ;//计数器,用来计数是否满2字节(解16位编码)
- jb p3.2,$ ;//是否为低电平
- again: ;//如果为低,继续往下面执行
- mov tl0,#0 ;//清零TL0
- mov th0,#0 ;//清零TH0
- setb tr0 ;//开启定时器0
- jnb p3.2,$ ;//等待高电平到来
- jb p3.2,$ ;//高电平到来,此时开始计数
- clr tr0 ;//高电平结束,停止计数
- mov a,th0 ;//读取th0 值,TL0忽略不计
- clr c ;//
- subb a,#12 ;//
- jc again ;//th0<12则转,即小于3.4ms,你可以算一下这个时间
- mov a,#14 ;//
- clr c ;//
- subb a,th0 ;//和14比较,如果TH0>14则大于3.8ms
- jc again ;//大于3.8ms,从新再检测
- nextbit: ;//起始位找到了,然后下一位
- mov tl0,#0 ;//
- mov th0,#0 ;//
- setb tr0 ;//启动定时器
- jnb p3.2,$ ;//等待高电平
- jb p3.2,$ ;//高电平到来,此时开始计数
- clr tr0 ;//高电平结束,停止计数
- mov a,th0 ;//读取计数值,TL0忽略不计
- clr c ;//
- subb a,#8 ;//th0和8比较
- jc next ;;;;//若 <2.2ms则转,再判断是否大于0.84ms
- mov a,#10 ;//再跟10比较
- clr c ;//
- subb a,th0 ;//
- jc again ;;;;;;;//若 >2.7ms,则放弃,从新检测
- mov a,keydata ;// 符合大于2.2ms 小于2.7ms,即为“1”
- setb c ;//C = 1
- rrc a ;//把1移位进A
- mov keydata,a ;//保存
- inc r7 ;//计数器加1
- cjne r7,#8,nextbit ;//是否满8位
- inc r6 ;//计数加1
- cjne r6,#2,last8 ;//是否满两字节
- sjmp seach ;//不满两字节,再新采集
- last8: ;//满1字节,再接下来第二字节
- mov keydata+1,a ;//把第一字节编码数据保存到31h里
- mov r7,#0 ;//计数器R7清零
- sjmp nextbit ;//继续采集数据
- next: ;//小于2.2ms时转到这里
- mov a,th0 ;//读取计数值TH0
- swap a ;//高4位与低4位对换
- mov r1,a ;//保存到R1
- anl tl0,#0f0h ;//取TL0高4位,低4位忽略不计
- mov a,tl0 ;//
- clr c ;//
- rrc a ;//
- rrc a ;//
- rrc a ;//
- rrc a ;//
- add a,r1 ;//
- mov r1,a ;//
- subb a,#30 ;//以上几行是把TH0的低4位和TL0的高4位合并为1字节作为计数值
- jc nextbit ; //判断是否 <0.84ms,是则放弃,继续采集
- mov a,r1 ;//否
- clr c ;//
- cjne a,#64,continue ;//跟64比较
- continue: ;//
- jnc nextbit ; //a>64表示采样值 >1.11ms 放弃
- mov a,keydata ;//否则,符合位“0”
- clr c ;//C = 0
- rrc a ;//把零右移进A
- mov keydata,a ;//保存
- inc r7 ;//计数器加1
- cjne r7,#8,nextbit ;//是否满8位
- inc r6 ;//计数器加1
- cjne r6,#2,last_8 ;//是第一字节已经满
- sjmp seach ;//
- last_8: ;//如果为第二字节
- mov keydata+1,a ;//则保存第一字节到31h
- mov r7,#0 ;//清零R7
- sjmp nextbit ;//
- seach: ;//匹配按键编码
- mov r0,#-2 ;//按键编码字节个数计数器
- mov r1,#-1 ;//按键顺序计数器
- seach1: ;//
- inc r0 ;//
- seach2: ;//
- inc r0 ;//
- inc r1 ;//
- cjne r1,#29,compare ;//是否R1=29
- sjmp exit0 ;//
- compare: ;//开始匹配
- mov a,r0 ;//
- mov dptr,#keycode ;//地址指针指向码表首址
- movc a,@a+dptr ;//取码
- cjne a,keydata,seach1 ;//比较
- inc r0 ;//R0+1,再比较下一字节(每个按键编码为2字节)
- mov a,r0 ;//
- ;mov dptr,#keycode ;//
- movc a,@a+dptr ;//比较
- cjne a,keydata+1,seach2 ;//是否匹配,不匹配则继续跟下一字节比较
- mov p1,r1 ;//如果匹配,把按键顺序号输出到p1
- send: ;//
- mov tmod,#20h ; //设置timer 1,mode 2
- mov tl1,#0fdh ;//设置定时器初值
- mov th1,#0fdh ;//
- mov scon,#01010000b;//以上设置,即设置串口波特率系数为:9600,8,1,0
- setb tr1 ;//启动定时器1
- loop_s: ;//
- mov sbuf,r1 ;//把R1(按键顺序号)输出到串口
- jnb ti,$ ;//等待是否发送完毕
- clr ti ;//发送完毕,清零TI
- exit0: ;//
- ljmp main ;//循环
-
- keycode: ;//每两字节代表一个按键的编码
- db 11111000b,00000000b, 11111100b,00000000b, 11111001b,11000000b
- db 11111100b,11000000b, 11111010b,00000000b, 11111010b,00100000b
- db 11111010b,01000000b, 11111010b,01100000b, 11111010b,10000000b
- db 11111010b,10100000b, 11111010b,11000000b, 11111010b,11100000b
- db 11111011b,00000000b, 11111011b,00100000b, 11111011b,01000000b
- db 11111011b,01100000b, 11111111b,01100000b, 11111111b,10100000b
- db 10001100b,10001110b, 10001101b,11101110b, 10001100b,10101110b
- db 10001101b,11001110b, 11111000b,11100000b, 11111100b,10000000b
- db 11111100b,01000000b, 11111001b,10100000b, 11111100b,10100000b
- db 11111100b,01100000b
- end