lcdshow.asm

51系列单片机的汇编程序包

;液晶显示
LCD     EQU 8E08H
WRICODE EQU LCD+0   ;写命令
WRDATA  EQU LCD+1   ;写数据
RDSTAT  EQU LCD+2   ;读状态
RDDATA  EQU LCD+3   ;读数据

LCD_X   EQU 30H
LCD_Y   EQU 31H
LCD_X1  EQU 32H
LCD_Y1  EQU 33H

COUNT   EQU 34H
COUNT1  EQU 35H
COUNT2  EQU 36H
COUNT3  EQU 37H

LCD_DATA  EQU 38H
LCD_DATA1 EQU 39H
LCD_DATA2 EQU 3AH

        ORG 0000H
        AJMP MAIN

        ORG 0100H
MAIN:   NOP
        MOV SP,#5FH

;初始化
LGS0:   MOV A,#30H      ;30H--基本指令操作
        LCALL SEND_I
        MOV A,#01H      ;清除显示
        LCALL SEND_I
        LCALL DELAY2
        LCALL DELAY2
        MOV A,#06H      ;指定在资料写入或读取时，光标的移动方向
        LCALL SEND_I
        MOV A,#0CH      ;开显示,关光标,不闪烁
        LCALL SEND_I
        ;MOV A,#0FH      ;开显示,显示光标,闪烁
        ;LCALL SEND_I
        
LGS1:   MOV DPTR,#TAB1  ;显示汉字和字符
        MOV COUNT,#40H
        MOV A,#80H
        LCALL SEND_I
LGS11:  CLR A
        MOVC A,@A+DPTR
        LCALL SEND_D
        INC DPTR
        DJNZ COUNT,LGS11
        LCALL DELAY3

LGS2:   MOV A,#01H
        LCALL SEND_I
        LCALL DELAY2
        LCALL DELAY2

        MOV LCD_DATA1,#0AAH ;显示点阵
        MOV LCD_DATA2,#0AAH
        LCALL LAT_DISP
        LCALL DELAY3
        MOV LCD_DATA1,#55H
        MOV LCD_DATA2,#55H
        LCALL LAT_DISP
        LCALL DELAY3

LGS3:   MOV A,#34H
        LCALL SEND_I
        MOV A,#30H
        LCALL SEND_I

        MOV DPTR,#TAB3  ;显示汉字和字符
        MOV COUNT,#40H
        MOV A,#80H
        LCALL SEND_I
LGS31:  CLR A
        MOVC A,@A+DPTR
        LCALL SEND_D
        INC DPTR
        DJNZ COUNT,LGS31
        LCALL DELAY3

LGS4:   MOV A,#01H
        LCALL SEND_I
        LCALL DELAY2
        LCALL DELAY2

        MOV LCD_DATA1,#0FFH  ;显示点阵
        MOV LCD_DATA2,#00H
        LCALL LAT_DISP
        LCALL DELAY3
        MOV LCD_DATA1,#00H
        MOV LCD_DATA2,#0FFH
        LCALL LAT_DISP
        LCALL DELAY3

LGS5:   MOV DPTR,#TAB5       ;显示图形
        LCALL PHO_DISP
        sjmp $
        LCALL DELAY3
        LCALL DELAY3

        MOV A,#34H
        LCALL SEND_I
        MOV A,#30H
        LCALL SEND_I
        LJMP LGS1

PHO_DISP:
        MOV LCD_X,#80H  ;全屏显示图形子程序
        MOV LCD_Y1,#80H
        MOV COUNT3,#02H
PHO_DISP1:
        MOV LCD_X1,LCD_X
        MOV COUNT2,#20H
PHO_DISP2:
        MOV COUNT1,#08H
