SRL Archive - RS3 Outdated / Broken Scripts

Hey Guys i'm new at scripting so post what you think of my script its not much but hey it's my first scripts

Glad you used you first post for a script :).

[php]
procedure AutoTalk;
begin
if(IsFKeyDown(2))then
begin
TypeSend(Message1);
end;
if(IsFKeyDown(4))then
begin
TypeSend(Message2);
end;
if(IsFKeyDown(5))then
begin
TypeSend(Message3);
end;
end;[/php]

Correct me if i'm wrong, but won't that lag you? I don't have scar here but i know it works. Put some waits in there so it doesn't screw up if it does lag you. Also, you did well on this, go read a few tutorials on how to make a powerminer or something.

for the record, he didn't put waits in it because he coppied it from my tutorial things the beginner tuts don't teach you :p but nice signature :)

EDIT: Just tried my uber script and it doesen't lag! :p

Thx guys for the feed back i will keep that in mind about the lag and stuff i am still learning how to make other scripts and this script is not copied i did not put waits in because i dind't think i needed them… thx for the advice
hey321

 
procedure AutoTalk;
begin 
wait(1);
if(IsFKeyDown(2))then
begin
TypeSend(Message1);
end; 
wait(1);
if(IsFKeyDown(3))then
begin
TypeSend(Message2);
end; 
wait(1);
if(IsFKeyDown(4))then
begin
TypeSend(Message3);
end;
end;

added waits to it and fixed ur fkeys.. u said in ur script to use fkey 2,3 and 4, but in ur script it said if(isfkeydown(2)), 4, 5 wich might confuse some1 who dont know how to script or read them –.–

Thx for the help i'm been doing alot of school work so i have not much time to look at tutorials but thx for the feed back

ok Syberium ur way better at scripting than me but u DO NOT need to put waits in cuz u have to press down F2 F3 or whatever u set it to so it will type it than send it so NO LAG i posted something like this on JADs tut too :D but yeah Poider if u have MSN mine is [email]pwnt_by_pwnt@hotmail.com[/email] and i can help u with scripting :D

Yeah i do i have just added you… Where do you live cause i live in Australia so we might not be able to chat :(

if this is your first script, good work! keep it up! Btw once i made an autotalker that plays a sound and/or opens the trade when a trade has been found :D you can search for it if you want.
I didn't used TypeSend because it didn't typed numbers :s

i live in the USA poider but we can talk to each other on here :D ok well im gonna be looking at peoples scripts and maybe training my autoer :D ok well again i live in the USA

it's good but some people dont want to touch the keyboard at all when they want a auto talker
so instead of having it so you have to push a button make it do it on it's own and put in randomness
you can look at mine for some ideas but anything you copy i want my name mentioned plz
posted my script below
i'll take out the forms because they will mess you up if you have never seen them before

//directions
//put what you want to say in lines  9-12
//press play to start
//press F12 to stop
program AUTO-TALKER;
{.include SRL\SRL.Scar}

const
ms1='cyan:wave2:selling full rune-your rs name here';//put ur rs name after the -
ms2='white:wave2:selling full rune-your rs name here';
ms3='flash2:wave2:selling full rune-your rs name here';
ms4='green:wave2:selling full rune-your rs name here';


procedure namechange(wstatus :String);
begin
status(wstatus);
GetApplication.Title:=wstatus;
GetSelf.Caption:=wstatus;
end;

procedure change;
begin
namechange('Auto-Talker by Diamondhero6')
wait(50);
end;

procedure ThankYou;
begin
writeln('-------Auto-Talker-------')
writeln('-----by Diamondhero6-----')
writeln('- I know u will like it -')
writeln('@@##$$  Thank you  $$##@@')
writeln('         ENJOY           ')
end;

procedure send;
begin
case random(4) of // THIS ADDS RANDOMNESS SO IT WONT BE IN OREDER BUT TYPE IT RANDOMLY
0:TypeSend(ms1)
1:Typesend(ms2)
2:Typesend(ms3)
3:Typesend(ms4)
end;
end;



BEGIN
SetupSrl
cleardebug
Thankyou
change
SafeInitForm
repeat
send
wait(1000)
until(isfkeydown(12))
end.

Nice script i still havn't gotten the hang of the variables like string, integer and boolean if anyone could help me understand them by making a good tut i would be soooo happy :D





If you don't know how to find something :google: if you still don't know how then :f: you lol nah just jking look in the tut section :duh:

diamond i understand what ur saying but if u do it like that than thats kinda an easier way to get banned because if u just repeat the same thing over(well the random is good) than someone trade with u and ur still typing it than thats an easy ban so what he did is good cuz u need to be touching the mouse to trade with people and if u make all three say different things like selling full rune 200k!!!! <- (name here) and than like another one would say selling full rune! and like the last one say (name here) is selling full rune for 200k!!! and if u wanted to say one like 3 times in a row than his is better and i dont think anyone is too lazy to just press F2 or F3 or F4 or something when there playing runescape lol :D but its good that ur helping people :)

not if you make it accept trades which i am working on and i thought i did make them all differant o mayb not and some people will want to let it run for hours if it world like 2.

O and by the way these script was stolen, originally posted by JAD

EDIT:didn't realize JAD had already said that sorry.

From: JAD
program New;
{.include SRL/SRL.scar}
const
Message1 ='This Uber Tut Is Made By JAD!';
Message2 ='JAD is the Uber of Uberness!';
Message3 ='You are doing very well reading this Uber Tut by JAD!';
procedure AutoTalk;
begin
if(IsFKeyDown(2))then
begin
TypeSend(Message1);
end;
if(IsFKeyDown(4))then
begin
TypeSend(Message2);
end;
if(IsFKeyDown(5))then
begin
TypeSend(Message3);
end;
end;

begin
SetupSRL;
repeat
AutoTalk;
until(IsFKeyDown(12));
end.

Here the links, it's in his tut click here!

sorry to say but it is really my work ever heard the saying *Great Minds think alike*??