Printable View
Hmm would it be possible to write a script to allow 2 bots to communicate in game ie .. private messaging ..
i was thinking of a sytem where 1 bot finishes in its location and messages the other bot a word .. the other bot then moves in and continues while the first one moves one ..
i think it would provide interesting possibilities for armys .. lol ..
any examples .. or .. ideas
Yes. All you have to do is know who to talk to and what to say. It's just typing and clicking.
Well my friend's asked me to write a script, and as we will be running 5 mini armies, he want's it so that they can all communicate.
I think it could be good thing to use.
Yeh .. true any ideas on intresting ways of using this
I think a better idea is to write to a file they can both read from (assuming they're run from the same computer), but yeah, you could do this.
We have more than enough space online to have it be read not on the same computer. It could easily be hosted on github even.
I would say sockets but they a blocking....
Whith the private message option you could also talk to other peoples bots with a codeword .. ie
meet at bank . wouldnt work
but
Obiwan: Meet at bank .would work
you just put the coden the other bot is set for ..
or even public chat with a code
But then those could easily be used by jagex to see if we're botting! :o
It would work for private scripts between a few people at most. But if say, a whole community started using it, then it would be very obvious and a good way for Runescape to see who is botting, using that script.
yeh but then for a group of bots it would seem more realistic ..
iKMine212: im full
TrustMe432: Yeh so am i
PsIloveYouall: me to lets go to the bank
.. and off they go
I can't think of a practical application for inter-bot communication outside of rune running.
It's already easy to get away with botting without autotalking so I don't think it's necessary at this point.Quote:
Originally Posted by sm0k3
The simpler the better although I would definitely try to implement this if it could significantly speed up leveling or goldfarming in any way.
A form of anti-ban, it would make it seem a lot more human-like if you're conversing with a friend!
This is very easy to do, use SendInterSCARMessage/ReadInterSCARMessage
you can also use file control as suggested.
Or you just set up a small database with the structure:
| Message | From | To | Read |
How can this be done in SIMBA though?Quote:
Originally Posted by tom99
I've seen no sources which allow it to be done, nor any tutorials or other scripts.
Im not sure if you can do it in simba, but in scar its like this.
and then on another window (not tab)Code:begin
repeat
if(ReadInterSCARMessage('villavu') = 'lobster') then
begin
writeln('swordfish');break;
end;
wait(800);
until(false)
end.
Code:begin
SendInterSCARMessage('villavu','lobster');
end.
I've checked, and it's not a function/procedure even when I have Scar included..
I'll try it anyway in 10 minutes, I'm just popping to the shop.
I agree with HarryJames on that one .. good for anti banQuote:
Originally Posted by HarryJames
Use InputQuery as I did in my aimbot. It opens a window with a message, and a result var. Here's where I used it :
*Input is a string variable.Simba Code:if InputQuery('DeSnob''s PawnGame Aimbot V1.8', 'What team are you on?', Input) then
begin
if lowercase(Input) = 'blue' then
begin
team := 'blue';
TeamID := 1;
end;
if lowercase(Input) = 'red' then
begin
team := 'red';
TeamID := 1;
end;
end;
Send a periodic heartbeat?Quote:
Originally Posted by Dgby714
Simba Code:function ReadMessage(Name: string; out Mes: string): boolean;
begin
try
with TFileStream.Create(IncludePath + 'Messages/' + Name + '.mes', fmOpenRead) do
try
Result := (Read(Mes, Size) > 0);
finally
Free;
end;
except end;
end;
function SendMessage(Name, Mes: string): boolean;
var
fmCustom: Word;
begin
ForceDirectories(IncludePath + 'Messages/');
if (FileExists(IncludePath + 'Messages/' + Name + '.mes')) then
fmCustom := fmOpenWrite
else
fmCustom := fmCreate;
try
with TFileStream.Create(IncludePath + 'Messages/' + Name + '.mes', fmCustom) do
try
Result := (Write(Mes, SizeOf(Mes)) = SizeOf(Mes));
finally
Free;
end;
except end;
end;
This will only work if there on the same PC!
You can do this (one vulnerability is that it may skip some writing if already reading).
then to read it:Code:procedure AddStrToFile(theString, theFile: string);
var
f: Integer;
s: string;
begin
if(FileExists(theFile))then
begin
f:= OpenFile(theFile, False);
ReadFileString(f, s, FileSize(f));
CloseFile(f);
end;
f:= RewriteFile(theFile, False);
WriteFileString(f, (s + theString));
CloseFile(f);
end;
begin
AddStrToFile(('Your information' + #13#10), (AppPath + 'cfg.log'));
end.
Code:function Example(Path: string): string;
var
tehFile, tehFileSize: Integer;
begin
tehFile:= OpenFile(Path, False);
tehFileSize:= FileSize(tehFile);
ReadFileString(tehFile, Result, (tehFileSize + 1));
CloseFile(tehFile);
end;
var
strArray: TStringArray;
i, h: Integer;
begin
ClearDebug;
strArray:= Explode(#13#10, Example(AppPath + 'cfg.log'));
h:= High(strArray);
for i:= 0 to h do
WriteLn(strArray[i]);
SetArrayLength(strArray, 0);
end.
You could also try ripping the way Harry checks for/updates his scripts from some secret website of his.
Here is the Client side of a socket way to do it, The server needs to be threaded.
If someone wants to write a server go ahead ill make one in a bit...
Simba Code:var
Client: integer;
function GetCommand(out Command: string): boolean
begin
try
Command := RecvSocket(Client);
Result := True;
except
Result := False;
end;
end;
function SendCommand(Command: string): boolean;
var
Responce: integer;
begin
Result := False;
SendSocket(Client, Command);
try
Responce := StrToIntDef(RecvSocket(Client), -1);
case Responce do
1: Result := True;
2: mDebugLn('SendCommand: Unknown Command.');
end;
except
mDebugLn('SendCommand: No Responce...');
end;
end;
procedure SetupSCS;
begin
Client := CreateSocket;
SetTimeout(Client, 100); //This is a low timeout...
end;
procedure FreeSCS;
begin
FreeSocket(Client);
end;