home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 51 / PCGamer51_17Demos.iso / games / colobotdemo / colobotdemo10e.exe / script / ant07.txt < prev    next >
Text File  |  2001-06-10  |  2KB  |  87 lines
  1. extern void object::Attack( )
  2. {
  3.     int        list[];
  4.     int        i;
  5.     object    p;
  6.     float    dist, prox;
  7.     point    nav1, nav2, dest;
  8.  
  9.     errmode(0);  // ne stoppe pas si erreur
  10.     while ( ismovie() != 0 )  wait(1);
  11.  
  12.     i = 0;
  13.     list[i++] = WingedGrabber;
  14.     list[i++] = TrackedGrabber;
  15.     list[i++] = WheeledGrabber;
  16.     list[i++] = LeggedGrabber;
  17.     list[i++] = WingedShooter;
  18.     list[i++] = TrackedShooter;
  19.     list[i++] = WheeledShooter;
  20.     list[i++] = LeggedShooter;
  21.     list[i++] = WingedOrgaShooter;
  22.     list[i++] = TrackedOrgaShooter;
  23.     list[i++] = WheeledOrgaShooter;
  24.     list[i++] = LeggedOrgaShooter;
  25.     list[i++] = WingedSniffer;
  26.     list[i++] = TrackedSniffer;
  27.     list[i++] = WheeledSniffer;
  28.     list[i++] = LeggedSniffer;
  29.     list[i++] = Thumper;
  30.     list[i++] = PhazerShooter;
  31.     list[i++] = Recycler;
  32.     list[i++] = Shielder;
  33.     list[i++] = Subber;
  34.     list[i++] = Me;
  35.     list[i++] = Derrick;
  36.     list[i++] = BotFactory;
  37.     list[i++] = PowerStation;
  38.     list[i++] = Converter;
  39.     list[i++] = RepairCenter;
  40.     list[i++] = DefenseTower;
  41.     list[i++] = ResearchCenter;
  42.     list[i++] = RadarStation;
  43.     list[i++] = ExchangePost;
  44.     list[i++] = PowerPlant;
  45.     list[i++] = AutoLab;
  46.     list[i++] = NuclearPlant;
  47.  
  48.     while ( true )
  49.     {
  50.         p = radar(list, 0, 360, 0, 30);
  51.         if ( p == null )
  52.         {
  53.             nav1.x = position.x-5;
  54.             nav1.y = position.y;
  55.             nav2.x = position.x+5;
  56.             nav2.y = position.y;
  57.  
  58.             while ( true )
  59.             {
  60.                 goto(nav1);
  61.                 p = radar(list, 0, 360, 0, 30);
  62.                 if ( p != null )  break;
  63.  
  64.                 goto(nav2);
  65.                 p = radar(list, 0, 360, 0, 30);
  66.                 if ( p != null )  break;
  67.             }
  68.         }
  69.         else
  70.         {
  71.             dist = distance(p.position, position);
  72.             if ( dist < 5 )
  73.             {
  74.                 fire(p.position);
  75.             }
  76.             else
  77.             {
  78.                 prox = dist+5;  // fuite
  79.                 dest.x = (position.x-p.position.x)*prox/dist + p.position.x;
  80.                 dest.y = (position.y-p.position.y)*prox/dist + p.position.y;
  81.                 dest.z = (position.z-p.position.z)*prox/dist + p.position.z;
  82.                 goto(dest);
  83.             }
  84.         }
  85.     }
  86. }
  87.