Saltyspoons
2012-04-18 19:18:36
Hello.
After reading Coh3n's guide for beginners, here is what I have come up with.
EDIT: You type in your message, and desired hotkey.
Run the script, and press the hotkey whenever you want the message to be printed.
I like this better than using repeating intervals, because you have complete control over when the messaged is printed
and choose your own interval.
After reading Coh3n's guide for beginners, here is what I have come up with.
EDIT: You type in your message, and desired hotkey.
Run the script, and press the hotkey whenever you want the message to be printed.
I like this better than using repeating intervals, because you have complete control over when the messaged is printed
and choose your own interval.
program SaltyTyper; //All credit goes to Coh3n @ Villavu
Const
////////////// USER SETTINGS /////////////////
MESSAGE = ('Your message here.');
HOTKEY = ('F4'); // Use a hotkey to print your message.
// Change this to any F key (1-9)
// Want the bot to type the message, but not send it? Comment out line 60.
////////////// USER SETTINGS /////////////////
var
Key: Integer;
procedure WhatKey;
begin
case (HotKey) of
'F1':
Key:= 112;
'F2':
Key := 113; //I do not recommend using F2. This is the default key for "stop" in Simba.')
'F3':
Key := 114;
'F4':
Key := 115;
'F5':
Key := 116;
'F6':
Key := 117;
'F7':
Key := 118;
'F8':
Key := 119;
'F9':
Key := 120;
end;
end;
procedure AutoType;
begin
repeat
WhatKey;
If IsKeyDown(Key) = true then
begin
Sendkeys(Message, 50);
PressKey(13);
end;
until(false);
end;
begin
AutoType;
end.