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

📄 lesson3_1.s

📁 AVR单片机C语言编程及应用实例 适合初学者的学习研究 其中包含Atmega16中文资料及Protel部分电路图
💻 S
字号:
	.module lesson3_1.c
	.area text(rom, con, rel)
	.dbfile C:\iccv7avr\examples.avr\chengxu\lesson3_1\lesson3_1.c
	.dbfunc e delay _delay fV
;              i -> R20,R21
;              j -> R22,R23
;             ms -> R16,R17
	.even
_delay::
	xcall push_xgsetF000
	.dbline -1
	.dbline 6
; #include <iom16v.h>
; #include <macros.h>
; #define  uchar unsigned char
; #define  uint  unsigned int
; void delay(uint ms)
; {
	.dbline 8
;     uint i,j;
; 	for(i=0;i<ms;i++)
	clr R20
	clr R21
	xjmp L5
L2:
	.dbline 9
; 	   {
	.dbline 10
; 	   for(j=0;j<1141;j++);
	clr R22
	clr R23
	xjmp L9
L6:
	.dbline 10
L7:
	.dbline 10
	subi R22,255  ; offset = 1
	sbci R23,255
L9:
	.dbline 10
	cpi R22,117
	ldi R30,4
	cpc R23,R30
	brlo L6
X0:
	.dbline 11
;        }
L3:
	.dbline 8
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	.dbline 8
	cp R20,R16
	cpc R21,R17
	brlo L2
X1:
	.dbline -2
L1:
	.dbline 0 ; func end
	xjmp pop_xgsetF000
	.dbsym r i 20 i
	.dbsym r j 22 i
	.dbsym r ms 16 i
	.dbend
	.dbfunc e main _main fV
;              k -> R20
	.even
_main::
	.dbline -1
	.dbline 14
; }
; void main()
; {
	.dbline 16
;    uchar k;
;    DDRA|=BIT(2);
	sbi 0x1a,2
	.dbline 17
;    PORTA|=BIT(2);
	sbi 0x1b,2
	.dbline 19
;    
;    DDRB=0XFF;
	ldi R24,255
	out 0x17,R24
	.dbline 20
;    PORTB=0XFF;
	out 0x18,R24
	xjmp L12
L11:
	.dbline 22
;    while(1)
;    {
	.dbline 23
;    for(k=0;k<8;k++)
	clr R20
	xjmp L17
L14:
	.dbline 24
;    { 
	.dbline 25
;    PORTB&=~BIT(k);
	ldi R16,1
	mov R17,R20
	xcall lsl8
	mov R2,R16
	com R2
	in R3,0x18
	and R3,R2
	out 0x18,R3
	.dbline 26
;    delay(500);
	ldi R16,500
	ldi R17,1
	xcall _delay
	.dbline 28
;    
;    PORTB|=BIT(k);
	ldi R16,1
	mov R17,R20
	xcall lsl8
	in R2,0x18
	or R2,R16
	out 0x18,R2
	.dbline 29
;    delay(500);
	ldi R16,500
	ldi R17,1
	xcall _delay
	.dbline 30
;    }
L15:
	.dbline 23
	inc R20
L17:
	.dbline 23
	cpi R20,8
	brlo L14
X2:
	.dbline 31
;    }
L12:
	.dbline 21
	xjmp L11
X3:
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbsym r k 20 c
	.dbend
; }

⌨️ 快捷键说明

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