ledkey.asm

两个常用的单片机仿真实验板

UpDown BIT 00H ;上下行标志
StartEnd BIT 01H ;起动及停止标志
LAMPCODE EQU 21H ;存放流动的数据代码
ORG 0000H
AJMP MAIN
ORG 0030H
MAIN:
MOV SP,#5FH
MOV P1,#0FFH
CLR UpDown ;启动时处于向上的状态
CLR StartEnd ;启动时处于停止状态
MOV LAMPCODE,#01H ;单灯流动的代码
LOOP: ACALL KEY ;调用键盘程序
JNB F0,LNEXT ;如果无键按下,则继续
ACALL KEYPROC ;否则调用键盘处理程序
LNEXT: ACALL LAMP ;调用灯显示程序
AJMP LOOP ;反复循环,主程序到此结束
;延时程序,键盘处理中调用
DELAY: MOV R7,#100
D1: MOV R6,#100
DJNZ R6,$
DJNZ R7,D1
RET
KEYPROC:
MOV A,B ;从B 寄存器中获取键值
JB ACC.2,KeyStart ;分析键的代码,某位被按下,则该位为1
JB ACC.3,KeyOver
JB ACC.4,KeyUp
JB ACC.5,KeyDown
AJMP KEY_RET
KeyStart:
SETB StartEnd ;第一个键按下后的处理
AJMP KEY_RET
KeyOver:
CLR StartEnd ;第二个键按下后的处理
AJMP KEY_RET
KeyUp:
SETB UpDown ;第三个键按下后的处理
AJMP KEY_RET
KeyDown:
CLR UpDown ;第四个键按下后的处理
KEY_RET:
RET
KEY:
CLR F0 ;清F0,表示无键按下。
ORL P3,#00111100B ;将P3 口的接有键的四位置1
MOV A,P3 ;取P3 的值
ORL A,#11000011B ;将其余4 位置1
CPL A ;取反
JZ KEY_RET ;如果为0 则一定无键按下  
CALL DELAY ;否则延时去键抖
ORL P3,#00111100B
MOV A,P3
ORL A,#11000011B
CPL A
JZ KEY_RET
MOV B,A ;确实有键按下,将键值存入B 中
SETB F0 ;设置有键按下的标志
;以下的代码是可以被注释掉的，如果去掉注释，就具有判断键是否释放的功能，否则
;没有
;K_RET: ;ORL P3,#00111100B ;此处循环等待键的释放
;MOV A,P3
;ORL A,#11000011B
;CPL A
;JZ K_RET1 ;读取的数据取反后为0 说明键释放了
;AJMP K_RET
;K_RET1:CALL DELAY ;消除后沿抖动
RET
D500MS: ;流水灯的延迟时间
MOV R7,#255
D51: MOV R6,#255
DJNZ R6,$
DJNZ R7,D51
RET
LAMP:
JB StartEnd,LampStart ;如果StartEnd=1,则启动
MOV P1,#0FFH
AJMP LAMPRET ;否则关闭所有显示,返回
LampStart:
JB UpDown,LAMPUP ;如果UpDown=1,则向上流动
MOV A,LAMPCODE
RL A ;实际就是左移位而已
MOV LAMPCODE,A
MOV P1,A
LCALL D500MS
LCALL D500MS
LCALL D500MS
AJMP LAMPRET
LAMPUP:
MOV A,LAMPCODE
RR A ;向下流动实际就是右移
MOV LAMPCODE,A
MOV P1,A
LCALL D500MS
LCALL D500MS
LCALL D500MS
LAMPRET:
RET
END