You could use the $[pointer.wx] and $[pointer.wy] variables.  I'm not
sure if there's a cleaner way.  It's kind of messy when the pointer
wasn't inside the window in the first place.

DestroyFunc PlaceAgainAnimAndWarp
AddToFunc PlaceAgainAnimAndWarp
+ I SetEnv tmpx $[pointer.wx]
+ I SetEnv tmpy $[pointer.wy]
+ I PlaceAgain Anim
+ I WarpToWindow $[tmpx]p $[tmpy]p
+ I UnSetEnv tmpx
+ I UnSetEnv tmpy

On 3/17/08, Tim Connors <[EMAIL PROTECTED]> wrote:
>
>  In the style of AnimatedMove x y [Warp], I wish to be able to bind CMS F3
>  in my case to Placeagain Anim, to move the window to a more convenient
>  location, but have the cursor follow that window.
>
>  I can almost fake it with:
>
>  AddToFunc "PlaceAgainAnimAndWarp" "I" PlaceAgain Anim
>  +                                 "I" WarpToWindow 20 20
>  Key F3          A       CMS     PlaceAgainAnimAndWarp
>
>  But, I'd rather the mouse didn't deviate from the original location in the
>  window at all.
>
>  Any thoughts?
>
>  --
>
> Tim Connors
>
>
>


-- 
Thanks,

Jonathan Kotta

Hofstadter's Law:
    It always takes longer than you expect, even
    when you take into account Hofstadter's Law.

Reply via email to