📄 lcdshow.s

📁 用Freescale半导体公司HC08系列单片机制作了电子时钟,具有整点报时、闹钟、时间日期设置等功能（c语言编写）
💻 S
📖 第 1 页 / 共 2 页
字号:
12 下一页
	.module LCDShow.c
	.area text
;              i -> 0,X
_Lcdshowtime::
	ais #-1
	tsx
; /*文件描述:本文件包含了用HD44780显示相关的3个子程序    *
; *         1. LCDShow:在LCD上显示32个字符               *
; *         2. LcdInit:初始化Lcd                         *
; *         3. Lcd_Command:执行给定的cmd命令             *
; *-------------《嵌入式应用技术基础教程》--------------*/
; //[以下为子程序源代码]
; //[头文件]
; #include "GP32C.h"         //包含头文件
; #define LcdData PTB        //Lcd显示数据传送口
; #define LcdData_D  DDRB    //数据口方向寄存器
; #define LcdCtrl PTC        //Lcd控制信号传送口
; #define LcdCtrl_D  DDRC    //控制口方向寄存器
; #define  LcdRS 0           //Lcd寄存器选择信号PTC0
; #define  LcdRW 1           //读写信号接PTC1
; #define  LcdE  2           //Lcd使能信号接PTC2
; //内部调用子程序
; void Lcd_Command(unsigned char cmd); //命令执行子程序
; void LcdInit(void);                  //Lcd初始化子程序
; void LcdshowCharacter(unsigned char str,unsigned char m,unsigned char n);
; unsigned char ChangeASCII(unsigned char x);
; //外部变量
; extern unsigned char time[14];
; extern unsigned char alarm[14];
; 
; void Lcdshowtime(void)             //显示日期时间子程序
; {   unsigned char i;
;     LcdInit();
	jsr _LcdInit
	tsx
;     for(i=0;i<4;i++)
	clr ,X
	bra L5
L2:
	clr *__r0
	lda ,X
	add #<_time
	sta *__r1
	lda *__r0
	adc #>_time
	sta *__r0
	ldhx *__r0
	lda ,x
	psha
	jsr _ChangeASCII
	ais #1
	tsx
	sta *__r1
	lda ,X
	add #4
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
	tsx
L3:
	inc ,X
L5:
	lda ,X
	cmp #4
	blo L2
;      {
;        LcdshowCharacter(ChangeASCII(time[i]),1,(i+4));     //从第一行第四列开始显示
;      }
;    
;     LcdshowCharacter('-',1,8);
	lda #8
	psha
	lda #1
	psha
	lda #45
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[4]),1,9);
	lda *_time+4
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #9
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[5]),1,10);
	lda *_time+5
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #10
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter('-',1,11);
	lda #11
	psha
	lda #1
	psha
	lda #45
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[6]),1,12);
	lda *_time+6
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #12
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[7]),1,13);
	lda *_time+7
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #13
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[8]),2,5);
	lda *_time+8
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #5
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[9]),2,6);
	lda *_time+9
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #6
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(':',2,7);
	lda #7
	psha
	lda #2
	psha
	lda #58
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[10]),2,8);
	lda *_time+10
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #8
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[11]),2,9);
	lda *_time+11
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #9
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(':',2,10);
	lda #10
	psha
	lda #2
	psha
	lda #58
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[12]),2,11);
	lda *_time+12
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #11
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(time[13]),2,12); 
	lda *_time+13
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #12
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
	tsx
L1:
	ais #1
	.dbline 0 ; func end
	rts
;              i -> 0,X
_Lcdshowalarm::
	ais #-1
	tsx
;      
; }
; 
; void Lcdshowalarm(void)             //显示日期时间子程序
; {   unsigned char i;
;     LcdInit();
	jsr _LcdInit
	tsx
;     for(i=0;i<4;i++)
	clr ,X
	bra L20
L17:
	clr *__r0
	lda ,X
	add #<_alarm
	sta *__r1
	lda *__r0
	adc #>_alarm
	sta *__r0
	ldhx *__r0
	lda ,x
	psha
	jsr _ChangeASCII
	ais #1
	tsx
	sta *__r1
	lda ,X
	add #4
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
	tsx
L18:
	inc ,X
L20:
	lda ,X
	cmp #4
	blo L17
;      {
;        LcdshowCharacter(ChangeASCII(alarm[i]),1,(i+4));   //从第一行第四列开始显示
;      }
;    
;     LcdshowCharacter('-',1,8);
	lda #8
	psha
	lda #1
	psha
	lda #45
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[4]),1,9);
	lda *_alarm+4
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #9
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[5]),1,10);
	lda *_alarm+5
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #10
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter('-',1,11);
	lda #11
	psha
	lda #1
	psha
	lda #45
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[6]),1,12);
	lda *_alarm+6
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #12
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[7]),1,13);
	lda *_alarm+7
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #13
	psha
	lda #1
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[8]),2,5);
	lda *_alarm+8
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #5
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[9]),2,6);
	lda *_alarm+9
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #6
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(':',2,7);
	lda #7
	psha
	lda #2
	psha
	lda #58
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[10]),2,8);
	lda *_alarm+10
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #8
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[11]),2,9);
	lda *_alarm+11
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #9
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(':',2,10);
	lda #10
	psha
	lda #2
	psha
	lda #58
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[12]),2,11);
	lda *_alarm+12
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #11
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
;     LcdshowCharacter(ChangeASCII(alarm[13]),2,12); 
	lda *_alarm+13
	psha
	jsr _ChangeASCII
	ais #1
	sta *__r1
	lda #12
	psha
	lda #2
	psha
	lda *__r1
	psha
	jsr _LcdshowCharacter
	ais #3
	tsx
L16:
	ais #1
	.dbline 0 ; func end
	rts
;              n -> 4,X
;              m -> 3,X
;            str -> 2,X
_LcdshowCharacter::
	tsx
;      
; }
; 
; /*LcdShow:在HD44780显示屏上显示一个字符--------------------*
; *功能描述:在HD44780显示屏上第m行，第n列显示字符str         *
; *参  数:str:待显示字符                                 *
; *返  回:无                                             *
; *------------------以上为子程序说明-------------------*/
; void LcdshowCharacter(unsigned char str,unsigned char m,unsigned char n)  
;   {	 	
;     
;     //LcdInit();
;  	
;  	LcdCtrl&=~(1<<LcdRS);      //RS、R/W=00,写指令
	bclr #0,0x2
; 	LcdCtrl&=~(1<<LcdRW);    
	bclr #1,0x2
;   	Lcd_Command(0b10000000|((m-1)*0x40+(n-1))); 
	lda 4,X
	sub #1
	sta *__r0
	lda 3,X
	sub #1
	nsa
	and #-16
	lsla
	lsla
	add *__r0
	ora #-128
	psha
	jsr _Lcd_Command
	ais #1
	tsx
; 	LcdCtrl|=1<<LcdRS;		 //RS、R/W=10,写数据到DDRAM中
	bset #0,0x2
;     LcdCtrl&=~(1<<LcdRW);
	bclr #1,0x2
;    	Lcd_Command(str);
	lda 2,X
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L31:
	.dbline 0 ; func end
	rts
;              y -> 0,X
;              x -> 3,X
_ChangeASCII::
	ais #-1
	tsx
;    
;    }
; 
; unsigned char ChangeASCII(unsigned char x)   //转换数值x为对应的ASCII码
; {
;     unsigned char y;
;     return y=x+0x30;
	lda 3,X
	add #48
	sta *__r1
	sta ,X
	mov *__r1,*__r0
	lda *__r1
L32:
	ais #1
	.dbline 0 ; func end
	rts
;              i -> 0,X
_LcdInit::
	ais #-1
	tsx
; }
; 
;    
; /*LcdInit:初始化Lcd------------------------------------*
; *功  能:初始化Lcd(HD44780),设置显示方式,清屏,AC自动+1  *
; *参  数:无                                             *
; *返  回:无                                             *
; *-----------------------------------------------------*/
; void LcdInit(void)
;   {
;     unsigned char i;
;     LcdData_D=0b11111111;     //数据口为输出
	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位数据接口,2行,5*7点阵
	lda #56
	psha
	jsr _Lcd_Command
	ais #1
;     Lcd_Command(0b00001000);  //关显示,关光标显示,不闪烁	
	lda #8
	psha
	jsr _Lcd_Command
	ais #1
;     Lcd_Command(0b00000001);  //清屏
	lda #1
	psha
	jsr _Lcd_Command
	ais #1
	tsx
	clr ,X
	bra L37
L34:
L35:
	inc ,X
L37:
;     for(i=0;i<250;i++);       //延时>1.6ms
	lda ,X
	cmp #-6
	blo L34
	clr ,X
	bra L41
L38:
L39:
	inc ,X
L41:
;     for(i=0;i<250;i++); 
	lda ,X
	cmp #-6
	blo L38
;     //Lcd_Command(0b00010100);  //光标右移一个字符位,AC自
;                               //  动加1
;     Lcd_Command(0b00001100);  //开显示,关光标显示,不闪烁
	lda #12
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L33:
	ais #1
	.dbline 0 ; func end
	rts
;              i -> 0,X
;            cmd -> 3,X
_Lcd_Command::
	ais #-1
	tsx
;   }
; /*Lcd_Command:执行给定的cmd命令------------------------*
; *功  能:执行给定的cmd命令,且延时                       *
; *参  数:cmd:待执行的命令                               *
; *返  回:无                                             *
; *-----------------------------------------------------*/
; void Lcd_Command(unsigned char cmd)
;   {	 	
	clr ,X
	bra L46
L43:
L44:
	inc ,X
L46:
;     unsigned char i;	 
;     for (i=0;i<20;i++);    //等待>40us
	lda ,X
	cmp #20
	blo L43
;     LcdData=cmd;	         //把指令码送到Lcd数据传送口
	lda 3,X
	sta 0x1
;     LcdCtrl|=(1<<LcdE);    //Lcd开始接收数据
	bset #2,0x2
;     asm("NOP");
	NOP
;     asm("NOP");
	NOP
;     asm("NOP");
	NOP
;     LcdCtrl&=~(1<<LcdE);   //Lcd结束接收数据
	bclr #2,0x2
	clr ,X
	bra L50
L47:
L48:
	inc ,X
L50:
;     for (i=0;i<20;i++);    //等待>40us
	lda ,X
	cmp #20
	blo L47
L42:
	ais #1
	.dbline 0 ; func end
	rts
;              n -> 3,X
;              m -> 2,X
_MoveCursor::
	tsx
;   }
;   
; void MoveCursor(unsigned char m,unsigned char n)    //移到光标到第m行，第n列
; {
;    LcdCtrl&=~(1<<LcdRS);     //RS、R/W=00,写指令
	bclr #0,0x2
;    LcdCtrl&=~(1<<LcdRW);
	bclr #1,0x2
;    Lcd_Command(0b00001111); 
	lda #15
	psha
	jsr _Lcd_Command
	ais #1
	tsx
;    Lcd_Command(0b10000000|((m-1)*0x40+(n-1)));
	lda 3,X
	sub #1
	sta *__r0
	lda 2,X
	sub #1
	nsa
	and #-16
	lsla
	lsla
	add *__r0
	ora #-128
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L51:
	.dbline 0 ; func end
	rts
_LcdShowCursor::
;    //Lcd_Command(0b00001111);
; }
; 
; 
; void LcdShowCursor(void)     //开光标显示，闪烁
; {
;    LcdCtrl&=~(1<<LcdRS);     //RS、R/W=00,写指令
	bclr #0,0x2
;    LcdCtrl&=~(1<<LcdRW); 
	bclr #1,0x2
;    Lcd_Command(0b00001111); 
	lda #15
	psha
	jsr _Lcd_Command
	ais #1
	tsx
L52:
	.dbline 0 ; func end
	rts
	.area lit
L54:
	.byte 49,46,32,'S,'e,'t,32,'T,'i,'m,'e,0
L55:
	.byte 50,46,32,'S,'e,'t,32,'A,'l,'a,'r,'m,0
	.area text
;          temp2 -> 0,X
;           temp -> 13,X
;              i -> 25,X
_LcdShowMenu::
	ais #-26
	tsx
; }
; 
; void LcdShowMenu(void)    //显示菜单
; {  
;    
;    unsigned char temp[12]="1. Set Time";
	aix #13
	sthx *__r0
	tsx
	lda #12
	psha
	clra
	psha
	lda #<L54
	psha
	lda #>L54
	psha
	lda *__r1
	psha
	lda *__r0
	psha
	jsr __asgnblk
	ais #6
;    unsigned char temp2[13]="2. Set Alarm";
	sthx *__r0
	lda #13
	psha
	clra
	psha
	lda #<L55
	psha
	lda #>L55
	psha
	lda *__r1
12 下一页
💿 文件大小 81 K
👤 上传用户 ahkid
📂 所属分类单片机开发
🏷️ 相关标签

#Freescale #08 #HC #半导体公司
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -