home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Media Share 9
/
MEDIASHARE_09.ISO
/
dbase
/
nonlin24.zip
/
POSITION.NLR
< prev
next >
Wrap
Text File
|
1993-06-29
|
469b
|
16 lines
Title Find Position of Object Using Direction from Observers
Register ! Please register your use
Variable Xo ! X position of observer
Variable Yo ! Y position of observer
Variable Dir ! Direction to object (compass degrees)
Parameter Xp ! X position of object
Parameter Yp ! Y position of object
Function abs(tan(rad(90-Dir))*Xp - Yp + Yo - tan(rad(90-dir))*Xo) / ;
sqrt(tan(rad(90-dir))^2 + 1)
Data
1 7 108
2 5 064
1 2 037
3 1 011
5 3 341