Jump to content
Sign in to follow this  
darood

simple script

Recommended Posts

darood

Hi everyone

would appreciate your help in giving me the script to a very basic task. When i press a hotkey the script will run as follows :

get my current mouse position (it could be anywhere on my screen)

move it to a position i specify

double click

then move back to the original cursor position

thanks again guys for the help

Share this post


Link to post
Share on other sites
PhoenixXL

Here we Go

Code:

Global $x=20,$y=50   ;Your Double Click Positions
Opt('MustDeclareVars', 1)
HotKeySet('+z','_main')    ;Shift+Z
While 1
Sleep(1000)
WEnd
Func _main()
Local $spos
$spos=MouseGetPos()
MouseClick('Left',$x,$y,2,0)
MouseMove($spos[0],$spos[1],0)
EndFunc   ;==>_MainX
Edited by PhoenixXL

My code:

PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.

Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners.

MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. 

Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression.

Share this post


Link to post
Share on other sites
darood

hi phoenix

many thanks for the quick response. can i add a couple more features please with your help :

- after moving the mouse back to the original position i would like it to idle or do nothing for say 6 seconds then reloop again

- keep this loop going until i stop the script by pressing a hotkey say shift X

many many thanks again

Share this post


Link to post
Share on other sites
PhoenixXL

okay

code

Global $x=20,$y=50   ;Your Double Click Positions
Opt('MustDeclareVars', 1)
HotKeySet('+z','_main') ;Shift+Z
HotKeySet('+x','_exit') ;Shift+X
While 1
Sleep(1000)
WEnd
Func _main()
HotKeySet('+z')
Local $spos
$spos=MouseGetPos()
MouseClick('Left',$x,$y,2,0)
MouseMove($spos[0],$spos[1],0)
Sleep(6000)
HotKeySet('+z','_main')
EndFunc   ;==>_MainX
Func _exit()
Exit
EndFunc
Edited by PhoenixXL

My code:

PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.

Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners.

MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. 

Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression.

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
Sign in to follow this  

×