main.s

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

	.module main.c
	.area text(rom, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~3\icc\012-WATCHDOG\main.c
	.dbfunc e delay_ms _delay_ms fV
;              a -> R20
;              b -> R22
;              i -> R16
	.even
_delay_ms::
	xcall push_gset2
	.dbline -1
	.dbline 26
; /*
; 实验十二：
; 	AVR内部看门口实验。
; 	1、看门口实验。在主程序中周期喂狗，通过按下按键让程序无限循环，从而启动看门狗。
; 		程序在启动时会检查启动方式，上电复位、掉电复位、外部复位、看门狗复位，显示出来。
; 		上电复位：		PB0	正常的通电复位。
; 		外部复位：		PB1	外部按键复位。
; 		掉电复位：		PB2	工作过程中电压瞬间跌落，硬件保护，这个对系统可靠性非常重要。
; 							需要打开熔丝位里面的BOD功能才有效。
; 		看门狗复位：	PB3	看门狗定时器复位，用于程序死机保护，软件保护。
; 		JTAG复位：		PB4	这个是仿真器复位，没什么大用外。
; 	2、内部1 M晶振，程序采用单任务方式，软件延时。
; 	3、进行此实验请插上LED短路块。
; 	4、通过此实验可了解看门狗的设置及看门狗的喂狗等，通过这个实验可以让你认识到复位功能和重要性。
; 	5、看门狗复位的输入信号是按键7，当它长时间按下时，就会产生看门狗复位。
; 
; 	AVR  mega128学习板
; 	www.iccavr.com 阿发
; 	16:20 2007-10-19
; */
; 
; #include "iom128v.h"
; #include <macros.h>
; 
; /*延时函数*/
; void delay_ms(unsigned char i) {
	.dbline 29
	clr R20
	xjmp L5
L2:
	.dbline 29
; 
; 	unsigned char a, b;
; 	for (a = 0; a < i; a++) {
	.dbline 30
	ldi R22,1
	xjmp L9
L6:
	.dbline 30
L7:
	.dbline 30
	inc R22
L9:
	.dbline 30
	tst R22
	brne L6
	.dbline 31
L3:
	.dbline 29
	inc R20
L5:
	.dbline 29
	cp R20,R16
	brlo L2
	.dbline -2
L1:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r a 20 c
	.dbsym r b 22 c
	.dbsym r i 16 c
	.dbend
	.dbfunc e io_init _io_init fV
	.even
_io_init::
	.dbline -1
	.dbline 35
; 		for (b = 1; b; b++);
; 		}
; }
; 
; /*IO口初始化函数*/
; void io_init(void) {
	.dbline 37
; 
; 	DDRA = 0x00;										/*方向输入*/
	clr R2
	out 0x1a,R2
	.dbline 38
; 	PORTA = 0xFF;										/*打开上拉*/
	ldi R24,255
	out 0x1b,R24
	.dbline 39
; 	DDRB = 0xFF;										/*方向输出*/
	out 0x17,R24
	.dbline 40
; 	PORTB = 0xFF;										/*输出高电平*/
	out 0x18,R24
	.dbline 41
; 	DDRC = 0x00;										/*不用的IO口建议设置为输入带上拉*/
	out 0x14,R2
	.dbline 42
; 	PORTC = 0xFF;
	out 0x15,R24
	.dbline 43
; 	DDRD = 0x00;
	out 0x11,R2
	.dbline 44
; 	PORTD = 0xFF;
	out 0x12,R24
	.dbline 45
; 	DDRE = 0x00;
	out 0x2,R2
	.dbline 46
; 	PORTE = 0xFF;
	out 0x3,R24
	.dbline 47
; 	DDRF = 0x00;
	sts 97,R2
	.dbline 48
; 	PORTF = 0xFF;
	sts 98,R24
	.dbline 49
; 	DDRG = 0x00;
	sts 100,R2
	.dbline 50
; 	PORTG = 0xFF;
	sts 101,R24
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 53
; }
; 
; void main(void) {
	.dbline 55
; 	
; 	io_init();
	xcall _io_init
	xjmp L13
L12:
	.dbline 56
	.dbline 58
	wdr
	.dbline 59
	in R2,0x18
	lsl R2
	out 0x18,R2
	.dbline 60
	ldi R16,250
	xcall _delay_ms
	.dbline 61
L13:
	.dbline 56
; 	while (PORTB) {										/*启动指示*/
	in R2,0x18
	tst R2
	brne L12
	.dbline 63
; 		/*喂狗，看门狗复位时不会清除看门狗时间，所以这里要喂狗*/
; 		WDR();
; 		PORTB <<= 1;
; 		delay_ms(250);
; 		}
; 	
; 	PORTB = ~(MCUCSR & 0x1F);							/*指示复位类型*/
	in R24,0x34
	andi R24,31
	com R24
	out 0x18,R24
	.dbline 64
; 	MCUCSR = 0x00;										/*清除复位标志*/
	clr R2
	out 0x34,R2
	.dbline 66
; 
; 	WDTCR |= ((1 << WDCE) | (1 << WDE));				/*启动时序*/
	in R24,0x21
	ori R24,24
	out 0x21,R24
	.dbline 67
; 	WDTCR = ((1<< WDE) | (1 << WDP2) | (1 <<WDP1));		/*设定周期为1S*/
	ldi R24,14
	out 0x21,R24
	xjmp L16
L15:
	.dbline 69
; 
; 	while (1) {
	.dbline 70
; 		delay_ms(250);
	ldi R16,250
	xcall _delay_ms
	.dbline 71
; 		WDR();											/*喂狗*/
	wdr
	.dbline 72
; 		PORTB ^= (1 << PB7);							/*PB7电平取反*/
	ldi R24,128
	ldi R25,0
	in R2,0x18
	clr R3
	eor R2,R24
	eor R3,R25
	out 0x18,R2
L18:
	.dbline 73
L19:
	.dbline 73
	sbis 0x1,7
	rjmp L18
	.dbline 74
L16:
	.dbline 69
	xjmp L15
X0:
	.dbline -2
L11:
	.dbline 0 ; func end
	ret
	.dbend