.module common.c
	.area text(rom, con, rel)
	.dbfile E:\心電監護系統\測試程序\第一階段\無線測試\發送端\common.c
	.dbfunc e Delay650us _Delay650us fV
;              i -> R16
;              t -> R18
	.even
_Delay650us::
	.dbline -1
	.dbline 22
; /***************************************
; *2008,浙江工業大學信息與控制研究所
; *All rights reserved
; *
; *文件名稱：common.c
; *摘    要：公共函數和變量的定義 
; *
; *當前版本：1.1
; *作    者：董齊芬
; *完成日期：2008.5.17
; ****************************************/
; 
; #include "common.h"
; 
; /**************************************************
; 函數功能：延時650us
; 輸入參數：無
; 輸出參數：無
; 返 回 值:無
; **************************************************/
; void Delay650us(void)
; {
	.dbline 24
;   unsigned char i,t;
;   for (i=0;i<5;i++)
	clr R16
	xjmp L5
L2:
	.dbline 25
;   {
	.dbline 26
;     for (t=0;t<250;t++)
	clr R18
	xjmp L9
L6:
	.dbline 27
	.dbline 28
	.dbline 29
L7:
	.dbline 26
	inc R18
L9:
	.dbline 26
	cpi R18,250
	brlo L6
	.dbline 30
L3:
	.dbline 24
	inc R16
L5:
	.dbline 24
	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 Delay300us _Delay300us fV
;              i -> R16
;              t -> R18
	.even
_Delay300us::
	.dbline -1
	.dbline 41
;     {
;       ;
;     }
;   }
; }
; 
; 
; /**************************************************
; 函數功能：延時300us
; 輸入參數：無
; 輸出參數：無
; 返 回 值:無
; **************************************************/
; void Delay300us(void)
; {
	.dbline 43
;   unsigned char i,t;
;   for (i=0;i<1;i++)
	clr R16
	xjmp L14
L11:
	.dbline 44
;   {
	.dbline 45
;     for (t=0;t<150;t++)
	clr R18
	xjmp L18
L15:
	.dbline 46
	.dbline 47
	.dbline 48
L16:
	.dbline 45
	inc R18
L18:
	.dbline 45
	cpi R18,150
	brlo L15
	.dbline 49
L12:
	.dbline 43
	inc R16
L14:
	.dbline 43
	cpi R16,1
	brlo L11
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 c
	.dbsym r t 18 c
	.dbend
	.dbfunc e Delay3ms _Delay3ms fV
;              t -> R16,R17
	.even
_Delay3ms::
	.dbline -1
	.dbline 59
;     {
;       ;
;     }
;   }
; }
; 
; /**************************************************
; 函數功能：延時3ms
; 輸入參數：無
; 輸出參數：無
; 返 回 值: 無
; **************************************************/
; void Delay3ms(void)
; {
	.dbline 61
;   unsigned int t;
;   for (t=0;t<3500;t++)
	clr R16
	clr R17
	xjmp L23
L20:
	.dbline 62
	.dbline 63
	.dbline 64
L21:
	.dbline 61
	subi R16,255  ; offset = 1
	sbci R17,255
L23:
	.dbline 61
	cpi R16,172
	ldi R30,13
	cpc R17,R30
	brlo L20
	.dbline -2
L19:
	.dbline 0 ; func end
	ret
	.dbsym r t 16 i
	.dbend
	.dbfunc e Delays _Delays fV
;              t -> R16,R17
;              i -> R18,R19
	.even
_Delays::
	.dbline -1
	.dbline 74
;   {
;     ;
;   }
; }
; 
; /**************************************************
; 函數功能：延時一段時間，該延時主要用于測試
; 輸入參數：無
; 輸出參數：無
; 返 回 值: 無
; **************************************************/
; void Delays(void)
; {
	.dbline 76
;   unsigned int t,i;
;   for (t=0;t<3500;t++)
	clr R16
	clr R17
	xjmp L28
L25:
	.dbline 77
;   {
	.dbline 78
;     for (i=0;i<3;i++)
	clr R18
	clr R19
	xjmp L32
L29:
	.dbline 79
	.dbline 79
	.dbline 79
L30:
	.dbline 78
	subi R18,255  ; offset = 1
	sbci R19,255
L32:
	.dbline 78
	cpi R18,3
	ldi R30,0
	cpc R19,R30
	brlo L29
	.dbline 80
L26:
	.dbline 76
	subi R16,255  ; offset = 1
	sbci R17,255
L28:
	.dbline 76
	cpi R16,172
	ldi R30,13
	cpc R17,R30
	brlo L25
	.dbline -2
L24:
	.dbline 0 ; func end
	ret
	.dbsym r t 16 i
	.dbsym r i 18 i
	.dbend
	.dbfunc e Delay100us _Delay100us fV
;              t -> R16
	.even
_Delay100us::
	.dbline -1
	.dbline 90
; 	{;}
;   }
; }
; 
; /**************************************************
; 函數功能：延時100us
; 輸入參數：無
; 輸出參數：無
; 返 回 值:無
; **************************************************/
; void Delay100us(void)
; {
	.dbline 92
;   unsigned char t;
;   for (t=0;t<250;t++)
	clr R16
	xjmp L37
L34:
	.dbline 93
	.dbline 94
	.dbline 95
L35:
	.dbline 92
	inc R16
L37:
	.dbline 92
	cpi R16,250
	brlo L34
	.dbline -2
L33:
	.dbline 0 ; func end
	ret
	.dbsym r t 16 c
	.dbend
	.dbfunc e Delay40ns _Delay40ns fV
;              t -> R16
	.even
_Delay40ns::
	.dbline -1
	.dbline 106
;   {
;       ;
;   }
;   
; }
; 
; /*
; *函數功能:延時40ns，用于數字電位器的模擬SPI口
; *輸入參數:無
; *輸出參數:無
; *返 回 值:無
; */
; void Delay40ns(void)
; {
	.dbline 109
;   unsigned char t;
;   
;   for (t=0;t<25;t++)
	clr R16
	xjmp L42
L39:
	.dbline 110
	.dbline 111
	.dbline 112
L40:
	.dbline 109
	inc R16
L42:
	.dbline 109
	cpi R16,25
	brlo L39
	.dbline -2
L38:
	.dbline 0 ; func end
	ret
	.dbsym r t 16 c
	.dbend
	.dbfunc e initled _initled fV
	.even
_initled::
	.dbline -1
	.dbline 122
;   {
;     ;
;   }
; }
; 
; /*
; *函數功能:led端口初始化程序
; *輸入參數:無
; *輸出參數:無
; *返 回 值:無
; */
; void initled(void)
; {
	.dbline 123
;   DDRA|=((1<<DDA1)|(1<<DDA0));//設置A口的輸出引腳
	in R24,0x1a
	ori R24,3
	out 0x1a,R24
	.dbline 124
;   LED_OFF;
	cbi 0x1b,0
	.dbline 124
	cbi 0x1b,1
	.dbline 124
	.dbline -2
L43:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e initbuzzer _initbuzzer fV
	.even
_initbuzzer::
	.dbline -1
	.dbline 134
; }
; 
; /*
; *函數功能:蜂鳴器初始化程序
; *輸入參數:無
; *輸出參數:無
; *返 回 值:無
; */
; void initbuzzer(void)
; {
	.dbline 136
; 
;  DDRA|=(1<<DDA6);// 設置A6口為輸出口（蜂鳴器的連接口）
	sbi 0x1a,6
	.dbline 137
;  BUZZER_OFF;//關蜂鳴器
	cbi 0x1b,6
	.dbline 137
	.dbline -2
L44:
	.dbline 0 ; func end
	ret
	.dbend