mark.asm

HT45RM03A 在電動自行車控制器中的應用

;L_CheckDriver:
;;-----------------------------------------------
;;test driver circuit of mos,
;;driver circuit fail, includ open circuit and close circuit fail.
;;if adrh < R_Temp2, open circuit of driver fail.
;;if open circuit of al fail, flash 7 times.
;;if open circuit of ah fail, flash 8 times.
;;if open circuit of bl fail, flash 9 times.
;;if open circuit of bh fail, flash 10 times.
;;if open circuit of cl fail, flash 11 times.
;;if open circuit of ch fail, flash 12 times.
;;-----------------------------------------------
;	clr		wdt
;	sz		F_SelfTestError
;	jmp		L_InitialPwm
	
;	mov		a,C_CurrentAN
;	mov		adcr,a

;L_CheckABDriver:
;	clr		wdt

;	mov		a,11110110b	;;AB on
;	mov		pc,a
;	mov		a,200
;	sdz		acc
;	jmp		$-1		;;150us
;	clr		start
;	set		start
;	clr		start
;	sz		eocb
;	jmp		$-1
;	mov		a,0ffh
;	mov		pc,a

;	mov		a,adrh
;	sub		a,R_Temp2
;	clr		F_DriverOk
;	sz		c
;	set		F_DriverOk

;L_CheckACDriver:
;	mov		a,11011110b	;;AC on
;	mov		pc,a
;	mov		a,200
;	sdz		acc
;	jmp		$-1
;	clr		start
;	set		start
;	clr		start
;	sz		eocb
;	jmp		$-1
;	mov		a,0ffh
;	mov		pc,a

;	mov		a,adrh
;	sub		a,R_Temp2
;	sz		c
;	jmp		L_DriverACOK
;	mov		a,11		;;ac has not current
;	sz		F_DriverOk	;;
;	jmp		L_ExitCheckDriver ;;ab has current
;	jmp		L_CheckCBDriver
;L_DriverACOK:	
;	mov		a,9		;;ac has current
;	snz		F_DriverOK
;	jmp		L_ExitCheckDriver	;;ab has not current

;L_CheckCBDriver:
;	mov		a,11100111b
;	mov		pc,a
;	mov		a,200
;	sdz		acc
;	jmp		$-1
;	clr		start
;	set		start
;	clr		start
;	sz		eocb
;	jmp		$-1
;	mov		a,0ffh
;	mov		pc,a

;	mov		a,adrh
;	sub		a,R_Temp2
;	sz		c
;	jmp		L_DriverCBOK
;	mov		a,12		;;cb has not current
;	sz		F_DriverOK
;	jmp		L_ExitCheckDriver
;	jmp		L_CheckBCDriver
;L_DriverCBOK:
;	mov		a,7
;	snz		F_DriverOK
;	jmp		L_ExitCheckDriver

;L_CheckBCDriver:
;	mov		a,11011011b
;	mov		pc,a
;	mov		a,200
;	sdz		acc
;	jmp		$-1
;	clr		start
;	set		start
;	clr		start
;	sz		eocb
;	jmp		$-1
;	mov		a,0ffh
;	mov		pc,a

;	mov		a,adrh
;	sub		a,R_Temp2
;	sz		c
;	jmp		L_DriverBCOK
;	mov		a,10
;	sz		F_DriverOK
;	jmp		L_ExitCheckDriver
;	jmp		L_CheckCADriver
;L_DriverBCOK:
;	mov		a,7
;	snz		F_DriverOK
;	jmp		L_ExitCheckDriver

;L_CheckCADriver:	
;	mov		a,11101101b
;	mov		pc,a
;	mov		a,200
;	sdz		acc
;	jmp		$-1
;	clr		start
;	set		start
;	clr		start
;	sz		eocb
;	jmp		$-1
;	mov		a,0ffh
;	mov		pc,a

;	mov		a,adrh
;	sub		a,R_Temp2
;	sz		c
;	jmp		L_DriverCAOK
;	mov		a,7
;	sz		F_DriverOK
;	jmp		L_ExitCheckDriver
;	jmp		L_CheckBADriver
;L_DriverCAOK:
;	mov		a,9
;	snz		F_DriverOK
;	jmp		L_ExitCheckDriver

;L_CheckBADriver:
;	mov		a,11111001b
;	mov		pc,a
;	mov		a,200
;	sdz		acc
;	jmp		$-1
;	clr		start
;	set		start
;	clr		start
;	sz		eocb
;	jmp		$-1
;	mov		a,0ffh
;	mov		pc,a

;	mov		a,adrh
;	sub		a,R_Temp2
;	sz		c
;	jmp		L_DriverBAOK
;	mov		a,10
;	sz		F_DriverOK
;	jmp		L_ExitCheckDriver
;	jmp		L_InitialPWM
;L_DriverBAOK:
;	mov		a,12
;	snz		F_DriverOK
;	jmp		L_ExitCheckDriver
;	mov		a,15
;L_ExitCheckDriver:
;	mov		R_ErrorNO,a
;	set		F_SelfTestError
;;**************************************************************************