home *** CD-ROM | disk | FTP | other *** search
/ GameStar 2001 November / Gamestar_34_2001-11_cd1.bin / DEMA / colobotdemoe.exe / script / ANTsurp1.TXT < prev    next >
Text File  |  2001-07-23  |  1KB  |  49 lines
  1. extern void object::Attack( )
  2. {
  3.     int        list[], i;    // liste des objets cherchΘs
  4.     object    target;    // info sur la cible
  5.  
  6.     errmode(0);  // ne stoppe pas si erreur
  7.     while ( ismovie() != 0 )  wait(1);
  8.  
  9.     i = 0;
  10.     list[i++] = WingedGrabber;
  11.     list[i++] = TrackedGrabber;
  12.     list[i++] = WheeledGrabber;
  13.     list[i++] = LeggedGrabber;
  14.     list[i++] = WingedShooter;
  15.     list[i++] = TrackedShooter;
  16.     list[i++] = WheeledShooter;
  17.     list[i++] = LeggedShooter;
  18.     list[i++] = WingedOrgaShooter;
  19.     list[i++] = TrackedOrgaShooter;
  20.     list[i++] = WheeledOrgaShooter;
  21.     list[i++] = LeggedOrgaShooter;
  22.     list[i++] = WingedSniffer;
  23.     list[i++] = TrackedSniffer;
  24.     list[i++] = WheeledSniffer;
  25.     list[i++] = LeggedSniffer;
  26.     list[i++] = Thumper;
  27.     list[i++] = PhazerShooter;
  28.     list[i++] = Recycler;
  29.     list[i++] = Shielder;
  30.     list[i++] = Subber;
  31.     list[i++] = Me;
  32.  
  33.     while (true)
  34.     {
  35.         while (radar(list, 0, 360, 0, 20) == null) wait(1);
  36.         move(5);
  37.         target = radar(list, 0, 360, 0, 40);
  38.         while (target != null)
  39.         {
  40.             fire(target.position);
  41.             target = radar(list, 0, 360, 0, 40);
  42.         }
  43.         turn(90 - orientation);
  44.         move(5);
  45.         turn(180);
  46.     }
  47. }
  48.  
  49.