?? formal.txt
字號:
E1 EQU P3.5
E2 equ p3.4
A0 EQU P3.7
RST EQU P3.6
x equ 30h ;頁地址
y equ 31h ;列地址
;RW =>GND
ORG 0000H
LJMP MAIN
ORG 0003H
LJMP LINTO
ORG 0100H
MAIN: NOP
clr ea
CLR E1
CLR E2
lcall init ;初始化模塊
MOV 34H,#0ffH ;顯示所有點
LCALL DISPLAY_ALL
lcall dly100
MOV 34H,#00H ;所有點不顯示
LCALL DISPLAY_ALL
MOV R1,#0e3H ;reset
LCALL WRI
lcall plybw ;顯示黑白相間塊
lcall DLY100
MOV 34H,#00H ;清顯示
LCALL DISPLAY_ALL
MOV R1,#0e3H ;reset
LCALL WRI
mov 31h,#0
mov 30h,#0
MOV 30H,#2 ;x
MOV 31H,#8 ;y
MOV DPTR,#HZI7 ;
LCALL outhz
MOV 30H,#2
MOV 31H,#40
MOV DPTR,#HZI8 ;
LCALL outhz
MOV 30H,#0
MOV 31H,#0
MOV DPTR,#HZI1 ;
LCALL outhz
MOV 30H,#0
MOV 31H,#16
MOV DPTR,#HZI2 ;
LCALL outhz
MOV 30H,#0
MOV 31H,#32
MOV DPTR,#HZI5 ;
LCALL outhz
MOV 30H,#0
MOV 31H,#48
MOV DPTR,#HZI6 ;
LCALL outhz
LCALL DLY100
LJMP MAIN
LINTO: NOP
NOP
RETI
init: CLR RST ;RESET
LCALL DLY50
LCALL DLY50
LCALL DLY50
LCALL DLY50
setb rst
MOV R1,#0aFH ;DISPLAY ON
LCALL WRI
MOV R1,#0C0H ;START = 0
LCALL WRI
MOV R1,#0a4H ;driver
LCALL WRI
MOV R1,#0a9h ;duty 32
LCALL WRI
MOV R1,#0a0H ;adc
LCALL WRI
MOV R1,#0e3H ;reset
LCALL WRI
MOV 34H,#00H
LCALL DISPLAY_ALL
ret
DISPLAY_ALL: MOV R1,#0e3H ;reset
LCALL WRI
MOV R7,#4 ;DISPLAY DATA= 34H
MOV R2,#0B8H
LOP1: MOV A,R2
MOV R1,A ; X+1
LCALL WRI
MOV R1,#00H ; Y
LCALL WRI
MOV R5,#61
MOV R1,#0e0H ;RMW
LCALL WRI
LOP11: MOV R1,34H
LCALL WRD
DJNZ R5,LOP11
MOV R1,#0eeH ;end
LCALL WRI
INC R2
DJNZ R7,LOP1
ret
outhz: MOV R1,#0e3H ;reset
LCALL WRI
;30h=x (0-6) 31h=y(0-63-16)
MOV R7,#2
MOV A,#0B8H
ADD A,30H ;B8+X
MOV 30H,A ;A>>30H
HZ2: ; MOV A,R2
MOV R1,30H ; X+1
LCALL WRI
MOV A,#00H ; Y
ADD A,31H
; MOV 31H,A ;40+Y
MOV R1,A
LCALL WRI
MOV R5,#16
MOV R1,#0e0H ;RMW
LCALL WRI
HZ1: MOV A,#00H
MOVC A,@A+DPTR
MOV R1,A
LCALL WRD
LCALL DLY10
INC DPTR
DJNZ R5,HZ1
MOV R1,#0eeH ;end
LCALL WRI
INC 30H
DJNZ R7,HZ2
RET
plybw: MOV R1,#0e3H ;reset
LCALL WRI
mov 30h,#0
mov 31h,#0
mov dptr,#bw
MOV R7,#4
MOV A,#0B8H
ADD A,30H ;B8+X
MOV 30H,A ;A>>30H
HZ2bw: MOV R1,30H ; X+1
LCALL WRI
MOV A,#00H ; Y
ADD A,31H
;40+Y
MOV R1,A
LCALL WRI
MOV R5,#61
MOV R1,#0e0H ;RMW
LCALL WRI
HZ1bw: MOV A,#00H
MOVC A,@A+DPTR
MOV R1,A
LCALL WRD
LCALL DLY10
INC DPTR
DJNZ R5,HZ1bw
MOV R1,#0eeH ;end
LCALL WRI
INC 30H
DJNZ R7,HZ2bw
RET
WRI: ;寫指令子程序
CLR E1
CLR E2
CLR A0
MOV P0,R1
LCALL DLY10
SETB E1
setb E2
LCALL DLY10
CLR E1
CLR E2
LCALL DLY10
LCALL DLY10
LCALL DLY10
RET
WRD: ; 寫數據子程序
CLR E1
CLR E2
SETB A0
MOV P0,R1
LCALL DLY10
SETB E1
setb E2
LCALL DLY10
CLR E1
CLR E2
LCALL DLY10
LCALL DLY10
LCALL DLY10
RET
DLY10:MOV R3,#01H
DL1:MOV R4,#05H
DL2:MOV R6,#0fH
DL3:DJNZ R6,DL3
DJNZ R4,DL2
DJNZ R3,DL1
RET
DLY50: MOV R3,#01H
DL111: MOV R4,#0fH
DL222: MOV R6,#0afH
DL333:DJNZ R6,DL333
DJNZ R4,DL222
DJNZ R3,DL111
RET
DLY100:MOV R3,#06H
DL11:MOV R4,#0ffH
DL22:MOV R6,#0ffH
DL33:DJNZ R6,DL33
DJNZ R4,DL22
DJNZ R3,DL11
RET
; ORG 0300H
;WELCOM: DB 57H,65H,6CH,63H,6FH,6DH,65H,20H,20H,20H,20H,20H,20H,20H
; DB 20H,20H,20H,20H,20H,20H
; ORG 0320H
;TINSHARP: DB 54H,49H,4EH,53H,48H,41H,52H,50H,20H,4CH,43H,4DH,20H,20H
; DB 20H,20H,20H,20H,20H,20H
ORG 0340H
HZI1: ;
;-- 文字: 作 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
DB 80H,40H,20H,0F8H,07H,22H,18H,0CH,0FBH,48H,48H,48H,68H,48H,08H,00H
DB 00H,00H,00H,0FFH,00H,00H,00H,00H,0FFH,04H,04H,04H,04H,06H,04H,00H
HZI2: ;
;-- 文字: 品 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
DB 00H,00H,00H,00H,7EH,22H,22H,22H,22H,22H,22H,7EH,00H,00H,00H,00H
DB 00H,7FH,21H,21H,21H,21H,7FH,00H,7FH,21H,21H,21H,21H,7FH,00H,00H
HZI3:
;-- 文字: 由 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
DB 00H,00H,0F0H,10H,10H,10H,10H,0FFH,10H,10H,10H,10H,0F0H,00H,00H,00H
DB 00H,00H,7FH,21H,21H,21H,21H,3FH,21H,21H,21H,21H,7FH,00H,00H,00H
HZI4:
;-- 文字: 張 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
DB 02H,0F2H,12H,12H,1EH,00H,80H,80H,0FFH,0A0H,90H,88H,86H,84H,80H,00H
DB 01H,03H,41H,81H,7FH,00H,00H,40H,0FFH,40H,23H,0CH,10H,60H,20H,00H
HZI5: ;
;-- 文字: 少 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
db 00H,00H,80H,40H,38H,10H,00H,0FFH,00H,00H,04H,08H,0B0H,10H,00H,00H
db 00H,41H,40H,40H,20H,20H,20H,13H,10H,08H,0CH,06H,03H,01H,00H,00H
HZI6: ;
;-- 文字: 雄 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
db 08H,88H,78H,0FH,0C8H,08H,20H,0F8H,4FH,48H,49H,0FEH,48H,48H,08H,00H
db 24H,33H,2CH,23H,28H,70H,00H,0FFH,22H,22H,22H,3FH,22H,22H,20H,00H
HZI7: ;
;-- 文字: 等 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
db 90H,88H,0A7H,0A2H,0A6H,0BAH,0A2H,0F8H,0A7H,0A2H,0A6H,0BAH,0A2H,82H,80H,00H
db 00H,04H,04H,04H,04H,0CH,34H,04H,44H,84H,7FH,04H,04H,04H,00H,00H
HZI8: ;
;-- 文字: 歡 --
;-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --
db 14H,24H,44H,84H,64H,1CH,20H,18H,0FH,0E8H,08H,08H,28H,18H,08H,00H
db 20H,10H,4CH,43H,43H,2CH,20H,10H,0CH,03H,06H,18H,30H,60H,20H,00H
bw:
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H, 00H, 00H, 00H
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H, 00H, 00H, 00H
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H, 00H, 00H, 00H
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffh,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffh,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffH,0ffH,0ffH,0ffH,0ffH
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H, 00H, 00H, 00H
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H, 00H, 00H, 00H
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H, 00H, 00H, 00H
DB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH, 00H, 00H, 00h, 00H, 00H
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffh,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffh,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0ffH
DB 00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H,0ffH,0ffH,0ffH,0ffH,0ffH
END
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -