lcdtest1_sub.h

F206的液晶模块显示程序

*********************************************
*text mode init
*********************************************
TINIT:
		SPLK    #0000h,PARA1  ;text home address:0000h
		SPLK    #TXHOME,CMD
		CALL    CW2
		SPLK    #21,PARA1      ;text area:21 columns
		SPLK    #TXAREA,CMD
		CALL    CW2   
		RET
**********************************************
*graphic mode init
**********************************************
GINIT:
        SPLK    #0200h,PARA1  ;graphic home address:0200h
        SPLK    #GRHOME,CMD
        CALL    CW2
        SPLK    #21,PARA1     ;graphic area:21 columns
        SPLK    #GRAREA,CMD
        CALL    CW2
        RET



	
**********************************************
*delay
**********************************************
DELAY:   LAR AR6,#300
DELAY1   MAR *,AR7
         LAR AR7, #250
DELAY2:  NOP
         NOP
         BANZ   DELAY2
         MAR *,AR6
         BANZ  DELAY1                           
         RET

*********************************************
*wait status check
********************************************* 
STATUS:
		IN		LCD_TMP,DP        ;status check   
		LACL    LCD_TMP
		AND     #3
		XOR     #0003H
		BCND    STATUS,NEQ  
		RET                
***********************************
*send no parameter command         
*subfunction parameter:CMD
***********************************
CW0:
		LDP 	#00H
		CALL 	STATUS
		OUT  	CMD,CMDP         
		RET   
		
**********************************************
*send one parameter command 
*subfunction parameter:PARA1,CMD
**********************************************		
CW1:
		LDP 	#00H
		CALL 	STATUS
		OUT  	PARA1,DP        
		CALL	STATUS
		OUT  	CMD,CMDP         
		RET   
		
******************************
*send two parameters command
*subfunction parameters:PARA1,CMD
******************************
CW2:
        LDP 	#00H
        LACL    PARA1
        ;AND     #00ffh
        ;SACL    LCD_TMP
        CALL 	STATUS
		OUT  	PARA1,DP 
		LACL    PARA1
        RPT     #7
        ROR     
        SACL    LCD_TMP
		CALL 	STATUS
		OUT  	LCD_TMP,DP        
		CALL	STATUS
		OUT  	CMD,CMDP         
		RET    
		
**********************************
*data auto write
*parameters:PARA1
**********************************
AW:
  		IN		LCD_TMP,DP        ;status check   
		LACL    LCD_TMP
		XOR     #0008H
		BCND    AW,NEQ   
		OUT     PARA1,DP
  		RET                 

********************************
*clear screen
********************************
CLR:  		
		SPLK #0000h,PARA1    ;set address pointer:0000h
		SPLK #ADPSET,CMD
		CALL CW2                                       
		
		SPLK #AWRON,CMD    ;set data auto write
		CALL CW0
		
		SPLK #168,LCD_TMP  ;168=21*8
CLR1
		SPLK #00h,PARA1
		CALL AW
		LACL LCD_TMP
		SUB #1
		BCND CLR1,NEQ
		
		SPLK #AWROFF,CMD    ;set data auto write
		CALL CW0  	
		
		RET