time.asm

153控制收音5800的源码

;===============================================
;	Function:延迟25ms
;===============================================	
;delay_25ms:
;		clr		Time_Int_Count
;con_delay_25ms:
;		mov		a,Time_Int_Count
;		sub		a,@0xfa
;		jbs		FLAG,@Z
;		jmp		con_delay_25ms
;		ret

;===============================================
;	Function:延迟2ms
;===============================================	
delay_2ms:
		clr		time_delay
		
con_delay_2ms:
		inc		time_delay
		nop
		nop
		nop
		nop
		mov		a,time_delay
		sub		a,@0xc8
		jbs		FLAG,@Z
		jmp		con_delay_2ms
		ret

;===============================================
;	Function:延迟500ms
;===============================================	
delay_500ms:
		mov		a,@0xfa
		mov		time_delay1,a
con_delay_500ms:
		call		delay_2ms
		dec		time_delay1
		jbs		FLAG,@Z
		jmp		con_delay_500ms
		ret

;===============================================
;	Function:延迟50ms
;===============================================	
delay_50ms:
		mov		a,@0x19
		mov		time_delay1,a
		
con_delay_50ms:
		wdtc
		call		delay_2ms
		dec		time_delay1
		jbs		FLAG,@Z
		jmp		con_delay_50ms
		ret