main.s

这是用于atmega128控制12864显示的源程序

	.module main.c
	.area text(rom, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~3\icc\018-LCD12864\main.c
	.dbfunc e io_init _io_init fV
	.even
_io_init::
	.dbline -1
	.dbline 19
; /*
; 实验十六：
; 	LCD12864液晶屏显示实验。
; 	1、LCD12864显示实验。显示AVR开发网及网址信息。
; 	2、内部1 M晶振，程序采用单任务方式，软件延时。
; 	3、进行此实验请插上JP1、JP2的所有8个短路块，PC6、PC7短路块。
; 	4、RW1用于调节显示屏的对比度。
; 
; 	AVR  mega16学习板
; 	www.iccavr.com
; 	16:22 2007-4-25
; */
; 
; #include <iom128v.h>
; #include "font.h"
; #include "lcd12864.h"
; 
; /*IO口初始化函数*/
; void io_init(void) {
	.dbline 21
; 
; 	DDRA = 0xFF;							/*方向输出*/
	ldi R24,255
	out 0x1a,R24
	.dbline 22
; 	PORTA = 0xFF;							/*高电平*/
	out 0x1b,R24
	.dbline 23
; 	DDRB = 0x00;							/*方向输入*/
	clr R2
	out 0x17,R2
	.dbline 24
; 	PORTB = 0xFF;							/*打开上拉*/
	out 0x18,R24
	.dbline 25
; 	DDRC = 0xFF;							/*不用的IO口建议设置为输入带上拉*/
	out 0x14,R24
	.dbline 26
; 	PORTC = 0x00;
	out 0x15,R2
	.dbline 27
; 	DDRD = 0x00;
	out 0x11,R2
	.dbline 28
; 	PORTD = 0xFF;
	out 0x12,R24
	.dbline 29
; 	DDRE = 0x00;
	out 0x2,R2
	.dbline 30
; 	PORTE = 0xFF;
	out 0x3,R24
	.dbline 31
; 	DDRF = 0x00;
	sts 97,R2
	.dbline 32
; 	PORTF = 0xFF;
	sts 98,R24
	.dbline 33
; 	DDRG = 0x00;
	sts 100,R2
	.dbline 34
; 	PORTG = 0xFF;
	sts 101,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	sbiw R28,2
	.dbline -1
	.dbline 37
; }
; 
; void main(void) {
	.dbline 39
; 
; 	io_init();								/*IO口初始化*/
	xcall _io_init
	.dbline 40
; 	disp_init();							/*LCD初始化*/
	xcall _disp_init
	.dbline 41
; 	disp_clear(0, 128, 0);					/*清除四行显示*/
	clr R2
	std y+0,R2
	ldi R18,128
	clr R16
	xcall _disp_clear
	.dbline 42
; 	disp_clear(0, 128, 2);
	ldi R24,2
	std y+0,R24
	ldi R18,128
	clr R16
	xcall _disp_clear
	.dbline 43
; 	disp_clear(0, 128, 4);
	ldi R24,4
	std y+0,R24
	ldi R18,128
	clr R16
	xcall _disp_clear
	.dbline 44
; 	disp_clear(0, 128, 6);
	ldi R24,6
	std y+0,R24
	ldi R18,128
	clr R16
	xcall _disp_clear
	.dbline 46
; 	
; 	disp_char_str(28, 2, "AVR");			/*写入“AVR”三个字母*/
	ldi R24,<L3
	ldi R25,>L3
	std y+1,R25
	std y+0,R24
	ldi R18,2
	ldi R16,28
	xcall _disp_char_str
	.dbline 47
; 	disp_word(52, 2, CBFAA);				/*写入“开发网”三个汉字*/
	ldi R24,1
	std y+0,R24
	ldi R18,2
	ldi R16,52
	xcall _disp_word
	.dbline 48
; 	disp_word(68, 2, CB7A2);
	ldi R24,2
	std y+0,R24
	ldi R18,2
	ldi R16,68
	xcall _disp_word
	.dbline 49
; 	disp_word(84, 2, CCDF8);
	ldi R24,3
	std y+0,R24
	ldi R18,2
	ldi R16,84
	xcall _disp_word
	.dbline 50
; 	disp_char_str(8, 5, "www.iccavr.com");	/*显示网址信息*/
	ldi R24,<L4
	ldi R25,>L4
	std y+1,R25
	std y+0,R24
	ldi R18,5
	ldi R16,8
	xcall _disp_char_str
L5:
	.dbline 52
L6:
	.dbline 52
	xjmp L5
X0:
	.dbline -2
L2:
	adiw R28,2
	.dbline 0 ; func end
	ret
	.dbend
	.area data(ram, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~3\icc\018-LCD12864\main.c
L4:
	.blkb 15
	.area idata
	.byte 'w,'w,'w,46,'i,'c,'c,'a,'v,'r,46,'c,'o,'m,0
	.area data(ram, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~3\icc\018-LCD12864\main.c
L3:
	.blkb 4
	.area idata
	.byte 'A,'V,'R,0
	.area data(ram, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~3\icc\018-LCD12864\main.c