home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Nave / Graviton.swf / scripts / DefineSprite_80 / frame_3 / DoAction.as
Encoding:
Text File  |  2005-08-05  |  498 b   |  13 lines
  1. y = _Y;
  2. x = _X;
  3. if(eval("/:tractorlength") < getProperty("/tether/", _xscale) or eval("/:tractorlength") < getProperty("/tether/", _yscale))
  4. {
  5.    set("/:forcex",eval("/:forcex") + (x - getProperty("/ufo1/", _X)) * eval("/:tension") * eval("/:friction"));
  6.    set("/:forcey",eval("/:forcey") + (y - getProperty("/ufo1/", _Y)) * eval("/:tension") * eval("/:friction"));
  7. }
  8. vy += eval("/:gravity") / "20";
  9. y = y + vy / "10" - eval("/:forcey");
  10. _Y = y;
  11. x = x + vx - eval("/:forcex");
  12. _X = x;
  13.