📄 1602b_lcd.s
字号:
.module _1602B_LCD.c
.area text(rom, con, rel)
.dbfile G:\电子资料\avrtest\1602六线接法练习\1602B_LCD.c
.dbfunc e LCD_init _LCD_init fV
.even
_LCD_init::
.dbline -1
.dbline 23
; #include <iom16v.h>
; #include <macros.h>
; #include "1602LCD.h"
;
;
; unsigned data_temp;
; /**********************************************************
; 光标命令
; LCD_write_char(0x0e,0); //光标开
; LCD_write_char(0x0d,0); //光标所在字符闪烁
; LCD_write_char(0x0c,0); //光标关
; **********************************************************/
; /**********************************************************
; TC1602B LCD DISPLAY
; 建立时间：2003年11月9号
; 修改日期：2003年11月14号
; LCD_write函数功能：当command＝1时，向LCD写入数据，否则向LCD写
; 入命令
; LCD第一行显示寄存器地址：0X80-0X8F
; LCD第二行显示寄存器地址：0XC0-0XCF
; **********************************************************/
; void LCD_init(void)
; {
.dbline 24
; LCD_write_char(0,0x28); //4bit test
ldi R18,40
ldi R19,0
clr R16
clr R17
xcall _LCD_write_char
.dbline 25
; LCD_write_char(0,0x0c); //显示开
ldi R18,12
ldi R19,0
clr R16
clr R17
xcall _LCD_write_char
.dbline 26
; LCD_write_char(0,0x01); //显示清屏
ldi R18,1
ldi R19,0
clr R16
clr R17
xcall _LCD_write_char
.dbline 27
; delay_nms(2);
ldi R16,2
ldi R17,0
xcall _delay_nms
.dbline -2
L1:
.dbline 0 ; func end
ret
.dbend
.dbfunc e LCD_write_char _LCD_write_char fV
; data -> R20,R21
; command -> R22,R23
.even
_LCD_write_char::
xcall push_gset2
movw R20,R18
movw R22,R16
.dbline -1
.dbline 41
; }
; /*-----------------------------------------------------------------------
; LCD_write_char : 英文字符串显示函数
;
; 输入参数：*s ：英文字符串指针；
; X、Y : 显示字符串的位置，X:0-15，Y:0-1
; LCD第一行显示寄存器地址：0X80-0X8F
; LCD第一行显示寄存器地址：0XC0-0XCF
;
; 编写日期 ：2003-11-19
; 最后修改日期 ：2004-8-19
; -----------------------------------------------------------------------*/
; void LCD_write_char(unsigned command,unsigned data)
; {
.dbline 42
; if (command == 0)
cpi R22,0
cpc R22,R23
brne L3
X0:
.dbline 43
; LCD_RS_PORT &= ~LCD_RS; //RS=0
cbi 0x1b,2
xjmp L4
L3:
.dbline 45
; else
; LCD_RS_PORT |= LCD_RS; //RS=1
sbi 0x1b,2
L4:
.dbline 47
;
; data_temp = data;
sts _data_temp+1,R21
sts _data_temp,R20
.dbline 48
; LCD_Write_half_char();
xcall _LCD_Write_half_char
.dbline 49
; data_temp = data;
sts _data_temp+1,R21
sts _data_temp,R20
.dbline 50
; data_temp=data_temp << 4;
movw R2,R20
lsl R2
rol R3
lsl R2
rol R3
lsl R2
rol R3
lsl R2
rol R3
sts _data_temp+1,R3
sts _data_temp,R2
.dbline 51
; LCD_Write_half_char();
xcall _LCD_Write_half_char
.dbline 52
; delay_nus(100);
ldi R16,100
ldi R17,0
xcall _delay_nus
.dbline -2
L2:
xcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r data 20 i
.dbsym r command 22 i
.dbend
.dbfunc e LCD_Write_half_char _LCD_Write_half_char fV
.even
_LCD_Write_half_char::
.dbline -1
.dbline 56
; }
; /*---------写高4bit到LCD----*/
; void LCD_Write_half_char(void)
; {
.dbline 57
; LCD_EN_PORT &= ~LCD_EN;
cbi 0x1b,3
.dbline 58
; delay_nus(4);
ldi R16,4
ldi R17,0
xcall _delay_nus
.dbline 59
; LCD_DATA_PORT &= 0X0f; //portd4~7=0
in R24,0x1b
andi R24,15
out 0x1b,R24
.dbline 60
; LCD_DATA_PORT |= data_temp&0xf0; //send high 4bit
lds R24,_data_temp
lds R25,_data_temp+1
andi R24,240
andi R25,0
in R2,0x1b
clr R3
or R2,R24
or R3,R25
out 0x1b,R2
.dbline 61
; LCD_EN_PORT |= LCD_EN; //EN端产生一个由低电平变高电平，写LCD
sbi 0x1b,3
.dbline 62
; delay_nus(4);
ldi R16,4
ldi R17,0
xcall _delay_nus
.dbline 63
; LCD_EN_PORT &= ~LCD_EN; //EN端产生一个由高电平变低电平，写LCD
cbi 0x1b,3
.dbline 64
; LCD_DATA_PORT &= 0X0f;
in R24,0x1b
andi R24,15
out 0x1b,R24
.dbline 65
; delay_nus(4);
ldi R16,4
ldi R17,0
xcall _delay_nus
.dbline -2
L5:
.dbline 0 ; func end
ret
.dbend
.dbfunc e LCD_set_xy _LCD_set_xy fV
; address -> R20
; y -> R20
; x -> R22
.even
_LCD_set_xy::
xcall push_gset2
mov R20,R18
mov R22,R16
.dbline -1
.dbline 79
; }
;
; /*-----------------------------------------------------------------------
; LCD_set_xy : 设置LCD显示的起始位置
;
; 输入参数：x、y : 显示字符串的位置，X:0-15，Y:0-1
; LCD第一行显示寄存器地址：0X80-0X8F
; LCD第一行显示寄存器地址：0XC0-0XCF
;
; 编写日期 ：2004-8-19
; 最后修改日期 ：2004-8-19
; -----------------------------------------------------------------------*/
; void LCD_set_xy( unsigned char x, unsigned char y )
; {
.dbline 81
; unsigned char address;
; if (y == 0) address = 0x80 + x;
tst R20
brne L7
.dbline 81
mov R20,R22
subi R20,128 ; addi 128
xjmp L8
L7:
.dbline 83
; else
; address = 0xc0 + x;
mov R20,R22
subi R20,64 ; addi 192
L8:
.dbline 84
; LCD_write_char(0,address);
mov R18,R20
clr R19
clr R16
clr R17
xcall _LCD_write_char
.dbline -2
L6:
xcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r address 20 c
.dbsym r y 20 c
.dbsym r x 22 c
.dbend
.dbfunc e LCD_write_string _LCD_write_string fV
; s -> R20,R21
; Y -> R10
; X -> R22
.even
_LCD_write_string::
xcall push_gset3
mov R10,R18
mov R22,R16
ldd R20,y+6
ldd R21,y+7
.dbline -1
.dbline 96
; }
; /*-----------------------------------------------------------------------
; LCD_write_string : 英文字符串显示函数
;
; 输入参数：*s ：英文字符串指针；
; X、Y : 显示字符串的位置
;
; 编写日期 ：2004-8-19
; 最后修改日期 ：2004-8-19
; -----------------------------------------------------------------------*/
; void LCD_write_string(unsigned char X,unsigned char Y,unsigned char *s)
; {
.dbline 97
; LCD_set_xy( X, Y );
mov R18,R10
mov R16,R22
xcall _LCD_set_xy
xjmp L11
L10:
.dbline 100
.dbline 101
movw R30,R20
ldd R18,z+0
clr R19
ldi R16,1
ldi R17,0
xcall _LCD_write_char
.dbline 102
subi R20,255 ; offset = 1
sbci R21,255
.dbline 103
L11:
.dbline 99
;
; while (*s)
movw R30,R20
ldd R2,z+0
tst R2
brne L10
.dbline -2
L9:
xcall pop_gset3
.dbline 0 ; func end
ret
.dbsym r s 20 pc
.dbsym r Y 10 c
.dbsym r X 22 c
.dbend
.area bss(ram, con, rel)
.dbfile G:\电子资料\avrtest\1602六线接法练习\1602B_LCD.c
_data_temp::
.blkb 2
.dbsym e data_temp _data_temp i
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -