Results 1 to 5 of 5

Thread: Deposit

  1. #1
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default Deposit

    I want to know if its only me who is getting this error
    in the script (UCB) it has Deposit(1, 28, true);
    but when it goes to bank it clicks on the logs and it clicks on Deposit-All but in the message area it comes up as if i have clicked Deposit-X

    well at least it certainly looks like its clicking on Deposit-Al
    l
    it could just be something wrong with the ChooseOption

    ~shut
    Last edited by Shuttleu; 04-19-2009 at 07:27 AM.

  2. #2
    Join Date
    Aug 2007
    Posts
    259
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    I'm getting that error too. The odd thing is, the withdraw is also broken; when my script tries to withdraw x amount of coins, it clicks the option right before the "withdraw-x" option.

    I'm guessing it's a bug from rev. 32

  3. #3
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Heres the fix:

    SCAR Code:
    Procedure Deposit(SlotFrom, SlotTo: Integer; vType: Variant);

    Var
       DepositX: Boolean;
       All: Variant;
       I, T, x, y: Integer;

    Begin
      If Not BankScreen Then
        Exit;
      If vType = 2 Then
        srl_Warn('Deposit', '2 now means store per 2, not ''All''', 15);
      DepositX := False;
      Case VarType(vType) Of
        3: Begin
             DepositX := InIntArray([1, 5, 10], vType);
             If vType = 1 Then
               All := False
             Else
               All := True;
           End;
        11: All := vType;
      End;
      For I := SlotFrom To SlotTo Do
      Begin
        If Not ExistsItem(I) Then
          Continue;
        MouseItem(I, Not All);
        If DepositX Then
        Begin
          ChooseOption('Deposit-X');
          T := GetSystemTime;
          While (Not FindColor(x, y, 8388608, MCX1, MCY1, MCX2, MCY2)) And (GetSystemTime - T < 3000) Do
            Wait(100);
          TypeSend(vType);
        End Else If VarType(vType) = 3 Then
          ChooseOption('Deposit-' + vType)
        Else
          ChooseOption('Deposit-All');
        T := GetSystemTime;
        Wait(RandomRange(200, 300));
        While ExistsItem(I) And (GetSystemTime - T < 2000) Do
          Wait(50);
      End;
    End;


    EDIT: With the withdraw function, are you sure you're typing 0 for it to withdraw all?
    Last edited by Richard; 04-18-2009 at 07:53 AM.

  4. #4
    Join Date
    Aug 2007
    Posts
    259
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    No, I'm trying to withdraw a specific amount of coins. Here's the function:

    Code:
     if (BankScreen = true) then
        begin
        Withdraw(1,1,50000+random(1500));
        wait(500+random(500));
    this withdraws approx. 50k coins from your first inv. slot.

  5. #5
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •