controll.asm

应用松翰母体写的一款电磁炉

;******************************************************
;name:mncontroll
;function:用于整个工作状态控制
;input:
;output:
;influece:
;*******************************************************
mncontroll:
	jb1	stoprunflag,mncontroll90
	jb0	operateflag,mncontroll90
	call	buzzercontroll
	call	fancontroll
	call	malfunction
;-----
mncontroll90:
	ret
;******************************************************
;name:buzzercontroll
;function:用于控制蜂鸣器输出
;input:
;output:
;influece:
;*******************************************************
buzzercontroll:
/*
;//	b0bts1	buzzerflag
	jmp	buzzercontroll90
;-----
	b0bts0	loadfrequentflag
	jmp	buzzercontroll80
;//	b0bts1	buzfrequentflag
	jmp	buzzercontroll90
;//	bclr	buzfrequentflag
;---
	notbit	ptbuzzer
	ret
;-----
buzzercontroll80:
	mov	a,buzzercnt
	b0bts0	fz
	jmp	buzzercontroll90	
	decms	buzzercnt
	jmp	buzzercontroll90
	bclr	buzzerflag
*/
;-----
buzzercontroll90:
	ret
	
;******************************************************
;name:fancontroll
;function:用于控制风扇运转
;input:
;output:
;influece:
;*******************************************************
fancontroll:
	b0bts1	operateflag
	jmp	fancontroll90
;-----
	bset	ptfan
fancontroll90:
	ret
	
;******************************************************
;name:malfunction
;function:故障控制程序
;input:
;output:
;influece:
;*******************************************************
malfunction:
	b0bts0	abnormalvoltfalg
	jmp	checkagaincvolt	 ;市电电压不正常报警
	b0bts0	nocookerflag
	jmp	checkagaincooker ;无锅报警
	b0bts0	popvalueflag
	jmp	popvaluedata
;-----
malfunction10:
	b0bts1	malfunctionflag
	jmp	malfunction80
	jmp	startbuzzer
;-----
popvaluedata:
	bclr	popvalueflag
	mov_	seg1buf,seg1temp
	mov_	seg2buf,seg2temp
	jmp	malfunction10
;-----
checkagaincvolt:
	b0bts0	secondflag
	jmp	startbuzzer
	bset	secondflag
	bclr	ADCstartflag
	bclr	ADCendflag
	bset	popvalueflag
	bset	volADCflag
	jmp	startbuzzer
;-----
checkagaincooker:
	b0bts0	secondflag
	jmp	startbuzzer
	bset	secondflag
	bclr	detecttimeflag
	bclr	checkcookerflag
	bclr	cyclestartflag
	bclr	onecycleflag
	bset	popvalueflag
	jmp	startbuzzer
;-----
startbuzzer:
	b0bts0	startflag
	jmp	malfunction70
;------------------------
	bset	startflag
	bset	Igbtstartupflag
	bclr	ledfrequentflag
	bclr	loadfrequentflag
;-----
	bclr	ptcout		;close IGBT
	bclr	fpwm1out
	bclr	ftc1enb		;stop t1 count
	bclr	fp01ien
	bclr	ptpwm
;-----
	bclr	t1sflag
	mov_	timer1s,#60
	mov_	timerbuf1,#2
	ret	
;------------------------
malfunction70:
	b0bts1	t1sflag
	jmp	malfunction90
;----
	bclr	t1sflag
	decms	timerbuf1
	jmp	malfunction90
;----
	mov_	timerbuf1,#2
	notbit	buzzerflag
	ret
;------------------------
malfunction80:
	b0bts1	startflag
	jmp	malfunction90
;-----
	bset	fp01ien
	bclr	startflag
	bclr	Igbtstartupflag
malfunction90:
	ret