PHO_DISP3:
        LCALL WR_ZB
        CLR A
        MOVC A,@A+DPTR
        LCALL SEND_D
        INC DPTR
        CLR A
        MOVC A,@A+DPTR
        LCALL SEND_D
        INC DPTR
        INC LCD_X1
        DJNZ COUNT1,PHO_DISP3
        MOV LCD_X1,LCD_X
        INC LCD_Y1
        DJNZ COUNT2,PHO_DISP2
        MOV LCD_X,#88H
        MOV LCD_Y1,#80H
        DJNZ COUNT3,PHO_DISP1

        MOV A,#36H
        LCALL SEND_I
        MOV A,#30H
        LCALL SEND_I
        RET

CLRRAM: MOV LCD_DATA1,#00H   ;GDRAM写0子程序
        MOV LCD_DATA2,#00H
        LCALL LAT_DISP
        RET

LAT_DISP:
        MOV LCD_X,#80H       ;显示点阵子程序
        MOV LCD_Y1,#80H
        MOV COUNT3,#02H
LAT_DISP1:
        CLR F0
        MOV LCD_X1,LCD_X
        MOV COUNT2,#20H
LAT_DISP2:
        MOV COUNT1,#08H
LAT_DISP3:
        JB F0,LAT_DISP32
        MOV LCD_DATA,LCD_DATA1
        AJMP LAT_DISP31
LAT_DISP32:
        MOV LCD_DATA,LCD_DATA2
LAT_DISP31:
        LCALL WR_ZB
        MOV A,LCD_DATA
        LCALL SEND_D
        MOV A,LCD_DATA
        LCALL SEND_D
        INC LCD_X1
        DJNZ COUNT1,LAT_DISP3
        MOV LCD_X1,LCD_X
        INC LCD_Y1
        CPL F0
        DJNZ COUNT2,LAT_DISP2
        MOV LCD_X,#88H
        MOV LCD_Y1,#80H
        DJNZ COUNT3,LAT_DISP1

        MOV A,#36H
        LCALL SEND_I
        MOV A,#30H
        LCALL SEND_I
        RET

WR_ZB:  MOV A,#34H
        LCALL SEND_I
        MOV A,LCD_Y1
        LCALL SEND_I
        MOV A,LCD_X1
        LCALL SEND_I
        MOV A,#30H
        LCALL SEND_I
        RET

SEND_D: PUSH DPL        ;写数据子程序
        PUSH DPH
        ;LCALL CHKBUSY
        LCALL DELAY1
        MOV DPTR,#WRDATA
        MOVX @DPTR,A
        POP DPH
        POP DPL
        RET

SEND_I: PUSH DPL        ;写指令子程序
        PUSH DPH
        ;LCALL CHKBUSY
        LCALL DELAY1
        MOV DPTR,#WRICODE
        MOVX @DPTR,A
        POP DPH
        POP DPL
        RET

CHKBUSY:PUSH ACC        ;测忙碌子程序
CHKING: CLR A
        MOV DPTR,#RDSTAT
        MOVX A,@DPTR
        JB ACC.7,CHKING
        POP ACC
        RET

DELAY3: MOV R5,#16H
DEL31:  MOV R6,#0FFH
DEL32:  MOV R7,#0FFH
DEL33:  DJNZ R7,DEL33
        DJNZ R6,DEL32
        DJNZ R5,DEL31
        RET

DELAY2: MOV R6,#0CH
DEL21:  MOV R7,#18H
DEL22:  DJNZ R7,DEL22
        DJNZ R6,DEL21
        RET

DELAY1: MOV R6,#06H
DEL11:  MOV R7,#08H
DEL12:  DJNZ R7,DEL12
        DJNZ R6,DEL11
        RET

TAB1:   DB "达爱思计算机公司"
        DB "Dais Computer Co"
        DB "液晶显示器128*64"
        DB "Tel:[phone]"

TAB3:   DB "LCD 内置二级字库"
        DB "~!@#$%^&*()_+|{}"
        DB "使用更方便更灵活"
        DB "①②③④⑤⑥⑦⑧"

