BPOT DATA 20H
ML DATA 21H
MH DATA 22H
FL DATA 23H
FH DATA 24H
HL DATA 25H
HH DATA 26H
MODE DATA 27H
DM DATA 28H
;-----------------------------
ORG 0H
SJMP MAIN
ORG 23H
LJMP T0SVR
;-----------------------------
MAIN: NOP
MOV SP,#50H
MOV TH0,#0D9H
MOV TL0,#01AH
MOV TMOD,#01H
MOV IE,#82H
SETB TR0
CLR A
MOV R0,#8
MAIN1: MOV R1,#BPOT
MOV @R1,A
INC R1
DJNZ R0,MAIN1
SJMP $
;-----------------------------
T0SVR: CLR TR0
PUSH ACC
MOV TH0,#0D9H
MOV A,#034H
CLR C
SUBB A,TL0
MOV TL0,A
SETB TR0
INC DM
MOV A,DM
CJNE A,#100,T0SVR2
CLR A
MOV DM,A
INC ML
MOV A,ML
CJNE A,#10,T0SVR2
CLR A
MOV ML,A
INC MH
MOV A,MH
CJNE A,#6,T0SVR2
CLR A
MOV MH,A
INC FL
MOV A,FL
CJNE A,#10,T0SVR2
CLR A
MOV FL,A
INC FH
CJNE A,#6,T0SVR2
CLR A
MOV FH,A
T0SVR2: MOV P3,#0C3H
MOV A,#ML
ADD A,BPOT
MOV R0,A
MOV A,@R0
MOV DPTR,#TABLE
MOVC A,@A+DPTR
CPL A
MOV P1,A
MOV A,BPOT
CJNE A,#2,T0SVR3
MOV A,DM
SETB C
SUBB A,#50
CPL C
MOV P1.7,C
MOV A,BPOT
T0SVR3: MOV DPTR,#BITC
MOVC A,@A+DPTR
MOV P3,A
INC BPOT
MOV A,BPOT
CJNE A,#4,T0SVR1
CLR A
MOV BPOT,A
T0SVR1: POP ACC
RETI
;-----------------------------
BITC: DB 0E3H,0D3H,0CBH,0C7H
TABLE: DB 3FH,6H,5BH,4FH,66H,6DH,7DH,7H,7FH,6FH
END