taultunleashed logoScripts : Myth of Soma - Discussion
newtopic  postreply
 [ 12 posts ] 
blue large dot

Scripts : Myth of Soma - Discussion

Posted: November 3rd, 2004, 8:56 am
 
toothpaste
toothpaste's Reps:
User avatar
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
(!empty($user->lang['CODE'])) ? $user->lang['CODE'] : ucwords(strtolower(str_replace('_', ' ', 'CODE'))):
RMouseDown
RMouseUp
?
Also, could anybody tell me how I could find the coordinates of the cursor on screen please?


Reply with quote
Posted: November 3rd, 2004, 8:57 am
 
wyvernx

Total Posts: 6718
Joined: May 1st, 2004, 4:00 am
wyvernx's Reps: 21
User avatar
administrator
premium
DI ( ie for soma) scripts are bugged ATM, admin is working on it.

_________________
Use Search first, ask questions later!


Reply with quote
Posted: November 3rd, 2004, 9:01 am
 
acepower

Total Posts: 113
Joined: May 1st, 2004, 4:00 am
acepower's Reps: 0
User avatar
Lifetime Member (Guides)
premium
cud of tolled that tooth :P

_________________
keeping Gaming esy 4 u


Reply with quote
Posted: November 3rd, 2004, 9:08 am
 
toothpaste
toothpaste's Reps:
User avatar
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.


Reply with quote
Posted: November 3rd, 2004, 10:03 am
 
pain
pain's Reps:
User avatar
toothpaste";p="47583 (!empty($user->lang['WROTE'])) ? $user->lang['WROTE'] : ucwords(strtolower(str_replace('_', ' ', 'WROTE'))):
... how would I go about writing a script that would right click until I tell it to stop? Would I just write
(!empty($user->lang['CODE'])) ? $user->lang['CODE'] : ucwords(strtolower(str_replace('_', ' ', 'CODE'))):
RMouseDown
RMouseUp
?
Also, could anybody tell me how I could find the coordinates of the cursor on screen please?


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


Reply with quote
Posted: November 3rd, 2004, 11:18 am
 
toothpaste
toothpaste's Reps:
User avatar
Great! Thanks, Pain.


Reply with quote
Posted: November 3rd, 2004, 11:20 am
 
wyvernx

Total Posts: 6718
Joined: May 1st, 2004, 4:00 am
wyvernx's Reps: 21
User avatar
administrator
premium
search does work

_________________
Use Search first, ask questions later!


Reply with quote
Posted: November 3rd, 2004, 12:09 pm
 
toothpaste
toothpaste's Reps:
User avatar
I thought the search function was removed because a skiddie had their way with it? Thanks for the info ^^;


Reply with quote
Posted: November 7th, 2004, 3:06 pm
 
j0n0
j0n0's Reps:
User avatar
Were you make scripts oO


Reply with quote
Posted: November 7th, 2004, 3:26 pm
 
toothpaste
toothpaste's Reps:
User avatar
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.


Reply with quote
Posted: November 30th, 2004, 8:07 am
 
snyd
snyd's Reps:
User avatar
pain";p="47597 (!empty($user->lang['WROTE'])) ? $user->lang['WROTE'] : ucwords(strtolower(str_replace('_', ' ', 'WROTE'))):
toothpaste";p="47583 (!empty($user->lang['WROTE'])) ? $user->lang['WROTE'] : ucwords(strtolower(str_replace('_', ' ', 'WROTE'))):
... how would I go about writing a script that would right click until I tell it to stop? Would I just write
(!empty($user->lang['CODE'])) ? $user->lang['CODE'] : ucwords(strtolower(str_replace('_', ' ', 'CODE'))):
RMouseDown
RMouseUp
?
Also, could anybody tell me how I could find the coordinates of the cursor on screen please?


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




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 :)


Reply with quote
Posted: January 12th, 2005, 1:32 pm
 
matiesthe1
matiesthe1's Reps:
User avatar
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


Reply with quote
Want Advertisements After The Last Post Removed? Create A Free Account!

blue large dot Who is online
Users browsing this forum: No registered users and 13 guests

cron
Popular Sections
SWTOR Cheats
Guild Wars 2 Cheats
Guild Wars 2 Hacks
Guild Wars 2 Bots
Diablo 3 Cheats
Guild Wars 2 Mods

Popular Sections
WoW Cataclysm Cheats & Exploits
WoW Cataclysm Hacks & Bots
Star Wars The Old Republic Cheats
SWTOR Mods
Torchlight 2 Cheats
SWTOR Space Mission Bots
Site Nav and RSS
RSS Feed of Myth of Soma - Discussion RSS Feed 
Sitemap of Myth of Soma - Discussion Sitemap 
SitemapIndex SitemapIndex
RSS Feed RSS Feed
Channel list Channel list
left bottom corner Site and Contents Copyright 2001-2012 All Rights Reserved TaultUnleashed.com bottom corner
top left
top right
createaccount
Username:   Password:   Remember Me?