initiate.asm

来自「HT46RB50溫度計 含汇编程序和原理图」· 汇编 代码 · 共 66 行

;;Established date:                  2006/03/01
;;********************************************************************
Clear_RAM:
	MOV	A,C_Ramaddress
	MOV	MP0,A
	MOV	A,C_Ramnumber
Clear_RAMLOOP:
	CLR	R0
	INC	MP0
	SDZ	ACC
	JMP	Clear_RAMLOOP
	RET
;;********************************************************************
INI_RAM:
	MOV	A,C_TMR1C
	MOV	TMR1C,A
	MOV	A,C_TMR1L
	MOV	TMR1L,A
	MOV 	A,C_TMR1H
	MOV	TMR1H,A		;;If system clock is 12MHZ then each 34.66 microsecond polling rxd start bit one time.
	MOV	A,C_ACSR
	MOV	ACSR,A		;SET AD CLOCK
	MOV	A,C_ADCR
	MOV	ADCR,A		;SET ADCR
	CLR	START
	SET	START
	CLR	START		;START AD
	MOV	A,C_INTC1
	MOV	INTC1,A
	MOV	A,C_INTC0
	MOV	INTC0,A
	SET	TMR1C.4		
	RET
;;********************************************************************
INI_PORT:
	SET	PAC
	SET	PBC
	SET	PDC
	SET	PEC
	RET
;;********************************************************************
SBR_Delaysecond:
	MOV	A,4					
	MOV	M_TEMP2,A
	SET	M_TEMP1
	SET	ACC
L_Wait3s:
	CLR	WDT
	SNZ	F_Suspend		;about 1ms
	RET	
	SDZ	ACC
	JMP	L_Wait3s
	SDZ	M_TEMP1
	JMP	L_Wait3s					;260ms
	SDZ	M_TEMP2
	JMP	L_Wait3s
	RET

;;********************************************************************
SBR_Delay2us:
	MOV	A,08H
	SDZ	ACC
	JMP	$-1
	RET
;;********************************************************************