t6963.c

240x128 graphic mode/Driver ic:t6963C writed by hawk liu 2001 Aug. 22 1/128 duty 1/12.3 bia

  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;; 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/
       CD           EQU  P3.7
       WR           EQU  P3.6
       RD           EQU  P3.5
       CE           EQU  P3.4
       REST         EQU  P3.3
                ORG  00H
MAIN:   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

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
                   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
                    CLR CD
                    RET
WRTD:               ;CALL DELAY0
    CALL STA3
WRTDD:     CLR CD
                    SETB RD
                    CLR WR
                    CLR CE
                    MOV P1,A
                    NOP
                    SETB CE
                    SETB WR
                    SETB CD
                    RET
READS:             ;CALL DELAY0
    setb CD
                    CLR RD
                    setb WR
                    CLR CE
                    NOP
                    MOV A,P1
                    NOP
                    SETB CE
                    CLR WR
                    CLR CD
                    RET   
displayC:           ;CALL DELAY0
    CALL AUTWR
DIS0:             CLR    A
                    MOVC   A,@A+dpTR
                    CALL   WRTD
                    INC    DPTR
                    DJNZ   R1,DIS0
                    CALL AURSTW
                    RET 
AUTWR: ;CALL DELAY0
CALL STA01
MOV A,#0B0H ;SET DATA AUTO WRITE
       CALL WRTII
       RET         
AURSTW: ;CALL DELAY0
CALL STA3 ;SET AUTORESET