initial.asm

这是一个完整的除湿机方案！另包含SCH原理图。希望对用松翰单片机的朋友有帮助！

;**********************************************
;Name	:RAMInitial
;Function:clr bank0~bank1
;Input  :
;Output	:
;Register Used:
;***********************************************
RAMInitial:
	mov	a,#00h
	mov	y,a
	mov	a,#7fh
	b0mov	z,a
Clrbank0:
	clr	@YZ				;Clear @YZ content
	decms	Z  				;z = z - 1 , skip next if z=0
	jmp	Clrbank0
	clr 	@YZ				;Clear address 0x00
	mov	a,#00010001b
	mov	t6abcbuf,a
;	mov	a,#55h
;	mov	temp1,a				;抗干扰
;	mov	temp2,a
;	mov	temp3,a
	ret
;**********************************************
;Name	:PortInitial
;Function:
;Input  :
;Output	:
;Register Used:
;***********************************************
PortInitial:
	mov	a,#00000111b	;p0.0  p0.1 p0.2 pull up
	mov	p0ur,a
	mov	a,#0ffh
	mov	p5ur,a		;p5 all pull up
	mov	a,#00000001b
	mov	p1ur,a		;p1.0 pull up
	mov	a,#0
	mov	p2ur,a		;p2 all not pull up

	mov	a,#00000111b
	mov	p0,a
	mov	a,#0ffh
	mov	p5,a
	mov	a,#00100000b
	mov	p2,a
	mov	a,#00110001b
	mov	p1,a

	mov	a,#0		;p0 all input
	b0mov	p0m,a
	mov	p5m,a		; p5 all input 		
	mov	a,#11111110b	;p1.0 input
	mov	p1m,a
	mov	a,#0ffh  	;p2 all output 
	mov	p2m,a


	ret

;**********************************************
;Name	:SysInitial
;Function:
;Input  :
;Output	:
;Register Used:
;***********************************************
SysInitial:
	mov	a,#0
	mov	oscm,a
	mov	pflag,a
	clr	inten
	clr	intrq
	mov	A,#01110100B	;110	;//fto=fcpu/4
	b0mov	TC1M,A
	mov	A,#131		;131	;//0.5ms constant  
	b0mov	TC1C,A
	mov	tc1r,a
	bclr	ftc1irq			; CLEAR TIMER0 INTERRUPT FLAG
	bset	FTC1IEN			; Enable T0 interrupt
	b0bset	faload1
	b0bset	FTC1ENB			; Enable TIMER0

	b0bclr	ft0irq			; disable t0 interrup	
	b0bclr	ft0ien


	mov	a,#08h
	mov	pedge,a			;rising edge
	b0bclr	fp00irq			; Enable P00 interrup		
	b0bclr	fp00ien
	
	b0bclr	fp01irq			; disable p01 interrup	
	b0bclr	fp01ien

	b0bset	FGIE			;//enable Interrupt gain

	mov	a,#0
	mov	p1w,a
	mov	p1oc,a
	ret

;**********************************************
;Name	:Pdelay
;Function:
;Input  :
;Output	:
;Register Used:
;***********************************************
Pdelay:				;20ms
	mov	a,#20
	mov	ww0,a
loop10:
	mov	a,#200
	mov	ww1,a
loop11:
	decms	ww1
	jmp	loop11	

	decms	ww0
	jmp	loop10
	ret