Results 1 to 5 of 5

Thread: Withdrawing of Items Broken?

  1. #1
    Join Date
    Jun 2013
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default Withdrawing of Items Broken?

    My code is this:
    Code:
    Procedure WithdrawEssence;
    var
      x, y, essence: Integer;
    Begin
      essence := DTMFromString('mwQAAAHic42RgYIgD4gAgDgTiMCBOAOIMIM6B4kwg9gdiTyAOAuJIII4G4gioPi8gdgXi2tJSIMmIF3MxEAb4TYBgOAAAebwHvw==');
      FindDTM(essence, x, y, MSX1, MSY1, MSX2, MSY2);
      MMouse(x, y, 0, 0);
      Mouse(x, y, 0, 0, false);
      ChooseOption('Withdraw All');
      FreeDTM(essence);
    End;
    It finds the essence, right clicks it, but then doesn't select an option any help here?

  2. #2
    Join Date
    Aug 2007
    Location
    Colorado
    Posts
    7,421
    Mentioned
    268 Post(s)
    Quoted
    1442 Post(s)

    Default

    Try this bud:
    Simba Code:
    Procedure WithdrawEssence;
    var
      x, y, essence: Integer;
    Begin
      essence := DTMFromString('mwQAAAHic42RgYIgD4gAgDgTiMCBOAOIMIM6B4kwg9gdiTyAOAuJIII4G4gioPi8gdgXi2tJSIMmIF3MxEAb4TYBgOAAAebwHvw==');
      if FindDTM(essence, x, y, MSX1, MSY1, MSX2, MSY2) then
      begin
        MMouse(x, y, 0, 0);
        ClickMouse2(mouse_right);
        waitOptionMulti(['w A','All'], 200);
      end else
        Writeln('Failed to find essence DTM');
      FreeDTM(essence);
    End;

    Current projects:
    [ AeroGuardians (GotR minigame), Motherlode Miner, Blast furnace ]

    "I won't fall in your gravity. Open your eyes,
    you're the Earth and I'm the sky..."


  3. #3
    Join Date
    Jun 2013
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Flight View Post
    Try this bud:
    Simba Code:
    Procedure WithdrawEssence;
    var
      x, y, essence: Integer;
    Begin
      essence := DTMFromString('mwQAAAHic42RgYIgD4gAgDgTiMCBOAOIMIM6B4kwg9gdiTyAOAuJIII4G4gioPi8gdgXi2tJSIMmIF3MxEAb4TYBgOAAAebwHvw==');
      if FindDTM(essence, x, y, MSX1, MSY1, MSX2, MSY2) then
      begin
        MMouse(x, y, 0, 0);
        ClickMouse2(mouse_right);
        waitOptionMulti(['w A','All'], 200);
      end else
        Writeln('Failed to find essence DTM');
      FreeDTM(essence);
    End;
    Alright, I put that in. Same result. It right clicks the item, but then doesn't select the option.

  4. #4
    Join Date
    Jun 2013
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Change the code to this:
    Simba Code:
    Procedure WithdrawEssence;
    var
      x, y, essence: Integer;
    Begin
      essence := DTMFromString('mwQAAAHic42RgYIgD4gAgDgTiMCBOAOIMIM6B4kwg9gdiTyAOAuJIII4G4gioPi8gdgXi2tJSIMmIF3MxEAb4TYBgOAAAebwHvw==');
      if FindDTM(essence, x, y, MSX1, MSY1, MSX2, MSY2) then
      begin
        MMouse(x, y, 0, 0);
        Mouse(x, y, 0, 0, false);
        wait(200);
        P07_ChooseOptionMulti(['w A','All']);
      end else
        Writeln('Failed to find essence DTM');
      FreeDTM(essence);
    End;
    And it works now. Thanks for the help! Can I PM you if I need further help?

  5. #5
    Join Date
    Jun 2013
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Flight View Post
    Try this bud:
    Simba Code:
    Procedure WithdrawEssence;
    var
      x, y, essence: Integer;
    Begin
      essence := DTMFromString('mwQAAAHic42RgYIgD4gAgDgTiMCBOAOIMIM6B4kwg9gdiTyAOAuJIII4G4gioPi8gdgXi2tJSIMmIF3MxEAb4TYBgOAAAebwHvw==');
      if FindDTM(essence, x, y, MSX1, MSY1, MSX2, MSY2) then
      begin
        MMouse(x, y, 0, 0);
        ClickMouse2(mouse_right);
        waitOptionMulti(['w A','All'], 200);
      end else
        Writeln('Failed to find essence DTM');
      FreeDTM(essence);
    End;
    Also, let's say I want to Open a chest with multi option, where do I find all the string array codes relating to options?

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
  •