$MOD2051

org 00h
LJMP START

org 100h
START: 	SETB P1.7
           		SETB P1.6
CLR  P1.5
     		CLR  P1.4
      		NOP
      		JB P3.0,WWA
      		NOP
      		JB P3.5,AWW
      		NOP
      		LJMP START

WWA:		LJMP PRAV
    		NOP
    		LJMP START

AWW:		LJMP LAVA
   		NOP
   		LJMP START

PRAV:		SETB P1.7
      		CLR  P1.6
      		CLR  P1.5
      		CLR  P1.4
      		JNB  P3.1,PRAV
      		NOP
      		LJMP START

LAVA: 	CLR  P1.7
     		SETB P1.6
      		CLR  P1.5
      		CLR  P1.4
      		JNB  P3.1,LAVA
      		NOP
      		LJMP START

END