nt7571-mtp.asm

CSTN 用 IC NT7571-MTP 程序！

              CALL  W_COM
              MOV   A,CONTRAST            
              CALL  W_COM
         
                              
              CALL  PIC_1
              DM    #20
              JMP   ADJ_CONTRAST_A

      ;**********************
ALFA_DEFAULT:
              MOV   CONTRAST,#200

              MOV   A,#2AH                ;Contrast Control (1) and Contrast Control (2)
              CALL  W_COM
              MOV   A,CONTRAST            
              CALL  W_COM
       
              
              CALL  PIC_1
              DM    #20
              JMP   ADJ_CONTRAST
;;*********************************************************
INT0_DRV:
            MOV  IE,#00000001B
            DM   #200                     ;DELAY FOR DOUBLE CHEK TO BURN
            JNB  P3.2,BURN_OTP
            RETI
BURN_OTP:

            MOV   A,#50H                  ;DISPLAY OFF
            CALL  W_COM
            MOV   A,#26H                  ;DC/DC AND AMP ON/OFF SET CMMAND TO 00H
            CALL  W_COM 
            MOV   A,#00H 
            CALL  W_COM                             

            CLR  RELAY
            DM    #50

            MOV   A,#0EDH                ;MTP
            CALL  W_COM

            MOV   A,OTP
            ADD   A,#00010000B                ;===16
            ANL   A,#00011111B
            CALL  W_COM
           
            MOV   A,#0EFH
            CALL  W_COM

            DM    #255             ;WAIT  AT LEAST 2 SECOND
            
            
            SETB   RELAY
            DM    #50

            MOV   A,#26H                ;DC/DC AND AMP ON/OFF SET CMMAND TO FFH
            CALL  W_COM  
            MOV   A,#0FFH
            CALL  W_COM
            MOV   A,#51H                ;DISPLAY  ON
            CALL  W_COM

        /*    SETB  _RES
            DM    #50
            CALL  INITIAL
            CALL  CLEAR
              MOV   PAGE_S,#0              ;PIC_1
              MOV   PAGE_E,#127
              MOV   COL_S,#0
              MOV   COL_E,#127
              MOV   DPTR,#PIC_1
              CALL   OUTRAM_FILL
              DM    #100  
                             */
         
            JMP   $
;**************************************************************

 PIC_1:             
                MOV   PAGE_S,#0          
              MOV   PAGE_E,#127
              
              MOV   COL_S,#0
              MOV   COL_E,#127
              
              MOV   DPTR,#PIC1
              
              CALL   OUTRAM_FILL
              RET
;************** ALL_WHITE *********************************
ALL_WHITE:
              MOV   PAGE_S,#0
              MOV   PAGE_E,#127
              MOV   COL_S,#0
              MOV   COL_E,#127

              MOV   RG_DATA,#11111111B 
              MOV   GB_DATA,#11111111B 
              CALL  FILL_RAM
              RET
;************** ALL_BLACK *********************************
ALL_BLACK:
              MOV   PAGE_S,#0
              MOV   PAGE_E,#127
              MOV   COL_S,#0
              MOV   COL_E,#127

              MOV   RG_DATA,#00000000B 
              MOV   GB_DATA,#00000000B 
              CALL  FILL_RAM
              RET
              ;*************** PA_SET **********************************
AREA_SET:
              PUSH  ACC

              MOV   A,#43H
              CALL  W_COM
              MOV   A,COL_S
              CALL  W_COM
              MOV   A,COL_E
              CALL  W_COM

              MOV   A,#42H
              CALL  W_COM
              MOV   A,PAGE_S
              CALL  W_COM
              MOV   A,PAGE_E
              CALL  W_COM
    
              POP   ACC
              RET
 ;****************OTP PIC***********************************************
OUTRAM_FILL:
 
              PUSH  ACC
              PUSH  4
              PUSH  3
              PUSH  2
              CALL  AREA_SET
              CLR   C
              MOV   A,COL_E               ;HOW MANY PAGE TO USE
              SUBB  A,COL_S
              INC   A
              MOV   R3,A
              MOV   R2,A
              CLR   C
              MOV   A,PAGE_E               
              SUBB  A,PAGE_S
              INC   A
              MOV   R4,A
             ; CALL  DATA_WRITE
               ;    MOV  DPTR,#00H
    SHOW31: 
     
              CLR   A
              MOVC  A,@A+DPTR
            
              MOV  RG_DATA,A
             
              INC   DPTR
       
              CLR   A
              MOVC  A,@A+DPTR
              MOV GB_DATA,A
              CALL  W_DATA
              INC   DPTR
                  
              DJNZ  R3,SHOW31
              MOV   A,R2
              MOV   R3,A
              DJNZ  R4,SHOW31
              POP   2
              POP   3
              POP   4
              POP   ACC
              RET 
             
 ;******************************
      
   ;****************OTP PIC***********************************************
  RAM_FILL:
 
              PUSH  ACC
              PUSH  3
              PUSH  4
              PUSH  2
              CALL  AREA_SET
              CLR   C
              MOV   A,COL_E               ;HOW MANY PAGE TO USE
              SUBB  A,COL_S
              INC   A
              MOV   R3,A
              MOV   R2,A
              CLR   C
              MOV   A,PAGE_E               
              SUBB  A,PAGE_S
              INC   A
              MOV   R4,A
             ; CALL  DATA_WRITE
                  ; MOV  DPTR,#00H
    SHOW3: 
     
              CLR   A
              MOVX A,@DPTR
                 MOV RG_DATA,A
             
              INC   DPTR
       
              CLR   A
              MOVX A,@DPTR