?? 液晶程序.txt
字號:
文章編號:1682----加入日期:2005-1-27
『關閉窗口』
各位朋友，本人買的12864液晶屏已經調試通過，下面是源程序，無償奉獻，有需要的趕快下啊，這可花了我一個星期啊(jjcool)
XCS BIT 00H ;顯示器片選0=CS1,1=CS2 ;20H-2FH為位
尋址區,位地址從00H-7FH
BZPD BIT 01H ;0=上8X8半字,1=下8X8半字
HHBZ BIT 02H ;換行標志
HZDH BIT 03H ;0=顯示漢字，1=顯示動畫
LCD_RW BIT P3.0
LCD_DI BIT P3.1
LCD_E BIT P3.3
LCD_CS1 BIT P3.5
LCD_CS2 BIT P3.4
LCD_OPEN DATA 30H
LCD_LINE DATA 31H
LCD_PAGE DATA 32H
LCD_Y DATA 33H
YCPD DATA 34H ;左右半屏溢出判斷
HHPD DATA 35H ;換行判斷
XWPD DATA 36H ;寫完一整屏判斷
ORG 0000H
MOV SP,#40H
SETB XCS ;選擇CS2
MOV LCD_OPEN,#01H ;開顯示器1,關顯示器
0 ;CS2
LCALL LCDOPEN
MOV LCD_LINE,#00H ;設置起始
行 ;CS2
LCALL SETLINE
MOV LCD_PAGE,#00H ;設置頁地址 ;CS2
LCALL SETPAGE
MOV LCD_Y,#00H ;設置列地
址 ;CS2
LCALL SETY
LJMP CLRST1
CLR4:INC LCD_PAGE
CLRST1:LCALL SETPAGE
MOV R7,#40H
CLR5:MOV A,#0FFH ;顯示校
驗 ;CS2
LCALL LCDWRDATA
DJNZ R7,CLR5
MOV A,LCD_PAGE
CJNE A,#07H,CLR4
MOV LCD_LINE,#00H
LCALL SETLINE
MOV LCD_PAGE,#00H
LCALL SETPAGE
MOV LCD_Y,#00H
LCALL SETY
LJMP CLRST2
CLR6:INC LCD_PAGE
CLRST2:LCALL SETPAGE
MOV R7,#40H
CLR7:MOV A,#00H ;清顯
示 ;CS2
LCALL LCDWRDATA
DJNZ R7,CLR7
MOV A,LCD_PAGE
CJNE A,#07H,CLR6
CLR XCS ;選擇CS1
MOV LCD_OPEN,#01H ;開顯示器1, 關顯示器
0 ;CS1
LCALL LCDOPEN
MOV LCD_LINE,#00H
LCALL SETLINE ;設置起始
行 ;CS1
MOV LCD_PAGE,#00H
LCALL SETPAGE ;設置頁地
址 ;CS1
MOV LCD_Y,#00H
LCALL SETY ;設置列地
址 ;CS1
LJMP CLRST3
CLR0:INC LCD_PAGE
CLRST3:LCALL SETPAGE
MOV R7,#40H
CLR1:MOV A,#0FFH ;顯示校
驗 ;CS1
LCALL LCDWRDATA
DJNZ R7,CLR1
MOV A,LCD_PAGE
CJNE A,#07H,CLR0
MOV LCD_LINE,#00H
LCALL SETLINE
MOV LCD_PAGE,#00H
LCALL SETPAGE
MOV LCD_Y,#00H
LCALL SETY
LJMP CLRST4
CLR2:INC LCD_PAGE
CLRST4:LCALL SETPAGE
MOV R7,#40H
CLR3:MOV A,#00H ;清顯
示 ;CS1
LCALL LCDWRDATA
DJNZ R7,CLR3
MOV A,LCD_PAGE
CJNE A,#07H,CLR2
;初始化完畢
*************************************************************************
CLR HZDH
WRLCD:JNB HZDH,XZF
XDH:MOV DPTR,#DHDOT ;寫動畫或圖片
LJMP DH0
XZF:MOV DPTR,#HZDOT ;寫字符(漢字或字母或符號)
MOV XWPD,#00H
HZ0:CLR XCS
MOV LCD_LINE,#00H ;置起始行
LCALL SETLINE
MOV LCD_PAGE,#00H
LCALL SETPAGE ;置頁
MOV LCD_Y,#00H ;置列
LCALL SETY
MOV HHPD,#00H
HZ7:MOV YCPD,#00H
HZ8:CLR BZPD
HZ3:MOV R0,#08H ;寫左上8個Y列
HZ1:MOV A,#00H
MOVC A,@A+DPTR
LCALL LCDWRDATA
INC DPTR
INC LCD_Y
DJNZ R0,HZ1
JB BZPD,HZ2
CLR C ;Y列減8, 即返回掃描
MOV A,LCD_Y
SUBB A,#08H
MOV LCD_Y,A
LCALL SETY
INC LCD_PAGE ;頁地址加1,即換第2頁掃描
LCALL SETPAGE
SETB BZPD
LJMP HZ3
HZ2:DEC LCD_PAGE ;返回到第1頁中,準備下一個半
字掃描
LCALL SETPAGE
INC YCPD
MOV A,YCPD
CJNE A,#08H,HZ8
JB XCS,HZ9
SETB XCS ;換屏
LCALL SETPAGE
MOV LCD_Y,#00H ;置列
LCALL SETY
LJMP HZ7
HZ9:CLR XCS ;寫完一行后從CS2返回到CS1
中
INC LCD_PAGE
INC LCD_PAGE
LCALL SETPAGE ;下一行開始
MOV LCD_Y,#00H
LCALL SETY
INC HHPD
MOV A,HHPD
CJNE A,#04H,HZ7
INC XWPD ;換第二幅畫面
MOV A,XWPD
CJNE A,#02H,HZ0
LJMP$
DH0:MOV XWPD,#00H
DH1:CLR XCS
MOV LCD_LINE,#00H ;置起始行
LCALL SETLINE
MOV LCD_PAGE,#00H
LCALL SETPAGE ;置頁
MOV LCD_Y,#00H ;置列
LCALL SETY
MOV HHPD,#00H
DH2:MOV R0,#40H ;寫上64個Y列
DH3:MOV A,#00H
MOVC A,@A+DPTR
LCALL LCDWRDATA
INC DPTR
DJNZ R0,DH3
JB XCS,DH4
SETB XCS
LCALL SETPAGE
MOV LCD_Y,#00H
LCALL SETY
LJMP DH2
DH4:CLR XCS ;寫完一行后從CS2返回到CS1
中
INC LCD_PAGE
LCALL SETPAGE ;下一行開始
MOV LCD_Y,#00H
LCALL SETY
INC HHPD
MOV A,HHPD
CJNE A,#08H,DH2
INC XWPD ;換第二幅畫面
MOV A,XWPD
CJNE A,#02H,DH1
LJMP$
LCDWRINST:NOP
JB XCS,INS0
CLR LCD_CS1
SETB LCD_CS2
LJMP INS1
INS0:SETB LCD_CS1
CLR LCD_CS2
INS1:SETB LCD_E
CLR LCD_DI
CLR LCD_RW
MOV P1,A
LCALL DLY10
CLR LCD_E
LCALL DLY10
NOP
RET
LCDWRDATA:NOP
JB XCS,DAT0
CLR LCD_CS1
SETB LCD_CS2
LJMP DAT1
DAT0:SETB LCD_CS1
CLR LCD_CS2
DAT1:SETB LCD_E
SETB LCD_DI
CLR LCD_RW
MOV P1,A
LCALL DLY10
CLR LCD_E
LCALL DLY10
NOP
RET
LCDOPEN:MOV A,LCD_OPEN ;開顯示器
ANL A,#3FH
ORL A,#3EH
LCALL LCDWRINST
NOP
RET
SETLINE:MOV A,LCD_LINE
ORL A,#0C0H ;設置起始行
LCALL LCDWRINST
NOP
RET
SETPAGE:MOV A,LCD_PAGE
ANL A,#0BFH
ORL A,#0B8H ;設置頁地址
LCALL LCDWRINST
NOP
RET
SETY:MOV A,LCD_Y
ANL A,#7FH
ORL A,#40H
NOP ;設置列地址
LCALL LCDWRINST
NOP
RET
DLY10:NOP
MOV R5,#01H
DL1:MOV R4,#01H
DL2:MOV R6,#0FH
DL3:DJNZ R6,DL3
DJNZ R4,DL2
DJNZ R5,DL1
NOP
RET
HZDOT:
;新 CD0C2
DB 000H,044H,04CH,07CH,0D7H,0E6H,07CH,05CH
DB 000H,022H,01AH,04EH,0FFH,07FH,00EH,09AH
DB 044H,0FEH,0FCH,046H,0C2H,0C3H,062H,040H
DB 060H,03FH,01FH,000H,0FFH,0FFH,000H,000H
;年 CC4EA
DB 000H,020H,010H,018H,0ECH,0CFH,04AH,048H
DB 000H,004H,004H,004H,007H,007H,004H,004H
DB 0F8H,0F8H,048H,048H,068H,04CH,008H,000H
DB 0FFH,0FFH,004H,004H,004H,004H,006H,004H
;快 CBFEC
DB 000H,0C0H,060H,0FFH,0FEH,030H,060H,008H
DB 000H,000H,000H,0FFH,07FH,080H,041H,071H
DB 008H,0FFH,0FEH,008H,0F8H,0FCH,008H,000H
DB 03DH,00FH,007H,00DH,039H,071H,0E1H,041H
;樂 CC0D6
DB 000H,000H,080H,080H,0FEH,0FCH,084H,084H
DB 000H,040H,020H,030H,01CH,00EH,024H,040H
DB 0FEH,0F6H,082H,083H,0C2H,080H,000H,000H
DB 0FFH,07FH,000H,002H,00CH,018H,070H,020H
;歡 CBBB6
DB 000H,034H,0C4H,004H,0C4H,0FCH,03EH,024H
DB 000H,040H,038H,00FH,007H,03CH,098H,060H
DB 018H,00EH,0EFH,0CAH,048H,038H,01CH,008H
DB 030H,01CH,00FH,007H,01CH,070H,0E0H,040H
;迎 CD3AD
DB 000H,040H,046H,0DCH,0E8H,040H,0FEH,0FCH
DB 000H,040H,0E0H,03FH,01FH,032H,067H,0C3H
DB 006H,003H,0FDH,0FCH,004H,0FCH,0FEH,004H
DB 0C2H,0C1H,0FFH,0DFH,0C2H,0C7H,0C3H,040H
;使 CCAB9
DB 000H,080H,060H,0F8H,0EFH,006H,008H,0F8H
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -