ELEGXOSCODE1:    
		MOV R0,#91h
		MOV A,@R0
		CJNE A,40h,WRONGPASS
CALL LCDCLS	;êáèáñéóìïò ïèüíçò
                MOV CURSPOS,#4 ;Ìåôáêéíïõìå ôïí êåñóïñá óôçí ìåóç ôçò ðáíù ãñáììçò 
                CALL POSIT_CURSOR   ; ôçò ïèïíçò
		MOV DPTR,#STRING4	;Åããñáöç óôçí ïèïíç ôïõ string4
		CALL LCDSTR
JMP HALT

WRONGPASS: 
		CALL LCDCLS	;êáèáñéóìïò ïèüíçò
		MOV CURSPOS,#4 ;Ìåôáêéíïõìå ôïí êåñóïñá óôçí ìåóç ôçò ðáíù ãñáììçò 
		CALL POSIT_CURSOR   ; ôçò ïèïíçò
		MOV DPTR,#STRING5	;Åããñáöç óôçí ïèïíç ôïõ string5
		CALL LCDSTR	



HALT: JMP HALT


STRING1:
DB ' ALARM OFF ' ,0

STRING2:
DB ' GIVE PASS ' ,0

STRING3:
DB ' GIVE OLD PASS ' ,0

STRING4:
DB ' ALARM ON ' ,0

STRING5:
DB ' WRONG PASS ' ,0
END