chris91
2012-06-09 16:48:56
I've tried everything and I am stumped. (I am trying to fix a script and I am new).
Procedure Banking;
Begin
Repeat
If OpenBankFast('akb') Then
Begin
If PinScreen Then InPin(Pin);
Wait(RandomRange(500,700));
End;
Until BankScreen;
If BankScreen Then
Begin
DepositAll;
Wait(RandomRange(250,500));
If (UsePots = True) Then
Begin
If Not RunEnergy(35) Then
Begin
MouseBankSlot(2,Mouse_Left);
Wait(RandomRange(300,600));
R := 1;
End;
End;
MouseBankSlot(1,Mouse_Right);
Wait(RandomRange(300,600));
WaitOption('1',500);
Wait(RandomRange(250,500));
CloseBank;