跑马灯.s

ICC mega8例子

	.module _跑马灯.c
	.area text(rom, con, rel)
	.dbfile E:\xiaozhiyong2009\设计资料\项目设计\mega8_C语言常用程序\ICCAVR_mega8_跑马灯\跑马灯.c
	.dbfunc e port_init _port_init fV
	.even
_port_init::
	.dbline -1
	.dbline 9
; //ICC-AVR application builder : 2009-3-10 13:53:36
; // Target : M8
; // Crystal: 8.0000Mhz
; 
; #include <iom8v.h>
; #include <macros.h>
; 
; void port_init(void)
; {
	.dbline 10
;  PORTB = 0x00;
	clr R2
	out 0x18,R2
	.dbline 11
;  DDRB  = 0x00;
	out 0x17,R2
	.dbline 12
;  PORTC = 0x00; //m103 output only
	out 0x15,R2
	.dbline 13
;  DDRC  = 0x00;
	out 0x14,R2
	.dbline 14
;  PORTD = 0x00;
	out 0x12,R2
	.dbline 15
;  DDRD  = 0x00;
	out 0x11,R2
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e init_devices _init_devices fV
	.even
_init_devices::
	.dbline -1
	.dbline 20
; }
; 
; //call this routine to initialize all peripherals
; void init_devices(void)
; {
	.dbline 22
;  //stop errant interrupts until set up
;  CLI(); //disable all interrupts
	cli
	.dbline 23
;  port_init();
	rcall _port_init
	.dbline 25
; 
;  MCUCR = 0x00;
	clr R2
	out 0x35,R2
	.dbline 26
;  GICR  = 0x00;
	out 0x3b,R2
	.dbline 27
;  TIMSK = 0x00; //timer interrupt sources
	out 0x39,R2
	.dbline 28
;  SEI(); //re-enable interrupts
	sei
	.dbline -2
L2:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e delay _delay fV
;              i -> R16,R17
	.even
_delay::
	.dbline -1
	.dbline 38
;  //all peripherals are now initialized
; }
; 
; /************************************
; Name         :小延时程序
; Target       :atmega8
; Crystal(晶振):8M
; ************************************/
; void delay()
; {
	.dbline 40
;  unsigned int i;//最大值65536
;  for (i=0;i<40000;i++)
	clr R16
	clr R17
	rjmp L7
L4:
	.dbline 41
;  {;}
	.dbline 41
	.dbline 41
L5:
	.dbline 40
	subi R16,255  ; offset = 1
	sbci R17,255
L7:
	.dbline 40
	ldi R24,64
	ldi R25,156
	ldi R26,0
	ldi R27,0
	movw R2,R16
	clr R4
	clr R5
	cp R2,R24
	cpc R3,R25
	cpc R4,R26
	cpc R5,R27
	brlt L4
X0:
	.dbline -2
L3:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e show_LED _show_LED fV
;              i -> R20
	.even
_show_LED::
	st -y,R20
	.dbline -1
	.dbline 50
; }
; 
; /************************************
; Name         :跑马灯
; Target       :atmega8
; Crystal(晶振):8M
; **************************************/
; void show_LED()
; {
	.dbline 52
;  unsigned char i;
;  DDRB=0xff;//设为输出
	ldi R24,255
	out 0x17,R24
	.dbline 53
;  for (i=0;i<8;i++)
	clr R20
	rjmp L12
L9:
	.dbline 54
;  {
	.dbline 55
;   PORTB=(1<<i);
	ldi R16,1
	mov R17,R20
	rcall lsl8
	out 0x18,R16
	.dbline 56
;   delay();
	rcall _delay
	.dbline 57
;  }
L10:
	.dbline 53
	inc R20
L12:
	.dbline 53
	cpi R20,8
	brlo L9
X1:
	.dbline -2
L8:
	.dbline 0 ; func end
	ld R20,y+
	ret
	.dbsym r i 20 c
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 61
; }
; 
; void main()
; {
	.dbline 62
;  port_init();
	rcall _port_init
	.dbline 63
;  init_devices();
	rcall _init_devices
	rjmp L15
L14:
	.dbline 65
;  while(1)
;  {
	.dbline 66
;   show_LED();
	rcall _show_LED
	.dbline 67
;  }
L15:
	.dbline 64
	rjmp L14
X2:
	.dbline -2
L13:
	.dbline 0 ; func end
	ret
	.dbend
; }