PROGRAM Itsabug IS

        INSTRUCTION MustGoFaster IS
            WHILE next-is-empty DO
                move
            END WHILE
        END MustGoFaster

	INSTRUCTION lolz IS
	    WHILE next-is-enemy DO
		infect
		turnleft
		turnright
	    END WHILE
	END lolz
	BEGIN
        WHILE true DO
            MustGoFaster
            IF next-is-enemy THEN
          	    infect
            ELSE
                IF next-is-wall THEN
		   	 WHILE random DO
                    		turnright
				lolz
				IF next-is-enemy THEN
					infect
				END IF
	   	  	  END WHILE
                ELSE   # next-is-friend
                    	turnleft
			IF next-is-enemy THEN
				infect
			END IF
                END IF
            END IF
        END WHILE
    END Itsabug