cmbc240128.asm

240128液晶模块 C51单片机驱动程序

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; 240x128 graphic mode/Driver ic:t6963C ;;
;; writed  by hawk liu  ;;
;; 2001 Aug. 22     ;;
;; 1/128 duty 1/12.3 bias  ;;
;; Vop=20V  ;;
;; STN GRAY Trasflective mode          ;;
;; character/Graphic mode demo program  ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;text cgrom address :0000h---007fh
;text cgram address :0080h---00ffh(text area:001Eh)
;graphic ram address:2000h---048fh(graphic area:001Eh)
;offset register is used to determine the external charator ram area/not used/
;     FM 接铁框,可不接
;     FS 可参照下面接P3.2
;     VO 接可调电阻,一边接Vout一边电阻接VDD
;     Data ----P1

       CD           EQU  P3.3   ;      DEFINE LCM COMMAND/DATAPIN
       WR           EQU  P3.0   ;      DEFINE LCM WRITE PIN
       RD           EQU  P3.1   ;     DEFINE LCM READ PIN
       CE           EQU  P3.2   ;      DEFINE LCM CHIP ENABLE PIN
       REST         EQU  P3.4   ;   DEFINE LCM RESET PI
       FS           EQU  P3.5   ;     DEFINE LCM WORD PIN



        ORG  00H
MAIN:    CLR FS
        MOV  P1,#00H
        CALL INITIAL

SC1:                ;DISPLAY Elec&eltek map
      CALL GRAPSET
      MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
      CALL WRTD ;; pointer ;;
      MOV  A,#20H;39H ;h-address data ;; address ;;
      CALL WRTD ;; set:0000H ;;
      MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
      CALL WRTI
      mov dptr,#MAP1
      MOV R0,#128
SC11: MOV R1,#30
      CALL DISPLAYC
      DJNZ R0,SC11
      CALL DELAY
      CALL SBLANK

      MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
      CALL WRTD ;; pointer ;;
      MOV  A,#20H;39H ;h-address data ;; address ;;
      CALL WRTD ;; set:0000H ;;
      MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
      CALL WRTI
      mov dptr,#MAP2
      MOV R0,#128
SC21: MOV R1,#30
      CALL DISPLAYC
      DJNZ R0,SC21
      CALL DELAY
      CALL SBLANK

      MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
      CALL WRTD ;; pointer ;;
      MOV  A,#20H;39H ;h-address data ;; address ;;
      CALL WRTD ;; set:0000H ;;
      MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
      CALL WRTI
      mov dptr,#MAP3
      MOV R0,#128
SC31: MOV R1,#30
      CALL DISPLAYC
      DJNZ R0,SC31
      CALL DELAY
      CALL SBLANK

      MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
      CALL WRTD ;; pointer ;;
      MOV  A,#20H;39H ;h-address data ;; address ;;
      CALL WRTD ;; set:0000H ;;
      MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
      CALL WRTI
      mov dptr,#MAP4
      MOV R0,#128
SC41: MOV R1,#30
      CALL DISPLAYC
      DJNZ R0,SC41
      CALL DELAY
      CALL SBLANK

      MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
      CALL WRTD ;; pointer ;;
      MOV  A,#20H;39H ;h-address data ;; address ;;
      CALL WRTD ;; set:0000H ;;
      MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
      CALL WRTI
      mov dptr,#MAP5
      MOV R0,#128
SC51: MOV R1,#30
      CALL DISPLAYC
      DJNZ R0,SC51
      CALL DELAY
      CALL SBLANK

      MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
      CALL WRTD ;; pointer ;;
      MOV  A,#20H;39H ;h-address data ;; address ;;
      CALL WRTD ;; set:0000H ;;
      MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
      CALL WRTI
      mov dptr,#MAP6
     MOV R0,#128
SC61: MOV R1,#30
      CALL DISPLAYC
      DJNZ R0,SC61
      CALL DELAY
      CALL SBLANK

