In the folowing rutine the LCD use
address: 8000H for command ,8001H for data.


lcd_init:
mov dptr,#8000h
mov a,#38h
movx @dptr,a
lcall delay
movx @dptr,a
lcall delay
movx @dptr,a
lcall delay
movx @dptr,a
lcall delay
mov a,#0eh
movx @dptr,a
lcall delay
mov a,#06h
movx @dptr,a
lcall delay
mov a,#01h
movx @dptr,a
lcall delay
ret

******
delay of about 1ms is good.