16x16.asm

89S51实现的16X16点阵实现的流动字幕显示

        ORG 0000H
        LJMP MAIN
        ORG 000BH
        LJMP TIME
        ORG 0100H
MAIN:   MOV SP,#60H
        MOV TMOD,#01H
        MOV TL0,#0B0H
        MOV TH0,#3CH
        SETB TR0
        SETB ET0
        MOV R2,#2 ;滚动时间 
        MOV DPTR,#TAD+2
        MOV 20H,DPH
        MOV 21H,DPL
        MOV DPTR,#TAB
        SETB EA
SCA:    MOV R1,DPH
        MOV R5,DPL
        MOV R3,#00H ;扫描信号初值
        MOV R4,#00H 
SCA1: MOV P3,R3
        MOV A,R4
        MOVC A,@A+DPTR
        MOV P0,A
	INC R4
        MOV A,R4
        MOVC A,@A+DPTR
        MOV P2,A
        LCALL DEL
        MOV P0,#00H
        MOV P2,#00H
        INC R4
        INC R3
        CJNE R3,#10H,SCA1
        LJMP SCA
DEL:    MOV R6,#5
DEL1: MOV R7,#80
        DJNZ R7,$
        DJNZ R6,DEL1
        RET
TIME: CLR EA
        MOV 30H,A
        PUSH 30H
        MOV TL0,#0B0H
        MOV TH0,#3CH
        DJNZ R2,LOOP
        MOV R2,#2
        CLR C
        MOV A,R5
        ADD A,#2
        MOV R5,A
        MOV DPL,R5
        MOV A,R1
        ADDC A,#0
        MOV R1,A
        MOV DPH,R1
        CJNE A,20H,LOOP
        MOV A,R5
        CJNE A,21H,LOOP
        MOV DPTR,#TAB
LOOP:   POP 30H
        MOV A,30H
        SETB EA
        RETI
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  008H,000H,008H,000H,008H,000H,009H,0FCH,009H,054H,009H,054H,009H,056H,0FFH,055H
	DB  009H,054H,009H,054H,009H,054H,009H,0DCH,008H,000H,008H,000H,008H,000H,000H,000H
	;--  文字:  阳  --
	DB  000H,000H,0FFH,0FEH,004H,002H,008H,022H,004H,05AH,003H,086H,000H,000H,03FH,0FEH
	DB  010H,042H,010H,042H,010H,042H,010H,042H,010H,042H,03FH,0FEH,000H,000H,000H,000H
	;--  文字:  师  --
	DB  040H,000H,027H,0FCH,010H,000H,00EH,000H,001H,0FFH,000H,000H,00FH,0F2H,000H,012H
	DB  000H,012H,000H,012H,0FFH,0FEH,000H,012H,004H,012H,008H,012H,007H,0F2H,000H,000H
	;--  文字:  范  --
	DB  008H,044H,009H,094H,0F8H,0A4H,004H,064H,003H,004H,000H,00FH,000H,004H,03FH,0E4H
	DB  040H,024H,040H,02CH,042H,02FH,046H,024H,043H,0E4H,070H,004H,000H,004H,000H,000H
	;--  文字:  学  --
	DB  000H,040H,002H,030H,002H,010H,002H,012H,002H,05CH,002H,054H,042H,050H,082H,051H
	DB  07FH,05EH,002H,0D4H,002H,050H,002H,018H,002H,057H,002H,032H,002H,010H,000H,000H
	;--  文字:  院  --
	DB  0FFH,0FEH,000H,002H,002H,032H,004H,04AH,083H,086H,041H,00CH,031H,024H,00FH,024H
	DB  001H,025H,001H,026H,07FH,024H,081H,024H,081H,024H,081H,00CH,0F1H,004H,000H,000H
	;--  文字:  计  --
	DB  000H,020H,000H,021H,000H,02EH,07FH,0E4H,020H,000H,010H,000H,008H,020H,000H,020H
	DB  000H,020H,000H,020H,0FFH,0FFH,000H,020H,000H,020H,000H,020H,000H,020H,000H,000H
	;--  文字:  算  --
	DB  008H,008H,008H,007H,08BH,0FAH,06AH,0AAH,01EH,0AEH,00AH,0AAH,00AH,0AAH,00AH,0A8H
	DB  00AH,0ACH,0FEH,0ABH,00AH,0AAH,00BH,0FEH,008H,00AH,008H,002H,008H,002H,000H,000H
	;--  文字:  机  --
	DB  004H,008H,003H,008H,000H,0C8H,0FFH,0FFH,000H,048H,041H,088H,030H,008H,00CH,000H
	DB  003H,0FEH,000H,002H,000H,002H,000H,002H,03FH,0FEH,040H,000H,078H,000H,000H,000H

	;--  文字:  信  --
	DB  000H,080H,000H,040H,000H,030H,07FH,0FCH,000H,007H,000H,00AH,07EH,0A8H,022H,0A8H
	DB  022H,0A9H,022H,0AEH,022H,0AAH,022H,0A8H,07EH,0A8H,000H,008H,000H,008H,000H,000H
	;--  文字:  息  --
	DB  000H,000H,020H,000H,038H,000H,001H,0FCH,03DH,054H,041H,054H,041H,056H,045H,055H
	DB  059H,054H,041H,054H,041H,054H,071H,0FCH,000H,000H,008H,000H,030H,000H,000H,000H
	;--  文字:  院  --
	DB  0FFH,0FEH,000H,002H,002H,032H,004H,04AH,083H,086H,041H,00CH,031H,024H,00FH,024H
	DB  001H,025H,001H,026H,07FH,024H,081H,024H,081H,024H,081H,00CH,0F1H,004H,000H,000H  
TAD:  
        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
        END