12864b-cog.asm

烨新达显示屏LCDYXD-12864B-COG用的图纸及ASM程序

;THIS PROGRAM FOR 7502/NT7532 I/O MODE  TO EXAMPLE
;RESET TO VCC(YXD-12864B-COG 8-bit TRI-STATE PARALLEL I/O PORT)
RESETPIN   BIT     P3.4
CSPIN      BIT     P3.5
WRPIN      BIT     P3.0
RDPIN      BIT     P3.1         ;(CAN TO VDD)
RSPIN	   BIT	   P3.3

FILLA        EQU   20H
FILLB        EQU   21H
FILLC        EQU   22H
FILLD        EQU   23H
FILLE        EQU   24H
FILLF        EQU   25H
FILLG        EQU   26H
FILLH        EQU   27H

TEMP         EQU   28H
LAB          EQU   29H
LINENUM	     EQU   2AH
PAGENUM	     EQU   2BH

          ORG   00H
          JMP   START

          ORG  0003H
          JMP  INTER0




	ORG     0040H
INTER0:
     CALL   MS10
     JB     P3.2,INTEND
     MOV    TEMP,A
     MOV    A,LAB
     CPL    A
     MOV    LAB,A
     MOV    A,TEMP
IN_T:
     JNB    P3.2,IN_T
     CALL   MS10
     JNB    P3.2,IN_T
INTEND:
      RETI
MS10: MOV     R7,#40H               ;delay about 130ms
MS12: MOV     R6,#0F0H
MS11: DJNZ    R6,MS11
      DJNZ    R7,MS12
      RET
START:
      SETB  P3.2
      SETB  EA
      SETB  EX0
      SETB  IT0
      MOV   LAB,#0H
      CALL  DELAY
      CLR  RESETPIN
      CALL  LDELAY
      SETB  RESETPIN
      CALL  LDELAY
      CALL   RESET
      CALL  DELAY


      MOV    FILLA,#0FFH
      MOV    FILLB,#0FFH
      MOV    FILLC,#0FFH
      MOV    FILLD,#0FFH
      MOV    FILLE,#0FFH
      MOV    FILLF,#0FFH
      MOV    FILLG,#0FFH
      MOV    FILLH,#0FFH
      CALL   FILL

      MOV    FILLA,#55H
      MOV    FILLB,#55H
      MOV    FILLC,#55H
      MOV    FILLD,#55H
      MOV    FILLE,#55H
      MOV    FILLF,#55H
      MOV    FILLG,#55H
      MOV    FILLH,#55H
      CALL   FILL

      MOV    FILLA,#0FFH
      MOV    FILLB,#0H
      MOV    FILLC,#0FFH
      MOV    FILLD,#0H
      MOV    FILLE,#0FFH
      MOV    FILLF,#0H
      MOV    FILLG,#0FFH
      MOV    FILLH,#0H
      CALL   FILL

      MOV    FILLA,#0H
      MOV    FILLB,#0FFH
      MOV    FILLC,#0H
      MOV    FILLD,#0FFH
      MOV    FILLE,#0H
      MOV    FILLF,#0FFH
      MOV    FILLG,#0H
      MOV    FILLH,#0FFH
      CALL   FILL

      MOV    DPTR,#TAB1
      CALL   DRAW
      CALL   DELAY

      MOV    DPTR,#TAB2
      CALL   DRAW
      CALL   DELAY

      MOV    DPTR,#TAB3
      CALL   DRAW
      CALL   DELAY
      
      MOV    DPTR,#TAB4
      CALL   DRAW
      CALL   DELAY


      ;MOV     A,#81H	;设置电压调整
      ;CALL	OUTI
      ;CALL    LDELAY
      ;MOV     A,#3FH
      ;CALL	OUTI
      ;CALL    LDELAY



      MOV    FILLA,#0FH
      MOV    FILLB,#0FH
      MOV    FILLC,#0FH
      MOV    FILLD,#0FH
      MOV    FILLE,#0F0H
      MOV    FILLF,#0F0H
      MOV    FILLG,#0F0H
      MOV    FILLH,#0F0H
      CALL   FILL

      MOV     A,#061H	;FIRST LINE =COM33
      CALL	OUTI
      CALL    DELAY

      MOV     A,#062H	;FIRST LINE =COM33
      CALL	OUTI
      CALL    DELAY

      MOV     A,#063H	;FIRST LINE =COM33
      CALL	OUTI
      CALL    DELAY

      MOV     A,#064H	;FIRST LINE =COM33
      CALL	OUTI
      CALL    DELAY
      JMP    START
FILL:
      MOV    R3,#08H
      MOV    PAGENUM,#0B0H
S_0:
      MOV    A,PAGENUM
      CALL   OUTI
      MOV    A,#10H
      CALL   OUTI
      MOV    A,#00H
      CALL   OUTI	;SET SEG =0
      MOV    A,#0AFH	;DIAPLAY ON
      CALL   OUTI
      ;MOV    A,#0
      ;CALL   OUTD

      MOV    R2,#16
