common.s

AVR单片机系统开发经典实例部分源程序

	.module common.c
	.area text(rom, con, rel)
	.dbfile C:\AVR\cc2420驱动程序\code\common.c
	.dbfunc e Delay600us _Delay600us fV
;              i -> R16
;              t -> R18
	.even
_Delay600us::
	.dbline -1
	.dbline 10
; #include "common.h"
; 
; /*******************************************
; *函数功能：延时600us用于电压校准器的启动延时
; *输入参数：无
; *输出参数：无
; *返 回 值：无
; ********************************************/
; void Delay600us(void)   
; {
	.dbline 12
;   unsigned char i,t;
;   for (i=0;i<5;i++)
	clr R16
	xjmp L5
L2:
	.dbline 13
;   {
	.dbline 14
;     for (t=0;t<250;t++)
	clr R18
	xjmp L9
L6:
	.dbline 15
	.dbline 16
	.dbline 17
L7:
	.dbline 14
	inc R18
L9:
	.dbline 14
	cpi R18,250
	brlo L6
	.dbline 18
L3:
	.dbline 12
	inc R16
L5:
	.dbline 12
	cpi R16,5
	brlo L2
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 c
	.dbsym r t 18 c
	.dbend
	.dbfunc e Delay10ms _Delay10ms fV
;              t -> R16,R17
;              i -> R18,R19
	.even
_Delay10ms::
	.dbline -1
	.dbline 28
;     {
;       ;
;     }
;   }
; }
; 
; /*******************************************
; *函数功能：延时10ms用于发送数据包的间隔测试
; *输入参数：无
; *输出参数：无
; *返 回 值：无
; ********************************************/     
; void Delay10ms(void)  
; {
	.dbline 30
;   unsigned int t,i;
;   for (t=0;t<3500;t++)
	clr R16
	clr R17
	xjmp L14
L11:
	.dbline 31
;   {
	.dbline 32
;     for (i=0;i<3;i++)
	clr R18
	clr R19
	xjmp L18
L15:
	.dbline 33
	.dbline 33
	.dbline 33
L16:
	.dbline 32
	subi R18,255  ; offset = 1
	sbci R19,255
L18:
	.dbline 32
	cpi R18,3
	ldi R30,0
	cpc R19,R30
	brlo L15
	.dbline 34
L12:
	.dbline 30
	subi R16,255  ; offset = 1
	sbci R17,255
L14:
	.dbline 30
	cpi R16,172
	ldi R30,13
	cpc R17,R30
	brlo L11
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbsym r t 16 i
	.dbsym r i 18 i
	.dbend
	.dbfunc e initled _initled fV
	.even
_initled::
	.dbline -1
	.dbline 44
; 	{;}
;   }
; }       
; 
; /*
; *函数功能:led端口初始化程序
; *输入参数:无
; *输出参数:无
; *返 回 值:无
; */
; void initled(void)
; {
	.dbline 45
;   DDRA|=((1<<DDA1)|(1<<DDA0));//设置A口的输出引脚
	in R24,0x1a
	ori R24,3
	out 0x1a,R24
	.dbline -2
L19:
	.dbline 0 ; func end
	ret
	.dbend