Merge pull request #145 from jacz24/DepositBoxAntiban

Added DepositBox Antibans

Author: Torwent

osrs/antiban/antibantasks.simba

@@ -388,6 +388,63 @@ begin
   Bank.OpenTab(tab);
 end;
 
+// DepositBox antibans
+procedure TAntiban.HoverDepositItem();
+var
+  boxes: TBoxArray;
+begin
+  if not DepositBox.IsOpen() then Exit;
+  WriteLn GetDebugLn('Antiban', 'Hovering a random deposit box item');
+  boxes := DepositBox.ISlots.Boxes();
+  if boxes = [] then Exit;
+  Mouse.Move(boxes.Random());
+  Biometrics.Sleep(500, 2000, ERandomDir.LEFT);
+end;
+
+procedure TAntiban.HoverDepositQuantity();
+var
+  btn: TRSButton;
+begin
+  if not DepositBox.IsOpen() then Exit;
+  WriteLn GetDebugLn('Antiban', 'Hovering a random deposit box quantity button');
+  btn := DepositBox.QuantityButtons[ERSItemQuantity(Random(0, Length(DepositBox.QuantityButtons)-1))];
+  Mouse.Move(btn.Bounds);
+  Biometrics.Sleep(500, 2000, ERandomDir.LEFT);
+end;
+
+procedure TAntiban.HoverDepositButton();
+var
+  btn: TRSButton;
+begin
+  if not DepositBox.IsOpen() then Exit;
+  WriteLn GetDebugLn('Antiban', 'Hovering a random deposit box button');
+  btn := DepositBox.DepositButtons[ERSDepositButtons(Random(0, Length(DepositBox.DepositButtons)-1))];
+  Mouse.Move(btn.Bounds);
+  Biometrics.Sleep(500, 2000, ERandomDir.LEFT);
+end;
+
+procedure TAntiban.ToggleDepositQuantity();
+var
+  currentIdx, newIdx, totalButtons: Integer;
+begin
+  if not DepositBox.IsOpen() then Exit;
+  WriteLn GetDebugLn('Antiban', 'Toggling deposit box quantity buttons');
+
+  totalButtons := Length(DepositBox.QuantityButtons);
+
+  for currentIdx := 0 to totalButtons-1 do
+    if DepositBox.QuantityButtons[ERSItemQuantity(currentIdx)].Enabled() then
+      Break;
+
+  newIdx := (currentIdx + Random(1, totalButtons-1)) mod totalButtons;
+
+  DepositBox.QuantityButtons[ERSItemQuantity(newIdx)].Click();
+  Biometrics.Sleep(1000, 3000, ERandomDir.LEFT);
+
+  if DepositBox.IsOpen() then
+    DepositBox.QuantityButtons[ERSItemQuantity(currentIdx)].Click();
+end;
+
 // GrandExchange antibans
 procedure TAntiban.CheckHistory();
 begin
@@ -764,6 +821,16 @@ begin
   end;
 end;
 
+procedure TAntiban.RandomDepositTask();
+begin
+  case Random(0, 10) of
+    0..3:  Self.HoverDepositItem();
+    4..6:  Self.HoverDepositQuantity();
+    7..8:  Self.HoverDepositButton();
+    9..10: Self.ToggleDepositQuantity();
+  end;
+end;
+
 procedure TAntiban.RandomGETask();
 begin
   case Random(0, 10) of
@@ -998,6 +1065,11 @@ const
     ['BankScrolling',         @Antiban.BankScrolling],
     ['RandomBankTab',         @Antiban.RandomBankTab],
     ['ToggleBankTab',         @Antiban.ToggleBankTab],
+    ['HoverDepositItem',      @Antiban.HoverDepositItem],
+    ['HoverDepositQuantity',  @Antiban.HoverDepositQuantity],
+    ['HoverDepositButton',    @Antiban.HoverDepositButton],
+    ['ToggleDepositQuantity', @Antiban.ToggleDepositQuantity],
+    ['RandomDepositTask',     @Antiban.RandomDepositTask],
     ['CheckHistory',          @Antiban.CheckHistory],
     ['RandomOffer',           @Antiban.RandomOffer],
     ['RandomRightClick',      @Antiban.RandomRightClick],

osrs/interfaces/mainscreen/depositbox.simba

@@ -73,16 +73,15 @@ begin
   end;
 end;
 
+function TRSDepositBox.IsOpen(): Boolean; forward;
+
 (*
 ## DepositBox.SetupInterface
 ```pascal
 procedure TRSDepositBox.SetupInterface;
 ```
-Initializes depositbox variables.
-
-```{note}
-This is automatically called on the **DepositBox** variable.
-```
+Internal method used to setup the {ref}`TRSDepositBox` coordinates.
+This is automatically called for you on the {ref}`DepositBox variable`.
 *)
 procedure TRSDepositBox.SetupInterface();
 var
@@ -100,7 +99,7 @@ begin
   Self.InvSlotBoxes := TBoxArray.Create([Self.SlotsArea.X1,Self.SlotsArea.Y1], 4, 7, 32, 32, [10, 4]);
 
   Self.ISlots.Setup('DepositBox.ISlots', Self.InvSlotBoxes, @Self.FindItemBoundaries);
-  Self.Items.Setup('DepositBox.Items', @Self.ISlots, [0,1]);
+  Self.Items.Setup('DepositBox.Items', @Self.ISlots, [0,1], @Self.IsOpen);
 
   Self.EquipSlotBoxes := [
     Box(77,54,110,88), Box(36,93,69,127),      // Helm, Cape