F_1:
      MOV    A,FILLA
      CALL   OUTD
      MOV    A,FILLB
      CALL   OUTD
      MOV    A,FILLC
      CALL   OUTD
      MOV    A,FILLD
      CALL   OUTD
      MOV    A,FILLE
      CALL   OUTD
      MOV    A,FILLF
      CALL   OUTD
      MOV    A,FILLG
      CALL   OUTD
      MOV    A,FILLH
      CALL   OUTD
      DJNZ   R2,F_1

      INC    PAGENUM
      DJNZ   R3,S_0

      CALL   DELAY

      RET
DRAW:
      MOV    R3,#08H
   ;   MOV    DPTR,#TABLE
      MOV    PAGENUM,#0B0H
D_0:
      MOV    A,PAGENUM
      CALL   OUTI

      MOV    A,#10H
      CALL   OUTI
      MOV    A,#0H
      CALL   OUTI	;SET SEG=0


      MOV    R2,#128
D_1:
      CLR    A
      MOVC   A,@A+DPTR
      CALL   OUTD
      INC    DPTR
      DJNZ   R2,D_1


      INC    PAGENUM
      DJNZ   R3,D_0
      CALL   DELAY

      RET
RESET:
        MOV    A,#0E3H  ;NOP
        CALL   OUTI

        MOV    A,#0FBH  ;NOP
        CALL   OUTI

        MOV     A,#0A2H
        CALL    OUTI	;SET LCD BAIS= 1/7
        MOV     A,#0A0H ;ADC=0 S1->S132
        CALL    OUTI
	MOV     A,#0C8H	;SET SHK C1->C64
        CALL    OUTI





        MOV     A,#2CH
        CALL    OUTI	;VC ON
	CALL    LDELAY

	MOV     A,#2EH
        CALL    OUTI	;VR ON
	CALL    LDELAY

	MOV     A,#2FH
        CALL    OUTI	;VF ON
        CALL    LDELAY


        MOV     A,#81H	;设置电压调整
        CALL	OUTI
        CALL    LDELAY
        MOV     A,#35H
	CALL	OUTI
        CALL    LDELAY

        MOV     A,#23H	;设置电阻分压
        CALL    OUTI
        CALL    LDELAY

  	MOV     A,#0AFH	;DIAPLAY ON
	CALL	OUTI

        MOV     A,#060H	;FIRST LINE =COM33
	CALL	OUTI
        CALL    LDELAY
        RET

OUTD:   CLR    WRPIN
	SETB   RSPIN
        CLR    CSPIN
        ;SETB   RDPIN
	MOV    P1,A
        ;CLR    RDPIN
	SETB   CSPIN
        RET
OUTI:   CLR    WRPIN
	CLR    RSPIN
        CLR    CSPIN
        ;SETB   RDPIN
	MOV    P1,A
        ;CLR    RDPIN
   	SETB   CSPIN
        RET
LDELAY:
        MOV    B,#20
L_1:
        MOV     R6,#50
        DJNZ    R6,$
        DJNZ   B,L_1
        RET
DELAY:
       MOV     R7,#0FFH               ;delay about 130ms
DELAY1:MOV     R6,#0FFH
DELAY2:
       MOV     A,LAB
       JNZ     DELAY2
       MOV     R5,#02H
       DJNZ    R5,$
       DJNZ    R6,DELAY2
       DJNZ    R7,DELAY1
       RET
