SRL Archive - RS3 Outdated / Broken Scripts

Response library


Championship

2008-06-11 04:01:58

I was thinking that maybe we could make a list of Responses to other players questions and statements so that you could easily add it to scripts to make a good auto responder

M_Back

2008-06-11 07:20:12

That would be especialy good for those 2 worlds were you only can use the quick response, not normal chat were you write.

mastaraymond

2008-06-11 08:52:02

There are several around.. It's quite a hard job.. But it's possible :). AI!

n3ss3s

2008-06-11 09:15:29

AutoRespond.scar, anyone?

JuKKa

2008-06-11 09:16:56

If(InChat('hi'))Then
TypeSend('hello');

bunch of those. Of couse make 10 different answers and randomly choose one.

Waddo

2008-06-11 09:20:32

yes i was thinking about that yesterday we need to get that padded out

but we should use proper words ad spelling mistakes

and not things like homie stupid stuff

when you start syaing stuff liein timothegreats auto responder people start thinking youra little bit dodgy
General[5]:= 'poo';
General[6]:= 'im captain underpants';
Edit: jukka if it gunna be for the srl include file it will be arrays lol

MasterKill

2008-06-11 09:25:59

I made this auto responder for my iron miner, you can easely add responds to this.

waddo: ARRAY OF ARRAY OF STING OF COUSRE FTW :D

var
HowManyResponds: Integer;
TheQuestion, TheRespond: array of array of String;

Procedure SetupResponds; // ADD RESPONDS FOR BETTER ANTI BAN !
begin
HowManyResponds := 3; {<-- SETUP CORRECT !!}
SetArrayLength(TheQuestion, HowManyResponds); SetArrayLength(TheRespond, HowManyResponds);
TheQuestion[0] := ['mining', 'mine'];
TheRespond[0] := [IntToStr(Players[CurrentPlayer].Integers[1])]; // your players mining level

TheQuestion[1] := ['respond'];
TheRespond[1] := ['what to say?', 'i dont have anything to say', 'no im bussy'];

TheQuestion[2] := [Players[CurrentPlayer].nick]; // your players nickname
TheRespond[2] := ['no', 'get lost', 'im bussy', 'go away', 'just let me mine okeey?'];
end;

{*******************************************************************************
function TheResponder: Boolean;
By: M4st3rK1ll
Description: Automated responder.
Result: True if a respond is made.
*******************************************************************************}
Function TheResponder: boolean; // Created by M4st3rK1ll
var
I, II, Rand: Integer;
Text, Name: String;
begin
If Not GetLastChatText(Text) Then Exit;
For I := 0 To HowManyResponds - 1 Do
begin
For II := 0 To High(TheQuestion[I]) Do
begin
If (Pos(TheQuestion[I][II], Text) <> 0) then
begin
Status('$Making Respond');
Name := GetBlackChatMessage;
If (Pos(Players[CurrentPlayer].nick, Name) <> 0) then exit;
WriteLn('Respond:');
WriteLn('/ ' + Name + ' ' + Text);
Rand := Random(High(TheRespond[I]));
TypeSend(TheRespond[I][Rand]);
WriteLn('/ ' + Players[CurrentPlayer].Name + ': ' + TheRespond[I][Rand]);
Result := True;
exit;
end;
end;
end;
end;

EDIT: LOL EVILCHICKEN TY, remove my auto responder out your post lol cos i posted it :)

JuKKa

2008-06-11 09:38:09

From: waddo
yes i was thinking about that yesterday we need to get that padded out

but we should use proper words ad spelling mistakes

and not things like homie stupid stuff

when you start syaing stuff liein timothegreats auto responder people start thinking youra little bit dodgy
General[5]:= 'poo';
General[6]:= 'im captain underpants';
Edit: jukka if it gunna be for the srl include file it will be arrays lol


There wont be a SRL responder, they have said that you should just create ur own thats the safest way.

I simply posted the easiest way for new scripters to make a responder.

I have now been working on one for 3 days it grabs every blue line then answers. Then theres a boolean for every single line so it returns TRUE if it has responded to that line and name. Theres more to come. But i wont release it.

Hugolord

2008-06-11 09:48:04

We should also make it not answer all the time otherwise ppl can just keep asking your mining lv.. or w.e..

JuKKa

2008-06-11 10:07:41

From: Hugolord
We should also make it not answer all the time otherwise ppl can just keep asking your mining lv.. or w.e..

thats why u should store the usernames to a array.

n3ss3s

2008-06-11 10:17:46

It seems that this thread is still going into the classic direction, there will be an 'official' AutoResponder with damn 564 lines of responding!

While I've watched my character fish, it responds perfectly every time asked something, or greeted.

JuKKa

2008-06-11 10:34:04

From: n3ss3s
It seems that this thread is still going into the classic direction, there will be an 'official' AutoResponder with damn 564 lines of responding!

While I've watched my character fish, it responds perfectly every time asked something, or greeted.


how many different responces?

Championship

2008-06-11 10:36:30

k well i guess that answers that look forward to it