SRL Archive - OSR Help

Edgeville Yew Cutter/Banker Help!


sprunt

2013-03-03 08:00:52

Wondering if anybody would be willing the help me with the code for this script, When the mouse goes over the yew icon on the mini-map it sometimes sends the player to the wrong side of the wall, so I need another method of moving the player.

If you will help, pm me and I will send you the code :)

Runehack123

2013-03-03 08:10:07

Other methods of walking would be TPA or with DTM.
Be sure to check out the tutorial section of more on those.

I personally think symbol finding is the worst method since the symbol moves on the map and sometimes it's not found if there's a lot of players standing on the same location of the symbol.

sprunt

2013-03-03 08:37:02

Thanks, I will look into them both now. Could you recommend any tutorials?

sprunt

2013-03-03 11:24:46

Just tried making a smiple walk between the two trees with DTMS and im getting this error. Help please!

Error: Exception: The bitmap[0] does not exist at line 664
The following DTMs were not freed: [0, 1, 2, 3, 4, 5]



program new;
{$I SRL/SRL.Simba}
{$I P07Include.Simba}
{$I SRL/SRL/Misc/Debug.Simba}

var
x, y, i: Integer;
Q: Array [0..2] of Integer;
aFound: Extended;

Procedure P07_DeclarePlayer;
Begin
P07_PlayerName:='';
P07_PlayerPass:='';
End;

procedure SetDTM;
begin
Q[0] := DTMFromString('mWAAAAHicY2FgYEhkZmAoAOIoII4G4jQGBM4BYkZGRoYPb57AMT9QDBkzomEQAABLcwu4');
Q[1] := DTMFromString('mWAAAAHicY2FgYGhjYmDoB+JWIO4C4jKgWCUQFwBxERDv2rOfIclPmSEzUo0hLUCNgR8ohowZ0TAIAAADvwkO');
end;


Procedure FrDTM;
Begin
FreeDTM(Q[0]);
FreeDTM(Q[1]);
End;



begin
P07_DeclarePlayer;
SetupP07Include;
ActivateClient;
Wait(2000);
If (Not P07_LoggedIn) Then
P07_LogInPlayer;
P07_MakeCompassNorth;
SetDTM;
MouseSpeed := 18;
MakeCompass('n');
if FindDTMRotated(Q[0], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
repeat
Wait(50 + Random(25));
until FindDTMRotated(Q[1], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound);
end;
if FindDTMRotated(Q[1], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
end;
FrDTM;
end.