home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / rubiks_cube.swf / scripts / frame_23 / DoAction.as
Encoding:
Text File  |  2006-09-05  |  496 b   |  26 lines

  1. isok = "0";
  2. iii = "1";
  3. while("6" >= iii)
  4. {
  5.    ccc = int(eval("kub" add iii add "1" add "1") / "100");
  6.    jjj = "1";
  7.    while("3" >= jjj)
  8.    {
  9.       kkk = "1";
  10.       while("3" >= kkk)
  11.       {
  12.          cijk = int(eval("kub" add iii add jjj add kkk) / "100");
  13.          isok += ccc - cijk;
  14.          if(isok != "0")
  15.          {
  16.             iii = "6";
  17.             jjj = "3";
  18.             kkk = "3";
  19.          }
  20.          kkk += "1";
  21.       }
  22.       jjj += "1";
  23.    }
  24.    iii += "1";
  25. }
  26.