int send;
  int receive;
  int link;

  sub init()
  {
  send=1;
  receive=2;
  return;
  }
  
  
  task main()
  {
  init();


  do
  {
  SendMessage(send);
  PlayTone(1000,20);
  Wait(100);

/*
  ClearTimer(1);
  ClearMessage();
  link=1;
  while ((Message()==0) || (Timer(1)>200));
  if (Message()!=0)
  {
  link=2;
  PlayTone(1000,20);
  Wait(1000);
  }
  ClearTimer(1);

  while ((Message()!=0) || (Timer(1)>200));
  link=3;
*/

  } //do
  while (true);
  } //end main