;------------------------------------
;-  Generated Initialization File  --
;------------------------------------

;Hyperterminal gibt bei PowerOn "test" in Kopfzeile aus

$include (C8051F000.inc)



INIT SEGMENT CODE
    rseg INIT

;------------------------------------------------------------------------
;PORT_IO_INIT
;
;	P0.0  -  TX   (UART), Open-Drain  
;	P0.1  -  RX   (UART), Open-Drain  
; 	P0.2  -  Unassigned,  Open-Drain  
; 	P0.3  -  Unassigned,  Open-Drain  
; 	P0.4  -  Unassigned,  Open-Drain  
; 	P0.5  -  Unassigned,  Open-Drain  
; 	P0.6  -  Unassigned,  Open-Drain  
; 	P0.7  -  Unassigned,  Open-Drain  
;------------------------------------------------------------------------

    		mov  		XBR0,#004h
		mov	 	XBR1,#000h
    		mov  		XBR2,#040h

;------------------------------------------------------------------------
;OSCILLATOR_INIT   
;------------------------------------------------------------------------
		
		mov  		OSCXCN,#067h
    		mov  		R0,#030h        ;warte 1ms
Osc_Wait1:	clr  		A
    		djnz 		ACC,$
    		djnz 		R0,Osc_Wait1
Osc_Wait2:	mov  		A,OSCXCN
    		jnb  		ACC.7,Osc_Wait2
    		mov  		OSCICN,#00Ch

;-------------------------------------------------------------------------
;UART_INIT
;------------------------------------------------------------------------- 

		clr   		TR1             ;stop timer 1 
        	mov   		TH1,#0FAH       ;256-6: 9600 baud
        	mov   		TL1,#0FAH
       		anl   		TMOD,#0FH       ;Timer1: 8 bit auto-reload
        	orl   		TMOD,#20H
        	setb  		TR1             ;start timer 
        	mov   		SCON,#50H       ;InitRS232
        	setb  		TI
        	orl   		PCON,#80H       ;SMOD=1

;-------------------------------------------------------------------------
; Hauptprogramm
;-------------------------------------------------------------------------

main:		acall		Kopfzeile	
loop:		clr		A
		ljmp		loop						

;-------------------------------------------------------------------------
;KOPFZEILE
;Zeile 1: "test"
;-------------------------------------------------------------------------
  
Kopfzeile:	mov		A,#74h		;t
		acall		TX
		mov		A,#65h		;e
		acall		TX
		mov		A,#73h		;s
		acall		TX
		mov		A,#74h		;t
		acall		TX
		mov		A,#0Bh		;Zeilensprung
		acall		TX
		mov		R6,#14h		;zum
Zeile_2:	mov		A,#08h		;Zeilenanfang
		acall		TX
		djnz		R6,Zeile_2
		ret
					
;-------------------------------------------------------------------------
;AUSGABE
;-------------------------------------------------------------------------
TX:		jnb		TI,TX
		clr		TI
		mov		SBUF,A
		ret															 
END