FOR a=1 TO 35
make object cube a,10

NEXT a
a=0

FOR y = 1 TO 5
   FOR x = 1 TO 7
a=a+1
      READ griddata
      grid(x,y) = griddata
      IF griddata= 0 THEN delete object a
      IF griddata = 1 THEN position object a, x*10,y*10,1
      IF griddata = 2 THEN make object cube 40,5: position object 40,x*10,y*10,0
      IF griddata = 3 THEN make object cube 41,5: position object 41,x*10,y*10,0
      POINT camera x*100,y*100,0
      IF griddata=2 THEN startcoordx=x
      IF griddata=2 THEN startcoordy=y
      IF griddata=3 THEN stopcoordx=x
      IF griddata=3 THEN stopcoordy=y

   NEXT x
NEXT y