xy

[erik hansen]

thanks, i'll try that.

--- Nelson Zink <zink at newmex.com> wrote:
> Erik,
> 
> > any MC analogues for the xy handler?
> 
> on xy
>   set cursor to cross
>   set the numberformat to "0.##"
>   --set the height of msg for three lines
>   put the mouseloc into temp
>   repeat until the mouseclick
>     put "Loc: "&the mouseloc&"  Horz: "&the
> mouseH&"  Vert: "&the mouseV
> into temp2
>     put the mouseH-item 1 of temp into XD
>     put the mouseV-item 2 of temp into YD
>     put "Xdist: "&XD&"   YDist: "&YD&"   Angle:
> "&90-(round(atan2(abs(XD),abs(YD))*180/pi))
> into line 2 of temp2
>     put (XD^2 + YD^2)^.5 into temp3
>     put "XYDist: "&temp3 &" pixels, "&(temp3
> /72)& " inches" into line 3 of
> temp2
>     put temp2
>   end repeat
> end xy
> 
> Here's one that does a little more. I don't
> know how to set the message box
> height so it will automatically display the
> three lines. If you do, stick
> that line in.


=====
erik at erikhansen.org                 http://www.erikhansen.org

__________________________________________________
Do You Yahoo!?
Send FREE video emails in Yahoo! Mail!
http://promo.yahoo.com/videomail/