home *** CD-ROM | disk | FTP | other *** search
- x = getProperty("/ufo1/", _X);
- y = getProperty("/ufo1/", _Y);
- myx = x1 + eval("../:x");
- myy = y1 + eval("../:y");
- top = myy - height;
- left = myx - width;
- dx = myx - x;
- dy = myy - y;
- slope = (x - left) * m;
- xtolerance = width + eval("/:ufowidth");
- ytolerance = height + eval("/:ufoheight");
- if(dx < xtolerance and - xtolerance < dx and dy < ytolerance and - ytolerance < dy and top + slope < y)
- {
- call("crash");
- }
-