PDA

View Full Version : My first attempt at giving back to SRL



Deni_mulic
04-23-2007, 10:03 AM
Yeah after autoing a ton i decided to give back to the community with a simple, crummy Auto Talker, Gonna restart my power miner soon, After accidentally deleting it :(

Attached.

Johura
04-23-2007, 01:14 PM
I know its a first script but i think we have enough auto talkers for a life time.... Also you might want to read a tut on scar standards - a way of organising your script. Here i fixed you standards for you.

program DenisSCRATShiteComparedtotheRestAutoTalker;

{Setup: Specify RS client
Type what u want to spam on line 27
Change i to how many times u want ur message typed on
line 30, Default is 5, Look out for updates :P
Remember this is my first script
Thanks to WhoCares357 For the unmatched Scar Tutorial
Also Thanks to moparisthebest community for getting
me into Scar.
Special Thanks to Kaitnieks for makin SCAR :)
What is does: Types the message you put on line 27.}

{.include SRL\SRL.scar}

var i: integer;

procedure SpamThis(Msg: string);
begin
Typesend(Msg);
end;


begin
i := 0;
repeat
i := i + 1;

begin
SpamThis('InsertMsgHere');
Wait(1000 + Random(200));
end;
until (i >= 5);
ClearDebug;
WriteLn('Thanks for using Deni mulics aka r00nbois SCRAT :)')
end. :)

LordGregGreg
07-16-2007, 01:52 AM
I am really glad you have started to learn how to script!
Sure, we have millions of auto talkers, but the point is, it is a simple little script great to start with!

keep up the great work! You can read some tuts and get more and mor advaced :) Thanks for your effort learning to script, great rewards lie ahead if you continue.

mamoth95
07-17-2007, 05:28 AM
oh rewards i want in on that im gona go to library tomorow and get every book they have on pascal language seeing how i dont know anytin about it witch is probly a problem and im bored!

drnewheart
08-13-2007, 02:33 AM
Ya There Are ALOT of autotalkers but hey your giving back to the community and thats great to see. Congrats On Your First Script.