MOV 6DH,A MOV 70H,A MOV 71H,A MOV 72H,A MOV 73H,A MOV 60H,A MOV 61H,A MOV 62H,A MOV 63H,A DEC A MOV 68H,A MOV 69H,A MOV 6AH,A MOV 6BH,A MOV P1,A CLEAR1: JB P1.2,KEY1 MOV 21H,#0FH LJMP CLEAR2 KEY1: JB P1.3,KEY2 MOV 21H,#12H LJMP CLEAR2 KEY2: JB P1.6,KEY3 MOV 21H,#14H LJMP CLEAR2 KEY3: JB P1.7,ERR MOV 21H,#19H CLEAR2: SETB TR1 SETB EA SETB EX0 SETB ET1
25
SETB P3.1 LCALL VIICREAD RET ERR: CPL P3.1 LCALL DL5S LJMP CLEAR1 START: LCALL CLEARMEN START1: JB P3.0,DISPLAYS LCALL DISPLAYV START2: SJMP START1 INTEX0: PUSH ACC PUSH PSW INC 60H CLR A
CJNE A,60H,INTEX0OUT INC 61H
CJNE A,61H,INTEX0OUT INC 62H
INTEX0OUT: LCALL VIICWRITE SETB EX1 POP PSW POP ACC RETI INTEX1: PUSH ACC PUSH PSW CLR EX1 JNB 00H,INTEX11 MOV TL1,#0FFH MOV TH1,#0FFH MOV 6CH,#0FFH
26
MOV 6DH,#0FFH INTEX1: MOV 68H,TL1 MOV 69H,TH1 MOV 6AH,6CH MOV 6BH,6DH CLR A MOV TL1,A MOV TH1,A MOV 6CH,A MOV 6DH,A CLR 00H POP PSW POP ACC RETI INTT1: PUSH ACC PUSH PSW INC 6CH MOV A,6CH JNZ INTT11 INC 6DH MOV A,6DH JNZ INTT11 SETB 00H INTT11: POP PSW POP ACC RETI DISPLAYS: SETB P1.O CLR P1.1 SETB P3.7 LCALL SSS
27
LCALL DISPLAY LJMP START1 DISPLAYV: CLR P1.0 SETB P1.1 CLR P3.7 LCALL VVV MOV A,71H SUBB A,#04H JNC WARING SETB P3.1 V1: LCALL DISPLAY RET WARING: CLR P3.1 AJMP V1 VIICWRITE: ACALL WMOV9 MOV SLA,#SLAW MOV NUMBYT,#09H LCALL WRNBYT RET WMOV9: MOV 5FH,#50H MOV R0,#MTD MOV R1,#5FH MOV R2,#09H WMOV: MOV A,@R1 MOV @R0,A INC R0 INC R1 DJNZ R2,WMOV RET
VIICREAD: MOV MTD,#50H
28
MOV SLA,#SLAW MOV NUMBYT,#01H LCALL WRNBYT MOV SLA,#SLAW MOV NUMBYT,#08H LCALL RDNBYT LCALL RMOV8 RET
RMOV8: MOV R0,#MRD MOV R1,#60H MOV R2,#08H RMOV: MOV A,@R0 MOV @R1,A INC R0 INC R1 DJNZ R2,RMOV RET STA: SETB VSDA SETB VSCL NOP NOP NOP NOP CLR VSDA NOP CLR VSDA NOP NOP NOP NOP
29