TAB5:   DB  000H,000H,000H,020H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,000H,000H,030H,000H,000H,000H,021H,000H,01EH,01FH,0E1H,028H,009H,000H,000H
        DB  000H,000H,000H,030H,000H,000H,000H,011H,003H,0E4H,012H,023H,0E8H,008H,080H,000H
        DB  000H,000H,000H,038H,000H,000H,000H,011H,000H,0A8H,012H,021H,04FH,014H,0A0H,000H
        DB  000H,000H,000H,0F8H,000H,000H,000H,00FH,0F7H,0FFH,01FH,0E7H,0EAH,014H,020H,000H
        DB  000H,000H,003H,090H,000H,000H,000H,061H,004H,041H,012H,020H,09AH,034H,040H,000H
        DB  000H,000H,00FH,014H,007H,080H,000H,021H,003H,0FEH,01FH,0E7H,0CAH,052H,040H,000H
        DB  000H,000H,03CH,066H,008H,040H,000H,022H,080H,040H,000H,002H,04AH,012H,080H,000H
        DB  000H,000H,071H,0DEH,017H,020H,000H,024H,060H,07CH,02AH,024H,0E4H,011H,000H,000H
        DB  000H,001H,0C3H,034H,024H,090H,000H,028H,020H,0C8H,029H,053H,084H,011H,080H,000H
        DB  000H,003H,00CH,0ECH,024H,090H,000H,050H,001H,030H,048H,050H,08AH,012H,040H,000H
        DB  000H,007H,01BH,098H,027H,010H,000H,04FH,0F6H,0CFH,00FH,0C3H,0B1H,01CH,030H,000H
        DB  000H,006H,076H,030H,024H,090H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,006H,077H,0FCH,014H,0A0H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,003H,038H,000H,008H,040H,000H,00FH,0FCH,000H,000H,001H,0F0H,000H,000H,000H
        DB  000H,003H,0BFH,0FFH,007H,080H,000H,01FH,0FFH,000H,000H,003H,0E0H,000H,000H,000H

Img1:   DB  000H,001H,0FFH,0FDH,0C0H,000H,000H,01FH,0FFH,080H,000H,003H,0E0H,000H,000H,000H
        DB  000H,001H,0ECH,01CH,0E0H,000H,000H,01FH,0FFH,080H,000H,000H,000H,000H,000H,000H
        DB  000H,003H,08CH,00EH,060H,000H,000H,01FH,00FH,0C1H,0FFH,003H,0E0H,0FEH,000H,000H
        DB  000H,003H,09CH,087H,070H,000H,000H,01FH,007H,0C7H,0FFH,087H,0E3H,0FFH,000H,000H
        DB  000H,003H,099H,0A7H,070H,000H,000H,03EH,007H,0CFH,0FFH,0C7H,0C3H,0FFH,080H,000H
        DB  000H,003H,099H,0E7H,070H,000H,000H,03EH,007H,0CFH,087H,0C7H,0C7H,08FH,080H,000H
        DB  000H,003H,099H,0A7H,060H,000H,000H,03EH,007H,0C0H,007H,0C7H,0C7H,080H,000H,000H
        DB  000H,003H,0B9H,0A6H,060H,000H,000H,03EH,00FH,0C0H,07FH,0C7H,0C7H,0F8H,000H,000H
        DB  000H,007H,030H,00CH,0C0H,000H,000H,07EH,00FH,0C7H,0FFH,0CFH,083H,0FEH,000H,000H
        DB  000H,007H,030H,000H,000H,000H,000H,07CH,01FH,08FH,0C7H,0CFH,080H,07FH,000H,000H
        DB  000H,007H,07EH,07FH,0E0H,000H,000H,07CH,03FH,09FH,00FH,08FH,080H,00FH,000H,000H
        DB  000H,007H,07CH,0FFH,0C0H,000H,000H,07FH,0FFH,01FH,01FH,08FH,09FH,00FH,000H,000H
        DB  000H,00FH,000H,000H,000H,000H,000H,07FH,0FEH,01FH,0FFH,08FH,09FH,0FEH,000H,000H
        DB  000H,00FH,0FDH,0FFH,0C0H,000H,000H,0FFH,0FCH,00FH,0FFH,09FH,00FH,0FCH,000H,000H
        DB  000H,00FH,0FDH,0FFH,080H,000H,000H,0FFH,0F0H,007H,0E7H,09FH,007H,0F8H,000H,000H
        DB  000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H

