【正文】 MOV B,C8 MUL AB MOV D8,A RET WORK8:MOV C8,1 MOV D7,C8 RET WORK9:MOV C8,2 MOV D7,C8 RET WORKA:MOV C8,3 MOV D7,C8 RET WORKB:MOV A,D8 ADD A,D7 MOV C5,A RET WORKC:MOV D7,0 MOV D8,0 RET WORKD:MOV C8,0 MOV D7,C8 RET WORKE:MOV A,D8 ADD A,D7 MOV C1,A RET WORKF:RET END。******************************************************************** WORK0:MOV C8,7 。第0行數(shù)據(jù) ，逐行掃描 KEYB: MOV A,R3 MOV P2,A MOV A,P2 ORL A,0FH CJNE A,0FFH,KEYC MOV A,R3 RL A MOV R3,A CJNE A,0EFH,KEYB LJMP KEY KEYC: MOV A,R3 ANL A,0FH MOV 51H,A KEYD: MOV A,P2 ANL A,0F0H CJNE A,0F0H,KEYD ；按鍵是否釋放 MOV A,R2 ORL A,51H NKEY:CJNE A,0EEH,NKEY0 LCALL WORK0 LJMP KEY NKEY0:CJNE A,0DEH,NKEY1 LCALL WORK1 LJMP KEY NKEY1:CJNE A,0BEH,NKEY2 LCALL WORK2 LJMP KEY NKEY2:CJNE A,7FH,NKEY3 LCALL WORK3 LJMP KEY NKEY3:CJNE A,0EDH,NKEY4 LCALL WORK4 LJMP KEY NKEY4:CJNE A,0DDH,NKEY5 LCALL WORK5 LJMP KEY NKEY5:CJNE A,0BDH,NKEY6 LCALL WORK6 LJMP KEY NKEY6:CJNE A,7DH,NKEY7 LCALL WORK7 LJMP KEY NKEY7:CJNE A,0EBH,NKEY8 LCALL WORK8 LJMP KEY NKEY8:CJNE A,0DBH,NKEY9 LCALL WORK9 LJMP KEY NKEY9:CJNE A,0BBH,NKEYA LCALL WORKA LJMP KEY NKEYA:CJNE A,7BH,NKEYB LCALL WORKB LJMP KEY NKEYB:CJNE A,0E7H,NKEYC LCALL WORKC LJMP KEY NKEYC:CJNE A,0D7H,NKEYD LCALL WORKD LJMP KEY NKEYD:CJNE A,0B7H,NKEYE LCALL WORKE LJMP KEY NKEYE:。無鍵按下返回 KEYA: LCALL DEL 。屏蔽行線 CJNE A,0FFH,KEYA 。行線輸出低電平,列線為輸入口 MOV A,P2 。******************************************************************** KEY11:PUSH A 。******************************************************************** JK: PUSH A PUSH PSW 。******************************************************************** TIME0: 。C4=65 MOV A,C5 SUBB A,C7 MOV C6,A 。C2=50 MOV A,C1 SUBB A,C7 MOV C3,A 。C1=35 ADD A,C5 。******************************************************************** DEL: MOV 50H,0 ；延時(shí) DJNZ 50H,$ RET。關(guān)位碼 INC R0 MOV A,R1 RR A MOV R1,A DJNZ R7,LED 。傳段碼即顯示數(shù) LCALL DEL 。變地址查表 MOV P2,R1 ?？刂?位顯示 MOV R1,7FH 。A通道顯示 MOV B,10 DIV AB MOV R0,A INC R0 MOV R0,B MOV A,D2 MOV B,10 DIV AB INC R0 MOV R0,A INC R0 MOV R0,B MOV A,D3 。******************************************************************** DIS: MOV R0,30H 。閃爍 。MOV D5,65H LCALL DIS MOV A,R3 CJNE A,10,ST6 MOV R3,0 MOV R4,0 ST7: MOV P1,95H 。情況3 MOV 38H,65H MOV D1,C2 MOV D2,C2 MOV D3,C1 MOV D4,C1 STT5:LCALL DIS MOV A,R4 CJNE A,C3,STT5 MOV R3,0 MOV R4,0 ST6:CPL 。閃爍 。MOV D5,56H LCALL DIS MOV A,R3 CJNE A,10,ST2 MOV R3,0 MOV R4,0 ST3: MOV P1,59H 。MOV IP,05H MOV TMOD,01H MOV TH0,15536/256 MOV TL0,15536%256 SETB ET0 SETB TR0 ST0:MOV P1,55H MOV 38H,55H MOV D1,2 MOV D2,2 MOV D3,2 MOV D4,2 STT0: LCALL DIS MOV A,R4 CJNE A,2,STT0 MOV R3,0 MOV R4,0 ST1:MOV P1,56H 。開外中斷 SETB EX1 CLR IT0 。********************************************************************SETB EA 。 MOV JJJ,2 。C7=5 CLR 。C1=35 MOV C5,15 。******************************************************************** MAIN: D1 EQU 40H ；單元設(shè)置 D2 EQU 41H D3 EQU 42H D4 EQU 43H D5 EQU 44H D6 EQU 45H D7 EQU 46H D8 EQU 47H C1 EQU 48H C2 EQU 49H C3 EQU 4AH C4 EQU 4BH C5 EQU 4CH C6 EQU 4DH C7 EQU 4EH C8 EQU 4FH JJ EQU 52H JJJ EQU 53H。緊急情況 ORG 000BH LJMP TIME0