I dunno, but this might work;
SCAR Code:
{.Include SRL/SRL.scar}
program BankFindingStuff;
VEB, VWB:Integer;
Procedure LoadBankDTMs;//Varrok bank DTM's w/mainpoint at the enterance
Begin
VEB := DTMFromString('78DA6314676060E0604001F53565609A11CA6' +
'7E403120AA86AFEFC6142552384A9E6EB57065435A2986ABE7C41' +
'532341845D32986AEEDE4533471E53CDD5ABA86A00C7580E11');
VWB := DTMFromString('78DA631460606070604001F5A5A90C2780342' +
'310FF0702464520831B55CDDBB7109A11CA07AB11415573E60C9A' +
'1A0520218DAAE6CF1F264C354A04EC02A9D122428D117E3500C3F' +
'F12F0');
End;
Function FindTheBank(bank:string):Boolean;//Bank is either 'vwb' or 'veb', returns true if found
//Should get you to the enterance of either bank if its in your minimap
Var x,y:Integer
Begin
Case (bank) of
'vwb': Begin
If DTMRotated(VWB,x,y,667,139,888,300) Then
Begin
Mouse(x,y,2,2,true);
Writeln('At entrance of Varrok West Bank');
Result:=True;
End;
End;
'veb': Begin
If DTMRotated(VEB,x,y,667,139,888,300) Then
Begin
Mouse(x,y,2,2,true);
Writeln('At entrance of Varrok East Bank');
Result:=True;
End;
End;
End;
End;
Procedure FreeBankDTMs;
Begin
FreeDTM(VEB);
FreeDTM(VWB);
End;
Procedure GetToEnterance;
Begin
LoadBankDTMs;
FindTheBank('veb');//or 'vwb', w/e
FreeBankDTMs;
End;
You'd wanna use GetToEnterance though