main.s

avr单片机atmage16驱动小灯的一些例程 并且包括一些收发数据的程序利用usb口

	.module main.c
	.area text(rom, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~2\icc\031-PWM\main.c
	.dbfunc e delay_ms _delay_ms fV
;              a -> R20
;              b -> R22
;              i -> R16
	.even
_delay_ms::
	xcall push_gset2
	.dbline -1
	.dbline 17
; /*
; 实验三十一：
; 
; 	PWM实险。
; 	1、利用PWM占空比调节功能，进行PB3口LED发光二极管亮度调节效果。
; 	2、内部1 M晶振，程序采用单任务方式，软件延时。
; 	3、进行此实验请插上PB3、JP7(LED_EN)短路块。
; 	4、通过此实验，可以对PWM有个初步认识，知道它的工作原理。
; 
; 	AVR  mega16学习板
; 	www.iccavr.com
; 	19:13 2007-7-23
; */
; #include "iom16v.h"
; 
; /*延时函数*/
; void delay_ms(unsigned char i) {
	.dbline 20
	ldi R20,1
	xjmp L5
L2:
	.dbline 20
; 
; 	unsigned char a, b;
; 	for (a = 1; a < i; a++) {
	.dbline 21
	ldi R22,1
	xjmp L9
L6:
	.dbline 21
	.dbline 22
	.dbline 23
L7:
	.dbline 21
	inc R22
L9:
	.dbline 21
	tst R22
	brne L6
	.dbline 24
L3:
	.dbline 20
	inc R20
L5:
	.dbline 20
	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 main _main fV
;              i -> R20
	.even
_main::
	.dbline -1
	.dbline 27
; 		for (b = 1; b; b++) {
; 			;
; 			}
; 		}
; }
; 
; void main(void) {
	.dbline 31
; 
; 	unsigned char i;
; 
; 	DDRA = 0x00;						/*方向输入*/
	clr R2
	out 0x1a,R2
	.dbline 32
; 	PORTA = 0xFF;						/*打开上拉*/
	ldi R24,255
	out 0x1b,R24
	.dbline 33
; 	DDRB = 0xFF;						/*方向输出*/
	out 0x17,R24
	.dbline 34
; 	PORTB = 0xFF;						/*高电平*/
	out 0x18,R24
	.dbline 35
; 	DDRC = 0x00;
	out 0x14,R2
	.dbline 36
; 	PORTC = 0xFF;
	out 0x15,R24
	.dbline 37
; 	DDRD = 0x00;
	out 0x11,R2
	.dbline 38
; 	PORTD = 0xFF;
	out 0x12,R24
	.dbline 40
; 	
; 	TCCR0 = 0x61;						/*相位修正PWM模式*/
	ldi R24,97
	out 0x33,R24
	xjmp L12
L11:
	.dbline 42
;  
; 	while (1) {
	.dbline 43
; 		i = 255;
	ldi R20,255
	xjmp L15
L14:
	.dbline 44
	.dbline 45
	out 0x3c,R20
	.dbline 46
	ldi R16,10
	xcall _delay_ms
	.dbline 47
	dec R20
	.dbline 48
L15:
	.dbline 44
; 		while (i) {						/*占空比减小*/
	tst R20
	brne L14
	.dbline 49
; 			OCR0 = i;
; 			delay_ms(10);
; 			i --;
; 			}
; 		i = 1;
	ldi R20,1
	xjmp L18
L17:
	.dbline 50
	.dbline 51
	out 0x3c,R20
	.dbline 52
	ldi R16,10
	xcall _delay_ms
	.dbline 53
	inc R20
	.dbline 54
L18:
	.dbline 50
	tst R20
	brne L17
	.dbline 55
L12:
	.dbline 42
	xjmp L11
X0:
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend