home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Classicos / bee_war.swf / scripts / frame_348 / DoAction.as
Encoding:
Text File  |  2002-02-08  |  4.4 KB  |  184 lines
  1. updateAfterEvent(mouseMove);
  2. setProperty("/qq", _X, _xmouse);
  3. if(0 >= _xmouse)
  4. {
  5.    setProperty("/qq", _X, 30.8);
  6. }
  7. if(_xmouse >= 700)
  8. {
  9.    setProperty("/qq", _X, 669.2);
  10. }
  11. Bird_left_x = getProperty(bird1, _X);
  12. Bat_left_x = getProperty(bad1, _X);
  13. Bug_left_x = getProperty(bug1, _X);
  14. if(Bird_left_x < Bat_left_x < Bug_left_x)
  15. {
  16.    left_x = Bird_left_x;
  17. }
  18. else if(Bat_left_x < Bug_left_x < Bird_left_x)
  19. {
  20.    left_x = Bat_left_x;
  21. }
  22. else if(Bug_left_x < Bat_left_x < Bird_left_x)
  23. {
  24.    left_x = Bug_left_x;
  25. }
  26. Bird_right_x = getProperty(bird7, _X);
  27. Bat_right_x = getProperty(bad7, _X);
  28. Bug_right_x = getProperty(bug8, _X);
  29. if(Bird_right_x < Bat_right_x < Bug_right_x)
  30. {
  31.    right_x = Bird_right_x;
  32. }
  33. else if(Bat_right_x < Bug_right_x < Bird_right_x)
  34. {
  35.    right_x = Bat_right_x;
  36. }
  37. else if(Bug_right_x < Bat_right_x < Bird_right_x)
  38. {
  39.    right_x = Bug_right_x;
  40. }
  41. if(direction == 1)
  42. {
  43.    if(50 >= left_x)
  44.    {
  45.       direction = 0;
  46.    }
  47.    else
  48.    {
  49.       i = 1;
  50.       while(6 >= i)
  51.       {
  52.          x3 = getProperty("ying" add i, _X);
  53.          setProperty("ying" add i, _X, x3 - 10);
  54.          i++;
  55.       }
  56.       i = 1;
  57.       while(7 >= i)
  58.       {
  59.          x1 = getProperty("bird" add i, _X);
  60.          x2 = getProperty("bat" add i, _X);
  61.          setProperty("bird" add i, _X, x1 - 10);
  62.          setProperty("bat" add i, _X, x2 - 10);
  63.          i++;
  64.       }
  65.       i = 1;
  66.       while(8 >= i)
  67.       {
  68.          x = getProperty("bug" add i, _X);
  69.          setProperty("bug" add i, _X, x - 10);
  70.          i++;
  71.       }
  72.    }
  73. }
  74. if(direction == 0)
  75. {
  76.    if(right_x >= 660)
  77.    {
  78.       direction = 1;
  79.    }
  80.    else
  81.    {
  82.       i = 1;
  83.       while(6 >= i)
  84.       {
  85.          x3 = getProperty("ying" add i, _X);
  86.          setProperty("ying" add i, _X, x3 + 10);
  87.          i++;
  88.       }
  89.       i = 1;
  90.       while(7 >= i)
  91.       {
  92.          x1 = getProperty("bird" add i, _X);
  93.          x2 = getProperty("bat" add i, _X);
  94.          setProperty("bird" add i, _X, x1 + 10);
  95.          setProperty("bat" add i, _X, x2 + 10);
  96.          i++;
  97.       }
  98.       i = 1;
  99.       while(8 >= i)
  100.       {
  101.          x = getProperty("bug" add i, _X);
  102.          setProperty("bug" add i, _X, x + 10);
  103.          i++;
  104.       }
  105.    }
  106. }
  107. if(eval("/:enemy_time") == 5)
  108. {
  109.    select = random(3) + 1;
  110.    if(select == 1)
  111.    {
  112.       bird_no = random(7) + 1;
  113.       if(eval("/bird" add bird_no add "/:bird_life") != 0)
  114.       {
  115.          set("/:enemy_time",0);
  116.          i = 1;
  117.          while(i < 31)
  118.          {
  119.             if(i == 1 or i == 30)
  120.             {
  121.                bird_x = getProperty("bird" add bird_no, _X);
  122.                set("/:b_b_no",eval("/:b_b_no") + 1);
  123.                duplicateMovieClip("bird_bullet","bird_bullet" add eval("/:b_b_no"),16384 + (eval("/:b_b_no") + 50));
  124.                setProperty("bird_bullet" add eval("/:b_b_no"), _X, bird_x - i + 15);
  125.                tellTarget(bird_program)
  126.                {
  127.                   play();
  128.                }
  129.             }
  130.             i++;
  131.          }
  132.       }
  133.    }
  134.    else if(select == 2)
  135.    {
  136.       bat_no = random(7) + 1;
  137.       if(eval("/bat" add bat_no add "/:bat_life") != 0)
  138.       {
  139.          set("/:enemy_time",0);
  140.          bat_x = getProperty("bat" add bat_no, _X);
  141.          set("/:b_b_no",eval("/:b_b_no") + 1);
  142.          duplicateMovieClip("bat_bullet","bat_bullet" add eval("/:b_b_no"),16384 + (eval("/:b_b_no") + 50));
  143.          setProperty("bat_bullet" add eval("/:b_b_no"), _X, bat_x - 5);
  144.          tellTarget(bat_program)
  145.          {
  146.             play();
  147.          }
  148.       }
  149.    }
  150.    else if(select == 3)
  151.    {
  152.       bug_no = random(8) + 1;
  153.       if(eval("/bug" add bug_no add "/:bug_life") != 0)
  154.       {
  155.          set("/:enemy_time",0);
  156.          bug_x = getProperty("bug" add bug_no, _X);
  157.          set("/:b_b_no",eval("/:b_b_no") + 1);
  158.          duplicateMovieClip("bug_bullet","bug_bullet" add eval("/:b_b_no"),16384 + (eval("/:b_b_no") + 50));
  159.          setProperty("bug_bullet" add eval("/:b_b_no"), _X, bug_x);
  160.          tellTarget(bug_program)
  161.          {
  162.             play();
  163.          }
  164.       }
  165.    }
  166. }
  167. else
  168. {
  169.    set("/:enemy_time",eval("/:enemy_time") + 1);
  170. }
  171. if(eval("/:hammer_control") < 0)
  172. {
  173.    set("/:hammer_control",0);
  174. }
  175. else if(eval("/:hammer_control") == 2)
  176. {
  177.    set("/:hammer_number",eval("/:hammer_number") + 1);
  178.    set("/:hammer_control",0);
  179. }
  180. if(eval("/:level_con") >= 36)
  181. {
  182.    gotoAndPlay(396);
  183. }
  184.