.module lcdshow.c
	.area text
;              i -> 0,X
;            str -> 3,X
_lcdshow::
	ais #-1
	tsx
; /*文件描述:本文件包含了用HD44780顯示相關(guān)的3個子程序    *
; *         1. LCDShow:在LCD上顯示32個字符               *
; *         2. LcdInit:初始化Lcd                         *
; *         3. Lcd_Command:執(zhí)行給定的cmd命令             *
; *-------------《嵌入式應(yīng)用技術(shù)基礎(chǔ)教程》--------------*/
; //[以下為子程序源代碼]
; //[頭文件]
; #include "GP32C.h"         //包含頭文件
; #define LcdData PTB        //Lcd顯示數(shù)據(jù)傳送口
; #define LcdData_D  DDRB    //數(shù)據(jù)口方向寄存器
; #define LcdCtrl PTC        //Lcd控制信號傳送口
; #define LcdCtrl_D  DDRC    //控制口方向寄存器
; #define  LcdRS 0           //Lcd寄存器選擇信號PTC0
; #define  LcdRW 1           //讀寫信號接PTC1
; #define  LcdE  2           //Lcd使能信號接PTC2
; //內(nèi)部調(diào)用子程序
; void Lcd_Command(unsigned char cmd); //命令執(zhí)行子程序
; void LcdInit(void);                  //Lcd初始化子程序
; /*LcdShow:在HD44780顯示屏上顯示數(shù)據(jù)--------------------*
; *功能描述:在HD44780顯示屏上顯示str中的32個數(shù)據(jù)         *
; *參  數(shù):str:待顯示數(shù)組                                 *
; *返  回:無                                             *
; *------------------以上為子程序說明-------------------*/
; void lcdshow(unsigned char str[])
;   {	 	
;     unsigned char i;
;     LcdInit();               //調(diào)用Lcd初始化子程序
	jsr _LcdInit
;  	//顯示第1行16個字符
;  	LcdCtrl&=~(1<<LcdRS);      //RS、R/W=00,寫指令
	bclr #0,0x2
; 	LcdCtrl&=~(1<<LcdRW);    
	bclr #1,0x2
;   	Lcd_Command(0b10000000); //后7位為DDRAM地址0x00 
	lda #-128
	psha
	jsr _Lcd_Command
	ais #1
	tsx
; 	LcdCtrl|=1<<LcdRS;		 //RS、R/W=10,寫數(shù)據(jù)到DDRAM中
	bset #0,0x2
;     LcdCtrl&=~(1<<LcdRW);
	bclr #1,0x2
;    	for (i=0;i<16;i++)       //逐個顯示
	clr ,X
	bra L5
L2:
	clr *__r0
	lda ,X
	add 4,X
	sta *__r1
	lda *__r0
	adc 3,X
	sta *__r0
	ldhx *__r0
	lda ,x
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L3:
	inc ,X
L5:
	lda ,X
	cmp #16
	blo L2
;        Lcd_Command(str[i]);
;     //顯示第2行16個字符
;    	LcdCtrl&=~(1<<LcdRS);    //RS、R/W=00,寫指令
	bclr #0,0x2
; 	LcdCtrl&=~(1<<LcdRW);    
	bclr #1,0x2
;   	Lcd_Command(0b11000000); //后7位為DDRAM地址0x40 
	lda #-64
	psha
	jsr _Lcd_Command
	ais #1
	tsx
; 	LcdCtrl|=1<<LcdRS;		 //RS、R/W=10,寫數(shù)據(jù)到DDRAM中
	bset #0,0x2
; 	LcdCtrl&=~(1<<LcdRW);
	bclr #1,0x2
;     for (i=16;i<32;i++)      //逐個顯示
	lda #16
	sta ,X
	bra L9
L6:
	clr *__r0
	lda ,X
	add 4,X
	sta *__r1
	lda *__r0
	adc 3,X
	sta *__r0
	ldhx *__r0
	lda ,x
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L7:
	inc ,X
L9:
	lda ,X
	cmp #32
	blo L6
L1:
	ais #1
	.dbline 0 ; func end
	rts
;              i -> 0,X
;              j -> 1,X
_LcdInit::
	ais #-2
	tsx
; 	  Lcd_Command(str[i]);
;    }
; /*LcdInit:初始化Lcd------------------------------------*
; *功  能:初始化Lcd(HD44780),設(shè)置顯示方式,清屏,AC自動+1  *
; *參  數(shù):無                                             *
; *返  回:無                                             *
; *-----------------------------------------------------*/
; void LcdInit(void)
;   {
;     unsigned char i,j;
;     LcdData_D=0b11111111;     //數(shù)據(jù)口為輸出
	lda #-1
	sta 0x5
;     LcdCtrl_D|=(1<<LcdE);     //控制口低三位為輸出
	bset #2,0x6
;     LcdCtrl_D|=(1<<LcdRS); 
	bset #0,0x6
;     LcdCtrl_D|=(1<<LcdRW); 
	bset #1,0x6
;     LcdCtrl|=(1<<LcdE);       //E=1
	bset #2,0x2
;     LcdCtrl&=~(1<<LcdRS);     //RS、R/W=00,寫指令
	bclr #0,0x2
;     LcdCtrl&=~(1<<LcdRW);    
	bclr #1,0x2
;     Lcd_Command(0b00111000);  //8位數(shù)據(jù)接口,2行,5*7點陣
	lda #56
	psha
	jsr _Lcd_Command
	ais #1
	tsx
	clr ,X
	bra L14
L11:
L12:
	inc ,X
L14:
;     //Lcd_Command(0b00001000);  //關(guān)顯示,關(guān)光標(biāo)顯示,不閃爍	
;     //Lcd_Command(0b00000001);  //清屏
;     for(i=0;i<250;i++);       //延時>1.6ms
	lda ,X
	cmp #-6
	blo L11
;     for(i=0;i<250;i++)
	clr ,X
	bra L18
L15:
	clr 1,X
	bra L22
L19:
L20:
	inc 1,X
L22:
	lda 1,X
	cmp #20
	blo L19
L16:
	inc ,X
L18:
	lda ,X
	cmp #-6
	blo L15
;     for(j=0;j<20;j++); 
;     Lcd_Command(0b00010100);  //光標(biāo)右移一個字符位,AC自
	lda #20
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L10:
	ais #2
	.dbline 0 ; func end
	rts
;              i -> 0,X
;            cmd -> 3,X
_Lcd_Command::
	ais #-1
	tsx
;                               //  動加1
;     //Lcd_Command(0b00001100);  //開顯示,關(guān)光標(biāo)顯示,不閃爍
;   }
; /*Lcd_Command:執(zhí)行給定的cmd命令------------------------*
; *功  能:執(zhí)行給定的cmd命令,且延時                       *
; *參  數(shù):cmd:待執(zhí)行的命令                               *
; *返  回:無                                             *
; *-----------------------------------------------------*/
; void Lcd_Command(unsigned char cmd)
;   {	 	
	clr ,X
	bra L27
L24:
L25:
	inc ,X
L27:
;     unsigned char i;	 
;     for (i=0;i<20;i++);    //等待>40us
	lda ,X
	cmp #20
	blo L24
;     LcdData=cmd;	         //把指令碼送到Lcd數(shù)據(jù)傳送口
	lda 3,X
	sta 0x1
;     LcdCtrl|=(1<<LcdE);    //Lcd開始接收數(shù)據(jù)
	bset #2,0x2
;     asm("NOP");
	NOP
;     asm("NOP");
	NOP
;     asm("NOP");
	NOP
;     LcdCtrl&=~(1<<LcdE);   //Lcd結(jié)束接收數(shù)據(jù)
	bclr #2,0x2
	clr ,X
	bra L31
L28:
L29:
	inc ,X
L31:
;     for (i=0;i<20;i++);    //等待>40us
	lda ,X
	cmp #20
	blo L28
L23:
	ais #1
	.dbline 0 ; func end
	rts