home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 January / Chip_2003-01_cd1.bin / oddech / bechpack / bechpack.exe / scripts / frame_1082 / DoAction.as
Text File  |  2002-10-29  |  374b  |  26 lines
  1. i = 1;
  2. while(Number(count) >= Number(i))
  3. {
  4.    removeMovieClip(i);
  5.    i = Number(i) + 1;
  6. }
  7. i = 1;
  8. while(Number(level * 3) >= Number(i))
  9. {
  10.    removeMovieClip("/s" add i);
  11.    i = Number(i) + 1;
  12. }
  13. if(Number(count) == 20)
  14. {
  15.    level = Number(level) + 1;
  16. }
  17. else
  18. {
  19.    life -= 1;
  20.    if(Number(life) == 0)
  21.    {
  22.       gotoAndStop(1099);
  23.    }
  24. }
  25. call("start");
  26.