initiate.tmp

HT46RB50温度计,了解其usb通信

caaclF:\project\HT46RB50 温度计\ASM\INITIATE.ASM   1  0000              ;;Established date:                  2006/03/01
   2  0000              ;;********************************************************************
   3  0000              Clear_RAM:
babaaabaaaaaaaeb 	MOV	A,C_Ramaddress
	MOV	A,C_Ramaddress
babaaabaaabaaafb 	MOV	MP0,A
	MOV	MP0,A
babaaabaaacaaagb 	MOV	A,C_Ramnumber
	MOV	A,C_Ramnumber
   7  0003              Clear_RAMLOOP:
babaaabaaadaaaib 	CLR	R0
	CLR	R0
babaaabaaaeaaajb 	INC	MP0
	INC	MP0
babaaabaaafaaakb 	SDZ	ACC
	SDZ	ACC
  11  0006  2800     R  	JMP	Clear_RAMLOOP
  12  0007  0003        	RET
  13  0008              ;;********************************************************************
  14  0008              INI_RAM:
babaaabaaaiaaapb 	MOV	A,C_TMR1C
	MOV	A,C_TMR1C
babaaabaaajaabab 	MOV	TMR1C,A
	MOV	TMR1C,A
babaaabaaakaabbb 	MOV	A,C_TMR1L
	MOV	A,C_TMR1L
babaaabaaalaabcb 	MOV	TMR1L,A
	MOV	TMR1L,A
babaaabaaamaabdb 	MOV 	A,C_TMR1H
	MOV 	A,C_TMR1H
babaaabaaanaabeb 	MOV	TMR1H,A		;;If system clock is 12MHZ then each 34.66 microsecond polling rxd start bit one time.
	MOV	TMR1H,A		;;If system clock is 12MHZ then each 34.66 microsecond polling rxd start bit one time.
babaaabaaaoaabfb 	MOV	A,C_ACSR
	MOV	A,C_ACSR
babaaabaaapaabgb 	MOV	ACSR,A		;SET AD CLOCK
	MOV	ACSR,A		;SET AD CLOCK
babaaabaabaaabhb 	MOV	A,C_ADCR
	MOV	A,C_ADCR
babaaabaabbaabib 	MOV	ADCR,A		;SET ADCR
	MOV	ADCR,A		;SET ADCR
babaaabaabcaabjb 	CLR	START
	CLR	START
babaaabaabdaabkb 	SET	START
	SET	START
babaaabaabeaablb 	CLR	START		;START AD
	CLR	START		;START AD
babaaabaabfaabmb 	MOV	A,C_INTC1
	MOV	A,C_INTC1
babaaabaabgaabnb 	MOV	INTC1,A
	MOV	INTC1,A
babaaabaabhaabob 	MOV	A,C_INTC0
	MOV	A,C_INTC0
babaaabaabiaabpb 	MOV	INTC0,A
	MOV	INTC0,A
babaaabaabjaacab 	SET	TMR1C.4		
	SET	TMR1C.4		
  33  001A  0003        	RET
  34  001B              ;;********************************************************************
  35  001B              INI_PORT:
babaaabaablaaceb 	SET	PAC
	SET	PAC
babaaabaabmaacfb 	SET	PBC
	SET	PBC
babaaabaabnaacgb 	SET	PDC
	SET	PDC
babaaabaaboaachb 	SET	PEC
	SET	PEC
  40  001F  0003        	RET
  41  0020              ;;********************************************************************
  42  0020              SBR_Delaysecond:
  43  0020  0F04        	MOV	A,4					
babaaabaacbaacmb 	MOV	M_TEMP2,A
	MOV	M_TEMP2,A
babaaabaaccaacnb 	SET	M_TEMP1
	SET	M_TEMP1
babaaabaacdaacob 	SET	ACC
	SET	ACC
  47  0024              L_Wait3s:
  48  0024  0001        	CLR	WDT
babaaabaacfaadbb 	SNZ	F_Suspend		;about 1ms
	SNZ	F_Suspend		;about 1ms
  50  0026  0003        	RET	
babaaabaachaaddb 	SDZ	ACC
	SDZ	ACC
  52  0028  2800     R  	JMP	L_Wait3s
babaaabaacjaadfb 	SDZ	M_TEMP1
	SDZ	M_TEMP1
  54  002A  2800     R  	JMP	L_Wait3s					;260ms
babaaabaaclaadhb 	SDZ	M_TEMP2
	SDZ	M_TEMP2
  56  002C  2800     R  	JMP	L_Wait3s
  57  002D  0003        	RET
  58  002E              
  59  002E              ;;********************************************************************
  60  002E              SBR_Delay2us:
  61  002E  0F08        	MOV	A,08H
babaaabaacpaadob 	SDZ	ACC
	SDZ	ACC
  63  0030  2800     R  	JMP	$-1
  64  0031  0003        	RET
  65  0032              ;;********************************************************************