home *** CD-ROM | disk | FTP | other *** search
/ One Click 21 (Special) / OC021.iso / Juegos / anik.swf / scripts / frame_10 / DoAction.as
Encoding:
Text File  |  2005-11-18  |  486 b   |  35 lines
  1. i = 122;
  2. while(i < 130)
  3. {
  4.    colo[i] = 8;
  5.    i++;
  6. }
  7. i = 112;
  8. while(i < 120)
  9. {
  10.    set("/:color",random(eval("/:ckind")) + 1);
  11.    tellTarget("/webby/web" add i)
  12.    {
  13.       gotoAndStop(eval("/:color"));
  14.    }
  15.    colo[i] = eval("/:color");
  16.    i++;
  17. }
  18. j = 1;
  19. while(j < 11)
  20. {
  21.    i = 2;
  22.    while(i < 10)
  23.    {
  24.       k = i + a;
  25.       tellTarget("/webby/web" add k)
  26.       {
  27.          gotoAndStop(7);
  28.       }
  29.       colo[k] = 7;
  30.       i++;
  31.    }
  32.    a += 10;
  33.    j++;
  34. }
  35.