1,17 → 1,33 |
program Callis; |
program Orbis; |
|
var movement, line; |
var line, Rychlost; |
|
line:=S; |
#define L 1 |
#define S 2 |
#define R 3 |
|
While true |
line:=2; |
|
Rychlost:=15; # omezeni rychlosti (hlavne pro ladici ucely) |
|
while true |
do |
if LEYE then # Cara pod levim sensorem |
MOTL:=30; # jed rovne |
line:=L; # zaznamenej, kdes videl caru |
if LEYE > 0 and CEYE > 0 then # Cara pod levim sensorem |
LMOT:=0;RMOT:=Rychlost; # jed rovne |
line:=1; # zaznamenej, kdes videl caru |
continue; |
end; |
|
elif REYE then |
if REYE > 0 and CEYE > 0 then |
LMOT:=Rychlost;RMOT:=0; |
line:=3; |
continue; |
end; |
|
if CEYE > 0 then |
LMOT:=Rychlost;RMOT:=Rychlost; |
line:=2; |
continue; |
end; |
|
|
end; |