n久前的51单片机4*4键盘加4数码管显示汇编程序

来源：互联网发布：流程优化那点事编辑：程序博客网时间：2024/06/08 17:02

KEYBUFEQU30HDISPBUFEQU31HDISPBITEQU35HCOLKEY:MOVP1,#0F0HMOVA,P1ANLA,#0F0HXRLA,#0F0HJZNOKEYLCALLDELAYMOVA,P1ANLA,#0F0HXRLA,#0F0HJZNOKEYMOVA,P1ANLA,#0F0HCJNEA,#070H,NCK1MOVKEYBUF,#0AJMPROWKEYNCK1:CJNEA,#0B0H,NCK2MOVKEYBUF,#1AJMPROWKEYNCK2:CJNEA,#0D0H,NCK3MOVKEYBUF,#2AJMPROWKEYNCK3:CJNEA,#0E0H,NCK4MOVKEYBUF,#3AJMPROWKEYNCK4:NOPROWKEY:MOVP1,#0FHMOVA,P1ANLA,#0FHMOVR1,AMOVA,KEYBUFCJNER1,#0EH,NRK1ADDA,#0AJMPDKNRK1:CJNER1,#0DH,NRK2ADDA,#4AJMPDKNRK2:CJNER1,#0BH,NRK3ADDA,#8AJMPDKNRK3:CJNER1,#07H,NRK3ADDA,#12AJMPDKNRK4:NOPDK:MOVKEYBUF,ALOOP:MOVA,P1ANLA,#0FHXRLA,#0FHJZNOKEYLCALLVALUELCALLDISPLJMPLOOPNOKEY:LCALLVALUELCALLDISPLJMPCOLKEYDELAY:MOVR5,#5D1:MOVR6,#248DJNZR6,$DJNZR5,D1RETVALUE:MOVA,KEYBUFMOVB,#10DIVABMOVDISPBUF,AMOVA,BMOVDISPBUF+1,AMOVA,#16MOVDISPBUF+2,AMOVA,KEYBUFMOVDISPBUF+3,ARETDISP:MOVA,#DISPBUFADDA,DISPBITMOVR0,AMOVA,@R0MOVDPTR,#TABLEMOVCA,@A+DPTRMOVP3,#0FFH;消影MOVP2,AMOVA,DISPBITMOVDPTR,#TABMOVCA,@A+DPTRMOVP3,AINCDISPBITMOVA,DISPBITCJNEA,#04H,DISPMOVDISPBIT,#00HRETTABLE:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,77H,7CH,39H,5EH,79H,71H,40HTAB:DB 0FEH,0FDH,0FBH,0F7HEND

效果：

0 0