w0uter Posted April 21, 2005 Share Posted April 21, 2005 if i use the code below on my Windows ME machine i am able to move my mouse TROUGH the left side of the screen witch makes it REAPPEAR at the right (same goes for bottom->top, top->bottom and right->left) any idee what is cousing this. expandcollapse popupGlobal $Paused = 1 Func TogglePause() $Paused = Not $Paused While $Paused Sleep(100) WEnd $ms = MouseGetPos() EndFunc ;==>TogglePause HotKeySet("{PAUSE}", "TogglePause") While 1 While Not $paused $ms = MouseGetPos() $rr = Random(1, 8, 1) Select Case $rr = 1 MouseMove($ms[0] + 5, $ms[1] + 5, 0) MouseMove($ms[0] - 5, $ms[1] - 5, 0) Case $rr = 2 MouseMove($ms[0] + 5, $ms[1] - 5, 0) MouseMove($ms[0] - 5, $ms[1] + 5, 0) Case $rr = 3 MouseMove($ms[0] - 5, $ms[1] + 5, 0) MouseMove($ms[0] + 5, $ms[1] - 5, 0) Case $rr = 4 MouseMove($ms[0] - 5, $ms[1] - 5, 0) MouseMove($ms[0] + 5, $ms[1] + 5, 0) Case $rr = 5 MouseMove($ms[0] + 0, $ms[1] + 5, 0) MouseMove($ms[0] - 0, $ms[1] - 5, 0) Case $rr = 6 MouseMove($ms[0] - 0, $ms[1] - 5, 0) MouseMove($ms[0] + 0, $ms[1] + 5, 0) Case $rr = 7 MouseMove($ms[0] - 5, $ms[1] - 0, 0) MouseMove($ms[0] + 5, $ms[1] + 0, 0) Case $rr = 8 MouseMove($ms[0] + 5, $ms[1] - 0, 0) MouseMove($ms[0] - 5, $ms[1] + 0, 0) EndSelect WEnd WEnd My UDF's:;mem stuff_Mem;ftp stuff_FTP ( OLD );inet stuff_INetGetSource ( OLD )_INetGetImage _INetBrowse ( Collection )_EncodeUrl_NetStat_Google;random stuff_iPixelSearch_DiceRoll Link to comment Share on other sites More sharing options...
buzz44 Posted April 21, 2005 Share Posted April 21, 2005 (edited) I'm running XP and its fine, not that, that helps. What you are explaining reminds me alot of this script . It should have no effect on you cause your mouse is already doing it lol. _MouseWrap() Func _MouseWrap() While 1 $pos = MouseGetPos() If $pos[0] < 2 Then MouseMove(@DeskTopWidth - 2, $pos[1], 1) If $pos[0] > @DeskTopWidth - 2 Then MouseMove(2, $pos[1], 1) If $pos[1] < 2 Then MouseMove($pos[0], @DesktopHeight - 2, 1) If $pos[1] > @DeskTopHeight - 2 Then MouseMove($pos[0], 2, 1) Wend EndFunc Not my creation. Edited April 21, 2005 by Burrup qq Link to comment Share on other sites More sharing options...
therks Posted April 21, 2005 Share Posted April 21, 2005 Hmm, this used to happen on older versions of AutoIt. For example, I have a compiled version of this code: CODE#NoTrayIcon HotKeySet('!^{END}', 'CloseMe') Func CloseMe() Exit EndFunc Func DoIt() Global $i $i = $i + 1 $s = Round(sin($i/5)*5) $c = Round(cos($i/5)*5) $m = MouseGetPos() MouseMove($m[0]-$s, $m[1]+$c, 0) ToolTip($i) EndFunc While 1 DoIt() WEnd And when I run it, if I put my mouse in the corner of the screen it will jump around to all four corners. Yet, running this code with my current AutoIt installation, it does not actually jump around, it just sits in one corner. Heh, I had a lot of fun with that little code.. I put it in my Mom's startup folder. She was trying to close it with Task Manager, by right clicking on the process and selecting end. My AutoIt Stuff | My Github Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now