home *** CD-ROM | disk | FTP | other *** search
- side = eval("../:side");
- pos = getProperty("../../", _X);
- §§push(side eq "l");
- if(side eq "l")
- {
- §§pop();
- §§push("85" < pos);
- }
- if(§§pop())
- {
- set("/:force",eval("/:force") + "30");
- gotoAndStop(3);
- }
- §§push(side eq "r");
- if(side eq "r")
- {
- §§pop();
- §§push(pos < "-85");
- }
- if(§§pop())
- {
- set("/:force",eval("/:force") - "30");
- gotoAndStop(3);
- }
-