$NOMOD51
$include(reg932.inc)
?PR?AutoBaudrateAdj?AATT      SEGMENT CODE 
	PUBLIC	AutoBaudrateAdj
	RSEG  ?PR?AutoBaudrateAdj?AATT
AutoBaudrateAdj:;MOV 	8FH,	#01H		
InitSerial:  
		mov	P1M1,#00H
		MOV	P1M2,#00H
		MOV 	P1,#0FFH
		MOV	TMOD,#11H
		ANL	TAMOD,#0EFH
		mov	PCON,#080H
		CLR	A
		MOV	SCON,A
		MOV	TH1,A
		MOV	TL1,A
L1:		JNB	RXD,L1
L2:		JB	RXD,L2
		SETB	TR1
		JNB	RXD,$
		CLR	TR1
		MOV	34H,TH1
		MOV	R1,#34h
L3:		JNB	RXD,L3
L4:		JB	RXD,L4
		mov	a,TL1
		xchd	a,@r1
		swap	a
		cpl	a
		inc	a
L5:		JNB	RXD,L5
L6:		JB	RXD,L6
		mov	TH1,A
		MOV	TL1,A
		MOV	TMOD,#21H
L7:		JNB	RXD,L7
L8:		JB	RXD,L8
L9:		JNB	RXD,L9
;L10:		JB	RXD,L10
;L11:		JNB	RXD,L11
;L12:		JB	RXD,L12

		SETB	TR1

                MOV     SCON,#050H
	


	RET  
?PR?ISP_INI?AATT      SEGMENT CODE 
	PUBLIC	ISP_INI
	RSEG  ?PR?ISP_INI?AATT
ISP_INI:	
		ANL	SSTAT,#0FAH		;清除BR位，SSTAT.2
		MOV	BRGCON,#00H		;關波特率發生器

		ORL	AUXR1,#40H		;置位EBRR位，當檢測到UART間隔信號時即進行復位
		MOV	SCON,#50H		;設置串口為工作方式1，允許串口接收
		MOV	BRGR1,#90H		;設置串口波特率：Fosc / ((BRGR1,BRGR0)/16)
		MOV	BRGR0,#00H
		MOV	BRGCON,#03H		;打開串口波特率發生器，使用串口波特率發生器
		RET		
	END