home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Classicos / DesktopInvaders.swf / scripts / frame_9 / DoAction.as < prev   
Encoding:
Text File  |  2006-06-13  |  1.4 KB  |  59 lines
  1. if(alientots < "40")
  2. {
  3.    if(aliencount == "0")
  4.    {
  5.       call("direction");
  6.    }
  7.    while(eval("alienp" add aliencount) == "0")
  8.    {
  9.       aliencount -= "1";
  10.       if(aliencount == "0")
  11.       {
  12.          call("direction");
  13.       }
  14.    }
  15.    x = eval("alienx" add aliencount);
  16.    y = eval("alieny" add aliencount);
  17.    if("0" < dalieny)
  18.    {
  19.       set(x add "adm" add y,"0");
  20.       set(x + "1" add "adm" add y,"0");
  21.       set(x + "2" add "adm" add y,"0");
  22.       y += "2";
  23.       if(y == "39")
  24.       {
  25.          gotoAndPlay(29);
  26.       }
  27.       set(x add "adm" add y,aliencount);
  28.       set(x + "1" add "adm" add y,aliencount);
  29.       set(x + "2" add "adm" add y,aliencount);
  30.       setProperty("/aliens" add aliencount, _Y, y * "4" + alienoffy);
  31.       set("alieny" add aliencount,y);
  32.    }
  33.    else if("0" < dalienx)
  34.    {
  35.       set(x add "adm" add y,"0");
  36.       x += "1";
  37.       set(x + "2" add "adm" add y,aliencount);
  38.       if("54" < x)
  39.       {
  40.          aliends = "1";
  41.       }
  42.       setProperty("/aliens" add aliencount, _X, x * "4" + alienoffx);
  43.       set("alienx" add aliencount,x);
  44.    }
  45.    else if(dalienx < "0")
  46.    {
  47.       set(x + "2" add "adm" add y,"0");
  48.       x -= "1";
  49.       set(x add "adm" add y,aliencount);
  50.       if(x < "2")
  51.       {
  52.          aliends = "1";
  53.       }
  54.       setProperty("/aliens" add aliencount, _X, x * "4" + alienoffx);
  55.       set("alienx" add aliencount,x);
  56.    }
  57.    aliencount -= "1";
  58. }
  59.