home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / MemoryDOGs.swf / scripts / frame_5 / DoAction.as
Encoding:
Text File  |  2001-07-16  |  687 b   |  32 lines
  1. stop();
  2. pos_1_1 = "2";
  3. pos_1_2 = "3";
  4. pos_1_3 = "4";
  5. pos_1_4 = "2";
  6. pos_2_1 = "6";
  7. pos_2_2 = "1";
  8. pos_2_3 = "3";
  9. pos_2_4 = "6";
  10. pos_3_1 = "5";
  11. pos_3_2 = "7";
  12. pos_3_3 = "8";
  13. pos_3_4 = "7";
  14. pos_4_1 = "5";
  15. pos_4_2 = "8";
  16. pos_4_3 = "4";
  17. pos_4_4 = "1";
  18. run = "1";
  19. while(run < "1000")
  20. {
  21.    pos_x_1 = random("4") + "1";
  22.    pos_y_1 = random("4") + "1";
  23.    pos_x_2 = random("4") + "1";
  24.    pos_y_2 = random("4") + "1";
  25.    old_1 = eval("pos_" add pos_x_1 add "_" add pos_y_1);
  26.    old_2 = eval("pos_" add pos_x_2 add "_" add pos_y_2);
  27.    set("pos_" add pos_x_1 add "_" add pos_y_1,old_2);
  28.    set("pos_" add pos_x_2 add "_" add pos_y_2,old_1);
  29.    run += "1";
  30. }
  31. play();
  32.