/*
LEDs
====
  
Ken McMullan, 19-May-2001

Switch on/off and change colour of three pairs of reverse polarised
LEDs on outputs A, B and C.

*/

#define LED_A OUT_A
#define LED_B OUT_B
#define LED_C OUT_C

task main()
{
  SetPower(LED_A, 7); SetPower(LED_B, 7); SetPower(LED_C, 7);

  while (true)
  {
   
    OnFwd(LED_A); Wait(10);
    OnRev(LED_A); Wait(10);
    Off(LED_A);
    OnFwd(LED_B); Wait(10);
    OnRev(LED_B); Wait(10);
    Off(LED_B);
    OnFwd(LED_C); Wait(10);
    OnRev(LED_C); Wait(10);
    OnFwd(LED_C); Wait(10);
    Off(LED_C);
    OnRev(LED_B); Wait(10);
    OnFwd(LED_B); Wait(10);
    Off(LED_B);
    OnRev(LED_A); Wait(10);
    
  } // while TRUE

} // main