home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Diversos / catch_flies.swf / scripts / DefineSprite_6 / frame_2 / DoAction.as
Encoding:
Text File  |  2006-06-13  |  622 b   |  26 lines
  1. dirand = random(4);
  2. distancex = random(50) + 50;
  3. distancey = random(50) + 50;
  4. currentspotx = eval(thisfly add ":_x");
  5. currentspoty = eval(thisfly add ":_y");
  6. if(dirand eq "1")
  7. {
  8.    finaldestx = currentspotx - distancex;
  9.    finaldesty = currentspoty - distancey;
  10. }
  11. else if(dirand eq "0")
  12. {
  13.    finaldestx = currentspotx + distancex;
  14.    finaldesty = currentspoty + distancey;
  15. }
  16. else if(dirand eq "2")
  17. {
  18.    finaldestx = currentspotx + distancex;
  19.    finaldesty = currentspoty - distancey;
  20. }
  21. else if(dirand eq "3")
  22. {
  23.    finaldestx = currentspotx - distancex;
  24.    finaldesty = currentspoty + distancey;
  25. }
  26.