Here is a good banking procedure that I use. The banking procedures from srl and reflection dosnt work 100% of the time so I made this and it works better.
SCAR Code:
{.include srl/srl/reflection/Reflection.scar}
var
x,y : Integer;
Banker : array of TNPC;
Function FindBanker : TPoint;
Begin
Banker := SortNPCs(GetNPCsByName('Banker'));
Result := Banker[0].MS;
Wait(500)
End;
Function TalkToBanker : boolean;
begin
Mouse(FindBanker.x, FindBanker.y, 0, 0, False);
if ChooseOption('Talk-to') then Result := true;
end;
Procedure OpenBankTRiLeZ;
begin
Status('Finding Banker');
repeat
if TalkToBanker then begin
Wait(1500)
Mouse(307,456,0,0,true);
Wait(400)
Mouse(266,391,0,0,true);
Wait(700)
end;
Wait(100)
until PinScreen or BankScreen;
end;
And that is my banking procedure (just opens the bank) and the vars and includes you need fore it.