lednum.s

protues_atmeg8学习之：LED篇源代码

	.module LedNum.c
	.area text(rom, con, rel)
	.dbfile F:\Learn\AVR\Pro_Mega8\LED\Led_Num\LedNum.c
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 13
; /******************************************/
; //文件名：HorseLight.c
; //功能： LED的控制
; //作者:  young
; //时间： 2006.10.1
; //目标MCU:ATmega8   
; //晶振:  8MHZ
; /******************************************/
; #include <iom8v.h>
; 
; //延时1MS
; void delay_1ms(void)
; { 
	.dbline 15
;     unsigned int i;
;     for(i=1;i<(unsigned int)(1144-2);i++)
	ldi R16,1
	ldi R17,0
	rjmp L5
L2:
	.dbline 16
L3:
	.dbline 15
	subi R16,255  ; offset = 1
	sbci R17,255
L5:
	.dbline 15
	cpi R16,118
	ldi R30,4
	cpc R17,R30
	brlo L2
	.dbline -2
	.dbline 17
;         ;
; }
L1:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_ms _delay_ms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_ms::
	rcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 21
; 
; //延时nMS
; void delay_ms(unsigned int n)
; {
	.dbline 22
;     unsigned int i=0;
	clr R20
	clr R21
	rjmp L8
L7:
	.dbline 24
	.dbline 25
	rcall _delay_1ms
	.dbline 26
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 27
L8:
	.dbline 23
;     while(i<n)
	cp R20,R22
	cpc R21,R23
	brlo L7
	.dbline -2
	.dbline 28
;     {
; 	    delay_1ms();
;         i++;
;     }
; } 
L6:
	rcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.area lit(rom, con, rel)
L11:
	.byte 63,6
	.byte 91,'O
	.byte 'f,'m
	.byte 125,7
	.byte 127,'o
	.area text(rom, con, rel)
	.dbfile F:\Learn\AVR\Pro_Mega8\LED\Led_Num\LedNum.c
	.dbfunc e main _main fV
;            num -> y+0
;              i -> R20
	.even
_main::
	sbiw R28,10
	.dbline -1
	.dbline 32
; 
; //主函数，依次顺序打开LED
; void main()
; {
	.dbline 34
; 	unsigned char i;
; 	unsigned char num[10]={0x3F, 0x06, 0x5B, 0x4F, 0x66, 0x6D, 0x7D, 0x07, 0x7F, 0x6F};
	ldi R24,<L11
	ldi R25,>L11
	movw R30,R28
	ldi R16,10
	ldi R17,0
	st -y,R31
	st -y,R30
	st -y,R25
	st -y,R24
	rcall asgncblk
	.dbline 35
; 	DDRD=0xFF;	//设置D口为输出模式
	ldi R24,255
	out 0x11,R24
	.dbline 36
; 	PORTD=0xFF;	//置高电平
	out 0x12,R24
	rjmp L13
L12:
	.dbline 39
;    
; 	while (1)
; 	{      
	.dbline 40
;         for(i=0;i<10;i++) //顺序打开LED
	clr R20
	rjmp L18
L15:
	.dbline 41
	.dbline 42
	movw R24,R28
	mov R30,R20
	clr R31
	add R30,R24
	adc R31,R25
	ldd R2,z+0
	out 0x12,R2
	.dbline 43
	ldi R16,500
	ldi R17,1
	rcall _delay_ms
	.dbline 44
L16:
	.dbline 40
	inc R20
L18:
	.dbline 40
	cpi R20,10
	brlo L15
	.dbline 45
L13:
	.dbline 38
	rjmp L12
X0:
	.dbline -2
	.dbline 46
;     	{
;     	    PORTD=num[i];
;     	    delay_ms(500);
;     	}		 
;      }
; }
L10:
	adiw R28,10
	.dbline 0 ; func end
	ret
	.dbsym l num 0 A[10:10]c
	.dbsym r i 20 c
	.dbend