program example_program;

var i;
var ble;

LMOT := 30;
RMOT := -30;

ble:=0;
while ble<25 do ble:=ble+1; end;	

LMOT := 30;
RMOT := 30;

ble:=0;
while ble<125 do ble:=ble+1; end;	

LMOT := 30;
RMOT := -30;

while true
do
	if LEYE = 1 and REYE = 1 then
		LMOT := 30;
		RMOT := -30;
	end;

	if LEYE = 0 then
		LMOT := -30;
		continue;
	end;
	if REYE = 0 then
		RMOT := -30;
		continue;
	end;
	if LRTOUCH = 1 then
		RMOT := -30;
		LMOT := -20;
	end;
	if RRTOUCH = 1 then
		LMOT :=-30;
		RMOT :=-20;
	end;

	if RFTOUCH = 1 and LFTOUCH =1 then
		LMOT :=30;
		RMOT := 30;
	end;
	
	if RRTOUCH = 1 and LRTOUCH =1 then
		LMOT := -30;
		RMOT := -30;
	end;


end;
