home *** CD-ROM | disk | FTP | other *** search
/ Practical Internet Web Designer 90 / PIWD90.iso / mac / contents / flash / utilities / Flash_source / dupball1.swf / scripts / frame_2 / DoAction.as
Text File  |  2003-12-15  |  563b  |  22 lines
  1. if(Number(num) > 25)
  2. {
  3.    num = 0;
  4. }
  5. if(Number(x) > 400)
  6. {
  7.    x = 0;
  8.    y = Number(y) + 40;
  9. }
  10. if(Number(y) > 400)
  11. {
  12.    y = 0;
  13. }
  14. duplicateMovieClip("/ball","ball" add eval("/:num"),16384 + eval("/:num"));
  15. setProperty("/ball" add eval("/:num"), _X, x);
  16. setProperty("/ball" add eval("/:num"), _Y, y);
  17. setProperty("/ball" add eval("/:num"), _rotation, Number(random(350)) + 10);
  18. setProperty("/ball" add eval("/:num"), _xscale, Number(random(45)) + 45);
  19. set("/:num",Number(eval("/:num")) + 1);
  20. set("/:x",Number(eval("/:x")) + 40);
  21. gotoAndPlay(1);
  22.