SRL Archive - OSR Help

Some help please


Erke

2012-01-27 03:57:03

Hello, Im a guy with very basic script knowledge and tried to modify Flight's ZMI script so I could use it for Astral runes instead. Ive used alot of hes fucntion/procedures and I managed to get it do a run. Im trying to add hes function and stuff that detects and repairs broken pouches, im getting this error however

Function WithdrawRunes(Method: String): Boolean;
var
ABMP,CBMP,X,Y: Integer;
begin
Result := False;
if not LoggedIn then Exit;
if InvFull then
begin
if not BankScreen then
OpenBank
if BankScreen then //Invalid number of parameters!!!
DepositEss;
Wait(RandomRange(350, 625));
end;
end;

OpenBank looks like this

procedure OpenBank;
var
X, Y, eX, eY: integer;
begin
if FindTheBank(X, Y)then
begin
GetMousePos(eX, eY);
Mouse(eX, eY, 0, 0, false);
ChooseOption('uickly');
Wait(1500 + random(100));
end;
end;

And DepositEss like this
Function DepositEss: Boolean;
var
T,Slot: Integer;
begin
if not BankScreen then exit;

Slot := RandomRange(9, 20);
MouseItem(Slot, mouse_right);
Wait(RandomRange(50, 115));
WaitOption('Deposit-5', 300);

MarkTime(T);
repeat
FindNormalRandoms;
if (TimeFromMark(T) > 3000) then
Result := False;
if not InvFull then
break;
until(False)

Result := (not InvFull);
end;

Any help/suggestions or tips would be very nice!!

ShawnjohnSJ

2012-01-27 04:12:58

I can't remember correctly how sensitive pascal script is and I don't use Simba, but my guess is you need to add a semi-colon at the end of

OpenBank

So it looks like

OpenBank;

However I might be wrong, I haven't used Simba or SCAR in a long time.

Edit: Don't add the else I suggested before, I didn't take a clear look at the function and you won't need it, sorry. Just do as I suggested above. ^

lake knight

2012-01-27 04:16:56

i think hes right…

Erke

2012-01-27 04:47:41

From: ShawnjohnSJ
I can't remember correctly how sensitive pascal script is and I don't use Simba, but my guess is you need to add a semi-colon at the end of

OpenBank

So it looks like

OpenBank;

However I might be wrong, I haven't used Simba or SCAR in a long time.

Edit: Don't add the else I suggested before, I didn't take a clear look at the function and you won't need it, sorry. Just do as I suggested above. ^


I tried to do that and now im getting the error at OpenBank instead :/

Daniel

2012-01-27 04:53:18

OpenBank already exists within SRL, which requires multiple input parametres. Rename your OpenBank method to something else and it will work :)

Erke

2012-01-27 05:06:22

From: Daniel
OpenBank already exists within SRL, which requires multiple input parametres. Rename your OpenBank method to something else and it will work :)


Thanks mate, since I want to open the bank at lunars I renamed it OpenBankLunar and it works now :D