16X16的
ORG 1000H XPA EQU 8000H XPB EQU 8001H;---------------------------------------------------------------------------------------------- ;H-CODE-1
x273
equ
0a000h
XPC EQU 8002H XPCTL EQU 8003HSTART: MOV DPTR,#XPCTL MOV A,#80H MOVX @DPTR,A
;写控制字
LCALL OFFLED;关显示 CLR 00H
MOV R6,#01H MOV R7,#80H;----------------------------------------X0: MOV R0,#00H
;取TAB数X1: LCALL DEL1 INC R0 INC R0 CJNE R0,#0E0H,X1X2:
MOV R0,#00HX3: LCALL DEL5;取TAB1数 INC R0 INC R0 CJNE R0,#80H,X3 SJMP X0;---------------------------------------------------------------------------------DISPW: PUSH 00H;显示一个字 MOV R1,#80H;L-NUM CLR CDISP1: MOV A,R0;BH1 MOV DPTR,#TAB MOVC A,@A+DPTR
mov dptr,#XPC
MOVX @DPTR,A
;------------------------------------------- INC R0 ;BH2 MOV A,R0 MOV DPTR,#TAB MOVC A,@A+DPTR MOV DPTR,#XPA
MOVX @DPTR,A;------------------------------------------- MOV DPL,R6;X273/XPB MOV DPH,R7
MOV A,R1;L0----L7 CPL A MOVX @DPTR,A
mov r3,#80h djnz r3,$ LCALL OFFLED INC R0 MOV A,R1 RRC A MOV R1,A JNC DISP1 JB 00H,EXIT;---------------------------------- SETB 00H CLR C MOV R1,#80H MOV R6,#00H MOV R7,#0A0H AJMP DISP1EXIT: MOV R6,#01H MOV R7,#80H CLR 00H POP 00H RETDISPW1: PUSH 00H; MOV R1,#80H; CLR CDISP2: MOV A,R0; MOV DPTR,#TAB1 MOVC A,@A+DPTR
mov dptr,#XPC
MOVX @DPTR,A
;------------------------------------------- INC R0 ; MOV A,R0 MOV DPTR,#TAB1 MOVC A,@A+DPTR MOV DPTR,#XPA
MOVX @DPTR,A;------------------------------------------- MOV DPL,R6 MOV DPH,R7
MOV A,R1 CPL A MOVX @DPTR,A
mov r3,#80h djnz r3,$ LCALL OFFLED INC R0 MOV A,R1 RRC A MOV R1,A JNC DISP2 JB 00H,EXIT1;---------------------------------- SETB 00H CLR C MOV R1,#80H MOV R6,#00H MOV R7,#0A0H AJMP DISP2EXIT1: MOV R6,#01H MOV R7,#80H CLR 00H POP 00H RET;----------------------------------------------------------------------------------TAB: DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
DB 00H,00H,00H,80H,01H,00H,3FH,0F8H,20H,08H,20H,08H,20H,08H,3FH,0F8H ; 启
DB 00H,08H,3FH,0E8H,20H,28H,20H,2CH,20H,24H,3FH,0E6H,20H,22H,00H,00H
DB 00H,00H,01H,80H,00H,0C0H,00H,40H,7FH,0FEH,00H,20H,01H,30H,01H,10H;东
DB 03FH,0F8H,01H,00H,01H,00H,19H,30H,31H,18H,61H,0CH,01H,40H,00H,80H
DB 00H,00H,00H,00H,04H,0CH,04H,18H,04H,10H,24H,00H,7FH,0CEH,04H,08H; 计
DB 04H,08H,04H,08H,04H,08H,04H,28H,04H,28H,04H,18H,04H,08H,04H,00h
DB 02H,02H,7EH,7EH,09H,12H,1FH,0FDH,08H,04H,0FH,0FCH,08H,04H,0FH,0FCH ;算
DB 08H,04H,0FH,0FCH,02H,10H,7FH,0FFH,02H,10H,02H,08H,02H,08H,02H,04H
DB 00H,00H,00H,08H,0FH,08H,09H,28H,09H,7FH,09H,08H,09H,0CH,09H,3CH
;机
DB 09H,2CH,09H,0AH,49H,0AH,49H,09H,48H,88H,48H,48H,78H,28H,00H,00H
DB 00H,00H,20H,00H,7FH,0F0H,00H,10H,00H,10H,00H,10H,00H,10H,00H,10H ;厂
DB 00H,10H,00H,10H,00H,10H,00H,08H,00H,08H,00H,08H,00H,04H,00H,00H
DB 00H,00H,00H,80H,00H,80H,20H,0C0H,7FH,0FEH,00H,40H,1FH,0E0H,10H,20H ;有
DB 1FH,0F0H,10H,28H,1FH,0E6H,10H,20H,10H,20H,10H,20H,1CH,20H,08H,00HTAB1:DB 00H,00H,00H,80H,00H,80H,20H,0C0H,7FH,0FEH,00H,40H,1FH,0E0H,10H,20H ;有
DB 1FH,0F0H,10H,28H,1FH,0E6H,10H,20H,10H,20H,10H,20H,1CH,20H,08H,00H
DB 00H,00H,00H,42H,3FH,0DEH,10H,52H,10H,4AH,1FH,0CAH,10H,46H,1FH,0CAH ;限
DB 01H,52H,32H,52H,1AH,52H,04H,5EH,1EH,42H,79H,0C2H,20H,42H,00H,00H
DB 00H,00H,02H,20H,02H,60H,02H,20H,04H,10H,08H,10H,18H,08H,70H,44H
;公
DB 20H,0C2H,00H,40H,04H,20H,08H,10H,1FH,88H,18H,0FCH,08H,08H,00H,00H
DB 00H,00H,20H,00H,7FH,0F0H,20H,00H,24H,00H,2FH,0FCH,20H,00H,20H,08H;司
DB 27H,0F8H,22H,08H,22H,08H,23H,0F8H,22H,08H,20H,00H,38H,00H,10H,00h
DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H;--------------------------------------------------------------------------------------DEL1: MOV R2,#04HDELY: PUSH 02HDEL2: PUSH 02HDEL3: PUSH 02HDEL4: DJNZ R2,DEL4 CALL DISPW POP 02H DJNZ R2,DEL3 POP 02H DJNZ R2,DEL2 POP 02H DJNZ R2,DELY RET DEL5: MOV R2,#04HDELY1: PUSH 02HDEL6: PUSH 02HDEL7: PUSH 02HDEL8: DJNZ R2,DEL8 CALL DISPW1 POP 02H DJNZ R2,DEL7 POP 02H DJNZ R2,DEL6 POP 02H DJNZ R2,DELY1 RET;--------------------------------------------------------- OFFLED: MOV DPTR,#XPB MOV A,#0FFH
MOVX @DPTR,A MOV DPTR,#X273MOVX @DPTR,A RETEND |
