;********************TextAusgabeLCD*********************************
werbe1:	ldi		temp1,0b10000000
	rcall 		lcd_DDR_AdrX  		
	ldi 		ZH,high(out0*2)
        ldi 		ZL,low(out0*2)
        rcall 		txt_out
	ret

werbe2:	ldi		temp1,0b11000000
	rcall 		lcd_DDR_AdrX   		
	ldi 		ZH,high(out1*2)
        ldi 		ZL,low(out1*2)
        rcall 		txt_out
	ret

leer_z:	ldi		temp1,0b11000000
	rcall 		lcd_DDR_AdrX   		
	ldi 		ZH,high(out2*2)
        ldi 		ZL,low(out2*2)
        rcall 		txt_out
	ret

mil_volt:
	di		temp1,0b11000101
	rcall 		lcd_DDR_AdrX   		
	ldi 		ZH,high(out3*2)
        ldi 		ZL,low(out3*2)
        rcall 		txt_out
	ret

txt_high:
	ldi		temp1,0b11000000
	rcall 		lcd_DDR_AdrX   		
	ldi 		ZH,high(out4*2)
        ldi 		ZL,low(out4*2)
        rcall 		txt_out
	ret

txt_deep:
	ldi		temp1,0b11000000
	rcall 		lcd_DDR_AdrX   		
	ldi 		ZH,high(out5*2)
        ldi 		ZL,low(out5*2)
        rcall 		txt_out
	ret

;*************************Ausgabe TXT**********************************
txt_out:lpm		temp1,z+	;!!! muss der .db *2 genommen werden
	cpi		temp1,$ff
	breq		txt_out_end
	rcall		lcd_data	;z.b.: ldi ZH,high(out0*2)
	rjmp		txt_out
txt_out_end:
	ret

;************************direktwandlung*wort*in*ASCII***************
;		            *   +	* = 16 Stellen  / + = 20 stellen
;   	    "12345678901234567890"
out0:	.db "   AVR-Atmega8  ",$ff
out1:	.db "   Test AD8400  ",$ff
out2:	.db "                ",$ff
out3:	.db "mV",$ff
out4:	.db "H",$ff
out5:	.db "T",$ff