main.s

avr单片机的LED程序

	.module main.c
	.area text(rom, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
	.dbfunc e delay_1us _delay_1us fV
	.even
_delay_1us::
	.dbline -1
	.dbline 15
; /*****************************************
; *      数码管演示程序			    	 *
; * 功    能：数码管          			 *
; * 时钟频率：内部1M 						 *
; * 设    计：莫锦攀						 *
; * 修改日期：2007年05月30日				 *
; * 编译环境：ICC-AVR6.31					 *
; * 实验环境：M16学习板					 *
; * 使用端口：PA0~PA3	,PB0~PB7			 *
; *****************************************/
; #include <iom16v.h> 
; #include <macros.h>
; #include "delay.h"
; #include "led.h"
; 
	.dbline 16
; #define uchar unsigned char
	nop
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e delay_nus _delay_nus fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nus::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 20
; #define uint unsigned int
; 
; 
; 
	.dbline 21
; 
	clr R20
	clr R21
	.dbline 22
; 
	xjmp L6
L3:
	.dbline 23
	xcall _delay_1us
L4:
	.dbline 22
	subi R20,255  ; offset = 1
	sbci R21,255
L6:
	.dbline 22
	cp R20,R22
	cpc R21,R23
	brlo L3
	.dbline -2
L2:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 27
; 
; 
; 
; 
; void main(void)
	.dbline 29
	clr R16
	clr R17
	xjmp L11
L8:
	.dbline 29
L9:
	.dbline 29
	subi R16,255  ; offset = 1
	sbci R17,255
L11:
	.dbline 29
; {
; while(1)
	cpi R16,116
	ldi R30,4
	cpc R17,R30
	brlo L8
	.dbline -2
L7:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_nms _delay_nms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nms::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 33
; {
; LED(1234);
; }	
; 	
	.dbline 34
; 	
	clr R20
	clr R21
	.dbline 35
; 
	xjmp L16
L13:
	.dbline 36
	xcall _delay_1ms
L14:
	.dbline 35
	subi R20,255  ; offset = 1
	sbci R21,255
L16:
	.dbline 35
	cp R20,R22
	cpc R21,R23
	brlo L13
	.dbline -2
L12:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
_LED_table::
	.blkb 2
	.area idata
	.byte 63,6
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
	.blkb 2
	.area idata
	.byte 91,'O
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
	.blkb 2
	.area idata
	.byte 'f,'o
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
	.blkb 2
	.area idata
	.byte 125,7
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
	.blkb 2
	.area idata
	.byte 127,'o
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/delay.h
	.dbfile D:\avr\+++精华+++\数码管/led.h
	.dbsym e LED_table _LED_table A[10:10]c
_LED_dp::
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/led.h
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/led.h
	.dbsym e LED_dp _LED_dp A[4:4]c
	.area text(rom, con, rel)
	.dbfile D:\avr\+++精华+++\数码管/led.h
	.dbfunc e LED_process _LED_process fV
;              p -> R20,R21
;              i -> R22,R23
	.even
_LED_process::
	xcall push_gset2
	movw R20,R18
	movw R22,R16
	.dbline -1
	.dbline 15
	.dbline 15
	ldi R18,1000
	ldi R19,3
	movw R16,R22
	xcall div16u
	movw R30,R20
	std z+0,R16
	.dbline 16
	ldi R18,100
	ldi R19,0
	movw R16,R22
	xcall div16u
	ldi R18,10
	ldi R19,0
	xcall mod16u
	movw R30,R20
	std z+1,R16
	.dbline 17
	ldi R18,10
	ldi R19,0
	movw R16,R22
	xcall div16u
	ldi R18,10
	ldi R19,0
	xcall mod16u
	movw R30,R20
	std z+2,R16
	.dbline 18
	ldi R18,10
	ldi R19,0
	movw R16,R22
	xcall mod16u
	movw R30,R20
	std z+3,R16
	.dbline -2
L17:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r p 20 pc
	.dbsym r i 22 i
	.dbend
	.dbfunc e LED_display _LED_display fV
;            sel -> R20
;              i -> R22
;              p -> R10,R11
	.even
_LED_display::
	xcall push_gset3
	movw R10,R16
	.dbline -1
	.dbline 25
	.dbline 25
	ldi R20,1
	.dbline 26
	ldi R24,15
	out 0x1a,R24
	.dbline 27
	ldi R24,255
	out 0x17,R24
	.dbline 28
	clr R22
	xjmp L22
L19:
	.dbline 29
	.dbline 29
	out 0x1b,R20
	.dbline 30
	mov R30,R22
	clr R31
	add R30,R10
	adc R31,R11
	ldd R30,z+0
	clr R31
	ldi R24,<_LED_table
	ldi R25,>_LED_table
	add R30,R24
	adc R31,R25
	ldd R2,z+0
	com R2
	out 0x18,R2
	.dbline 32
	ldi R16,2
	ldi R17,0
	xcall _delay_nms
	.dbline 33
	lsl R20
	.dbline 34
L20:
	.dbline 28
	inc R22
L22:
	.dbline 28
	cpi R22,4
	brlo L19
	.dbline -2
L18:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r sel 20 c
	.dbsym r i 22 c
	.dbsym r p 10 pc
	.dbend
	.dbfunc e LED _LED fV
;              i -> R20,R21
	.even
_LED::
	xcall push_gset1
	movw R20,R16
	.dbline -1
	.dbline 47
; 
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 48
; }
	ldi R18,<_LED_dp
	ldi R19,>_LED_dp
	movw R16,R20
	xcall _LED_process
	.dbline 49
; }
	ldi R16,<_LED_dp
	ldi R17,>_LED_dp
	xcall _LED_display
	.dbline -2
L23:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbend
	.dbfile D:\avr\+++精华+++\数码管\main.c
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 28
	xjmp L26
L25:
	.dbline 30
	.dbline 31
	ldi R16,1234
	ldi R17,4
	xcall _LED
	.dbline 32
L26:
	.dbline 29
	xjmp L25
X0:
	.dbline -2
L24:
	.dbline 0 ; func end
	ret
	.dbend