home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 51 / PCGamer51_17Demos.iso / games / colobotdemo / colobotdemo10e.exe / script / ttrap2.txt < prev    next >
Text File  |  2001-06-10  |  605b  |  42 lines
  1. extern void object::Solution( )
  2. {
  3.     while ( true )
  4.     {
  5.         object    spot;
  6.         float    dir;
  7.  
  8.         spot = radar(Mine, 0, 180, 0, 3.5);
  9.         if ( spot == null )
  10.         {
  11.             spot = radar(WayPoint, 0, 360);
  12.             if ( spot == null )  // plus rien ?
  13.             {
  14.                 motor(0, 0);  // stoppe
  15.                 break;
  16.             }
  17.             dir = direction(spot.position);
  18.         }
  19.         else
  20.         {
  21.             dir = direction(spot.position);
  22.             if ( dir < 0 )
  23.             {
  24.                 dir = dir+180;
  25.             }
  26.             else
  27.             {
  28.                 dir = dir-180;
  29.             }
  30.         }
  31.  
  32.         if ( dir < 0 )  // α droite ?
  33.         {
  34.             motor(1, 1+dir/90);
  35.         }
  36.         else  // α gauche ?
  37.         {
  38.             motor(1-dir/90, 1);
  39.         }
  40.     }
  41. }
  42.