程序目的:按下K1 数字加一,按下K2,数字减一,按下K3连减. 现在的问题是,上电后能正常显示数字,当按下任一键后数据会变化,但松手后数码管却不会亮了,按下开关不松手就会亮,手一松就灭了,按下开关时也能看到数据的加一或是减一.学生请老师们指点为谢. org 0000h jmp main org 0013h jmp int1_1 k0 bit p1.1;定义4个开关 k1 bit p1.0 k2 bit p1.2 k3 bit p1.3 main: setb ea setb ex1 clr p1.5;关蜂鸣器 mov 40h,#250;上电时要显示的数 ma_1: call divcx;调用除法子程序 lcall display;调用显子程序 ajmp ma_1;跳回 int1_1:clr ea;中断入口 clr ex1 jnb k1, key1;判断哪个键按下,按下后转对应的键处理程序 jnb k2 , key2 jnb k3 , key3 jnb k0 , key0 fh: setb ea ;中断返回,开中断 setb ex1 reti key1: call delay10ms;K1处理程序 jb k1,fh ;不为0是干扰,返回 mov a,40h ;K1每按下一次对40H加一 inc a mov 40h,a k_1: jnb k1,xx1;按下没松开转,不断的显示,防止数码管不亮 cjne a,#0ffh,fh;没加到255,中断返回 jmp fh key2: call delay10ms;K2处理程序,减法 jb k2,fh mov a,40h dec 40h call divcx k_2: jnb k2,xx2 cjne a,#0,fh jmp fh key3: call delay10ms;这里是连减程序 jb k3,fh dec 40h;40H减一 mov a,40h cjne a,#0,zdj1; K3按下不松,转延时一秒继续减 jmp fh
zdj1:call delay1s jmp key3 jmp fh xx0: call display jmp key0 xx1: call display jmp k_1 xx2: call display jmp k_2 divcx:mov a, 40h;除法子程序,把40H中的数转换为BCD数 mov r0,#43 mov b,#100 div ab mov @r0,a;百位在43H dec r0 mov 44h,b xch a,44h mov b,#10 div ab mov @r0,a;十位在42H dec r0 mov 44h,b xch a,44h mov @R0,A;个位在41H ret display: MOV R0,#41 ;取显示数据的首地址 MOV R3,#00000001 ;位扫描初值 play: MOV P2,#0H ;关闭位扫描 MOV A,R3 ;扫描初值入A MOV P2,A ;扫描初值送到P2口 MOV A,@R0 ;取要显示的数据 MOV DPTR,#TAB MOVC A,@A+DPTR MOV P0,A CALL DELAY1MS INC R0 ;显示数据的地址加一 MOV A,P2 ;读入P2口数据 JB ACC.2,ENDOUT ;判断P2口是否扫描到第3位,到了退出子程序 RL A ;没到把P2口数据左移一位 MOV R3,A ;把左移后的数据装入R3 MOV P2,#0H ;关位扫描数据,防止产生鬼影 JMP PLAY ;跳回PLAY继续显示 ENDOUT:MOV P0,#0FFH ;子程序返回时关闭位显示与段显示 MOV P2,#0H ; RET DELAY1MS:mov r3,#2 d1: mov r4,#250 d2: djnz r4,$ djnz r3,d1 ret delay10ms: call display ;10ms子程序,调用一次显示子程序约3ms,调两次约10ms call display call display ret delay1s:mov r5,#20 d3:call delay10ms djnz r5,d3 ret bb:setb p1.5 ;蜂鸣器响的子程序 call delay1s clr p1.5 call delay1s ret
TAB:db 48h,0ebh,52h,62h,0e1h,64h,44h,0eah,40h,60h end
|