320240-213.asm

控制器为RA8835的液晶屏驱动程序

;TEST OF 320240-213
;CONTROLLER: NO (RA8835)
;SIDE: 320 X 240 DOTS

;*************************************************************
;/WR    REG     P3.0            DEFINE LCM /WR PIN
;/RD    REG     P3.1            DEFINE LCM /RD PIN
;/CS    REG     P3.2            DEFINE LCM CHIP SELECT PIN
;A0     REG     P3.3            DEFINE LCM DATA/INSTRUCTION PIN
;/RES   REG     P3.4            DEFINE LCM RESET PIN
;D0_D7  REG     P1.0_P1.7       DEFINE LCM DATA BUS PIN

        ORG     0000H
START:  MOV     R7,#20H         ;START TO TEST
START2: LCALL   DELAY
        DJNZ    R7,START2
        CLR     P3.4            ;RESET
        NOP
        SETB    P3.4
        LCALL   INIT
START1:
        LCALL   MAP
        JMP     START1 
INIT:   MOV     A,#40H          ;SYSTEM SET CODE
        LCALL   PR0
        MOV     R2,#08H         
        MOV     R3,#00H         
INIT0:  MOV     DPTR,#TAB1      
        MOV     A,R3            
        MOVC    A,@A+DPTR       
        LCALL   PR1
        INC     R3              
        DJNZ    R2,INIT0        
        MOV     A,#44H          ;SCOLL CODE
        LCALL   PR0
        MOV     R2,#0AH         
        MOV     R3,#00H         
INIT1:  MOV     DPTR,#TAB2      
        MOV     A,R3            
        MOVC    A,@A+DPTR       
        LCALL   PR1
        INC     R3              
        DJNZ    R2,INIT1        
        MOV     A,#5AH          ;HDOTSCR CODE
        LCALL   PR0
        MOV     A,#00H          ;HDOTSCR P1=0
        LCALL   PR1
        MOV     A,#5BH          ;OVLAY CODE
        LCALL   PR0
        MOV     A,#0CH          ;OVLAY P1=0
        LCALL   PR1
        LCALL   CLEAR           ;CLEAR SUBROUTINE
        MOV     A,#59H          
        LCALL   PR0
        MOV     A,#04H          ;GRAPH ON
        LCALL   PR1
        RET
TAB1:   DB      030H,087H,007H,027H,02CH,0F0H,028H,000H
TAB2:   DB      000H,000H,0F0H,080H,025H,0F0H,000H,000H,000H,000H

CLEAR:  MOV     A,#4CH          ;CLEAR DISPLAY RAM
        LCALL   PR0
        MOV     A,#46H          
        LCALL   PR0
        MOV     A,#00H          
        LCALL   PR1
        MOV     A,#00H          
        LCALL   PR1
        MOV     A,#42H          
        LCALL   PR0
        MOV     R2,#0F0H        
CLEAR1: MOV     R3,#28H        
CLEAR0: MOV     A,#00H          
        LCALL   PR1
        DJNZ    R3,CLEAR0
        DJNZ    R2,CLEAR1       
        RET
MAP:    MOV     DPTR,#TRULY     ;TEST 4
        MOV     R6,#00H
        MOV     R7,#00H
        LCALL   MAPS
        MOV     DPTR,#TRULY
        MOV     R6,#80H
        MOV     R7,#25H
        LCALL   MAPS
        MOV     R0,#10H 
        LCALL WAIT
        RET
WAIT:   MOV    A,#01H
        JNZ     WAIT
        RET   
MAPS:   MOV     A,#46H          ;SUB. OF TEST 4
        LCALL   PR0
        MOV     A,R6            
        LCALL   PR1
        MOV     A,R7            
        LCALL   PR1
        MOV     A,#42H          
        LCALL   PR0
        MOV     R2,#0F0H         
MAPS2:  MOV     R3,#28H         
MAPS1:  MOV     A,#00H          
        MOVC    A,@A+DPTR                   
        LCALL   PR1
        INC     DPTR
        DJNZ    R3,MAPS1         
        DJNZ    R2,MAPS2         
        RET
       
DELAY:  MOV     R2,#90H         ;DELAY TIME
DELAY0: MOV     R3,#34H         
DELAY1: DJNZ    R3,DELAY1       
        DJNZ    R2,DELAY0       
        RET
PR0:                            ;SEND OUT INSTRUCTION
        CLR     P3.2            ;/CS=0
        SETB    P3.3            ;AO=1
        SETB    P3.1            ;/RD=1
        CLR     P3.0            ;/WR=0
        MOV     P1,A            ;WRITE COMMAND
        NOP
        SETB    P3.0            ;/WR=1
        RET

PR1:                            ;SEND OUT DATA
        CLR     P3.2            ;/CS=0
        CLR     P3.3            ;AO=0
        SETB    P3.1            ;/RD=1
        CLR     P3.0            ;/WR=0
        MOV     P1,A            ;WRITE DATA
        NOP
        SETB    P3.0            ;/WR=1
        RET

        
          
TRULY:
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,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,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,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,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,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,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,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,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,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,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,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,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,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,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,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,000H