home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / 3lines.swf / scripts / DefineSprite_144 / frame_11 / DoAction.as
Encoding:
Text File  |  2005-10-06  |  648 b   |  47 lines
  1. switch(lev)
  2. {
  3.    case 1:
  4.       xmax = 4;
  5.       ymax = 4;
  6.       break;
  7.    case 2:
  8.       xmax = 6;
  9.       ymax = 6;
  10.       break;
  11.    case 3:
  12.       xmax = 8;
  13.       ymax = 8;
  14.       break;
  15.    case 4:
  16.       xmax = 12;
  17.       ymax = 8;
  18.       break;
  19.    default:
  20.       xmax = 17;
  21.       ymax = 8;
  22. }
  23. pai_max = xmax * ymax;
  24. i = 0;
  25. while(i < pai_max)
  26. {
  27.    pat[i] = 1 + Math.floor(i / 4);
  28.    i++;
  29. }
  30. i = 0;
  31. while(i < pai_max)
  32. {
  33.    r = Math.floor(Math.random() * pai_max);
  34.    tmp = pat[i];
  35.    pat[i] = pat[r];
  36.    pat[r] = tmp;
  37.    i++;
  38. }
  39. i = 0;
  40. while(i < 136)
  41. {
  42.    _pat[i] = pat[i];
  43.    i++;
  44. }
  45. gotoAndStop("play");
  46. play();
  47.