home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Classicos / ZanyAttack.swf / scripts / DefineSprite_155 / frame_25 / DoAction.as
Encoding:
Text File  |  2006-06-13  |  1.1 KB  |  42 lines
  1. enemyTurn = "0";
  2. enemyLanded = "0";
  3. enemyCount = "0";
  4. while(enemyCount < eval("/:numberEnemies"))
  5. {
  6.    if(eval("/enemyGrid/enemy" add enemyCount add ":alive") == "1")
  7.    {
  8.       tellTarget("/enemyGrid/enemy" add enemyCount)
  9.       {
  10.          play();
  11.       }
  12.       enemyYPos = getProperty("/enemyGrid/enemy" add enemyCount, _Y) + enemyGridYPos;
  13.       if(enemyYPos >= "335")
  14.       {
  15.          enemyLanded = "1";
  16.       }
  17.       enemyXPos = getProperty("/enemyGrid/enemy" add enemyCount, _X) + enemyGridXPos;
  18.       if("30" >= enemyXPos and eval("/:enemyGridDirection") == - "1" or enemyXPos >= "570" and eval("/:enemyGridDirection") == "1")
  19.       {
  20.          enemyTurn = "1";
  21.       }
  22.    }
  23.    enemyCount += "1";
  24. }
  25. if(enemyTurn == "1")
  26. {
  27.    if(enemyLanded == "1")
  28.    {
  29.       setProperty("/enemyGrid", _Y, enemyGridYPos + "40");
  30.       call("EnemyLand");
  31.    }
  32.    else
  33.    {
  34.       setProperty("/enemyGrid", _Y, enemyGridYPos + "25");
  35.       set("/:enemyGridDirection",eval("/:enemyGridDirection") * (- "1"));
  36.    }
  37. }
  38. else
  39. {
  40.    setProperty("/enemyGrid", _X, enemyGridXPos + "10" * eval("/:enemyGridDirection"));
  41. }
  42.