Jak wyświetlić tekst w drugiej linii LCD DSM51 w asemblerze?

MOV LDI A,#80H     ; 0H+80H
ACALL WRITE

MOV LDI A,#C0H     ; 40H+80H
ACALL WRITE

MOV A,#C0H     ; 40H+80H
ACALL WRITE

LJMP START
ORG 100H
START:

MOV    R0,#LCDWC       ;adres wpisu instrukcji
MOV    R1,#LCDRC        ;adres odczytu stanu

MOV    A,#1                  ;kasuj dane wy˜wietlacza
LCALL WRITE

MOV    A,#0FH               ;
LCALL WRITE                 ;i mruganie kursora

MOV    A,#80
LCALL WRITE                 ;**tutaj adres pierwszej linii**

INC     R0                      ;adres wpisu danych
MOV    DPTR,#TEXT       ;adres tekstu

WRITE_TXT:
CLR     A                       ;pobranie kolejnego
MOVC  A,@A+DPTR        ;znaku tekstu
JZ       TEXT_END           ;bajt=0 - koniec tekstu

ACALL WRITE                 ;wpisanie na wy˜wietlacz
INC     DPTR                  ;modyfikacja adresu
                                     ;pobrania kolejnego znaku
SJMP   WRITE_TXT          ;pobierz kolejny znak

TEXT_END:
MOV    A,#10
LCALL  DELAY_100MS
MOV    R0,#LCDWC        ;adres wpisu instrukcji
MOV    R1,#LCDRC         ;adres odczytu stanu

MOV    A,#1                   ;kasuj dane wy˜wietlacza
LCALL WRITE

MOV   A,#0FH                ;
LCALL WRITE                 ;i mruganie kursora

MOV   A,#0C0H              ;***ADRES DRUGIEJ LINII***
LCALL WRITE

INC     R0                      ;adres wpisu danych
MOV    DPTR,#TEXT2      ;adres tekstu

WRITE_TXT2:
CLR     A                       ;pobranie kolejnego
MOVC  A,@A+DPTR       ;znaku tekstu
JZ        KONIEC             ;bajt=0 - koniec tekstu

ACALL WRITE ;wpisanie na wy˜wietlacz
INC DPTR ;modyfikacja adresu
;pobrania kolejnego znaku
SJMP WRITE_TXT2 ;pobierz kolejny znak
KONIEC:
MOV A,#10
LCALL DELAY_100MS
LJMP START
WRITE:
MOV R2,A ;przechowanie danych
BUSY:
MOVX A,@R1 ;odczyt stanu
JB ACC.7,BUSY ;oczekiwanie na BUSY=0
MOV A,R2 ;odtworzenie danych
MOVX @R0,A ;wysˆanie danych
RET
TEXT:
DB 'TEKST 1'
DB ' '
DB 'tekst 2',0


TEXT2:
DB 'tekst 2'
DB ' '
DB 'TEKST 1',0 

LJMP	START
	ORG	100H

START:
	MOV	R0,#LCDWC
	MOV	R1,#LCDRC
	MOV	R3, #14
	MOV	A,#1
	LCALL	WRITE
	MOV	A,#8EH
	LCALL	WRITE
	INC	R0
	MOV	DPTR,#TEXT

WRITE_TXT:
	CLR	A 
	MOVC	A,@A+DPTR
	JZ	TEXT_END
	ACALL	WRITE 
	INC	DPTR 
	SJMP	WRITE_TXT

TEXT_END:
	DEC	R0 

LOOP:
	MOV	A,#5
	LCALL	DELAY_100MS
	MOV	A,#18H 
	LCALL	WRITE 
	DJNZ	R3, LOOP
	SJMP	$

WRITE:
	MOV	R2,A 

BUSY:
	MOVX	A,@R1
	JB	ACC.7,BUSY
	MOV	A,R2  
	MOVX	@R0,A
	RET

TEXT:
	DB	'HELLO!!!',0