; Letzte Änderung:  30.01.2008
; Programmierer:    BO

; Public-Symbol:    CHRout
; Funktion:	    schreibt an die gewünschte Cursor-Position ein Zeichen

; HeaderFile:	    lcd535  .h
; Bibliothek:	    subr_535.lib
; einbinden:	    extern void CHRout(Byte, Byte);

PSW	DATA	0D0H
ACC     DATA    0E0H

EXTRN   CODE    (lcdbsy, _cmdout)
PUBLIC  _chrout                         	;Symbol allgemein verfügbar

?PR?a_chro segment CODE        				;Segment-Definition
        rseg    ?PR?a_chro					;deklariertes Segment aktivieren

_chrout:                                	;Ausgabe eines Characters
	push	psw
	push	acc

        mov     a, 	r7						;Cursorpos. 1 .. 80 in R7
        cjne    a, 	#20, 	$+3				;Erste Zeile?  ( 1 ... 20), (13H)
        jc      c0							;a < const --> c = 1
        cjne    a, 	#40, 	$+3 			        ;Zweite Zeile? (21 ... 40), (53H)
        jc      c0
        cjne    a, 	#60, 	$+3				;Dritte Zeile? (41 ... 60), (27H)
        jc      c0
        cjne    a, 	#80, 	$+3				;Vierte Zeile  (61 ... 80), (67H)
        jmp     c0
c0:     orl     a, 	#10000000B				;Set DD_RAM_Adr. (Display Data)
        mov     r7, 	a
        call    _CMDOUT            			;Adresse in Display schreiben
        call    LCDBSY


	pop	acc
	pop	psw

        RET

        END