#include "NXCDefs.h"

long a=-40, b = 23;

task Fred()
{
  OnFwd(OUT_A, 75);
  Wait(500);
}

char j=-40, k = 23;
mutex myMutex;

string msg="test", blech;

task main (){
  Precedes(Fred);

  Random(5000);

  if (true)
    OnRev(OUT_B, 40);
  else
    OnFwd(OUT_C, 30);

  OnFwd(OUT_A, 20);
  a=Random(5000) * 2;
  NumOut(0, 20, true, a);
  Wait(a);
  Off(OUT_A);
/*
  do
  {
//    foobar;
    OnFwd(OUT_BC, 50+40);
    Wait(500);
    Off(OUT_BC);
    Wait(1000);
    a++; b++;
  } while (a < 10);

  repeat(10)
  {
    repeat(4)
    {
      OnFwd(OUT_BC, 50);
      Wait(1000);
      Off(OUT_BC);
      Wait(2000);
    }
  }
*/
  Acquire(myMutex);
  asm {
    add a, a, 1
    sub b, a, 2
    OnRev(OUT_BC, 50)
  }
  Release(myMutex);

  SetSensorType(IN_1, IN_TYPE_SWITCH);

  PlayTone(TONE_A4, MS_500);
  while(!SoundState())
    /* do nothing */ ;
//  Wait(500);
  PlayFile( "test.rso" );

  LineOut(0, 0, 30, 50, false);
  PointOut(30, 40, false);
  CircleOut(30, 40, 10, false);
  RectOut(30, 50, 20, 10, false);

  msg += ".r" + "s" + "o" ;

  PlayFile(msg);
//  Wait(1000);
  while(!ButtonPressed(BTN2, true)) ;
}


#define Testing OnRev(OUT_AB, 50)

byte d, e, f;

sub George()
{
  OnFwd(OUT_BC, 75);
  Testing;
}