lcd.s

作为LCD显示的 AVR开发学习源码

	.module lcd.c
	.area data(ram, con, rel)
_str1::
	.blkb 17
	.area idata
	.byte 32,'Q,'Q,58,49,48,55,52,51,55,53,57,54,32,32,32
	.byte 0
	.area data(ram, con, rel)
	.dbfile F:\专业\单片机分类\AVR\功能模块应用\1602LCD\lcd.c
	.dbsym e str1 _str1 A[17:17]c
_str2::
	.blkb 17
	.area idata
	.byte 32,57,56,'d,'i,'a,'n,64,49,54,51,46,'c,'o,'m,32
	.byte 0
	.area data(ram, con, rel)
	.dbfile F:\专业\单片机分类\AVR\功能模块应用\1602LCD\lcd.c
	.dbsym e str2 _str2 A[17:17]c
	.area text(rom, con, rel)
	.dbfile F:\专业\单片机分类\AVR\功能模块应用\1602LCD\lcd.c
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 33
; #include <iom16v.h>
; #include <macros.h>
; 
; 
; #define lcd_data_port PORTC
; #define lcd_data_ddr DDRC
; #define lcd_busy_pin PINC
; #define lcd_busy_ddr DDRC
; #define lcd_control_port PORTB
; #define lcd_control_ddr DDRB
; 
; #define lcd_RS 0x20	//PORTB5
; #define lcd_RW 0x10	//PORTB4
; #define lcd_EN 0x08	//PORTB3
; #define busy 0x80	//LCD_DB7
; 
; /*----------------------------------函数声明------------------------------------------*/
; void lcd_init(void);
; void lcd_write_command(unsigned char command,unsigned char wait_en);
; void lcd_write_data(unsigned char char_data);
; void wait_enable(void);
; void display_a_char(unsigned char position,unsigned char char_data);
; void display_a_string(unsigned char col,unsigned char *ptr);
; void delay_1ms(void);
; void delay_nms(unsigned int n);
; 
; //显示的两行字符
; unsigned char str1[]=" QQ:107437596   ";
; unsigned char str2[]=" [e-mail] ";
; 
; /*------------------------------------主函数-------------------------------------------*/
; void main(void)
; {
	.dbline 34
; 	lcd_data_port=0xff;
	ldi R24,255
	out 0x15,R24
	.dbline 35
; 	lcd_data_ddr=0xff;
	out 0x14,R24
	.dbline 36
; 	lcd_control_ddr=0xff;
	out 0x17,R24
	.dbline 37
; 	lcd_init();
	xcall _lcd_init
	.dbline 38
; 	display_a_string(0,str1);
	ldi R18,<_str1
	ldi R19,>_str1
	clr R16
	xcall _display_a_string
	.dbline 39
; 	display_a_string(1,str2);
	ldi R18,<_str2
	ldi R19,>_str2
	ldi R16,1
	xcall _display_a_string
L2:
	.dbline 40
L3:
	.dbline 40
	xjmp L2
X0:
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e lcd_init _lcd_init fV
	.even
_lcd_init::
	.dbline -1
	.dbline 46
; 	while(1);
; }
; 	
; /*------------------------------------液晶驱动函数-------------------------------------*/
; //液晶初始化
; void lcd_init(void)
; {
	.dbline 47
; 	delay_nms(15);
	ldi R16,15
	ldi R17,0
	xcall _delay_nms
	.dbline 48
; 	lcd_write_command(0x38,0);//显示模式设置三次(此时不管lcd空闲与否)
	clr R18
	ldi R16,56
	xcall _lcd_write_command
	.dbline 49
; 	delay_nms(5);
	ldi R16,5
	ldi R17,0
	xcall _delay_nms
	.dbline 50
; 	lcd_write_command(0x38,0);
	clr R18
	ldi R16,56
	xcall _lcd_write_command
	.dbline 51
; 	delay_nms(5);
	ldi R16,5
	ldi R17,0
	xcall _delay_nms
	.dbline 52
; 	lcd_write_command(0x38,0);
	clr R18
	ldi R16,56
	xcall _lcd_write_command
	.dbline 53
; 	delay_nms(5);
	ldi R16,5
	ldi R17,0
	xcall _delay_nms
	.dbline 55
; 	
; 	lcd_write_command(0x38,1);//显示模式设置(从此之后均需lcd空闲)
	ldi R18,1
	ldi R16,56
	xcall _lcd_write_command
	.dbline 56
; 	lcd_write_command(0x08,1);//显示关闭
	ldi R18,1
	ldi R16,8
	xcall _lcd_write_command
	.dbline 57
; 	lcd_write_command(0x01,1);//显示清屏
	ldi R18,1
	ldi R16,1
	xcall _lcd_write_command
	.dbline 58
; 	lcd_write_command(0x06,1);//显示光标移动设置
	ldi R18,1
	ldi R16,6
	xcall _lcd_write_command
	.dbline 59
; 	lcd_write_command(0x0c,1);//显示开及光标设置
	ldi R18,1
	ldi R16,12
	xcall _lcd_write_command
	.dbline -2
L5:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e lcd_write_command _lcd_write_command fV
;        wait_en -> R22
;        command -> R20
	.even
_lcd_write_command::
	xcall push_gset2
	mov R22,R18
	mov R20,R16
	.dbline -1
	.dbline 64
; }
; 
; //写指令函数: E=高脉冲 RS=0 RW=0
; void lcd_write_command(unsigned char command,unsigned char wait_en)//command为指令，wait_en指定是否要检测LCD忙信号
; {
	.dbline 65
; 	if(wait_en)wait_enable();//若wait_en为1，则要检测LCD忙信号，等待其空闲
	tst R22
	breq L7
	.dbline 65
	xcall _wait_enable
L7:
	.dbline 66
; 	lcd_control_port&=~lcd_RS;//RS=0
	cbi 0x18,5
	.dbline 67
; 	lcd_control_port&=~lcd_RW;//RW=0
	cbi 0x18,4
	.dbline 68
; 	lcd_control_port&=~lcd_EN;//E=0,下面给LCD一个高脉冲
	cbi 0x18,3
	.dbline 69
; 	NOP();
	nop
	.dbline 70
; 	lcd_control_port|=lcd_EN;//E=1
	sbi 0x18,3
	.dbline 71
; 	lcd_data_port=command;
	out 0x15,R20
	.dbline 72
; 	lcd_control_port&=~lcd_EN;//重设E=0
	cbi 0x18,3
	.dbline -2
L6:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r wait_en 22 c
	.dbsym r command 20 c
	.dbend
	.dbfunc e lcd_write_data _lcd_write_data fV
;      char_data -> R20
	.even
_lcd_write_data::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 77
; }
; 
; //写数据函数: E =高脉冲 RS=1 RW=0
; void lcd_write_data(unsigned char char_data)
; {
	.dbline 78
; 	wait_enable();//等待LCD空闲
	xcall _wait_enable
	.dbline 79
; 	lcd_control_port|=lcd_RS;//RS=1
	sbi 0x18,5
	.dbline 80
; 	lcd_control_port&=~lcd_RW;//RW=0
	cbi 0x18,4
	.dbline 81
; 	lcd_control_port&=~lcd_EN;//E=0,下面给LCD一个高脉冲
	cbi 0x18,3
	.dbline 82
; 	NOP();
	nop
	.dbline 83
; 	lcd_control_port|=lcd_EN;//E=1
	sbi 0x18,3
	.dbline 84
; 	lcd_data_port=char_data;
	out 0x15,R20
	.dbline 85
; 	lcd_control_port&=~lcd_EN;//重设E=0
	cbi 0x18,3
	.dbline -2
L9:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r char_data 20 c
	.dbend
	.dbfunc e wait_enable _wait_enable fV
	.even
_wait_enable::
	.dbline -1
	.dbline 91
; }
; 
; //正常读写操作之前必须检测LCD控制器状态:E=1 RS=0 RW=1;DB7: 0 LCD控制器空闲，1 LCD控制器忙。
; //检测忙信号,等待LCD空闲函数
; void wait_enable(void)
; {
	.dbline 92
; 	lcd_busy_ddr&=~busy;//设置busy口为输入
	cbi 0x14,7
	.dbline 93
; 	lcd_control_port&=~lcd_RS;//RS=0
	cbi 0x18,5
	.dbline 94
; 	lcd_control_port|=lcd_RW;//RW=1
	sbi 0x18,4
	.dbline 95
; 	NOP();
	nop
	.dbline 96
; 	lcd_control_port|=lcd_EN;//E=1
	sbi 0x18,3
L11:
	.dbline 97
L12:
	.dbline 97
; 	while(lcd_busy_pin&busy);//等待LCD_DB7为0
	sbic 0x13,7
	rjmp L11
	.dbline 98
; 	lcd_control_port&=~lcd_EN;//重设E=0
	cbi 0x18,3
	.dbline 99
; 	lcd_busy_ddr|=busy;//设置busy口为输出
	sbi 0x14,7
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e display_a_char _display_a_char fV
;   position_tem -> R22
;      char_data -> R20
;       position -> R10
	.even
_display_a_char::
	xcall push_gset3
	mov R20,R18
	mov R10,R16
	.dbline -1
	.dbline 105
; }
; 
; //指定位置显示一个字符:第一行位置0~15,第二行16~31
; //显示一个字符函数
; void display_a_char(unsigned char position,unsigned char char_data)//参数position指定位置0~31,char_data为要显示的字符
; {
	.dbline 107
; 	unsigned char position_tem;
; 	if(position>=0x10)
	mov R24,R10
	cpi R24,16
	brlo L15
	.dbline 108
; 	position_tem=position+0xb0;
	mov R22,R24
	subi R22,80    ; addi 176
	xjmp L16
L15:
	.dbline 110
; 	else
; 	position_tem=position+0x80;
	mov R22,R10
	subi R22,128    ; addi 128
L16:
	.dbline 111
; 	lcd_write_command(position_tem,1);
	ldi R18,1
	mov R16,R22
	xcall _lcd_write_command
	.dbline 112
; 	lcd_write_data(char_data);
	mov R16,R20
	xcall _lcd_write_data
	.dbline -2
L14:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r position_tem 22 c
	.dbsym r char_data 20 c
	.dbsym r position 10 c
	.dbend
	.dbfunc e display_a_string _display_a_string fV
;        col_tem -> R20
;              i -> R22
;            ptr -> R10,R11
;            col -> R20
	.even
_display_a_string::
	xcall push_gset3
	movw R10,R18
	mov R20,R16
	.dbline -1
	.dbline 118
; }
; 
; //指定一行显示连续字符串:0显示在第一行,1显示在第二行,注字符串不能长于16个字符
; //显示一行连续字符串函数
; void display_a_string(unsigned char col,unsigned char *ptr)//参数col指定行,*ptr指字符串数组的首指针
; {
	.dbline 120
; 	unsigned char col_tem,i;
; 	col_tem=col<<4;//若col为1(即在LCD第二行显示字符串),先把col左移4位,使显示字符的首位置改到第二行首位,即位置16
	mov R24,R20
	andi R24,#0x0F
	swap R24
	mov R20,R24
	.dbline 121
; 	for(i=0;i<16;i++)
	clr R22
	xjmp L21
L18:
	.dbline 122
	mov R30,R22
	clr R31
	add R30,R10
	adc R31,R11
	ldd R18,z+0
	mov R2,R20
	subi R20,255    ; addi 1
	mov R16,R2
	xcall _display_a_char
L19:
	.dbline 121
	inc R22
L21:
	.dbline 121
	cpi R22,16
	brlo L18
	.dbline -2
L17:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r col_tem 20 c
	.dbsym r i 22 c
	.dbsym r ptr 10 pc
	.dbsym r col 20 c
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 128
; 	display_a_char(col_tem++,*(ptr+i));
; }
; 
; /*---------------------------------------延时函数-------------------------------------*/
; //1ms延时函数
; void delay_1ms(void)
; {
	.dbline 130
	clr R16
	clr R17
	xjmp L26
L23:
	.dbline 130
L24:
	.dbline 130
	subi R16,255  ; offset = 1
	sbci R17,255
L26:
	.dbline 130
; 	unsigned int i;
; 	for(i=0;i<600;i++);
	cpi R16,88
	ldi R30,2
	cpc R17,R30
	brlo L23
	.dbline -2
L22:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_nms _delay_nms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nms::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 135
; }
; 
; //n ms延时函数
; void delay_nms(unsigned int n)
; {
	.dbline 137
	clr R20
	clr R21
	xjmp L31
L28:
	.dbline 137
	xcall _delay_1ms
L29:
	.dbline 137
	subi R20,255  ; offset = 1
	sbci R21,255
L31:
	.dbline 137
; 	unsigned int i;
; 	for(i=0;i<n;i++)delay_1ms();
	cp R20,R22
	cpc R21,R23
	brlo L28
	.dbline -2
L27:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend