initial.asm.bak

这是一个完整的除湿机方案！另包含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,#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,#0
	mov	p2,a
	mov	a,#00000001b
	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,#01100100B		;//fto=fcpu/4
	b0mov	TC1M,A
	mov	A,#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

;	mov	a,#10h
;	mov	pedge,a			;rising edge
;	b0bclr	fp00irq			; Enable P00 interrup		
;	b0bset	fp00ien
	
;	b0bclr	ftoirq			; disable t0 interrup	
;	b0bclr	ftoien

	b0bset	FGIE			;//enable Interrupt gain
	ret

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

	decms	m
	jmp	loop10
	ret