Jump to content
Bonez2k6

Lock Axis

Recommended Posts

Bonez2k6

Found this just by googling locking mouse axis. It is exactly the way I need it except I need the Y Axis. Someone have an idea?? Thanks!!

 

HotKeySet("{f1}", "lockmouse" )
HotKeySet("{f2}", "unlockmouse" )
HotKeySet("{f3}", "exitprog" )

Global $yaxis = "400"
Global $loop = 0

while 1
    sleep( 100 )
Wend

Func lockmouse()
    $loop = 1
    while $loop = 1
        $y = MouseGetPos ( 0 )
        MouseMove ( $xaxis, $y, 0 )
    Wend
EndFunc

Func unlockmouse()
    $loop = 0
EndFunc

Func exitprog()
    exit
EndFunc

Share this post


Link to post
Share on other sites
Bonez2k6

Sorry it is this code. I tried to rewrite it myself but had zero luck.

 

HotKeySet("{f1}", "lockmouse" ) 
HotKeySet("{f2}", "unlockmouse" ) 
HotKeySet("{f3}", "exitprog" )

Global $yaxis = "400"
Global $loop = 0

while 1
    sleep( 100 )
Wend

Func lockmouse()
    $loop = 1
    while $loop = 1
        $x = MouseGetPos ( 0 )
        MouseMove ( $x, $yaxis , 0 )
    Wend
EndFunc

Func unlockmouse()
    $loop = 0
EndFunc

Func exitprog()
    exit
EndFunc

Share this post


Link to post
Share on other sites
Melba23

Bonez2k6,

Welcome to the AutoIt forums.

Adjust the MouseGetPos parameter - look in the Help file to see what it does.

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites
Bonez2k6

OK I tried changing it to a 1, and tried changing the x to a y and it didn't work. yes I have no idea. I even tried googling it and youtubed it so it wasn't from a lack of effort lol.

 

Bonez

Share this post


Link to post
Share on other sites
Melba23

Bonez2k6,

Looking in more detail, your original code was flawed and used the incorrect parameter - you did try it before posting?

Anyway - lock x-axis:

HotKeySet("{f1}", "lockmouse")
HotKeySet("{f2}", "unlockmouse")
HotKeySet("{f3}", "exitprog")

Global $xaxis = "400"
Global $loop = 0

While 1
    Sleep(100)
WEnd

Func lockmouse()
    $loop = 1
    While $loop = 1
        $y = MouseGetPos(1)
        MouseMove($xaxis, $y, 0)
    WEnd
EndFunc   ;==>lockmouse

Func unlockmouse()
    $loop = 0
EndFunc   ;==>unlockmouse

Func exitprog()
    Exit
EndFunc   ;==>exitprog

Lock y-axis:

HotKeySet("{f1}", "lockmouse")
HotKeySet("{f2}", "unlockmouse")
HotKeySet("{f3}", "exitprog")

Global $yaxis = "400"
Global $loop = 0

While 1
    Sleep(100)
WEnd

Func lockmouse()
    $loop = 1
    While $loop = 1
        $x = MouseGetPos(0)
        MouseMove($x, $yaxis, 0)
    WEnd
EndFunc   ;==>lockmouse

Func unlockmouse()
    $loop = 0
EndFunc   ;==>unlockmouse

Func exitprog()
    Exit
EndFunc   ;==>exitprog

M23

P.S. When you post code in future please use Code tags - see here how to do it.  Then you get a scrolling box and syntax colouring as you can see above.

 


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites
Bonez2k6

TYVM Melba. My apologies for not using code tags.

Bonez

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now

×