home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 October / Chip_2001-10_cd1.bin / internet / flashland / tipy / hry / flashbreak4.swf / scripts / frame_11 / DoAction.as
Text File  |  2000-01-01  |  624b  |  28 lines
  1. xspeed = "1";
  2. border = "150";
  3. bricknumber = "50";
  4. Level_index += "1";
  5. c = "0";
  6. r = "0";
  7. count = "1";
  8. while(r < "5")
  9. {
  10.    while(c < "10")
  11.    {
  12.       if(c >= r and c < "5" or c >= "5" and "9" - r >= c)
  13.       {
  14.          duplicateMovieClip("/brick","brick" add r add c,count + "1" + 16384);
  15.       }
  16.       else
  17.       {
  18.          duplicateMovieClip("/brickgreen","brick" add r add c,count + "1" + 16384);
  19.       }
  20.       setProperty("brick" add r add c, _X, "220" + "40" * c);
  21.       setProperty("brick" add r add c, _Y, "50" + "20" * r);
  22.       count += "1";
  23.       c += "1";
  24.    }
  25.    r += "1";
  26.    c = "0";
  27. }
  28.