Subversion Repositories svnkaklik

Rev

Rev 276 | Go to most recent revision | Details | Last modification | View Log

Rev Author Line No. Line
275 kaklik 1 
program Callis;
2 
 
3 
var movement, line;
4 
 
5 
line:=S;
6 
 
7 
While true
8 
do
9 
  if LEYE then		# Cara pod levim sensorem
10 
    MOTL:=30;		# jed rovne
11 
    line:=L;		# zaznamenej, kdes videl caru
12 
 
13 
  elif REYE then
14 
 
15 
  end;
16 
 
17 
end;