main.s

用AVR单片机做的一些程序,包括跑马灯显示,PWM产生,ADC转换等

	.module main.c
	.area text(rom, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~3\icc\015-DS1302-LCD1602\main.c
	.dbfunc e io_init _io_init fV
	.even
_io_init::
	.dbline -1
	.dbline 23
; /*
; 实验十五：
; 
; 	DS1302时钟实险，LCD1602显示。
; 	1、设置和读取DS1302内部时钟，并通过LCD1602显示。
; 	2、内部1 M晶振，程序采用单任务方式，软件延时。
; 	3、此实验需要有LCD1602显示屏才可以显示。
; 	4、DS1302是产品中最常用的时钟芯片，通过本例子的学习可以学会如何使用DS1302。
; 	5、此实验对硬件及芯片的综合知识要求比较高，所以建议大家把此实验放到后面。
; 
; 	此实验参照了版主tonghe的DS1302时钟程序。
; 
; 	AVR  mega16学习板
; 	www.iccavr.com
; 	10:44 2007-5-10
; */
; 
; #include "iom128v.h"
; #include "ds1302.h"
; #include "lcd1602.h"
; 
; /*IO口初始化函数*/
; void io_init(void) {
	.dbline 25
; 
; 	DDRA = 0xFF;							/*方向输出*/
	ldi R24,255
	out 0x1a,R24
	.dbline 26
; 	PORTA = 0xFF;							/*高电平*/
	out 0x1b,R24
	.dbline 27
; 	DDRB = 0x00;							/*方向输入*/
	clr R2
	out 0x17,R2
	.dbline 28
; 	PORTB = 0xFF;							/*打开上拉*/
	out 0x18,R24
	.dbline 29
; 	DDRC = 0xFF;							/*不用的IO口建议设置为输入带上拉*/
	out 0x14,R24
	.dbline 30
; 	PORTC = 0x00;
	out 0x15,R2
	.dbline 31
; 	DDRD = 0x00;
	out 0x11,R2
	.dbline 32
; 	PORTD = 0xFF;
	out 0x12,R24
	.dbline 33
; 	DDRE = 0x00;
	out 0x2,R2
	.dbline 34
; 	PORTE = 0xFF;
	out 0x3,R24
	.dbline 35
; 	DDRF = 0x00;
	sts 97,R2
	.dbline 36
; 	PORTF = 0xFF;
	sts 98,R24
	.dbline 37
; 	DDRG = 0x00;
	sts 100,R2
	.dbline 38
; 	PORTG = 0xFF;
	sts 101,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
;           temp -> R20
	.even
_main::
	sbiw R28,1
	.dbline -1
	.dbline 41
; }
; 
; void main(void) {
	.dbline 45
; 
; 	unsigned char temp;
; 	
; 	io_init();								/*IO口初始化*/
	xcall _io_init
	.dbline 46
; 	delay_ms(200);
	ldi R16,200
	xcall _delay_ms
	.dbline 47
; 	LCD_init();								/*LCD1602初始化*/
	xcall _LCD_init
	.dbline 48
; 	ds1302_init();							/*DS302初始化*/
	xcall _ds1302_init
	.dbline 49
; 	delay_ms(10);
	ldi R16,10
	xcall _delay_ms
	.dbline 50
; 	ds1302_write_time();					/*设置DS302时间*/
	xcall _ds1302_write_time
	xjmp L4
L3:
	.dbline 52
	.dbline 53
	ldi R16,200
	xcall _delay_ms
	.dbline 54
	xcall _ds1302_read_time
	.dbline 55
	xcall _LCD_clear
	.dbline 57
	lds R20,_time_buf
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 58
	std y+0,R20
	clr R18
	clr R16
	xcall _LCD_write_char
	.dbline 59
	lds R20,_time_buf
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 60
	std y+0,R20
	clr R18
	ldi R16,1
	xcall _LCD_write_char
	.dbline 61
	lds R20,_time_buf+1
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 62
	std y+0,R20
	clr R18
	ldi R16,2
	xcall _LCD_write_char
	.dbline 63
	lds R20,_time_buf+1
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 64
	std y+0,R20
	clr R18
	ldi R16,3
	xcall _LCD_write_char
	.dbline 65
	ldi R24,45
	std y+0,R24
	clr R18
	ldi R16,4
	xcall _LCD_write_char
	.dbline 67
	lds R20,_time_buf+2
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 68
	std y+0,R20
	clr R18
	ldi R16,5
	xcall _LCD_write_char
	.dbline 69
	lds R20,_time_buf+2
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 70
	std y+0,R20
	clr R18
	ldi R16,6
	xcall _LCD_write_char
	.dbline 71
	ldi R24,45
	std y+0,R24
	clr R18
	ldi R16,7
	xcall _LCD_write_char
	.dbline 73
	lds R20,_time_buf+3
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 74
	std y+0,R20
	clr R18
	ldi R16,8
	xcall _LCD_write_char
	.dbline 75
	lds R20,_time_buf+3
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 76
	std y+0,R20
	clr R18
	ldi R16,9
	xcall _LCD_write_char
	.dbline 78
	lds R20,_time_buf+4
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 79
	std y+0,R20
	ldi R18,1
	ldi R16,8
	xcall _LCD_write_char
	.dbline 80
	lds R20,_time_buf+4
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 81
	std y+0,R20
	ldi R18,1
	ldi R16,9
	xcall _LCD_write_char
	.dbline 82
	ldi R24,58
	std y+0,R24
	ldi R18,1
	ldi R16,10
	xcall _LCD_write_char
	.dbline 84
	lds R20,_time_buf+5
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 85
	std y+0,R20
	ldi R18,1
	ldi R16,11
	xcall _LCD_write_char
	.dbline 86
	lds R20,_time_buf+5
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 87
	std y+0,R20
	ldi R18,1
	ldi R16,12
	xcall _LCD_write_char
	.dbline 88
	ldi R24,58
	std y+0,R24
	ldi R18,1
	ldi R16,13
	xcall _LCD_write_char
	.dbline 90
	lds R20,_time_buf+6
	swap R20
	andi R20,#0x0F
	subi R20,208    ; addi 48
	.dbline 91
	std y+0,R20
	ldi R18,1
	ldi R16,14
	xcall _LCD_write_char
	.dbline 92
	lds R20,_time_buf+6
	andi R20,15
	subi R20,208    ; addi 48
	.dbline 93
	std y+0,R20
	ldi R18,1
	ldi R16,15
	xcall _LCD_write_char
	.dbline 94
L4:
	.dbline 52
	xjmp L3
X0:
	.dbline -2
L2:
	adiw R28,1
	.dbline 0 ; func end
	ret
	.dbsym r temp 20 c
	.dbend