main.s

一个关于AVR单片机的例程

	.module main.c
	.area text(rom, con, rel)
	.dbfile D:\桌面\实验教程\LED应用\led用于程序调试\main.c
	.dbfunc e port_init _port_init fV
	.even
_port_init::
	.dbline -1
	.dbline 20
; //ICC-AVR application builder : 2007-1-29 10:04:38
; // Target : M16
; // Crystal: 7.3728Mhz
; // 功能：LED指示灯用于程序调试
; // 作者：古欣
; // AVR与虚拟仪器 http://www.avrvi.com
; 
; #include <iom16v.h>
; #include <macros.h>
; 
; #define led_port PORTA
; //定义输出端口
; #define led_ddr DDRA
; //定义输出控制寄存器
; //可以自行修改，必须保持 led_port和led_ddr一致，PORTA对应DDRA
; 
; //使用  |= 置一  ,  &=~ 清零 , ^= 取反 都是只对选择位进行操作，不会对同一个口的其他位造成影响。
; 
; void port_init(void)
; {
	.dbline 21
;  PORTA = 0x00;
	clr R2
	out 0x1b,R2
	.dbline 22
;  DDRA  = 0x00;
	out 0x1a,R2
	.dbline 23
;  PORTB = 0x00;
	out 0x18,R2
	.dbline 24
;  DDRB  = 0x00;
	out 0x17,R2
	.dbline 25
;  PORTC = 0x00; //m103 output only
	out 0x15,R2
	.dbline 26
;  DDRC  = 0x00;
	out 0x14,R2
	.dbline 27
;  PORTD = 0x00;
	out 0x12,R2
	.dbline 28
;  DDRD  = 0x00;
	out 0x11,R2
	.dbline 29
;  led_ddr|=0x03; //设置LED的0和1端口为输出，其余不变
	in R24,0x1a
	ori R24,3
	out 0x1a,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e init_devices _init_devices fV
	.even
_init_devices::
	.dbline -1
	.dbline 35
; }
; 
; //call this routine to initialize all peripherals
; //此处为ICC系统生成，未做更改
; void init_devices(void)
; {
	.dbline 37
;  //stop errant interrupts until set up
;  CLI(); //disable all interrupts
	cli
	.dbline 38
;  port_init();
	xcall _port_init
	.dbline 40
; 
;  MCUCR = 0x00;
	clr R2
	out 0x35,R2
	.dbline 41
;  GICR  = 0x00;
	out 0x3b,R2
	.dbline 42
;  TIMSK = 0x00; //timer interrupt sources
	out 0x39,R2
	.dbline 43
;  SEI(); //re-enable interrupts
	sei
	.dbline -2
L2:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e Delay _Delay fV
;              i -> R16
;              j -> R18
	.even
_Delay::
	.dbline -1
	.dbline 48
;  //all peripherals are now initialized
; }
; 
; void Delay(void)  //延时，没有详细计算
; {
	.dbline 50
; unsigned char i,j;
; for(i=200;i>0;i--)
	ldi R16,200
	xjmp L7
L4:
	.dbline 51
; {
	.dbline 52
;   for(j=200;j>0;j--)
	ldi R18,200
	xjmp L11
L8:
	.dbline 53
L9:
	.dbline 52
	dec R18
L11:
	.dbline 52
	clr R2
	cp R2,R18
	brlo L8
	.dbline 54
L5:
	.dbline 50
	dec R16
L7:
	.dbline 50
	clr R2
	cp R2,R16
	brlo L4
	.dbline -2
L3:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 c
	.dbsym r j 18 c
	.dbend
	.dbfunc e right _right fV
;              i -> R20,R21
	.even
_right::
	xcall push_gset1
	.dbline -1
	.dbline 58
; ;
; }
; }
; 
; void right(void) //01两个灯来回闪烁三次，指示工作正常。
; {
	.dbline 60
;  unsigned int i;
;  for(i=3;i!=0;i--)
	ldi R20,3
	ldi R21,0
	xjmp L16
L13:
	.dbline 61
	.dbline 62
	sbi 0x1b,0
	.dbline 63
	cbi 0x1b,1
	.dbline 64
	xcall _Delay
	.dbline 65
	ldi R24,3
	in R2,0x1b
	eor R2,R24
	out 0x1b,R2
	.dbline 66
	xcall _Delay
	.dbline 67
L14:
	.dbline 60
	subi R20,1
	sbci R21,0
L16:
	.dbline 60
	cpi R20,0
	cpc R20,R21
	brne L13
X0:
	.dbline 68
;  {
;   led_port |=  0x01;   //0位置一
;   led_port &=~ 0x02;   //1位清零
;   Delay();             //延时
;   led_port ^=  0x03;   //0位和1位翻转
;   Delay();             //延时
;  }
;  led_port |=  0x03;    //置一，都灭。
	in R24,0x1b
	ori R24,3
	out 0x1b,R24
	.dbline -2
L12:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbend
	.dbfunc e report_1 _report_1 fV
	.even
_report_1::
	.dbline -1
	.dbline 72
; }
; 
; void report_1(void) //一灭一亮
; {
	.dbline 73
;   led_port |=  0x01;   //0位置一
	sbi 0x1b,0
	.dbline 74
;   led_port &=~ 0x02;   //1位清零
	cbi 0x1b,1
	.dbline -2
L17:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e report_2 _report_2 fV
	.even
_report_2::
	.dbline -1
	.dbline 78
; }
; 
; void report_2(void) //一亮一灭
; {
	.dbline 79
;   led_port |=  0x02;   //0位置一
	sbi 0x1b,1
	.dbline 80
;   led_port &=~ 0x01;   //1位清零
	cbi 0x1b,0
	.dbline -2
L18:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e error _error fV
	.even
_error::
	.dbline -1
	.dbline 84
; }
; 
; void error(void)
; {
	.dbline 85
;  led_port &=~ 0x03;   //同时清零，都亮，表示错误
	in R24,0x1b
	andi R24,252
	out 0x1b,R24
	.dbline -2
L19:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 92
; }
; 
; //有时候做比较大的程序，无法确认程序是否正常运行，
; //就需要在程序中添加调试语句，以查看程序运行到什么地方。
; //至于什么情况表示什么含义，看你自己喜欢
; void main(void)
; {
	.dbline 93
;  init_devices();
	xcall _init_devices
	.dbline 94
;  right();  //指示进入程序正常工作
	xcall _right
	.dbline 96
;  
;  if(1==1)  //只为演示，并无意义。
	.dbline 97
;  {
	.dbline 98
;   report_1(); //调用一灭一亮
	xcall _report_1
	.dbline 99
;  }
L21:
	.dbline 101
;  
;  if(1<0)
	xjmp L23
X1:
	.dbline 102
;  {
	.dbline 103
;   report_2();
	xcall _report_2
	.dbline 104
;  }
	xjmp L26
L23:
	.dbline 106
;  else 
;  {
	.dbline 107
;   error(); //错误。
	xcall _error
	.dbline 108
;  }
L25:
	.dbline 110
L26:
	.dbline 110
	xjmp L25
X2:
	.dbline -2
L20:
	.dbline 0 ; func end
	ret
	.dbend