Page 4 of 5 FirstFirst ... 2345 LastLast
Results 76 to 100 of 123

Thread: AK AIO Smelter

  1. #76
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    21 Post(s)

    Default

    Quote Originally Posted by YerAwsum View Post
    I get this error:

    [Error] C:\Simba\Includes\SRL/SRL/misc/SmartParams.Simba(281:149): Invalid number of parameters at line 280
    Compiling failed.
    You are most likely using smart 7.2, while this script was written as if the user was running smart 8. To remedy this, check out line 3 of the code. You should see ($DEFINE SMART8). simply delete the 8. It should now read ($DEFINE SMART). Restart the script. If this doesn't fix it, save the changes, close simba and any smart windows, reopon simba and the script, and hit run. Hope this helps.

  2. #77
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by Kampf Gewehr View Post
    I am not using a coal bag, and I made the script say False next to coal bag. I always take put five mithril and then usually fill the inventory with coal. I was able to rune for like 2-3 hours yesterday, other times I'll make it twenty minutes. It's getting hung up a lot less though so far, your fixes really improved the usability of this script.
    I'm glad it's improving, was the walking the problem again or was it ore related?

  3. #78
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    21 Post(s)

    Default

    Ore and walking has been kicking my ass. I always get stuck just north of the bank and just south of the cooking spot.

  4. #79
    Join Date
    Nov 2012
    Location
    Fargo, ND
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    12 Post(s)

    Default

    This version seems much more stable. I still have a few problems with steel though. It occasionally left clicks one steel bar and deposits it. The draws too much coal. This eventually makes the whole inv into coal and trips the logout. Mithril, addy and rune are about perfect though, they are now returning to the bank after smelting and I haven't noticed the same problem with those that I see with steel. Thanks again for the script man. Hope this helps.

    p.s. I haven't had the walking problems others seem to be having not sure why but I won't complain.

  5. #80
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    21 Post(s)

    Default

    Quote Originally Posted by BMWxi View Post
    I'm glad it's improving, was the walking the problem again or was it ore related?
    Just had an issue with the ore, I withdrew 6 instead of 5 for mithril? this has never happened before... so weird

  6. #81
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    21 Post(s)

    Default

    Quote Originally Posted by dstahn236 View Post
    This version seems much more stable. I still have a few problems with steel though. It occasionally left clicks one steel bar and deposits it. The draws too much coal. This eventually makes the whole inv into coal and trips the logout. Mithril, addy and rune are about perfect though, they are now returning to the bank after smelting and I haven't noticed the same problem with those that I see with steel. Thanks again for the script man. Hope this helps.

    p.s. I haven't had the walking problems others seem to be having not sure why but I won't complain.
    You'll notice that he will get stuck halfway between the furnace and the bank, sometimes at the furnace full of ore, sometimes he'll walk behind the furnace. I've used this script to smelt 15k mithril ore, I've gotten just about every issue this script has had yet.

    Are you running smart V8 or V7.2?

  7. #82
    Join Date
    Nov 2012
    Location
    Fargo, ND
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    12 Post(s)

    Default

    I am running V8. I have run this script and I know I had issues with the previous version of the script with walking but I have to have any with the newest version. Currently the only issue that I am having is it will click on the furnace and then not click the smelt button and say that it could not smelt the mithril ore, even though it has 5 mithril and is full of coal. Mithril though I haven't had any withdrawing issues that I saw with steel and non of the walking issues from the previous versions. I am just having the problem of it not hitting the smelt button every 300 or so bars.

  8. #83
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Small issue. Whenever there are people at the furnace, the script fails to click all the way to the furnace, and stops at F1a, but the camera turns. I switched it to blind walking, and it works quite well.

  9. #84
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by Kampf Gewehr View Post
    You'll notice that he will get stuck halfway between the furnace and the bank, sometimes at the furnace full of ore, sometimes he'll walk behind the furnace. I've used this script to smelt 15k mithril ore, I've gotten just about every issue this script has had yet.

    Are you running smart V8 or V7.2?
    Walking behind the furnace is UpText lag that will be an easy fix. Stuck mid path means I need to add more DTMS
    Quote Originally Posted by dstahn236 View Post
    I am running V8. I have run this script and I know I had issues with the previous version of the script with walking but I have to have any with the newest version. Currently the only issue that I am having is it will click on the furnace and then not click the smelt button and say that it could not smelt the mithril ore, even though it has 5 mithril and is full of coal. Mithril though I haven't had any withdrawing issues that I saw with steel and non of the walking issues from the previous versions. I am just having the problem of it not hitting the smelt button every 300 or so bars.
    The could not smelt issue could be lag, I'll need to run some tests.
    Quote Originally Posted by guthixboss1 View Post
    Small issue. Whenever there are people at the furnace, the script fails to click all the way to the furnace, and stops at F1a, but the camera turns. I switched it to blind walking, and it works quite well.
    Odd, it should only turn the camera if it successfully clicks the last point.

  10. #85
    Join Date
    Nov 2012
    Location
    Fargo, ND
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    12 Post(s)

    Default

    Untitled.png

    Here is where it gets caught for me.

  11. #86
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    21 Post(s)

    Default

    Did the thing where it with draws six mithril ore and no coal again just FYI

    I've done 15k bars so far with this, great work my friend.

  12. #87
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Quote Originally Posted by BMWxi View Post
    Walking behind the furnace is UpText lag that will be an easy fix. Stuck mid path means I need to add more DTMS

    The could not smelt issue could be lag, I'll need to run some tests.


    Odd, it should only turn the camera if it successfully clicks the last point.
    Yea I found it odd too.. Anyway i'm using this. Seems alright.

    Simba Code:
    Procedure WalkToFurnace;
    begin
      if (not LoggedIn) then LoginPlayer;
      SPS_BlindWalk(p2);
      Wait(RandomRange(850,950));
      If Random(300) = 1 Then CheckFriends;
      SPS_BlindWalk(p3);
      Wait(RandomRange(600,700));
      If Random(300) = 1 Then CheckFriends;
      MakeCompass('W');
    end;

    Procedure WalkToBank;
    begin
      if (not LoggedIn) then LoginPlayer;
      MakeCompass('N');
      SPS_BlindWalk(p2);
      Wait(RandomRange(600,700));
      If Random(300) = 1 Then CheckFriends;
      SPS_BlindWalk(p1);
      Wait(RandomRange(850,950));
      If Random(300) = 1 Then CheckFriends;
    end;

    CheckFriends is there for random-ness :P And I'm using a custom SPS image.

    Edit: Why so complicated and meddle wih DTMs when we have SPS??

    Edit2: Just noticed on front page; you switched from SPS to DTMs. Why the switch? :O
    Last edited by GuthixBoss1; 02-27-2013 at 04:48 PM.

  13. #88
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Oh btw quick question.. What does TPA stand for?? Been looking around but can't find it): I do know that DTM stands for Deformable Template Model though.. Or something. Sorry off-topic!

    Edit: Crud double-post. I apologise.
    Last edited by GuthixBoss1; 02-27-2013 at 04:42 PM. Reason: Double-post

  14. #89
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by guthixboss1 View Post

    Edit: Why so complicated and meddle wih DTMs when we have SPS??
    When I first made this script SPS didn't work in Al-Kharid. I'll switch to it if it's stable now though.
    Quote Originally Posted by guthixboss1 View Post
    Oh btw quick question.. What does TPA stand for?? Been looking around but can't find it): I do know that DTM stands for Deformable Template Model though.. Or something. Sorry off-topic!

    Edit: Crud double-post. I apologise.
    TPA stands for TPointArray
    A Tpoint is a coordinate
    And Array is a collection of things
    so A TPointArray is a collection of coordinates

  15. #90
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Quote Originally Posted by BMWxi View Post
    When I first made this script SPS didn't work in Al-Kharid. I'll switch to it if it's stable now though.


    TPA stands for TPointArray
    A Tpoint is a coordinate
    And Array is a collection of things
    so A TPointArray is a collection of coordinates
    Does the T in Tpoint stand for anything though? Thanks though And idrk I'm using a custom image. DTM walking is too complicated for me hehe :P That's why I didn't modify it.

  16. #91
    Join Date
    Jul 2012
    Posts
    437
    Mentioned
    10 Post(s)
    Quoted
    165 Post(s)

    Default

    v1.1 will run for about 15 minutes before failing

    v1.2 will usually last about an hour before failing

  17. #92
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    21 Post(s)

    Default

    Quote Originally Posted by bob_saget View Post
    v1.1 will run for about 15 minutes before failing

    v1.2 will usually last about an hour before failing
    I second this. Most I've gotten is barely over three. But hey, just think of it as another form of "anti-ban"
    Last edited by Kampf Gewehr; 03-06-2013 at 12:56 AM.

  18. #93
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Hey, finally finished my smelting run. I'm 94 smithing now. Without any modifications, I only managed to run it at max 2 hours without checking. After adding tons and tons and tons of failsafes and alternate methods, it now runs forever without stopping :P I got a 34 hour proggie, but I accidentally cleared debug): Would you like me to post the script here? But it requires a custom SPS map, which I could add to the script to auto-download

    Edit: I'm aware 34 hours isn't forever, but meh :P Ran it for many hours

  19. #94
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by guthixboss1 View Post
    Hey, finally finished my smelting run. I'm 94 smithing now. Without any modifications, I only managed to run it at max 2 hours without checking. After adding tons and tons and tons of failsafes and alternate methods, it now runs forever without stopping :P I got a 34 hour proggie, but I accidentally cleared debug): Would you like me to post the script here? But it requires a custom SPS map, which I could add to the script to auto-download

    Edit: I'm aware 34 hours isn't forever, but meh :P Ran it for many hours
    Yeah, if you want I could add it to the OP and credit you. I'll be leaving for a few weeks so I don't really have time for updates.

  20. #95
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Quote Originally Posted by BMWxi View Post
    Yeah, if you want I could add it to the OP and credit you. I'll be leaving for a few weeks so I don't really have time for updates.
    Okie! I kinda added Bracelet crafting to it too, so yea. I'll post it here when I wake up tomorrow :P 5am here now. Thanks again for this script!

  21. #96
    Join Date
    Aug 2012
    Location
    Singapore
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    18 Post(s)

    Default

    Simba Code:
    program AKSmelter;

    {$DEFINE SMART8}
    {$i srl/srl.simba}
    {$I SRL/SRL/Misc/SmartGraphics.Simba}
    {$i sps/sps.simba}

    const
      Version        = '1,2'; // No Touchy :)
      Debug          = True; //Write a debug into the debug box?
      BarType        = 'Gold bar';//bronze, iron, steel, silver, gold, mithril, adamant, or rune.
      HowManyBars    = 99999;  //How many bars to smelt before termination?
      CoalBag        = False; //True if using a coalbag, and it is in your 1st InvSlot.
      OnScreenReport = True;//True if you want a proggy drawn on your screen (You do)
      BreakIn        = 9999; //About how many minutes to run before taking a break?
      BreakFor       = 7;  //About how many minutes to break for?
      RandomBreakIn  = 20;  //How many minutes of randomness to Add/Subtract from BreakIn?
      RandomBreakFor = 5;   //How many minutes of randomness to Add/Subtract from BreakFor?

      Var
      p1, p2, p3, p4:TPoint;

    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;

      with Players[0] do
      begin
        Name       := ' '; // Player username
        Pass       := ' '; // Player password
        Pin        := '2908312903812983012'; // Bank Pin
        Active     := True;
      end;
    end;

    procedure CheckFriends;  //An Antiban Procedure by BMWxi
    var
      NCx, NCy, ONx, ONy :Integer;
    begin
      if not LoggedIn then LoginPlayer;
      if not LoggedIn then Exit;
      gametab(tab_friends); //Goes to friends tab
      If FindColorTolerance(NCx, NCy, 16683035, 546, 246, 722, 451, 5) Then  // Checks if they have changed names,
      begin                                                                  // if they have, It hovers to find their new name.
        MMouse(NCx, NCy, 5, 5);
        Wait(RandomRange(1000, 2000));
      end;
      If FindColorTolerance(ONx, ONy, 6619135, 546, 246, 722, 451, 5) Then   //Checks to see if friends are online
      begin                                                                  //hovers the names of online friends
        MMouse(ONx, ONy, 5, 5);
        Wait(RandomRange(1000, 2000));
      end else
      begin
        Wait(RandomRange(500, 1000));  //I added this so It doesn't spam-exit when you have no friends :)
      end;
      FTab(tab_Inv);            //Returns to inventory
    end;

    var
      Bars, AnyInvBarDTM, CoalBagDTM, TinOreDTM, CopperOreDTM, IronOreDTM,
      SilverOreDTM, GoldOreDTM, MithrilOreDTM, AdamantOreDTM, RuneOreDTM,
      CoalOreDTM, F1aDTM, F1bDTM, F2aDTM, F2bDTM, F2cDTM, F3DTM, B1aDTM, B1bDTM, B1cDTM,
      B1dDTM, B2aDTM, B2bDTM, B2cDTM, TotalBreaks, RunTime, StartTime, BreakRounds,
      Loads, Bxs, Bys, Bxe, Bye, FurnaceTries, HeartDTM, GoldBarDTM:Integer;
      Status:string;
      XPPerBar:Extended;

    procedure Proggy;
    var
      SmithingXPEarned, SmithingXPPH, BarsPH, LoadsPH:Integer;
    begin
      if not LoggedIn then LoginPlayer;
      if not LoggedIn then Exit;
      wait(100);
      RunTime := (TimeFromMark(StartTime) - (TotalBreaks * (BreakFor * 60000)));
      SmithingXPEarned := (Bars * (Round(XPPerBar)));
      SmithingXPPH := Round((SmithingXPEarned * 3600) / (RunTime / 1000));
      BarsPH := Round((Bars * 3600) / (RunTime / 1000));
      LoadsPH := Round((Loads * 3600) / (RunTime / 1000));
      {Writeln('=========[] AIO AK Smelter ' + Version + '[]=========');
      Writeln('[+] By BMWxi [+]                      Status: ' + Status);
      Writeln('==============================================');
      Writeln('[] Smelting: ' + BarType + '    (' + FloatToStr(XPPerBar) + ' XP Each)');
      Writeln('[] Smithing XP Earned: ' + IntToStr(SmithingXPEarned) + '  Per Hour: ' + IntToStr(SmithingXPPH));
      Writeln('[] Loads:       ' + IntToStr(Loads) + '   Per Hour: ' + IntToStr(LoadsPH));
      Writeln('[] Bars Smelted:       ' + IntToStr(Bars) + '   Per Hour: ' + IntToStr(BarsPH));
      Writeln('[] Total Time: ' + MsToTime(RunTime, 2));
      Writeln('==============================================');}

      if not OnScreenReport then Exit;
      SMART_ClearCanvasArea(IntToBox(MCX1, MCY1, MCX2, 507));
      SMART_DrawTextMulti(False, False, ['=============[] AK AIO Smelter ' + Version + ' []============='], Point(200, 348), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['[+] By BMWxi [+]                      Status: ' + Status], Point(200, 360), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['=============================================='], Point(200, 374), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['[] Smelting: ' + BarType + '    (' + FloatToStr(XPPerBar) + ' XP Each)'], Point(200, 388), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['[] Smithing XP Earned: ' + IntToStr(SmithingXPEarned) + '  Per Hour: ' + IntToStr(SmithingXPPH)], Point(200, 404), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['[] Loads:                  ' + IntToStr(Loads) + '      Per Hour: ' + IntToStr(LoadsPH)], Point(200, 418), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['[] Bars Smelted:       ' + IntToStr(Bars) + '   Per Hour: ' + IntToStr(BarsPH)], Point(200, 432), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['[] Total Time: ' + MsToTime(RunTime, 2)], Point(200, 446), StatChars, 1726658);
      SMART_DrawTextMulti(False, False, ['=============================================='], Point(200, 460), StatChars, 1726658);
    end;

    {*******************************************************************************
    function BreakHandler(BreakIn, BreakFor, randBreakIn, randBreakFor: Integer): Boolean;
    By: Echo_    * Slight modifications by me *
    Description: Takes brakes according to the minute values entered
    *******************************************************************************}

    function BreakHandler(BreakIn, BreakFor, randBreakIn, randBreakFor: Integer): Boolean;
    var
      w, x, y, z: Integer;
    begin
      if not LoggedIn then Exit;

      w := (BreakIn * 60000);
      x := (BreakFor * 60000);
      y := RandomRange(-randBreakIn * 60000, randBreakIn * 60000);
      z := RandomRange(-randBreakFor * 60000, randBreakFor * 60000);

      if (HowManyPlayers = 1) then
      begin
        if (GetTimeRunning < ((w) + (y) + BreakRounds)) then Exit
        else
          if (GetTimeRunning > ((w) + (y) + BreakRounds)) then
          begin
            Status := 'Breaking';
            Proggy;
            Writeln('Taking a break for about ' + IntToStr(BreakFor) + ' minutes.');
            Logout;
            Wait((x) + (z));
            Writeln('Logging in.');
            LoginPlayer;
            Result := LoggedIn;
            FindNormalRandoms;
            IncEx(BreakRounds, (w) + (x));
            IncEx(TotalBreaks, 1);
            Writeln('The next break will occur in about ' + IntToStr(BreakIn) + ' minutes.');
          end;
      end;

      if (HowManyPlayers > 1) then
      begin
        if (GetTimeRunning < ((w) + (y) + BreakRounds)) then Exit
        else
          if (GetTimeRunning > ((w) + (y) + BreakRounds)) then
          begin
          Writeln('Taking a break for about ' + IntToStr(BreakFor) + ' minutes.');
          Logout;
          IncEx(BreakRounds, (w));
          IncEx(TotalBreaks, 1);
          NextPlayer(True);
          Exit;
          while (LoggedIn) do Wait((x) + (z));
          NextPlayer(True);
        end;
      end;
    end;
    // End of BreakHandler
    //******************************************************************************

    procedure SetupAllDTMs;
    begin
      F1aDTM := DTMFromString('mrAAAAHic42BgYFjCyMCwHojXAfFaIN4MxMeBOA+Iu4G4BqjmKBCvB+JpQLwAiPcAcTcQ9wPxrI40hkNrp6DgptoqsPh2IBYBqsGHGQlgGAAApKEZEA==');
      F1bDTM := DTMFromString('mrAAAAHic42BgYFjAyMAwH4jnAfEkIG4G4kogzgPibiDeBVRzC4gvAvE+KD4IxHuAeDYQz+jPYNi/ZSpWvAUoJwJUgw8zEsAwAAAQbxqA');
      F2aDTM := DTMFromString('mrAAAAHic42BgYIhjZGDoBOJGIK4A4hQgTgXidCB2AOKFQDXnoPgsEN8E4hdA/BOIFwHx9o40hkNrp2DFc9szGESAavBhRgIYBgCN0Rmy');
      F2bDTM := DTMFromString('mrAAAAHic42BgYFjAyMAwH4jnAfEkIG4G4kogzgPibiDeBVRzC4gvAvE+KD4IxHuAeDYQz+jPYNi/ZSpWvAUoJwJUgw8zEsAwAAAQbxqA');
      F2cDTM := DTMFromString('m1gAAAHic42JgYHjCwsCwHQ0vB+IFQDwLiCcDcS8QPwKqFWNkYOADYnYgZgTiT0Cxj1D8AYi/AvHKmjiGw2unEMRyQLXEYEYiMQIAAGm6IZw=');
      F3DTM := DTMFromString('mrAAAAHic42BgYPgNxF+AmIGRgUEMiI8DmSeB+DQQ7wfiVUCcAcRFQFwJxGeA+BAQ7wTiFUC8oSOdoXvyAjg+snkWChYBqsGHGQlgGAAAyPUZ2w==');
      B1aDTM := DTMFromString('m1gAAAHic42JgYGhiZGDwAWIvKHYG4llAPAWI24C4C4jtgPgsUG0NEHcB8SwgXgHEp4A4D4pvA/FEkFxHGkNn7ywUfGjtFIam/DCGhqxQMBskJgJUSwxmJBIjAAAxFBuz');
      B1bDTM := DTMFromString('mwQAAAHic42RgYHBjhGB3IPYAYiMgtgJiZyAuAuI2ID4OVPcViN8B8RMgPgvE54H4MhD3AvE8IJ7ek8awf+MUrLht4iwwFgGqI4QZicBwAACZBBu9');
      B1cDTM := DTMFromString('mggAAAHicY2NgYLBlZGBwRsLmQGwMxFuAcjeA+BIQnwbiPUC8F4hn96QwHN40CQPLAeWwYUYcGAIAgtEShw==');
      B1dDTM := DTMFromString('mggAAAHicY2NgYDjByMBwAQkfBOJdQLwPKPcUiG8D8RUgPgnF0zuzGPavn4GB5YBy2DAjDgwBABNbFgY=');
      B2aDTM := DTMFromString('mlwAAAHicY2dgYEhnZGBog+JuIG6H4tlAfBIofwuILwDxYSDeAcSrgHgOEB84cIDh0NopWLEIUB4XZsSDoQAAoZgXzw==');
      B2bDTM := DTMFromString('mrAAAAHic42BgYPgGxEKMDAyCQCzGCGGDsAYQ6wPxa6D8byD+BMRPgPg2EJ8H4j1QvLUri+HA+hk4sQhQDT7MSADDAAAE4Bka');
      B2cDTM := DTMFromString('mrAAAAHic42BgYPBmYmCogeIoIE4C4kwg9gdiVyCeBlRzGYgPAvFGJLwNSi+sCmc4vGkSTiwHVIMPMxLAMAAALsgZVA==');
      CoalBagDTM := DTMFromString('m1gAAAHic42JgYHBgYmCwAGIPIPYBYicgtgFiSyC2hYq5AbE0IwODAhArA7EkEAtAsSRUTB6IhYB4Zmk40FQmgpiVgTjASCRGAABk6gVF');
      AnyInvBarDTM := DTMFromString('maQEAAHicrc7NCkBgEIXh+awJSbHwk0vhPigpCxEpkYvnXczO8nPqqTnTLCYUkdkROTHgwKRzi137ghsdVlzYMKrYiCQo4MNDhBQZKri6y1Ei0LtAe930fONYecQ+5gefvHrJCxM=');
      TinOreDTM := DTMFromString('mlwAAAHicY2dgYDAHYjUo1gdiByA2A2JHIJ4DxYuAeCUQL4XiuUCcnZYGJJmwYhCJCzDiwVAAAAvQByc=');
      CopperOreDTM := DTMFromString('mrAAAAHic42BgYEgG4mAgDoLiaCBOAuJsIM4H4jlAPAuI5wPxYiBeDsQrgXgpEM8G4kOFtkCSCSfmYsAPGAlgGAAAy00Jkg==');
      IronOreDTM := DTMFromString('mwQAAAHic42RgYBBiZGBggmI2IOYGYkEgFgZiWSCWA+I5DBC8CIiXAvFKIF4FxMuBeAlUzlxREkgy4cWsDIQBIxEYDgCw+gbh');
      SilverOreDTM := DTMFromString('mwQAAAHic42RgYMhmZGCIguJEIE4G4nQgzgfiUiAuA+K5QHVzgHgxEC8B4lVAvBqIF0HFQHL9/dOAJBNezMpAGDASgeEAAF1RCz8=');
      CoalOreDTM := DTMFromString('mwQAAAHic42RgYLBlZGDQB2I9IDYEYnMgdgZiHyD2BGI7IJ7NAMELgHgpEK8E4iVAPAuIFwLxCiBWUpICkkx4MSsDYcBIBIYDALBzCFI=');
      GoldOreDTM := DTMFromString('mwQAAAHic42RgYOgH4nogrgPiZiDugopNBeIZQDwbiOdA6UVAvBSIVwPxciBeBsTzoXLbJkoDSSa8mJWBMGAkAsMBAA/kDCo=');
      AdamantOreDTM := DTMFromString('mwQAAAHic42RgYNgFxKuBeBUUbwbibUC8H4iPAvEJIJ4DxLOAeB4QLwXiZVA9i4F4IVTO2sUaSDLhxawMhAEjERgOAMC/DPg=');
      MithrilOreDTM := DTMFromString('mrAAAAHic42BgYHgOxNeg+D4QPwbid0D8EYi/AfEcIJ4LxEuBeAUQr4ayFwDxDCC2sAgGkkw4MSsDfsBIAMMAABFHDR8=');
      RuneOreDTM := DTMFromString('mwQAAAHic42RgYJjGyMDQBsU9QNwPxFOBeDYQLwTixUA8hwGCFwPxEiBeCcSroPwFQDwbiB18g4EkE17MykAYMBKB4QAABksL8g==');
      HeartDTM := DTMFromString('mwQAAAHic42RgYJBlZWAQAmIRIBYHYhkgVgBiVSBWB2JNIL7AyMBwFogvAvEVIL4JxNehbJDYOSCepygONI0JLwYaRRAwEoHhAAA74gmk');
      GoldBarDTM := DTMFromString('mlwAAAHicY2dgYHBiYmCwB2J3IHYFYmcgDgRiEyB+AJR/BsSPgfgWEH8A4odA/AKIFzWIMcR48jJcWi4L5DGhYBEgCcOsaJgRD4YCAN+0DAY=');
    end;

    procedure FreeAll;
    begin
      FreeDTM(F1aDTM);
      FreeDTM(F1bDTM);
      FreeDTM(F2aDTM);
      FreeDTM(F2bDTM);
      FreeDTM(F3DTM);
      FreeDTM(B1aDTM);
      FreeDTM(B1bDTM);
      FreeDTM(B1cDTM);
      FreeDTM(B1dDTM);
      FreeDTM(B2aDTM);
      FreeDTM(B2bDTM);
      FreeDTM(B2cDTM);
      FreeDTM(CoalBagDTM);
      FreeDTM(AnyInvBarDTM);
      FreeDTM(TinOreDTM);
      FreeDTM(CopperOreDTM);
      FreeDTM(IronOreDTM);
      FreeDTM(SilverOreDTM);
      FreeDTM(CoalOreDTM);
      FreeDTM(GoldOreDTM);
      FreeDTM(AdamantOreDTM);
      FreeDTM(MithrilOreDTM);
      FreeDTM(RuneOreDTM);
      FreeDTM(HeartDTM);
      FreeDTM(GoldBarDTM);
    end;

    procedure SemiRandomChat;
    begin
      case Random(56) of
       0..41:MouseBox(346, 483, 400, 500, 1); //Trade
       41..56:MouseBox(402, 483, 456, 500, 1); //Assist
      end;
    end;


    procedure GetBarConstants;
    begin
      case Lowercase (BarType) of
        'bronze':
        begin
          XPPerBar := 6.2;
          Bxs :=21;
          Bys :=77;
          Bxe :=66;
          Bye :=122;
        end;

        'iron':
        begin
          XPPerBar := 12.5;
          Bxs :=121;
          Bys :=77;
          Bxe :=166;
          Bye :=122;
        end;

        'silver':
        begin
          XPPerBar := 13.7;
          Bxs :=171;
          Bys :=77;
          Bxe :=116;
          Bye :=122;
        end;

        'steel':
        begin
          XPPerBar := 17.5;
          Bxs :=21;
          Bys :=127;
          Bxe :=66;
          Bye :=172;
        end;

        'gold':
        begin
          XPPerBar := 22.5;
          Bxs :=71;
          Bys :=127;
          Bxe :=116;
          Bye :=172;
        end;

        'gold bar':
        Begin
          XPPerBar := 25;
          Bxs :=121;
          Bys :=77;
          Bxe :=166;
          Bye :=122;
        End;

        'mithril':
        begin
          XPPerBar := 30.0;
          Bxs :=171;
          Bys :=127;
          Bxe :=216;
          Bye :=172;
        end;

        'adamant':
        begin
          XPPerBar := 37.5;
          Bxs :=21;
          Bys :=177;
          Bxe :=66;
          Bye :=222;
        end;

        'rune':
        begin
          XPPerBar := 50.0;
          Bxs :=121;
          Bys :=227;
          Bxe :=166;
          Bye :=272;
        end;
      end;
    end;

    Procedure LoginCheck;


    begin
    If LobbyScreen then
    MouseBox( 172, 28, 258, 48, Mouse_left);
    Wait(500 + Random(400));
    If WorldScreen then LoginPlayer;
    Wait(1500 + Random(400));
    If Not(LobbyScreen or Loggedin) then
    LoginPlayerToLob;
    If LobbyScreen then
    MouseBox( 172, 28, 258, 48, Mouse_left);
    Wait(500 + Random(400));
    If WorldScreen then LoginPlayer;
    end;

    procedure DTMWalkToFurnace;
    var
      PointWalkTime:Integer;
    begin
      If Random(250) = 1 Then PickUpMouse;
      Status := 'Walking to Furnace';
      Proggy;
      if (RunEnergy(30)) then SetRun(True);
      MarkTime(PointWalkTime);
      if (ClickDTMRotatedIn(F1aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left)) then
      begin
        If Random(250) = 1 Then PickUpMouse;
        Flag;
        WriteLn('F1a');
        if ClickDTMRotatedIn(F2aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
        begin
          If Random(250) = 1 Then PickUpMouse;
          WriteLn('F2a')
          Wait(RandomRange(200, 500));
          MakeCompass('W');
          repeat
            Wait(RandomRange(50, 100));
          until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 10000) or (not IsMoving);
        end else
        begin
          If Random(250) = 1 Then PickUpMouse;
          if ClickDTMRotatedIn(F2bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
          begin
            If Random(250) = 1 Then PickUpMouse;
            WriteLn('F2b');
            Wait(RandomRange(200, 500));
            MakeCompass('W');
            repeat
              Wait(RandomRange(50, 100));
            until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
          end else
          begin
            If Random(250) = 1 Then PickUpMouse;
            if ClickDTMRotatedIn(F2cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
            begin
              WriteLn('F2c');
              Wait(RandomRange(200, 500));
              MakeCompass('W');
              repeat
                Wait(RandomRange(50, 100));
              until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
            end;
          end;
        end;
      end else
      begin
        If Random(250) = 1 Then PickUpMouse;
        if (ClickDTMRotatedIn(F1bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left)) then
        begin
          If Random(250) = 1 Then PickUpMouse;
          Flag;
          WriteLn('F1b');
          if ClickDTMRotatedIn(F2aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
          begin
            If Random(250) = 1 Then PickUpMouse;
            WriteLn('F2a')
            Wait(RandomRange(200, 500));
            MakeCompass('W');
            repeat
              Wait(RandomRange(50, 100));
            until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
          end else
          begin
            If Random(250) = 1 Then PickUpMouse;
            if ClickDTMRotatedIn(F2bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
            begin
              If Random(250) = 1 Then PickUpMouse;
              WriteLn('F2b');
              Wait(RandomRange(200, 500));
              MakeCompass('W');
              repeat
                Wait(RandomRange(50, 100));
              until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
            end else
            begin
              If Random(250) = 1 Then PickUpMouse;
              if ClickDTMRotatedIn(F2cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
              begin
                WriteLn('F2c');
                Wait(RandomRange(200, 500));
                MakeCompass('W');
                repeat
                  Wait(RandomRange(50, 100));
                until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
              end;
            end;
          end;
        end;
      end;
    end;

    procedure DTMWalkToBank;
    var
      PointWalkTime:Integer;
    begin
      If Random(250) = 1 Then PickUpMouse;
      Status := 'Walking to Bank';
      Proggy;
      if (RunEnergy(30)) then SetRun(True);
      MarkTime(PointWalkTime);
      if (ClickDTMRotatedIn(B1aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left)) then
      begin
        If Random(250) = 1 Then PickUpMouse;
        Flag;
        WriteLn('B1a');
        if ClickDTMRotatedIn(B2aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
        begin
          If Random(250) = 1 Then PickUpMouse;
          WriteLn('B2a')
          Wait(RandomRange(200, 500));
          MakeCompass('N');
          repeat
            Wait(RandomRange(50, 100));
          until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 10000) or (not IsMoving);
        end else
        begin
          If Random(250) = 1 Then PickUpMouse;
          if ClickDTMRotatedIn(B2bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
          begin
            If Random(250) = 1 Then PickUpMouse;
            WriteLn('B2b');
            Wait(RandomRange(200, 500));
            MakeCompass('N');
            repeat
              Wait(RandomRange(50, 100));
            until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
          end else
          begin
            If Random(250) = 1 Then PickUpMouse;
            if ClickDTMRotatedIn(B2cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
            begin
              If Random(250) = 1 Then PickUpMouse;
              WriteLn('B2c');
              Wait(RandomRange(200, 500));
              MakeCompass('N');
              repeat
                Wait(RandomRange(50, 100));
              until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
            end;
          end;
        end;
      end else
      begin
        If Random(250) = 1 Then PickUpMouse;
        if (ClickDTMRotatedIn(B1bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left)) then
        begin
          If Random(250) = 1 Then PickUpMouse;
          Flag;
          WriteLn('B2c');
          if ClickDTMRotatedIn(B2aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
          begin
            If Random(250) = 1 Then PickUpMouse;
            WriteLn('B2a')
            Wait(RandomRange(200, 500));
            MakeCompass('N');
            repeat
              Wait(RandomRange(50, 100));
            until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
          end else
          begin
            If Random(250) = 1 Then PickUpMouse;
            if ClickDTMRotatedIn(B2bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
            begin
              If Random(250) = 1 Then PickUpMouse;
              WriteLn('B2b');
              Wait(RandomRange(200, 500));
              MakeCompass('N');
              repeat
                Wait(RandomRange(50, 100));
              until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
            end else
            begin
              If Random(250) = 1 Then PickUpMouse;
              if ClickDTMRotatedIn(B2cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
              begin
                If Random(250) = 1 Then PickUpMouse;
                WriteLn('B2c');
                Wait(RandomRange(200, 500));
                MakeCompass('N');
                repeat
                  Wait(RandomRange(50, 100));
                until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
              end;
            end;
          end;
        end else
        begin
          If Random(250) = 1 Then PickUpMouse;
          if (ClickDTMRotatedIn(B1cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left)) then
          begin
            If Random(250) = 1 Then PickUpMouse;
            Flag;
            WriteLn('B1c');
            if ClickDTMRotatedIn(B2aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
            begin
              If Random(250) = 1 Then PickUpMouse;
              WriteLn('B2a')
              Wait(RandomRange(200, 500));
              MakeCompass('N');
              repeat
                Wait(RandomRange(50, 100));
              until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
            end else
            begin
              If Random(250) = 1 Then PickUpMouse;
              if ClickDTMRotatedIn(B2bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
              begin
                If Random(250) = 1 Then PickUpMouse;
                WriteLn('B2b');
                Wait(RandomRange(200, 500));
                MakeCompass('N');
                repeat
                  Wait(RandomRange(50, 100));
                until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
              end else
              begin
                If Random(250) = 1 Then PickUpMouse;
                if ClickDTMRotatedIn(B2cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
                begin
                  If Random(250) = 1 Then PickUpMouse;
                  WriteLn('B2c');
                  Wait(RandomRange(200, 500));
                  MakeCompass('N');
                  repeat
                    Wait(RandomRange(50, 100));
                  until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
                end;
              end;
            end;
          end else
          begin
            If Random(250) = 1 Then PickUpMouse;
            if (ClickDTMRotatedIn(B1dDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left)) then
            begin
              If Random(250) = 1 Then PickUpMouse;
              Flag;
              WriteLn('B1d');
              if ClickDTMRotatedIn(B2aDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
              begin
                If Random(250) = 1 Then PickUpMouse;
                WriteLn('B2a')
                Wait(RandomRange(200, 500));
                MakeCompass('N');
                repeat
                  Wait(RandomRange(50, 100));
                until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
              end else
              begin
                If Random(250) = 1 Then PickUpMouse;
                if ClickDTMRotatedIn(B2bDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
                begin
                  If Random(250) = 1 Then PickUpMouse;
                  WriteLn('B2b');
                  Wait(RandomRange(200, 500));
                  MakeCompass('N');
                  repeat
                    Wait(RandomRange(50, 100));
                  until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
                end else
                begin
                  If Random(250) = 1 Then PickUpMouse;
                  if ClickDTMRotatedIn(B2cDTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left) then
                  begin
                    If Random(250) = 1 Then PickUpMouse;
                    WriteLn('B2c');
                    Wait(RandomRange(200, 500));
                    MakeCompass('N');
                    repeat
                      Wait(RandomRange(50, 100));
                    until(not WalkingToFlag(1000)) or (TimeFromMark(PointWalkTime) > 25000) or (not IsMoving);
                  end;
                end;
              end;
            end;
          end;
        end;
      end;
    end;

    procedure Setup;
    var
      CBx, CBy:Integer;
    begin
      SetupAllDTMs;
      p1 := Point(243,320);     //Bank
      p2 := Point(262,287);
      p3 := Point(268,262);
      p4 := Point(262,232);     //Furnace
      Addonterminate('FreeAll');
      MarkTime(RunTime);
      if IsActionBarOpen then ToggleActionBar(False);
      if CoalBag then
      begin
        if FindDTM(CoalBagDTM, CBx, CBy, 560, 210, 600, 250) then
        begin
          SMART_DrawBoxEx(false, false, intToBox(560, 210, 600, 250), clGreen);
          WriteLn('Coalbag Detected!');
        end else
        begin
          SMART_DrawBoxEx(false, false, intToBox(560, 210, 600, 250), clRed);
          WriteLn('Error 404: Coalbag not found. Please put your coalbag in the first slot of your inventory and restart the script!');
          TerminateScript;
        end;
      end;
    end;

    Procedure WalkToFurnace;
    begin
      if (not LoggedIn) then LoginPlayer;
      If Random(100) = 1 Then PickUpMouse;
      SPS_BlindWalk(p2);
      If Random(100) = 1 Then PickUpMouse;
      SPS_BlindWalk(p3);
      If Random (10) = 1 Then
      Begin
        If Random(100) = 1 Then PickUpMouse;
        SPS_Walktopos(p4);
      End;
      Flag;
      If Random(100) = 1 Then PickUpMouse;
      MakeCompass('W');
    end;

    Procedure WalkToBank;
    begin
      if (not LoggedIn) then LoginPlayer;
      If Random(100) = 1 Then PickUpMouse;
      ClickNorth(SRL_ANGLE_HIGH);
      If Random(100) = 1 Then PickUpMouse;
      SPS_BlindWalk(p3);
      If Random(100) = 1 Then PickUpMouse;
      SPS_BlindWalk(p2);
      If Random(100) = 1 Then PickUpMouse;
      SPS_Walktopos(p1);
      Wait(RandomRange(950,1150));
      If Random(100) = 1 Then PickUpMouse;
    end;

    procedure Bank;
    var
      tmpCTS, i, N, r, Counter, ABx, ABy, TOx, TOy, COx, COy, IOx, IOy, SOx, SOy,
      CoalOx, CoalOy, GOx, GOy, MOx, MOy, AOx, AOy, ROx, ROy, VHx, VHy:Integer;

      BankTPA:TPointArray;
    begin
      if not LoggedIn then LoginPlayer;
      if not LoggedIn then Exit;

      repeat
        wait(RandomRange(50,100));
      until not IsMoving;

      Status := 'Banking';
      Proggy;
      tmpCTS := GetToleranceSpeed;
      SetColorToleranceSpeed(2);
      SetToleranceSpeed2Modifiers(0.16, 0.91);

      FindColorsTolerance(BankTPA, 10204113, 200, MSY1, 350, MSY2, 4);

      SetColorToleranceSpeed(tmpCTS);
      SetToleranceSpeed2Modifiers(0.02, 0.02);

      N := High(BankTPA);
      if (N < 1) and not(BankScreen) then
      begin
        WriteLn('Unable to find bank');
        WalkToBank;
        Wait(RandomRange(1050,1150));
        Flag;
        Bank;
      end;
      MarkTime(Counter);
      for i := 0 to N do
      begin
        r := random(N);
        wait(RandomRange(100, 250));
        MMouse(BankTPA[r].x, BankTPA[r].y, 10, 5);
        Wait(RandomRange(100, 175));
        if WaitUpText('ank Bank', 1000) then
          Break;
        if (TimeFromMark(Counter) > (RandomRange(3000, 4000))) and not(BankScreen) then
        begin
          WriteLn('Unable to find bank');
          WalkToBank;
          Wait(RandomRange(1050,1150));
          Flag;
          Bank;
        end;
      end;
      If Not(BankScreen) Then
      Begin
        WriteLn('We found the Bank, TPAs are awesome');
        ClickMouse2(True);
        Flag;
      End;
      repeat
        Wait(RandomRange(50, 100));
      until(BankScreen) or (PinScreen) or (not LoggedIn);
      if PinScreen then InPin(Players[CurrentPlayer].Pin);
      repeat
        Wait(RandomRange(50, 100));
      until(BankScreen) or (not LoggedIn);
      Wait(RandomRange(1000, 1500));
      if not LoggedIn then
      Begin
        LoginCheck;
        Bank;
      End;
      if FindDTM(HeartDTM, VHx, VHy, MIX1, MIY1, MIX2, MIY2) then
      begin
        WriteLn('Found Hearts! <3');
        MMouse(VHx, VHy, 5, 5);
        ClickMouse2(False);
        WaitOption('All', 500);
      end;
      case Lowercase (BarType) of

        'bronze':
        begin
          if (not (FindDTM(TinOreDTM, TOx, TOy, 35, 85, 117, 126))) or (not (FindDTM(CopperOreDTM, COx, COy, 35, 85, 117, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 117, 126), clRed);
            WriteLn('Copper or Tin ore are not in the Primary and Secondary ore spots! Please put them there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 117, 126), clGreen);
            WriteLn('Found Copper and Tin ore in the Primary and Secondary ore slots!');
          end;
          if ((GetBankItemAmount(0, 0)) < 15) or  ((GetBankItemAmount(1, 0)) < 15) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(TinOreDTM, TOx, TOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(TOx, TOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          if (FindDTM(CopperOreDTM, COx, COy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(COx, COy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          If not InvEmpty then
          begin
            bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
            InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
            WaitOption('All', 500);
            Loads := Loads + 1
          end;
          Withdraw(0, 0, 14);
          Wait(RandomRange(200, 500));
          Withdraw(1, 0, 14);
        end;

        'iron':
        begin
          if (not (FindDTM(IronOreDTM, IOx, IOy, 35, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 74, 126), clRed);
            WriteLn('Iron ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 74, 126), clGreen);
            WriteLn('Found Iron ore in the Primary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 29) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(IronOreDTM, IOx, IOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(IOx, IOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          If not InvEmpty then
          begin
            bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
            InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
            WaitOption('All', 500);
            Loads := Loads +1
          end;
          Withdraw(0, 0, 28);
        end;

        'silver':
        begin
          if (not (FindDTM(SilverOreDTM, SOx, SOy, 35, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 74, 126), clRed);
            WriteLn('Silver ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 74, 126), clGreen);
            WriteLn('Found Silver ore in the Primary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 29) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(SilverOreDTM, SOx, SOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(SOx, SOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          If not InvEmpty then
          begin
            bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
            InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
            WaitOption('All', 500);
            Loads := Loads +1
          end;
          Withdraw(0, 0, 28);
        end;

        'steel':
        begin
          if (not (FindDTM(IronOreDTM, IOx, IOy, 33, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clRed);
            WriteLn('Iron ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clGreen);
            WriteLn('Found Iron ore in the Primary ore slot!');
          end;
          if (not (FindDTM(CoalOreDTM, CoalOx, CoalOy, 76, 85, 117, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clRed);
            WriteLn('Coal Ore is not in the Secondary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clGreen);
            WriteLn('Found Coal ore in the Secondary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 19) or  ((GetBankItemAmount(1, 0)) < 37) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(IronOreDTM, IOx, IOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(IOx, IOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
            InvMouse(1, mouse_Right);
            WaitOption('Empty', 500);
          end;
          if CoalBag then
          begin
            if (InvCount > 1) then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(2, ((CountItems('dtm', AnyInvBarDTM, [])) +1))), mouse_Right);
              if ((CountItems('dtm', AnyInvBarDTM, [])) = 1) then
              begin
                WaitOption('sit', 500);
              end else
                WaitOption('All', 500);
              Loads := Loads +1
            end;
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
            Wait(RandomRange(50, 100));
            InvMouse(1, mouse_Right);
            WaitOption('Fill', 500);
            Wait(RandomRange(50, 100));
            Withdraw(0, 0, 18);
            Wait(RandomRange(50, 100));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
          end else
          begin
            if not InvEmpty then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
              if ((CountItems('dtm', AnyInvBarDTM, [])) = 1) then
              begin
                WaitOption('Deposit', 500);
              end else
                WaitOption('All', 500);
              Loads := Loads +1
            end;
            Withdraw(1, 0, 18);
            Wait(RandomRange(200, 500));
            Withdraw(0, 0, 10);
          end;
        end;

        'gold':
        begin
          if (not (FindDTM(GoldOreDTM, GOx, GOy, 35, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clRed);
            WriteLn('Gold ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 74, 126), clGreen);
            WriteLn('Found Gold ore in the Primary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 29) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          If Not(LoggedIn) Then LoginPlayer;
          if (FindDTM(GoldOreDTM, GOx, GOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(GOx, GOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          If Not(LoggedIn) Then LoginPlayer;
          If not InvEmpty then
          begin
            bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
            DepositAll;
            Loads := Loads +1
          end;
          Withdraw(0, 0, 28);
          If Not(LoggedIn) Then LoginCheck;
        end;

        'gold bar':
        begin
          if (not (FindDTM(GoldBarDTM, GOx, GOy, 35, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clRed);
            WriteLn('Gold Bar is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(35, 85, 74, 126), clGreen);
            WriteLn('Found Gold Bar in the Primary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 29) then
          begin
            WriteLn('Bars low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          If Not(LoggedIn) Then LoginCheck;
          if (FindDTM(GoldBarDTM, GOx, GOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(GOx, GOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          If Not(LoggedIn) Then LoginPlayer;
          If not InvEmpty then
          begin
            DepositAll;
            Loads := Loads +1
          end;
          Withdraw(0, 0, 28);
          If Not(LoggedIn) Then LoginPlayer;
        end;

        'mithril':
        begin
          if (not (FindDTM(MithrilOreDTM, MOx, MOy, 33, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clRed);
            WriteLn('Mithril ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clGreen);
            WriteLn('Found Mithril ore in the Primary ore slot!');
          end;
          if (not (FindDTM(CoalOreDTM, CoalOx, CoalOy, 76, 85, 117, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clRed);
            WriteLn('Coal Ore is not in the Secondary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clGreen);
            WriteLn('Found Coal ore in the Secondary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 11) or  ((GetBankItemAmount(1, 0)) < 41) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(MithrilOreDTM, MOx, MOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(MOx, MOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          if CoalBag then
          begin
            if (InvCount > 1) then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(2, ((CountItems('dtm', AnyInvBarDTM, [])) +1))), mouse_Right);
              WaitOption('All', 500);
              Loads := Loads +1
            end;
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
            InvMouse(1, mouse_Right);
            WaitOption('Fill', 500);
            Wait(RandomRange(50, 100));
            Withdraw(0, 0, 10);
            Wait(RandomRange(50, 100));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
          end else
          begin
            if not InvEmpty then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
              WaitOption('All', 500);
              Loads := Loads +1
            end;
            Withdraw(0, 0, 5);
            Wait(RandomRange(200, 500));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
          end;
        end;

        'adamant':
        begin
          if (not (FindDTM(AdamantOreDTM, AOx, AOy, 33, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clRed);
            WriteLn('Adamant ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clGreen);
            WriteLn('Found Adamant ore in the Primary ore slot!');
          end;
          if (not (FindDTM(CoalOreDTM, CoalOx, CoalOy, 76, 85, 117, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clRed);
            WriteLn('Coal Ore is not in the Secondary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clGreen);
            WriteLn('Found Coal ore in the Secondary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 8) or  ((GetBankItemAmount(1, 0)) < 43) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(AdamantOreDTM, AOx, AOy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(AOx, AOy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          if CoalBag then
          begin
            if (InvCount > 1) then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(2, ((CountItems('dtm', AnyInvBarDTM, [])) +1))), mouse_Right);
              WaitOption('All', 500);
              Loads := Loads +1
            end;
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
            Wait(RandomRange(50, 100));
            InvMouse(1, mouse_Right);
            WaitOption('Fill', 500);
            Wait(RandomRange(50, 100));
            Withdraw(0, 0, 7);
            Wait(RandomRange(50, 100));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
          end else
          begin
            if not InvEmpty then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
              WaitOption('All', 500);
              Loads := Loads +1
            end;
            Withdraw(0, 0, 4);
            Wait(RandomRange(200, 500));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);;
          end;
        end;

        'rune':
        begin
          if (not (FindDTM(RuneOreDTM, ROx, ROy, 33, 85, 74, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clRed);
            WriteLn('Rune ore is not in the Primary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(33, 85, 74, 126), clGreen);
            WriteLn('Found Rune ore in the Primary ore slot!');
          end;
          if (not (FindDTM(CoalOreDTM, CoalOx, CoalOy, 76, 85, 117, 126))) then
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clRed);
            WriteLn('Coal Ore is not in the Secondary ore slot! Please put it there and restart the script!');
            TerminateScript;
          end else
          begin
            SMART_DrawBoxEx(false, false, intToBox(76, 85, 117, 126), clGreen);
            WriteLn('Found Coal ore in the Secondary ore slot!');
          end;
          if ((GetBankItemAmount(0, 0)) < 7) or  ((GetBankItemAmount(1, 0)) < 49) then
          begin
            WriteLn('Ores low, terminating script.');
            Wait(RandomRange(500, 1000));
            Logout;
            TerminateScript;
          end;
          if (FindDTM(RuneOreDTM, ROx, ROy, MIX1, MIY1, MIX2, MIY2)) then
          begin
            MMouse(ROx, ROy, 5, 5);
            ClickMouse2(False)
            WaitOption('All', 500);
          end;
          if CoalBag then
          begin
            if (InvCount > 1) then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(2, ((CountItems('dtm', AnyInvBarDTM, [])) +1))), mouse_Right);
              WaitOption('All', 500);
              Loads := Loads +1
            end;
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
            Wait(RandomRange(100, 150));
            InvMouse(1, mouse_Right);
            WaitOption('Fill', 500);
            Wait(RandomRange(50, 100));
            Withdraw(0, 0, 6);
            Wait(RandomRange(50, 100));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
          end else
          begin
            if not InvEmpty then
            begin
              bars := bars + (CountItems('dtm', AnyInvBarDTM, []));
              InvMouse((RandomRange(1, (CountItems('dtm', AnyInvBarDTM, [])))), mouse_Right);
              WaitOption('All', 500);
              Loads := Loads +1
            end;
            Withdraw(0, 0, 3);
            Wait(RandomRange(50, 100));
            MouseBankSlot(2, mouse_Right);
            WaitOption('All', 500);
          end;
        end;
      end;

      SMART_ClearCanvas;
      Wait(RandomRange(200, 500));
      If Random(500) = 1 Then
      Begin
        CloseBank;
        If Random(100) = 1 Then CheckFriends;
      End;
      Wait(RandomRange(200, 500));
    end;

    procedure SmeltBars;
    var
      tmpCTS, i, N, r, t, Counter, BBx, BBy:Integer;
      FurnaceTPA:TPointArray;
    begin
      if not LoggedIn then LoginPlayer;
      if (not LoggedIn) or (InvEmpty) then Exit;
      FindNormalRandoms;
      Wait(RandomRange(345, 805));
      if (FurnaceTries > 5) then
      begin
        WriteLn('Failed to find the furnace too many times, trying again.');
        Exit;
      end;
      Flag;

      tmpCTS := GetToleranceSpeed;
      SetColorToleranceSpeed(2);
      SetToleranceSpeed2Modifiers(0.02, 2.30);

      FindColorsTolerance(FurnaceTPA, 6207962, MSX1, MSY1, MSX2, MSY2, 5);

      SetColorToleranceSpeed(tmpCTS);
      SetToleranceSpeed2Modifiers(0.02, 0.02);

      N := High(FurnaceTPA);
      if (N < 1) then
      begin
        FurnaceTries := FurnaceTries + 1;
        WriteLn('We have failed to find the furnace ' + IntToStr(FurnaceTries) + ' times in a row.');
        WriteLn('Trying ' + IntToStr(5 - FurnaceTries) + ' more times until Termination.');
        Wait(RandomRange(200, 500));
        ClickDTMRotatedIn(F3DTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left);
        repeat
        wait(RandomRange(50,100));
        until not IsMoving;
        Flag;

        SmeltBars;
        Exit;
      end;
      MarkTime(Counter);
      for i := 0 to N do
      begin
        r := random(N);
        wait(RandomRange(200, 350));
        MMouse(FurnaceTPA[r].x, FurnaceTPA[r].y, -10, -10);
        Wait(RandomRange(100, 175));
        if WaitUpText('lt F', 1000) then
          Break;
        if (TimeFromMark(Counter) > 3000) then
        begin
          FurnaceTries := FurnaceTries + 1;
          WriteLn('We have failed to find the furnace ' + IntToStr(FurnaceTries) + ' times in a row.');
          WriteLn('Trying ' + IntToStr(5 - FurnaceTries) + ' more times until Termination.');
          Wait(RandomRange(200, 500));
          ClickDTMRotatedIn(F3DTM, MMX1,MMY1, MMX2,MMY2, -Pi, Pi, Pi/60, [], mouse_Left);
          SPS_Walktopos(p3);
          SPS_Walktopos(p4);
          MakeCompass('w');
          Flag;
          SmeltBars;
          Exit;
        end;
      end;
      ClickMouse2(True);
      Flag;
      MarkTime(t);
      repeat
        wait(RandomRange(250, 300));
      until((GetColor(502, 27)) = 2929149) Or (TimeFromMark(t) > 5000);
      if ((GetColor(502, 27)) = 2929149) then
      begin
        WriteLn('We found the furnace, TPAs are awesome');
        begin
          FindNormalRandoms;
          if Debug then
            WriteLn('Trying to smelt ' + BarType);
            If Not(LoggedIn) Then LoginCheck;
          if FindColor(BBx, BBy, 1290732, Bxs, Bys, Bxe, Bye) then
          begin
            SMART_DrawBoxEx(true, false, intToBox(Bxs, Bys, Bxe, Bye), clGreen);
            WriteLn('Smelting ' + BarType)
          end else
          begin
            if ((FindColor(BBx, BBy, 1269431, 21, 127, 66, 172)) and (BarType = 'steel')) then
            begin
              WriteLn('Selecting Steel');
              Wait(RandomRange(50,200));
              MouseBox(25, 131, 62, 168, 1);
              SMART_DrawBoxEx(true, false, intToBox(21, 127, 66, 172), clGreen);
              WriteLn('Smelting Steel');
            end else
            begin
              WriteLn('Could not smelt '+ BarType +'. Re-looping');
              Exit;
            end;
          end;
        end;
        begin
          MouseBox(262, 303, 408, 325, 1);
          SMART_ClearCanvas;
          repeat
            wait(RandomRange(50, 100));
          until((GetColor(293, 180)) = 263402);
          WriteLn('Waiting for smelting to finish...');
          Wait(500);
          Status := 'Smelting...';
          Proggy;
          repeat
            If Random(1000) = 1 Then RandomMovement;
            wait(RandomRange(100, 350));
            If Random(250) = 1 Then CheckFriends;
            Wait(Random(50));
            If Random(200) = 1 Then ExamineInv;
            If Random(150) = 1 Then HoverSkill('Smithing', False);
            If Random(150) = 1 Then HoverSkill('Crafting', False);
            If Random(200) = 1 Then RandomRClick;
            If Random(100) = 1 Then PickUpMouse;
            If Random(50) = 1 Then MMouseOffClient('rand');
            if LevelUp then
              SaveScreenshot('C:\Simba\Screenshots\screenshot_LevelUp@ ' + TheTime + '.png');
          until not ((GetColor(293, 180)) = 263402);
          FurnaceTries := 0;
        end;
        FurnaceTries := 0;
      end Else SmeltBars;
      FurnaceTries := 0;
    end;

    begin
      SRL_SixHourFix := True;
      SetupSRL;
      DeclarePlayers;
      SPS_AnyAngle := True;
      GetBarConstants;
      SPS_Setup(Runescape_Surface,['ak']);
      repeat
        MarkTime(StartTime);
        LoginCheck;
        FindNormalRandoms;
        SemiRandomChat;
        ClickNorth(SRL_ANGLE_HIGH);
        Setup;
       repeat
          Bank;
          DTMWalkToFurnace;
          Flag;
          SmeltBars;
          FurnaceTries := 0;
          DTMWalkToBank;
        until(not LoggedIn) or (Bars > HowManyBars);
      until (Bars > HowManyBars) or (not LoggedIn);
      FreeAll;
      Proggy;
      Logout;
    end.

    Image file here. ak.png

    Oh place it into runescape_surface, and yup that should be it! Isn't as fast as yours, but should be more stable :P
    Last edited by GuthixBoss1; 03-07-2013 at 04:54 AM. Reason: Oops forgot to remove something

  22. #97
    Join Date
    Jul 2007
    Location
    So Cal
    Posts
    410
    Mentioned
    0 Post(s)
    Quoted
    16 Post(s)

    Default

    i get the same problem with getting stuck between the bank and the furnace. tried guthix version and it doesn't grab ore out of bank after opening it then runs to furnace.

  23. #98
    Join Date
    Dec 2011
    Posts
    29
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    im having a problem with withdrawing ores and it not finishing smiting steel bars

  24. #99
    Join Date
    Feb 2013
    Posts
    8
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    YES! Its working fine for me, i too had some errors like not logging in etc but i just deleted the login things and had a few shots but it works now. You're the best!

  25. #100
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by GuthixBoss1 View Post
    Oh place it into runescape_surface, and yup that should be it! Isn't as fast as yours, but should be more stable :P
    Thanks, hopefully if will be useful for some until I do an official one with SPS
    Quote Originally Posted by thebob142 View Post
    i get the same problem with getting stuck between the bank and the furnace. tried guthix version and it doesn't grab ore out of bank after opening it then runs to furnace.
    I'll update mine officially soon, try it then
    Quote Originally Posted by x44 View Post
    im having a problem with withdrawing ores and it not finishing smiting steel bars
    Make sure you have the production dialog enabled
    Quote Originally Posted by attackio View Post
    YES! Its working fine for me, i too had some errors like not logging in etc but i just deleted the login things and had a few shots but it works now. You're the best!
    Thanks!

    Also the login things are on the SRL side, so make sure you have your graphics settings set to min detail, fixed mode, safe mode, and max brightness. (99% of login problems are because it wasn't in fixed mode )

Page 4 of 5 FirstFirst ... 2345 LastLast

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
  •