SRL Archive - SRL Suggestions

    SRL_BANK_GG :      Info := [MSCX     , MSCY,      5921630,  9 ,   0.47, 0.08,  50,   True ,   10, 10,   'n'];

There you go ^.
Only ACAed it once on one world, but it should be fine.
I also noticed all other chests have EXACT SAME INFO (as each other, not mine), so someone should test and see if it works down there too.

From: YoHoJo

    SRL_BANK_GG :      Info := [MSCX     , MSCY,      5921630,  9 ,   0.47, 0.08,  50,   True ,   10, 10,   'n'];

There you go ^.
Only ACAed it once on one world, but it should be fine.
I also noticed all other chests have EXACT SAME INFO (as each other, not mine), so someone should test and see if it works down there too.

Wow I didn't know there was a bank chest there. This must be the only bank chest for F2P. Good spot for super-heaters.

Wanna fix this up and add it? I know it's not the standard format of a bank function but I just made it.. and it's missing too..

Function OpenBankZanaris :Boolean;
var
  B: TBox;
  TPA: TPointArray;
  ATPA, ATPA2: T2DPointArray;
  CTS, L, X, Y, I, T: Integer;
begin
  Result := (LoggedIn and BankScreen);
  if (Result) then
    Exit
  else
    if (Length(Players) > 0) then
      if ((PinScreen) and (Players[CurrentPlayer].Pin <> '')) then
        InPin(Players[CurrentPlayer].Pin);

  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.15, 0.50);
  FindColorsTolerance(TPA, 9872045, MSX1, MSY1, MSX2, MSY2, 5);  //Bank Booth color..
  SetColorSpeed2Modifiers(0.2, 0.2);

  if Length(TPA) < 1 then
    Exit;
  ATPA := TPAtoATPAEx(TPA, 20, 20);
    L := High(ATPA);
    SetArrayLength(ATPA2, L+1);
    for i := 0 to L do
    begin
      B := GetTPABounds(ATPA[I]);
      with B do
      begin
        ColorToleranceSpeed(2);
        begin
          SetColorSpeed2Modifiers(0.02, 3.08);
          FindColorsTolerance(ATPA2[I], 7920871, B.X1, B.Y1, B.X2, B.Y2, 9);     //Yellow Colour on booth..
          ColorToleranceSpeed(CTS);
        end;
        ColorToleranceSpeed(CTS);

        Result := (Length(ATPA2[i]) > 0);
        if Result then
        begin
          MiddleTPAEx(ATPA2[i], X, Y);
          MMouse(X, Y, 0, 0);
          wait(500);
          if isUptextMultiCustom(['Bank', 'Booth', 'ank', 'ooth']) then
          begin
            ClickMouse2(MOUSE_RIGHT);
            ChooseOptionMulti(['uickly', 'uick', 'ickly', 'ckl', 'se-q']);
            t := (GetSystemTime + 5000);
            repeat
              if (BankScreen) or (PinScreen) then
              begin
                Result := true;
                Break;
              end;
              Wait(50);
            until(GetSystemTime > t);

            if (Length(Players) > 0) then
              if ((PinScreen) and (Players[CurrentPlayer].Pin <> '')) then
                InPin(Players[CurrentPlayer].Pin);

              Result := (BankScreen) or (PinScreen);
          end;
          Exit;
        end;
      end;
    end;
end;

@ggzz: You should just be able to add it to OpenBank or OpenBankGlass, one of those functions. You shouldn't need a separate one.

From: YoHoJo

    SRL_BANK_GG :      Info := [MSCX     , MSCY,      5921630,  9 ,   0.47, 0.08,  50,   True ,   10, 10,   'n'];

There you go ^.
Only ACAed it once on one world, but it should be fine.
I also noticed all other chests have EXACT SAME INFO (as each other, not mine), so someone should test and see if it works down there too.

When I added the bank chests, I tested them all using the same colour properties and they all worked as I show here: http://villavu.com/forum/showpost.php?p=897524&postcount=21

I found out before that there's also a bank chest in Duel Arena :) You could add that one too?

Added to the latest version. :)

Sweet you rock!