?? 接收.asm
字號:
MOV COUNT,#10H ;根據字寬及象素的不同而改變 DISP中的COUNT根據字高及象素改變CODE0
LP: MOV COM,X ;設置頁地址
LCALL INST
MOV COM,Y ;設置列地址
LCALL INST
W: MOV A,CODE0
MOVC A,@A+DPTR
MOV DAT,A
LCALL DATA_
INC CODE0
DJNZ COUNT,W
DJNZ 39H,LP1
RET
LP1: INC X
MOV COUNT,#10H
AJMP LP
;***********************以下為字符顯示子程序塊*************************
SY: SETB CS1 ;開機
CLR CS2
MOV X,#0BAH
MOV Y,#60H
MOV DPTR,#HUA ;歡
CALL DISP
MOV X,#0BAH
MOV Y,#70H
MOV DPTR,#YIN ;迎
CALL DISP
SETB CS2
CLR CS1
MOV X,#0BAH
MOV Y,#40H
MOV DPTR,#JIN ;進
CALL DISP
MOV X,#0BAH
MOV Y,#50H
MOV DPTR,#RU ;入
CALL DISP
LCALL DELAY1
SETB CS1
CLR CS2
MOV Y,#50H
MOV DPTR,#TB1 ;Wi
CALL DISP
MOV X,#0BCH
MOV Y,#60H
MOV DPTR,#TB2 ;nd
CALL DISP
MOV X,#0BCH
MOV Y,#70H
MOV DPTR,#TB3 ;ow
CALL DISP
SETB CS2
CLR CS1
MOV X,#0BCH
MOV Y,#40H
MOV DPTR,#TB4 ;s
CALL DISP
MOV X,#0BCH
MOV Y,#50H
MOV DPTR,#TB5 ;XP
CALL DISP
LCALL DELAY1
MOV X,#0BCH
MOV Y,#60H
MOV DPTR,#TB6 ;.
MOV CODE0,#00H
CALL DISP_
LCALL DELAY1
MOV X,#0BCH
MOV Y,#68H
MOV CODE0,#00H
CALL DISP_
LCALL DELAY1
MOV X,#0BCH
MOV Y,#70H
MOV CODE0,#00H
CALL DISP_
LCALL DELAY1
MOV X,#0BCH
MOV Y,#78H
MOV CODE0,#00H
CALL DISP_
LCALL DELAY1
RET
INST: LCALL BUSY ;寫指令
SETB E
CLR D_I
CLR R_W
MOV DB0_DB7,COM
CLR E
RET
DATA_: LCALL BUSY ;寫數據
SETB E
SETB D_I
CLR R_W
MOV DB0_DB7,DAT
CLR E
RET
BUSY: CLR D_I ;測忙
SETB R_W
BUSY1: MOV DB0_DB7,#0FFH
SETB E
MOV A,DB0_DB7
CLR E
JB ACC.7,BUSY1
RET
CLEAR: MOV R4,#00H ;清屏
CLEAR1: MOV A,R4
ORL A,#0B8H
MOV COM,A
ACALL INST
MOV COM,#40H
ACALL INST
MOV R3,#40H
CLEAR2: MOV DAT,#00H
LCALL DATA_
DJNZ R3,CLEAR2
INC R4
CJNE R4,#08H,CLEAR1
RET
INT: MOV COM,#0C0H ;初始化
ACALL INST
MOV COM,#3FH
ACALL INST
RET
DDB:
DB 000H,0E0H,010H,008H,008H,010H,0E0H,000H,000H,00FH,010H,020H,020H,010H,00FH,000H ; "0" 0
DB 000H,010H,010H,0F8H,000H,000H,000H,000H,000H,020H,020H,03FH,020H,020H,000H,000H ; "1" 1
DB 000H,070H,008H,008H,008H,088H,070H,000H,000H,030H,028H,024H,022H,021H,030H,000H ; "2" 2
DB 000H,030H,008H,088H,088H,048H,030H,000H,000H,018H,020H,020H,020H,011H,00EH,000H ; "3" 3
DB 000H,000H,0C0H,020H,010H,0F8H,000H,000H,000H,007H,004H,024H,024H,03FH,024H,000H ; "4" 4
DB 000H,0F8H,008H,088H,088H,008H,008H,000H,000H,019H,021H,020H,020H,011H,00EH,000H ; "5" 5
DB 000H,0E0H,010H,088H,088H,018H,000H,000H,000H,00FH,011H,020H,020H,011H,00EH,000H ; "6" 6
DB 000H,038H,008H,008H,0C8H,038H,008H,000H,000H,000H,000H,03FH,000H,000H,000H,000H ; "7" 7
DB 000H,070H,088H,008H,008H,088H,070H,000H,000H,01CH,022H,021H,021H,022H,01CH,000H ; "8" 8
DB 000H,0E0H,010H,008H,008H,010H,0E0H,000H,000H,000H,031H,022H,022H,011H,00FH,000H ; "9" 9
DB 000H,000H,0C0H,038H,0E0H,000H,000H,000H,020H,03CH,023H,002H,002H,027H,038H,020H ; "A" 0
DB 008H,0F8H,088H,088H,088H,070H,000H,000H,020H,03FH,020H,020H,020H,011H,00EH,000H ; "B" 1
DB 0C0H,030H,008H,008H,008H,008H,038H,000H,007H,018H,020H,020H,020H,010H,008H,000H ; "C" 2
DB 008H,0F8H,008H,008H,008H,010H,0E0H,000H,020H,03FH,020H,020H,020H,010H,00FH,000H ; "D" 3
DB 008H,0F8H,088H,088H,0E8H,008H,010H,000H,020H,03FH,020H,020H,023H,020H,018H,000H ; "E" 4
DB 008H,0F8H,088H,088H,0E8H,008H,010H,000H,020H,03FH,020H,000H,003H,000H,000H,000H ; "F" 5
MAO:
DB 000H,000H,000H,0C0H,0C0H,000H,000H,000H,000H,000H,000H,030H,030H,000H,000H,000H ; ":" 0
HUA:
DB 014H,024H,044H,084H,064H,01CH,020H,018H,00FH,0E8H,008H,008H,028H,018H,008H,000H ;
DB 020H,010H,04CH,043H,043H,02CH,020H,010H,00CH,003H,006H,018H,030H,060H,020H,000H ; "歡" 0
YIN:
DB 040H,041H,0CEH,004H,000H,0FCH,004H,002H,002H,0FCH,004H,004H,004H,0FCH,000H,000H ;
DB 040H,020H,01FH,020H,040H,047H,042H,041H,040H,05FH,040H,042H,044H,043H,040H,000H ; "迎" 1
JIN:
DB 080H,082H,09CH,088H,000H,088H,088H,0FFH,088H,088H,088H,0FFH,088H,088H,080H,000H ;
DB 000H,040H,020H,01FH,020H,050H,04CH,043H,040H,040H,040H,05FH,040H,040H,040H,000H ; "進" 2
RU:
DB 000H,000H,000H,000H,001H,083H,076H,018H,060H,080H,000H,000H,000H,000H,000H,000H ;
DB 040H,020H,010H,008H,006H,001H,000H,000H,000H,000H,003H,004H,018H,030H,010H,000H ; "入" 3
TB1:
DB 0F8H,008H,000H,0F8H,000H,008H,0F8H,000H,000H,080H,098H,098H,000H,000H,000H,000H
DB 003H,03CH,007H,000H,007H,03CH,003H,000H,000H,020H,020H,03FH,020H,020H,000H,000H ; "I" 5; "W" 4
TB2:
DB 080H,080H,000H,080H,080H,080H,000H,000H,000H,000H,000H,080H,080H,088H,0F8H,000H
DB 020H,03FH,021H,000H,000H,020H,03FH,020H,000H,00EH,011H,020H,020H,010H,03FH,020H ; "D" 7; "N" 6
TB3:
DB 000H,000H,080H,080H,080H,080H,000H,000H,080H,080H,000H,080H,000H,080H,080H,080H
DB 000H,01FH,020H,020H,020H,020H,01FH,000H,00FH,030H,00CH,003H,00CH,030H,00FH,000H ; "W" 9; "O" 8
TB4:
DB 000H,000H,080H,080H,080H,080H,080H,000H,000H,000H,000H,000H,000H,000H,000H,000H
DB 000H,033H,024H,024H,024H,024H,019H,000H,000H,000H,000H,000H,000H,000H,000H,000H ; "S" 10
TB5:
DB 008H,018H,068H,080H,080H,068H,018H,008H,008H,0F8H,008H,008H,008H,008H,0F0H,000H
DB 020H,030H,02CH,003H,003H,02CH,030H,020H,020H,03FH,021H,001H,001H,001H,000H,000H ; "P" 13 ; "X" 12
TB6:
DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,030H,030H,000H,000H,000H,000H,000H ; "." 14
TB10:
DB 000H,000H,000H,004H,024H,034H,0ACH,064H,022H,013H,080H,000H,000H,000H,000H,000H ;
DB 000H,000H,020H,01AH,002H,003H,022H,07EH,001H,001H,005H,009H,010H,000H,000H,000H ; "系" 0
TB11:
DB 000H,060H,050H,0CCH,020H,010H,080H,050H,0B2H,094H,0C8H,088H,000H,000H,000H,000H ;
DB 010H,012H,00BH,00AH,025H,010H,009H,007H,000H,01FH,020H,021H,020H,020H,018H,000H ; "統" 1
;* 延時 255 X 2 = 512 us *
DELAY: MOV R0,#0FFH
DELAY1_: DJNZ R0,DELAY1_
RET
;* 延時10 ms *
DL10MS: MOV R1,#14H
DL10MS1: LCALL DELAY
DJNZ R1,DL10MS1
RET
DELAY1: MOV R7,#03H
DEL1: MOV R6,#0FFH
DEL2: MOV R5,#0FFH
DJNZ R5,$
DJNZ R6,DEL2
DJNZ R7,DEL1
RET
;* 調光延時時間控制 *
DLX: MOV R2,B ;置延時初值
DLX1: LCALL DELAY ;調512微秒延時子程序
DJNZ R2,DLX1 ;循環控制
RET ;返回
END ;程序結束
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -