home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Classicos / AllienAttack.swf / scripts / frame_9 / DoAction.as
Encoding:
Text File  |  2006-06-13  |  1.1 KB  |  47 lines
  1. my -= 3;
  2. setProperty("/fire", _Y, my);
  3. if(Number(my) < 48)
  4. {
  5.    missile = 0;
  6.    setProperty("/fire", _visible, 0);
  7.    setProperty("/fire", _Y, 323);
  8. }
  9. n = 0;
  10. while(Number(n) < 55)
  11. {
  12.    if(eval("f" add n) == 1)
  13.    {
  14.       deltax = eval("x" add n) - mx;
  15.       deltay = eval("y" add n) - my;
  16.       if(Number(deltax * deltax) < 50 and Number(deltay * deltay) < 50)
  17.       {
  18.          missile = 0;
  19.          setProperty("/fire", _visible, 0);
  20.          setProperty("/fire", _Y, 323);
  21.          tellTarget("a" add n)
  22.          {
  23.             gotoAndPlay(9);
  24.          }
  25.          set("f" add n,0);
  26.          score = Number(score) + 90 - int(n / 11) * 10;
  27.          n = 99;
  28.       }
  29.    }
  30.    n = Number(n) + 1;
  31. }
  32. tx = mx;
  33. ty = my;
  34. deltax = mx - vaisseaux;
  35. if(Number(my) < 75 and 58 < Number(my) and Number(vaisseau) == 1 and Number(deltax * deltax) < 196)
  36. {
  37.    missile = 0;
  38.    setProperty("/fire", _visible, 0);
  39.    setProperty("/fire", _Y, 323);
  40.    vaisseau = 2;
  41.    vaisseaucon = 40;
  42.    tellTarget("/vaisseau")
  43.    {
  44.       gotoAndStop(2 + Number(random(3)));
  45.    }
  46. }
  47.