ORG 0000H
AJMP START
ORG 0030H
START: MOV R1,#13 ;字显示的个数
MOV R7,#30 ;一个字显示10次
MOV R3,#00H ;用于查表
MOV R0,#00H ;比较是否是第九个数
MAI8: CJNE R0,#8,MAI5
AJMP START1
MAI5: INC R0
MAI9: MOV R4,#00H ;用于三-八译码器
CLR P1.3 ;p1锁住
MOV P2,#00H ;p2口不输出
MAI1: MOV P3,R4
SETB P3.3 ;p3可以运行
MOV A,R3
INC R3
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY1
INC R4
CJNE R4,#8,MAI1
MOV P0,#00H
CLR P1.3
MOV R4,#00H
MAI3: MOV P3,R4
SETB P3.3
MOV A,R3
INC R3
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV P2,A
LCALL DELAY1
INC R4
CJNE R4,#8,MAI3
MOV P2,#00H
CLR P3.3
MOV R4,#00H
MAI2: MOV P1,R4
SETB P1.3
MOV A,R3
INC R3
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY1
INC R4
CJNE R4,#8,MAI2
MOV P0,#00H
CLR P3.3
MOV R4,#00H
MAI4: MOV P1,R4
SETB P1.3
MOV A,R3
INC R3
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV P2,A
LCALL DELAY1
INC R4
CJNE R4,#8,MAI4
DJNZ R7,MAI6
MOV R2,#40H
MOV P0,#00H
MOV P2,#00H
MOV P1,#0FFH
MOV P3,#0FFH
M1: LCALL DELAY1
DJNZ R2,M1
DJNZ R1,MAI7
AJMP START
MAI7: MOV R7,#30 ;一个字显示100次
AJMP MAI8
MAI6: MOV A,R3
CLR C
SUBB A,#32
MOV R3,A
LJMP MAI9
START1:MOV R1,#(13-8) ;显示大于8的数
MOV R7,#30 ;一个字显示100次
MOV DPTR,#TAB
MOV R3,#0FFH
MIN5: MOV R4,#00H
CLR P1.3
MOV P2,#00H
MIN1: MOV P3,R4
SETB P3.3
MOV A,R3
INC DPTR
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY1
INC R4
CJNE R4,#8,MIN1
MOV P0,#00H
CLR P1.3
MOV R4,#00H
MIN3: MOV P3,R4
SETB P3.3
MOV A,R3
INC DPTR
MOVC A,@A+DPTR
MOV P2,A
LCALL DELAY1
INC R4
CJNE R4,#8,MIN3
MOV P2,#00H
CLR P3.3
MOV R4,#00H
MIN2: MOV P1,R4
SETB P1.3
MOV A,R3
INC DPTR
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY1
INC R4
CJNE R4,#8,MIN2
MOV P0,#00H
CLR P3.3
MOV R4,#00H
MIN4: MOV P1,R4
SETB P1.3
MOV A,R3
INC DPTR
MOVC A,@A+DPTR
MOV P2,A
LCALL DELAY1
INC R4
CJNE R4,#8,MIN4
DJNZ R7,MIN6
MOV R2,#40H
MOV P0,#00H
MOV P2,#00H
MOV P1,#0FFH
MOV P3,#0FFH
M2: LCALL DELAY1
DJNZ R2,M2
DJNZ R1,MIN7
AJMP START
MIN7: MOV R7,#30 ;一个字显示100次
AJMP MIN5
MIN6: MOV A,DPL
CLR C
SUBB A,#32
JC M3
MOV DPL,A
AJMP MIN5
M3: MOV DPL,A
MOV A,DPH
DEC A
MOV DPH,A
AJMP MIN5
DELAY1: MOV R5,#25
D1: MOV R6,#19
DJNZ R6,$
DJNZ R5,D1
RET
TAB:
DB 020H, 020H, 020H, 020H, 02EH, 02AH, 0AAH, 06AH, 02AH, 02AH, 02EH, 020H, 020H, 020H, 020H, 000H;
DB 000H, 0FFH, 080H, 080H, 0BCH, 0A4H, 0A4H, 0A4H, 0A4H, 0A4H, 0BCH, 082H, 081H, 0FEH, 000H, 000H;"高",0
DB 000H, 07FH, 042H, 042H, 07FH, 000H, 021H, 021H, 0E2H, 03AH, 024H, 026H, 029H, 020H, 003H, 000H;
DB 000H, 0F0H, 020H, 020H, 0F2H, 084H, 098H, 0E0H, 080H, 080H, 0FCH, 082H, 002H, 082H, 08EH, 000H;"晓",1
DB 004H, 00CH, 034H, 0C5H, 006H, 018H, 000H, 010H, 010H, 010H, 01FH, 010H, 010H, 030H, 010H, 000H;
DB 044H, 066H, 0C4H, 048H, 048H, 04AH, 002H, 002H, 002H, 002H, 0FEH, 002H, 002H, 006H, 002H, 000H;"红",2
DB 000H, 020H, 020H, 023H, 02DH, 031H, 0E1H, 021H, 02FH, 021H, 021H, 021H, 021H, 020H, 000H, 000H;
DB 000H, 000H, 004H, 018H, 070H, 020H, 004H, 002H, 0FFH, 000H, 040H, 020H, 018H, 00CH, 000H, 000H;"东",3
DB 010H, 010H, 010H, 010H, 010H, 010H, 09FH, 052H, 032H, 012H, 012H, 013H, 010H, 010H, 010H, 000H;
DB 002H, 002H, 004H, 008H, 030H, 0C0H, 000H, 000H, 004H, 002H, 002H, 0FCH, 000H, 000H, 000H, 000H;"方",4
DB 002H, 00CH, 008H, 048H, 03AH, 02AH, 00AH, 08AH, 07AH, 02BH, 00AH, 018H, 0EAH, 04CH, 008H, 000H;
DB 000H, 040H, 040H, 040H, 040H, 040H, 042H, 041H, 0FEH, 040H, 040H, 040H, 040H, 040H, 040H, 000H;"学",5
DB 07FH, 040H, 04CH, 052H, 061H, 030H, 024H, 024H, 0A4H, 064H, 024H, 024H, 024H, 030H, 020H, 000H;
DB 0FFH, 000H, 040H, 020H, 0C1H, 082H, 08CH, 0F0H, 080H, 080H, 0FEH, 081H, 081H, 081H, 08FH, 000H;"院",6
DB 000H, 000H, 01FH, 012H, 012H, 012H, 012H, 0FFH, 012H, 012H, 012H, 012H, 01FH, 000H, 000H, 000H;
DB 000H, 000H, 0F0H, 020H, 020H, 020H, 020H, 0FCH, 022H, 022H, 022H, 022H, 0F2H, 002H, 00EH, 000H;"电",7
DB 000H, 000H, 040H, 040H, 040H, 040H, 040H, 047H, 048H, 050H, 060H, 040H, 000H, 001H, 000H, 000H;
DB 080H, 080H, 080H, 080H, 080H, 082H, 081H, 0FEH, 080H, 080H, 080H, 080H, 080H, 080H, 080H, 000H;"子",8
DB 001H, 002H, 00CH, 03FH, 0E0H, 050H, 015H, 015H, 095H, 075H, 055H, 015H, 015H, 010H, 010H, 000H;
DB 000H, 000H, 000H, 0FEH, 000H, 000H, 07EH, 044H, 044H, 044H, 044H, 044H, 07EH, 000H, 000H, 000H;"信",9
DB 000H, 000H, 000H, 03FH, 02AH, 02AH, 06AH, 0AAH, 02AH, 02AH, 02AH, 03FH, 000H, 000H, 000H, 000H;
DB 000H, 004H, 01CH, 080H, 0BCH, 082H, 082H, 0A2H, 09AH, 082H, 082H, 08EH, 000H, 010H, 00CH, 000H;"息",10
DB 000H, 000H, 040H, 040H, 040H, 040H, 040H, 07FH, 040H, 040H, 040H, 040H, 040H, 040H, 000H, 000H;
DB 004H, 004H, 004H, 004H, 004H, 004H, 004H, 0FCH, 004H, 004H, 004H, 004H, 004H, 004H, 004H, 000H;"工",11
DB 008H, 048H, 04BH, 07FH, 089H, 088H, 001H, 0FDH, 085H, 085H, 085H, 085H, 0FDH, 001H, 000H, 000H;
DB 020H, 0C0H, 000H, 0FFH, 000H, 082H, 022H, 022H, 022H, 0FEH, 022H, 022H, 022H, 022H, 002H, 000H;"程",12
END
文章评论(0条评论)
登录后参与讨论