CCHAR:            ;CHARATER DISPLAY
        CALL CHARSET
        MOV  A,#00;38H  ;l-address data ;;;;;;;;;;;;;;;;;;
        CALL WRTD ;; pointer ;;
        MOV  A,#00H;39H ;h-address data ;; address ;;
        CALL WRTD ;; set:0000H ;;
        MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
        CALL WRTI
        MOV R0,#30
SCCHAR1:
        mov dptr,#CGROM ;CGROM CHARATER DISPLAY(SHOW font table)
        MOV R1,#128
        CALL DISPLAYC
        DJNZ R0,SCCHAR1
        CALL DELAY
        JMP MAIN

SBLANK: MOV  A,#00H     ;l-address data ;;;;;;;;;;;;;;;;;;
        CALL WRTD ;; pointer ;;
        MOV  A,#20H ;h-address data ;; address ;;
        CALL WRTD ;; set:0000H ;;
        MOV  A,#24H ;set  pointer   ;;;;;;;;;;;;;;;;;;
        CALL WRTI
        MOV R0,#128
SCKK: MOV R2,#6
SCBK: mov dptr,#BLANK ;CGROM CHARATER DISPLAY(SHOW font table)
      MOV R1,#5
      CALL DISPLAYC
      DJNZ R2,SCBK
      DJNZ R0,SCKK
      RET
INITIAL:
          CLR      REST
          CALL DELAY0
          CALL DELAY0
          SETB     REST
          RET
;====================================================set control word=====
CHARSET:
          CALL CONTRWORD
          MOV  A,#80H      ;MODE SET initial cgrom
          CALL  WRTI
          MOV  A,#94H ;DISPLAY MODE SET
          CALL  WRTI ;Graphic off;CURSOR ON;BLINK OFF
          RET
GRAPSET:     CALL CONTRWORD
             MOV  A,#80H ;MODE SET initial cgrom
             CALL  WRTI
             MOV  A,#98H ;DISPLAY MODE SET
             CALL WRTI ;Graphic oN
              RET
CONTRWORD:         mov        A,#00H ;;;;;;;;;;;;;;;;;;
                   CALL       WRTD ;; ;;
                   MOV        A,#00H ;data setting ;;address:0000h ;;
                   CALL       WRTD ;; ;;
                   MOV        A,#40H ;;1)text home   ;;
                   CALL       WRTI  ;text home address  ;;address:0000h ;;
                   MOV        A,#30; TEXT    Low4-bit   ;;30columns/row ;;                   CALL       WRTD ;; ;;
                   call       WRTD ;; ;;
                   MOV        A,#00H ;TEXT  AREA  H4-bit;; ;;
                   CALL       WRTD ;; ;;
                   MOV        A,#41H ;command setting;;2)text area  t;;
                   CALL       WRTI ;;ext area:0010h;;
                   MOV        A,#00H    ;graphic L-4BIT ;; ;;
                   CALL       WRTD ;; ;;
                   MOV        A,#20H ;graphic h-4bit ;; ;;
                   CALL       WRTD ;; ;;
                   MOV        A,#42H    ;;3)graphic HOME;;
                   CALL       WRTI    ;;ADDRESS:2000h ;;
                   MOV        A,#30 ;graphic L-4BIT ;;30COLUME/row ;;
                   CALL       WRTD ;; ;;
                   MOV        A,#00H ;Graphic H-4bit ;; ;;
                   CALL       WRTD ;;4)graphic area;;
                   MOV        A,#43H    ;;is :0010h ;;
                   CALL       WRTI  ;;;;;;;;;;;;;;;;;;
                   RET
WRTI:             CALL STA01
WRTII:              SETB CD
                    CLR WR
                    SETB RD
                    CLR CE
                    MOV P1,A
                    NOP
                    SETB CE
                    SETB WR