home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Classicos / AllienAttack.swf / scripts / frame_10 / DoAction.as
Encoding:
Text File  |  2006-06-13  |  563 b   |  32 lines
  1. n = 0;
  2. limit = 0;
  3. while(Number(n) < 55)
  4. {
  5.    if(eval("f" add n) == 1)
  6.    {
  7.       set("x" add n,eval("x" add n) + dir);
  8.       if(eval("x" add n) == 316 or eval("x" add n) == 24)
  9.       {
  10.          limit = 1;
  11.       }
  12.    }
  13.    n = Number(n) + 1;
  14. }
  15. if(Number(limit) == 1)
  16. {
  17.    n = 0;
  18.    dir = - dir;
  19.    while(Number(n) < 55)
  20.    {
  21.       if(eval("f" add n) == 1)
  22.       {
  23.          set("y" add n,eval("y" add n) + 12);
  24.          if(eval("y" add n) == 330)
  25.          {
  26.             gameover = 3;
  27.          }
  28.       }
  29.       n = Number(n) + 1;
  30.    }
  31. }
  32.