Scripts : Myth of Soma - Discussion

Sorry for being a noob and everything, but how would I go about writing a script that would right click until I tell it to stop? Would I just write ?
Also, could anybody tell me how I could find the coordinates of the cursor on screen please?

DI ( ie for soma) scripts are bugged ATM, admin is working on it.

cud of tolled that tooth

Bah.. How unfair
Ok, I guess I can deal with that, but how do I make my macros speed up? Sorry, search function has been removed from the forums.

[quote="toothpaste";p="47583"]... how would I go about writing a script that would right click until I tell it to stop? Would I just write ?
Also, could anybody tell me how I could find the coordinates of the cursor on screen please?[/quote]

Getting the cursor position is:
XUScriptHost.GetCursorPos(oX As Variant, oY As Variant)

And your script should look like this:

Dim PosX, PosY 'define Variables

Do
XUScriptHost.GetCursorPos(PosX, PosY) ' Get actual screen position
XUScriptHost.RMouseDown PosX, PosY ' click right mouse button
XUScriptHost.Sleep 300 ' wait for 300ms to get the system ready
XUScriptHost.RMouseUp PosX, PosY 'release right mouse button
XUScriptHost.Sleep 300 ' wait for 300ms to get the system ready
Loop


This script should run continously until you press F12 (which is the default exit key for the script launcher)

Regards,
Pain

Great! Thanks, Pain.

search does work

I thought the search function was removed because a skiddie had their way with it? Thanks for the info ^^;

Were you make scripts oO

Pretty much any text editor.. I use Notepad. :p Just save the document as .vbs and you will have yourself a script for XU. Of course, however, the script needs to be written properly for it to function correctly.

[quote="pain";p="47597"][quote="toothpaste";p="47583"]... how would I go about writing a script that would right click until I tell it to stop? Would I just write ?
Also, could anybody tell me how I could find the coordinates of the cursor on screen please?[/quote]

Getting the cursor position is:
XUScriptHost.GetCursorPos(oX As Variant, oY As Variant)

And your script should look like this:

Dim PosX, PosY 'define Variables

Do
XUScriptHost.GetCursorPos(PosX, PosY) ' Get actual screen position
XUScriptHost.RMouseDown PosX, PosY ' click right mouse button
XUScriptHost.Sleep 300 ' wait for 300ms to get the system ready
XUScriptHost.RMouseUp PosX, PosY 'release right mouse button
XUScriptHost.Sleep 300 ' wait for 300ms to get the system ready
Loop


This script should run continously until you press F12 (which is the default exit key for the script launcher)

Regards,
Pain[/quote]



I cant get this to work -_- Did u get it to work in soma Tooth?

And could u plz tell me exactly what to write in the vbs file? plz :/

ty

ok i am a noob how do i get the scrip to run as a macro? i only had xu for bout 2days need all da help i can get xD ty