Img2:   DB  000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,001H,001H,003H,080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,001H,010H,0BCH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,01FH,0F8H,084H,003H,001H,0CFH,088H,070H,00FH,09CH,071H,0C1H,01CH,070H,000H
        DB  000H,011H,010H,03FH,083H,002H,028H,018H,088H,008H,022H,08AH,043H,024H,088H,000H
        DB  000H,01FH,0F3H,084H,000H,002H,028H,008H,088H,008H,022H,08AH,005H,020H,088H,000H
        DB  000H,011H,010H,084H,000H,002H,02FH,008H,08BH,0EFH,01CH,08BH,0C5H,03CH,070H,000H
        DB  000H,011H,010H,09FH,080H,002H,020H,088H,088H,000H,0A2H,08AH,029H,022H,088H,000H
        DB  000H,01FH,0F0H,090H,083H,002H,020H,088H,088H,000H,0A2H,08AH,027H,0A2H,088H,000H
        DB  000H,011H,000H,0B0H,083H,002H,028H,088H,088H,008H,0A2H,08AH,021H,022H,088H,000H
        DB  000H,001H,008H,0DFH,080H,001H,0C7H,01CH,070H,007H,01CH,071H,0C1H,09CH,070H,000H
        DB  000H,000H,0F8H,090H,080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,000H,000H,000H,000H,001H,0CFH,088H,070H,007H,01CH,071H,0CFH,09CH,070H,000H
        DB  000H,000H,000H,000H,000H,002H,028H,018H,088H,008H,0A2H,08AH,028H,024H,088H,000H
        DB  000H,000H,000H,000H,000H,002H,028H,008H,088H,008H,0A2H,00AH,028H,020H,088H,000H

Img3:   DB  000H,000H,000H,000H,000H,002H,02FH,008H,08BH,0E7H,01CH,031H,0CFH,03CH,088H,000H
        DB  000H,000H,000H,000H,000H,002H,020H,088H,088H,008H,0A2H,00AH,020H,0A2H,088H,000H
        DB  000H,000H,000H,000H,000H,002H,020H,088H,088H,008H,0A2H,00AH,020H,0A2H,088H,000H
        DB  000H,000H,000H,000H,000H,002H,028H,088H,088H,008H,0A2H,08AH,028H,0A2H,088H,000H
        DB  000H,000H,000H,000H,000H,001H,0C7H,01CH,070H,007H,01CH,071H,0C7H,01CH,070H,000H
        DB  000H,004H,040H,010H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,004H,043H,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
        DB  000H,00BH,0F8H,0FCH,003H,001H,0CFH,088H,070H,00FH,09CH,021H,0C7H,01CH,070H,000H
        DB  000H,008H,080H,084H,003H,002H,028H,018H,088H,008H,022H,062H,029H,022H,088H,000H
        DB  000H,018H,080H,0FCH,000H,002H,028H,008H,088H,008H,022H,022H,028H,022H,088H,000H
        DB  000H,02FH,0F8H,084H,000H,002H,02FH,008H,08BH,0EFH,01CH,021H,0CFH,004H,088H,000H
        DB  000H,009H,000H,0FCH,000H,002H,020H,088H,088H,000H,0A2H,022H,028H,088H,078H,000H
        DB  000H,009H,0F0H,084H,003H,002H,020H,088H,088H,000H,0A2H,022H,028H,090H,008H,000H
        DB  000H,008H,023H,0FFH,083H,002H,028H,088H,088H,008H,0A2H,022H,028H,0A0H,048H,000H
        DB  000H,009H,0C0H,044H,000H,001H,0C7H,01CH,070H,007H,01CH,071H,0C7H,03EH,070H,000H
        DB  000H,008H,033H,083H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H

        END