⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 led.s

📁 单片机开发资料光盘-双龙-686M.zip
💻 S
字号:
	.module led.c
	.area text(rom, con, rel)
	.dbfile E:\icc\iccavr\mega8\mega8\led\led.c
	.dbfunc e Delay _Delay fV
;              a -> R16
;              b -> R18
	.even
_Delay::
	.dbline -1
	.dbline 12
; /******************************************/
; /*           广州天河双龙电子公司         */
; /*           http://www.sl.com.cn         */
; /*               LED演示程序              */
; /*           作者:ntzwq@wx88.net          */
; /*     目标MCU:MEGA8    晶振:INT RC 2MHZ  */
; /******************************************/
; #include <iom8v.h>
; #define set_bit(x,y)  (x|=(1<<y))
; #define clr_bit(x,y)  (x&=~(1<<y))
; void Delay() 
; 	{
	.dbline 15
; 	unsigned char a, b;
; 
; 	for (a = 1; a; a++)
	ldi R16,1
	rjmp L5
L2:
	.dbline 16
; 		for (b = 1; b; b++)
	ldi R18,1
	rjmp L9
L6:
	.dbline 17
L7:
	.dbline 16
	inc R18
L9:
	.dbline 16
	tst R18
	brne L6
L3:
	.dbline 15
	inc R16
L5:
	.dbline 15
	tst R16
	brne L2
	.dbline -2
	.dbline 18
; 			;
; 	}
L1:
	.dbline 0 ; func end
	ret
	.dbsym r a 16 c
	.dbsym r b 18 c
	.dbend
	.dbfunc e main _main fV
;              j -> R20
;              i -> R22
	.even
_main::
	.dbline -1
	.dbline 20
; void main()
; 	{
	.dbline 22
; 	unsigned char i,j;
; 	OSCCAL=0x7f;
	ldi R24,127
	out 0x31,R24
	.dbline 23
; 	DDRD=0xFF;	/* output */
	ldi R24,255
	out 0x11,R24
	.dbline 24
; 	PORTD=0xff;	/* all off */
	out 0x12,R24
	.dbline 25
;     DDRB=0xff;
	out 0x17,R24
	.dbline 26
; 	PORTB=0xff;
	out 0x18,R24
	rjmp L12
L11:
	.dbline 28
; 	while (1)
; 		{		
	.dbline 29
; 		 for(j=4;j<8;j++)
	ldi R20,4
	rjmp L17
L14:
	.dbline 30
;     		 {
	.dbline 31
;     		  clr_bit(PORTD,j);
	ldi R16,1
	mov R17,R20
	rcall lsl8
	mov R2,R16
	com R2
	in R3,0x12
	and R3,R2
	out 0x12,R3
	.dbline 32
;     		  for(i=0;i<8;i++)
	clr R22
	rjmp L21
L18:
	.dbline 33
	.dbline 34
	ldi R16,1
	mov R17,R22
	rcall lsl8
	mov R2,R16
	com R2
	out 0x18,R2
	.dbline 35
	rcall _Delay
	.dbline 36
L19:
	.dbline 32
	inc R22
L21:
	.dbline 32
	cpi R22,8
	brlo L18
	.dbline 37
	ldi R16,1
	mov R17,R20
	rcall lsl8
	in R2,0x12
	or R2,R16
	out 0x12,R2
	.dbline 38
L15:
	.dbline 29
	inc R20
L17:
	.dbline 29
	cpi R20,8
	brlo L14
	.dbline 39
L12:
	.dbline 27
	rjmp L11
X0:
	.dbline -2
	.dbline 40
;     		  	 {
;     		      PORTB=~(1<<i);
;     			  Delay();
;     		   	 }
; 			  set_bit(PORTD,j);	 
;     		 }  
; 		 }
;      }
L10:
	.dbline 0 ; func end
	ret
	.dbsym r j 20 c
	.dbsym r i 22 c
	.dbend

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -