From: The Killer
you mean talking In runescape?
just do:
typesend('your message here')
And you can add that between the walking points, like…
program Roflme;
{$DEFINE SMART}
{$i SRL/SRL.simba}
{$i SPS/SPS.simba}
{$i SRL/SRL/Misc/Debug.simba}
{$I SRL/SRL/Misc/Online.simba}
procedure WalkAroundGE;
var
First, Second, Third, Fourth, Fifth, Sixth, Seventh, Eighth, Ninth, Tenth, Eleventh:TPoint;
begin
SPS_Setup(RUNESCAPE_SURFACE, ['10_5', '10_6', '10_7', '11_5', '11_6', '11_7']);
First := Point(4547, 2729);
Second := Point(4556, 2693);
Third := Point(4554, 2649);
Fourth := Point(4534, 2633);
Fifth := Point(4475, 2623);
Sixth := Point(4444, 2640);
Seventh := Point(4437, 2684);
Eighth := Point(4440, 2724);
Ninth := Point(4462, 2736);
Tenth := Point(4505, 2738);
Eleventh := Point(4536, 2730);
repeat
SPS_WalkToPos(First);
typesend('Hello1');
SPS_WalkToPos(Second);
typesend('Hello2');
SPS_WalkToPos(Third);
typesend('Hello3');
SPS_WalkToPos(Fourth);
typesend('Hello4');
SPS_WalkToPos(Fifth);
typesend('Hello5');
SPS_WalkToPos(Sixth);
typesend('Hello6');
SPS_WalkToPos(Seventh);
typesend('Hello7');
SPS_WalkToPos(Eighth);
typesend('Hello8');
SPS_WalkToPos(Ninth);
typesend('Hello9');
SPS_WalkToPos(Tenth);
typesend('Hello10');
until(false);
end;
begin
Cleardebug;
SRL_SixHourFix := True;
Smart_FixSpeed := True;
SetupSRL;
SmartSetRefresh(40);
SetAngle(SRL_ANGLE_HIGH);
repeat
WalkAroundGE;
until(false);
end.
Now that would repeat Hello1 > Hello10. Since I really am a bad scripter and just want to keep things simple, you could always just copy and paste the procedure again and have it say more, then add the new procedure in your main loop:
program Roflme;
{$DEFINE SMART}
{$i SRL/SRL.simba}
{$i SPS/SPS.simba}
{$i SRL/SRL/Misc/Debug.simba}
{$I SRL/SRL/Misc/Online.simba}
procedure WalkAroundGE;
var
First, Second, Third, Fourth, Fifth, Sixth, Seventh, Eighth, Ninth, Tenth, Eleventh:TPoint;
begin
SPS_Setup(RUNESCAPE_SURFACE, ['10_5', '10_6', '10_7', '11_5', '11_6', '11_7']);
First := Point(4547, 2729);
Second := Point(4556, 2693);
Third := Point(4554, 2649);
Fourth := Point(4534, 2633);
Fifth := Point(4475, 2623);
Sixth := Point(4444, 2640);
Seventh := Point(4437, 2684);
Eighth := Point(4440, 2724);
Ninth := Point(4462, 2736);
Tenth := Point(4505, 2738);
Eleventh := Point(4536, 2730);
repeat
SPS_WalkToPos(First);
typesend('Hello1');
SPS_WalkToPos(Second);
typesend('Hello2');
SPS_WalkToPos(Third);
typesend('Hello3');
SPS_WalkToPos(Fourth);
typesend('Hello4');
SPS_WalkToPos(Fifth);
typesend('Hello5');
SPS_WalkToPos(Sixth);
typesend('Hello6');
SPS_WalkToPos(Seventh);
typesend('Hello7');
SPS_WalkToPos(Eighth);
typesend('Hello8');
SPS_WalkToPos(Ninth);
typesend('Hello9');
SPS_WalkToPos(Tenth);
typesend('Hello10');
until(false);
end;
procedure WalkAroundGE;
var
First, Second, Third, Fourth, Fifth, Sixth, Seventh, Eighth, Ninth, Tenth, Eleventh:TPoint;
begin
SPS_Setup(RUNESCAPE_SURFACE, ['10_5', '10_6', '10_7', '11_5', '11_6', '11_7']);
First := Point(4547, 2729);
Second := Point(4556, 2693);
Third := Point(4554, 2649);
Fourth := Point(4534, 2633);
Fifth := Point(4475, 2623);
Sixth := Point(4444, 2640);
Seventh := Point(4437, 2684);
Eighth := Point(4440, 2724);
Ninth := Point(4462, 2736);
Tenth := Point(4505, 2738);
Eleventh := Point(4536, 2730);
repeat
SPS_WalkToPos(First);
typesend('Hello11');
SPS_WalkToPos(Second);
typesend('Hello12');
SPS_WalkToPos(Third);
typesend('Hello13');
SPS_WalkToPos(Fourth);
typesend('Hello14');
SPS_WalkToPos(Fifth);
typesend('Hello15');
SPS_WalkToPos(Sixth);
typesend('Hello16');
SPS_WalkToPos(Seventh);
typesend('Hello17');
SPS_WalkToPos(Eighth);
typesend('Hello18');
SPS_WalkToPos(Ninth);
typesend('Hello19');
SPS_WalkToPos(Tenth);
typesend('Hello20');
until(false);
end;
begin
Cleardebug;
SRL_SixHourFix := True;
Smart_FixSpeed := True;
SetupSRL;
SmartSetRefresh(40);
SetAngle(SRL_ANGLE_HIGH);
repeat
WalkAroundGE;
WalkAroundGE2;
until(false);
end.
You can repeat that process to do it for however many messages you require. Just note that it'll repeat those messages once it's gone through each WalkAroundGE procedure.
UNLESS You make the end something like…
begin
Cleardebug;
SRL_SixHourFix := True;
Smart_FixSpeed := True;
SetupSRL;
SmartSetRefresh(40);
SetAngle(SRL_ANGLE_HIGH);
WalkAroundGE;
WalkAroundGE2;
repeat
WalkAroundGE3;
until(false);
end.
And WalkAroundGE3 is JUST walking to the spots and has no messages to be sent (the original function before adding the Typesend). Then it'll walk around twice, sending the Hello1>Hello20, and repeat walking around sending no messages.