Sign in to follow this  
Followers 0
Guest aerosmith_freak_03

Newbie Needs Help

3 posts in this topic

I have pretty much next to no clue how to do this but I would like to learn. It's been about three years since my VB programming class and I can't remember the exact syntax for n e thing. What I want to do is enter a cheat while playing the 'Sims.' To enter a cheat you have to press 'ctrl' + 'shift' + 'c', from there 'rosebud' is the cheat for 1000 dollars, you can repeat the previous cheat once by entering '!' and many times by entering '!;!;!;!'...etc,etc. I want to create a script to automatically put in the '!;!;!;' part of the cheat, it gives 255 char. to work with so I want to enter the max amount. All I need it to do is essentially paste the char. there for me, I think I can handle the almighty task of hitting enter. I want to set this up so I use a hotkey to enter it. Can n e one tell me what to do or kinda walk me through this?

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

AutoItSetOption("SendKeyDelay", 20);
$blah = 0;
Global $open = 0;
Global $rosebud = 0;
Global $key = "^1"; Hotkey is Ctrl 1
Global $done = 0;
Global $limit = 1;
Do
HotKeySet ( $key , "moolaa" )
Sleep(2147483647);
Until $blah = 1;

Func moolaa()

Do

If $open = 0 Then
    Send("^+c")
Endif
    If $rosebud = 0 Then
  $rosebud = 0;
    Else
  $rosebud = 2;
    Endif


If $rosebud = 0 Then
    Send("rosebud");
    Send ("{Enter}");
    $rosebud = 1;
Endif

If $rosebud = 2 Then
    Send("!;", 1 );
    $limit = $limit + 1;
    $open = 1;
Endif

If $limit = 127 Then
    Send("!", 1 );
    Send ("{Enter}");
    $done = 1;
    $open = 0;
Endif

Until $done = 1;

$done = 0;
$limit = 1;

EndFunc

Edited by KnowledgeSponge

Share this post


Link to post
Share on other sites

That is awesome man. Thanks a million, now my hand won't cramp up while a make millions, thanks.

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  
Followers 0