TAB1:
;--  调入了一幅图像：D:\PROJECT\GRAPHIC\COG\12864\12864L01A-COG\PR\VERSION1.1\未命名.bmp  --
;--  宽度x高度=128x64  --
DB  0FFH,001H,001H,001H,001H,001H,001H,001H,001H,001H,001H,081H,001H,001H,001H,001H,
DB  001H,081H,081H,081H,001H,001H,001H,001H,081H,081H,081H,001H,001H,001H,001H,001H,
DB  081H,081H,001H,001H,001H,001H,001H,001H,081H,001H,001H,001H,001H,001H,001H,001H,
DB  001H,001H,001H,001H,081H,081H,081H,001H,001H,001H,081H,081H,081H,081H,081H,001H,
DB  081H,081H,081H,081H,081H,001H,001H,001H,001H,001H,081H,001H,001H,001H,001H,081H,
DB  081H,081H,081H,081H,001H,001H,001H,081H,081H,081H,001H,001H,001H,001H,001H,001H,
DB  001H,001H,001H,001H,081H,001H,001H,001H,001H,001H,001H,001H,081H,081H,081H,001H,
DB  001H,001H,081H,001H,001H,001H,081H,001H,001H,001H,001H,001H,001H,001H,001H,0FFH,
DB  0FFH,000H,000H,000H,000H,000H,000H,000H,000H,001H,001H,0FFH,000H,000H,000H,000H,
DB  0C3H,0A0H,090H,088H,087H,000H,000H,077H,088H,088H,088H,077H,000H,000H,07EH,085H,
DB  084H,084H,079H,000H,030H,028H,026H,021H,0FFH,020H,000H,000H,000H,000H,000H,000H,
DB  000H,000H,000H,063H,084H,088H,088H,071H,000H,000H,0FFH,088H,088H,088H,080H,000H,
DB  0FFH,008H,008H,018H,068H,087H,000H,000H,000H,000H,0FFH,000H,000H,000H,000H,0FFH,
DB  088H,088H,088H,080H,000H,000H,063H,084H,088H,088H,071H,000H,000H,000H,000H,000H,
DB  000H,000H,000H,000H,0FFH,080H,080H,080H,080H,000H,03EH,041H,080H,080H,080H,063H,
DB  000H,000H,0FFH,00EH,0F0H,00EH,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,
DB  0FFH,000H,000H,000H,000H,000H,000H,000H,000H,0F0H,010H,010H,010H,010H,000H,000H,
DB  0F0H,010H,010H,020H,0C0H,000H,000H,000H,000H,0F0H,000H,000H,000H,000H,010H,010H,
DB  0F0H,010H,010H,000H,0C0H,020H,010H,010H,020H,0C0H,000H,0F0H,010H,010H,010H,010H,
DB  0E0H,000H,000H,000H,000H,080H,000H,000H,000H,000H,0F0H,000H,000H,000H,000H,000H,
DB  000H,0F0H,010H,010H,010H,010H,000H,000H,0F0H,010H,010H,010H,010H,000H,0C0H,020H,
DB  010H,010H,010H,060H,000H,010H,020H,0C0H,000H,0C0H,020H,010H,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,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,
DB  0FFH,000H,000H,000H,000H,000H,000H,000H,000H,01FH,011H,011H,011H,010H,000H,000H,
DB  01FH,010H,010H,008H,007H,000H,000H,000H,000H,01FH,000H,000H,000H,000H,000H,000H,
DB  01FH,000H,000H,000H,007H,008H,010H,010H,008H,007H,000H,01FH,001H,001H,003H,00DH,
DB  010H,000H,000H,000H,000H,010H,000H,000H,000H,000H,01FH,010H,010H,010H,010H,000H,
DB  000H,01FH,011H,011H,011H,010H,000H,000H,01FH,011H,011H,011H,010H,000H,007H,008H,
DB  010H,010H,010H,00CH,000H,000H,000H,000H,01FH,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,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,
DB  0FFH,000H,000H,000H,000H,000H,000H,000H,000H,0FEH,002H,002H,004H,0F8H,000H,000H,
DB  000H,0F8H,046H,0F8H,000H,000H,000H,002H,002H,0FEH,002H,002H,000H,000H,0FEH,022H,
DB  022H,022H,002H,000H,000H,000H,000H,010H,000H,000H,000H,0F8H,004H,002H,002H,004H,
DB  0F8H,000H,000H,0DCH,022H,022H,022H,0DCH,000H,0F8H,004H,002H,002H,004H,0F8H,000H,
DB  000H,03CH,042H,042H,042H,0FCH,000H,0F8H,004H,002H,002H,004H,0F8H,000H,000H,0DCH,
DB  022H,022H,022H,0DCH,000H,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,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,
DB  0FFH,000H,000H,000H,000H,000H,000H,000H,000H,023H,022H,042H,061H,020H,0A0H,020H,
DB  023H,0A0H,020H,060H,003H,000H,000H,0E0H,000H,003H,000H,0E0H,000H,0C0H,003H,002H,
DB  0E2H,002H,002H,080H,0C0H,020H,080H,002H,0E0H,000H,000H,0E0H,081H,042H,002H,001H,
DB  040H,0C0H,040H,061H,0C2H,042H,002H,0E1H,020H,020H,021H,002H,002H,001H,060H,040H,
DB  000H,001H,002H,082H,061H,000H,000H,000H,001H,002H,002H,001H,000H,000H,000H,001H,
DB  002H,002H,002H,001H,000H,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,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,
DB  0FFH,000H,000H,000H,000H,000H,000H,000H,000H,0C1H,073H,080H,046H,025H,01CH,0FEH,
DB  00CH,034H,065H,044H,000H,000H,021H,01FH,011H,091H,078H,007H,000H,07FH,000H,000H,
DB  0FFH,000H,000H,0C7H,03EH,011H,020H,021H,02FH,022H,0F9H,027H,024H,006H,000H,000H,
DB  04AH,0BBH,08AH,07FH,07AH,0CAH,0F0H,00FH,002H,0FEH,002H,000H,000H,0C2H,07EH,07EH,
DB  060H,0B1H,099H,087H,085H,08DH,099H,091H,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,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,0FFH,
DB  0FFH,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,
DB  080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,
DB  080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,
DB  080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,
DB  080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,
DB  080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,