idwracbuz.asm

来自「空调控制程序,MCU 采用NEC D789189」· 汇编 代码 · 共 86 行

;************************************************************************
; 	TITLE:          LT0333BUZ.ASM
;	VERSION:	1.0
;	DATE:		2003.07.23
; 	AUTHOR:         Gilbert.Huang
; 	DESCRIPTION:    GOOD MAN
;
;	Chip type:	NECuPD78F9188
; 	ROM SIZE:	16K  BYTES
; 	RAM SIZE:	384 BYTES
; 	EEPROM SIZE:	256 BYTES
; 	CRYSTAL:	4.19MHz
; 	I/O PORT:	26  PINS
; 	PACKAGE:	DIP32
;************************************************************************
;	NAME	BUZctrl

;************************************************************************
BUZctrl:
	BBS	f_BUZon,ONbuzzer
	CLR1	BZC90.0		;NO BUZZER
	CLR1	o_BUZ		;
	RET	
ONbuzzer:
	SET1	BZC90.0
;	SET1	o_BUZ		;On BUZZER
	RET		
;------------------------------------------------------------------------
;	beep 1 times
;------------------------------------------------------------------------

BEEP1tms:
	MOV	C_BUZmod,#1		;if C_BUZmod!=0,then count down C_BUZcnt
	MOV	C_BUZcnt,#n_005S3125
	RET
;------------------------------------------------------------------------
;	BEEP 2 times
;------------------------------------------------------------------------
BEEP2tms:
	MOV	C_BUZmod,#3
	MOV	C_BUZcnt,#n_01S3125
	RET
BEEP3tms:
	MOV	C_BUZmod,#5
	MOV	C_BUZcnt,#n_005S3125
	RET

BEEPlong:
	MOV	C_BUZmod,#1
	MOV	C_BUZcnt,#n_03S3125
;************************************************************************
;*	Module Name:							*
;*	Function:							*
;*	Input:								*
;*	Output:								*
;*	Break:								*
;*	stack:								*
;************************************************************************
;	History:
;		
;------------------------------------------------------------------------

;========================================================================
;	BUZZER COUNT
;========================================================================
BUZcnt:						;counter for buzzer mode
	CMP	C_BUZcnt,#0
	BEQ	BUZdec
	DEC	C_BUZcnt
	RET
BUZdec:
	CMP	C_BUZmod,#0
	BEQ	BUZend
	DEC	C_BUZmod
	BF	f_BUZon,$BUZpause
	LDM	C_BUZcnt,#n_01S3125
	RET
BUZpause:
	LDM	C_BUZcnt,#n_005S3125
	
BUZend:

	RET