home *** CD-ROM | disk | FTP | other *** search
/ GameStar 2001 November / Gamestar_34_2001-11_cd1.bin / PATCHE / colobotpatch17e.exe / english / script / tremot2b.txt < prev   
Text File  |  2001-09-13  |  552b  |  36 lines
  1. extern void object::Slave( )
  2. {
  3.     float    order, param;
  4.  
  5.     while ( true )
  6.     {
  7.         // wait for order ...
  8.         while ( !testinfo("order", 100) )
  9.         {
  10.             wait(1);
  11.         }
  12.  
  13.         // read the order and the parameter
  14.         order = receive("order", 100);
  15.         param = receive("param", 100);
  16.  
  17.         if ( order == 1 )
  18.         {
  19.             message("move("+param+")");
  20.             move(param);
  21.         }
  22.         else if ( order == 2 )
  23.         {
  24.             message("turn("+param+")");
  25.             turn(param);
  26.         }
  27.         else
  28.         {
  29.             message("Unknown order");
  30.         }
  31.  
  32.         // signal "end of work"
  33.         deleteinfo("order", 100);
  34.     }
  35. }
  36.