LJMP START

LCDstatus equ 0FF2EH
LCDcontrol equ 0FF2CH
LCDdataWR equ 0FF2DH

#define HOME 0x80
#define INITDISP 0x38
#define HOM2 0xc0
#define LCDON 0x0e
#define CLEAR 0x01

ORG 0100H

text: DB "PTM lab",00
text1: DB "BUTTON",00
text2: DB "BUTTON1",00
text3: DB "BUTTON2",00
text4: DB "BUTTON3",00

LCDcntrlWR MACRO x
 LOCAL loop
loop:
MOV DPTR, #LCDstatus
MOVX A, @DPTR
JB ACC.7, loop
MOV DPTR, #LCDcontrol
MOV A, x
MOVX @DPTR, A
ENDM

LCDcharWR MACRO
LOCAL loop1, loop2

PUSH    ACC
loop1: MOV DPTR, #LCDstatus
MOVX A, @DPTR
JB ACC.7, loop1
loop2: MOV DPTR, #LCDdataWR
POP ACC
MOVX    @DPTR, A
ENDM

init_LCD MACRO

LCDcntrlWR #INITDISP
LCDcntrlWR #CLEAR
LCDcntrlWR #LCDON

ENDM

LCDWR: LCDcharWR
RET

LCDstrWR: CLR A
MOVC A,@A+DPTR
JZ EXIT
PUSH DPH
PUSH DPL
CALL LCDWR
POP DPL
POP DPH
INC DPTR
SJMP LCDstrWR
EXIT: RET


START:
JMP tekst1
/*init_LCD

MOV A,#41H

LCDcharWR

MOV DPTR, #text
CALL LCDstrWR */

tekst1:
init_LCD
MOV DPTR, #text1
CALL LCDstrWR
JNB P3.2,tekst2
JMP tekst1

tekst2:
init_LCD
MOV DPTR, #text2
CALL LCDstrWR
JNB P3.2,tekst3
JMP tekst2

tekst3:
init_LCD
MOV DPTR, #text3
CALL LCDstrWR
JNB P3.2,tekst4
JMP tekst3

tekst4:
init_LCD
MOV DPTR, #text4
CALL LCDstrWR
JMP tekst4

NOP
NOP
NOP
JMP $
END START