SRL Archive - RS Scripts

Auto-Talker(not working need help)


diamondhero5

2007-02-18 13:14:00

Ok this is my very first auto talker.
It says syntax error in line 14, but i dont know what that means.
Here it is.


program Autotalker;

procedure OpenRSWindow;//as u can see i tryed to make it open rs window
begin
MoveMouse(106,650);
Wait(534);
ClickMouse(106,650,true);
end;

procedure Talk;
begin
SendKeys('Hello'=chr(13),//What u want to say in ' '(ex. 'selling armor')//
Wait(5000+random(142)),// How long until typed again 1000=1 sec 5000=5 sec//
end;

begin
OpenRSWindow
Wait(5000)
repeat
Talk;
until(false)
end.

whales

2007-02-18 13:22:53

Check that out thats a start


program Autotalker;
var T: Integer;// T integer so that this script doesnt just keep repeating

Const
NumberOfT = 5; // Continue to find out use


procedure OpenRSWindow;
begin
MoveMouse(106,650);
Wait(534);
ClickMouse(106,650,true);
end;

procedure Talk;
begin
SendKeys('Hello'+chr(13));//Here you had = between what you were saying and the Char(13) you also forgot a close round ' ) ' and ; //
Wait(5000+random(142));// How long until typed again 1000=1 sec 5000=5 sec//
T=T+1;// each loop will add one to the 'T' integer
end;

begin
OpenRSWindow
Wait(5000)
repeat
Talk;
until(T=NumberOfT)// Repeats until T = the const 'NumberOfT'
end.

diamondhero5

2007-02-18 13:31:46

Thank you, but i had actually just fixed it and i dont need the t variable because i'm going to want to use it to sell or buy things and have it keep repeating.
But thank you for the input.

diamondhero5

2007-02-19 14:42:46

whales you could also put until(IsFKeyDown(12)) so itstops when u hit f12

diamondhero5

2007-02-19 14:46:37

i dont mean to double post but this is not meaning my version 5.0 is not working!!!! this was my first one, for my lastest one go to Srl-forums>Rs Scripts>AutoTalker V5.0