Robot Control with Colbert on the AmigoBot
by Kurt Konolige, Jeanne Dietsch, and William Kennedy


Example 1: 

act patrol(nit a)
 {
     while (a != 0)
    {
       a = a-1;
       Turnto(180);
       Move(1000);
      Turnto(0);
      Move(1000);
   }
}

Example 2: 

act approach()
{
   int x;
   start patrol(-1) timeout 300 noblock;
   checking:
   if (timedout(patrol) || sfIsStalled()) fail;
   x = sfObjInFront();
   if (x > 2000) goto checking;
   suspend patrol;
   Move(x - 200);
   succeed;
}