home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 51 / PCGamer51_17Demos.iso / games / colobotdemo / colobotdemo10e.exe / script / tradar1.txt < prev    next >
Text File  |  2001-06-10  |  372b  |  26 lines
  1. extern void object::Solution( )
  2. {
  3.     while ( true )
  4.     {
  5.         object    spot;
  6.         float    dir;
  7.  
  8.         spot = radar(WayPoint);
  9.         if ( spot == null )  // plus rien ?
  10.         {
  11.             motor(0, 0);  // stoppe
  12.             break;
  13.         }
  14.  
  15.         dir = direction(spot.position);
  16.         if ( dir < 0 )  // α droite ?
  17.         {
  18.             motor(1, 1+dir/90);
  19.         }
  20.         else  // α gauche ?
  21.         {
  22.             motor(1-dir/90, 1);
  23.         }
  24.     }
  25. }
  26.