robot 1 [speed =0 hide dir =0 ]
robot 2 [on dir=0 ]
every 1 [
solid white [circle 90]
robot 1 [ forward 40 backward 40 dir=dir +6]
robot 2 [ color red [ fd 30 bk 30] dir=dir +6/60]
]