--
--  sample2.occ -- test program for occam-pi on the RCX
--  Fred Barnes, September 2007
--

#INCLUDE "rcx/simple-rcx.occ"
#INCLUDE "components.occ"


PROC sample2 ()
  CHAN INT vel, dir, lft, rht:
  PAR
    int.generate (80, vel!)
    int.generate (0, dir!)
    brain.leftright (vel?, dir?, lft!, rht!)
    motor.driver (MOTOR.A, lft?)
    motor.driver (MOTOR.C, rht?)
: