SRL Archive - Archive

How Long have You Played Runescape?
10 Year(s)


Are you affilated in anyway with Jagex LTD?
No

Were you Referred to SRL?
N/A


What is your general programming knowledge?
Pascal thru the lovely Villavu Tut Island.


Are you a member of any other communities?
Not currently.


Tell us about yourself…

From: MrDerp
My name is Rj and I am 21 years old. I have always had an interest in computer and up until recently(Bot Nuke) never cared to learn how bots were made. I then came upon the site and read thru the tutorials. I am basically teaching myself pascal and the standards that the community likes to follow. I intend to develop my coding skills to better benefit the community. Within the amount of time I have spent on the site I have been able to help a few people and learn a few things as well. Including the ability to understand intermediate and some advanced coding techniques. I feel like I could be a huge addition to the community with proper guidance and interest in what I script. I don't have too many other hobbies other then working out and playing around on the computer.

Please show us one (or multiple) of your scripts.
Link and Scripts

villavu.com/forum/showthread.php?t=69488 - Ardy M1D1 miner and then the script below which resulted from comments and opinions from this thread.

program KhazardMiner;
{$DEFINE SMART}
{$i srl/srl.scar}
{$i sps/sps.simba}
{$i SRL\SRL\Misc\stats.simba}

const
  SRLStats_Username = '';// SRL Stats ID
  SRLStats_Password = '';// SRL Stats Pass
  TripsWanted = 358;//Change this to how many trips you want to make

var
  Trips : Integer;
  Ores :Integer;
  Exp : Extended;
  ReturnWalk : TPointArray;
  BankWalk : TPointArray;


procedure DeclarePlayers;

begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  with Players[0] do
  begin
    Name        := '';
    Pass        := '';
    Pin         := '';
    BoxRewards  := ['XP','xp','lamp'];
    LampSkill   := 'Herblore';
    Active      := True;
  end;
end;


  Procedure CheckStats;//SRL Stats

    begin
      if ((SRLStats_Username = '') And (SRLStats_Password = '')) then
        begin
      case MessageBox('No Stats account entered, would you like to set one up?','SRL Stats',mbYesNoCancel) of
        mrYes:
          begin
            OpenWebPage('http://stats.villavu.com/register');
            TerminateScript;
          end;
        mrNo:
          begin
            SetupSRLStats(367,'Anonymous','anon1337');
            Exit;
          end;
        mrCancel: TerminateScript;
      end;
    end else
      SetupSRLStats(367,SRLStats_Username,SRLStats_Password);
  end;


procedure Antiban;//Antiban to help prevent getting caught :D

begin
  case Random(192) of

    0:  HoverSkill('Mining', False);

    1:  begin PickUpMouse; SleepAndMoveMouse(3000 + Random(500)); end;

    2:  ExamineInv;

    3:  RandomAngle(1);

    4:  begin GameTab(Tab_Stats); Wait(3000 + Random(500)); GameTab(Tab_Inv); end;

    5:  HoverSkill('random', False);

    6:  FindNormalRandoms;

  end;
end;


procedure CheckForPick;
begin
  GameTab(Tab_Equip);
  MMouse(582, 303, 1, 1);
  if WaitUpText('pick', 200) then
    begin
      GameTab(Tab_Inv);
      Writeln('Found the pick!');
      MakeCompass(340);
      SetAngle(True);
      SetChat('Hide',1);
      SetChat('Friends',2);
      Mouse(147, 491, 0, 0, true);
    end else begin
      Writeln('No Pick Equiiped. Logging out');
      Players[CurrentPlayer].Active := False;
      LogOut;
              end;
end;


procedure WalkToBank;
begin
  if not LoggedIn then Exit;
    SPS_Setup(RUNESCAPE_SURFACE, ['5_10']);
    SPS_Continue := True;

    BankWalk := [Point(2339, 4099), Point(2337, 4151), Point(2332, 4192),
                   Point(2305, 4231), Point(2286, 4287)];

    SPS_WalkPath(BankWalk);
    FindNormalRandoms;
    FFlag(9);
    Wait(4000+random(500));
end;


procedure WalkToMine;
begin
  if not LoggedIn then Exit;
    SPS_Setup(RUNESCAPE_SURFACE, ['5_10']);
    SPS_Continue := True;

    ReturnWalk := [Point(2294, 4254), Point(2322, 4207), Point(2344, 4162),
                     Point(2342, 4110), Point(2338, 4066)];

    SPS_WalkPath(ReturnWalk);
    FindNormalRandoms;
    FFlag(0);
end;


procedure MiningIron;//Mining process
var
  x, y:Integer;

begin
  if not LoggedIn then Exit;
    Wait(500+Random(300));

  if (FindObjCustom(X, Y, ['Mine','ne Ro','cks'], [2503511,2569562,3360116 ], 10)) then
    ClickMouse2(true);

  if DidRedClick then
    Wait(2000+Random(300))
    else

      While IsMoving do
        Writeln('Moving to rock');
        Wait(2000+random(500));
        FindNormalRandoms;
        Antiban;
        exit;
end;


Procedure PrintOnSmart(TP: TStringArray; Placement: TPoint; Colour: integer);
  var
    mx, my, Pic, Pic2, I, B, H, TPH, Numb: Integer;
    TTP: TPointArray;
    Canvas: TCanvas;
  begin
    SmartSetDebug(True);
    GetClientDimensions(mx, my);
    Pic := BitmapFromString(mx, my, '');
    Pic2 := BitmapFromString(497, 91, 'meJztnf+vZEd55vNHRELi18hCm' +
        'F9CpBUi/GAJRUITtFrh7EoWSHxxnJWxWZkMBsyOIR6vA4M7V57bnq' +
        'vMuZ2rmdO9lm+ITRCysywx8og1sgJCREGTLNof+Fe2ut9TTz/1vG/' +
        'VOd13zGbjvipdna5Tp/p09zmfes5Tb1X91m+t/7q//u78/BVOD/yH' +
        '//TpJ76S0kOPPfnIV69++doLlx76zIMPP5bSHz36hP1Pu9LGxz/7+' +
        'bRthZGPo+y/vUwl08bDTz79+De+aeXTRqP+6e9yqP9Q/6H+Q/3vkv' +
        'rbtRnPZ6fLr81OUkmk9334Y//uY//+Aw9cSv/T4SmljcR5e/n7f/i' +
        'JtGEJ26mwlbf/qYa0Yf+5vE+pwj948JNc1a7vcqj/UP+h/kP975L6' +
        'mca+toT0pMkTz7/z/df++9/8rTUTxnMclf6H7y6J38JeIjVe+vr3e' +
        'JdD/Yf6D/Uf6n+X1N+uzZBuSj6R3HiOA1NCPamhSf9TMa6c3wUpLI' +
        'BjrR6fkJ9q2O9dDvUf6j/Uf6j/3VB/ozYgHfo8FbaUSn7iM//ZXBd' +
        'Llmkbts2FcYglPpAPT/+x19ePt9jjXQ71H+o/1H+o/998/e3aGOmJ' +
        '5ynnt3/n/e99/++m/9jg/7Zx3wc/5PNt21IqkJJtINMK3P+RjyInr' +
        'H+PdznUf6j/UP+h/ndJ/e3agHTzW1K7kDI//rnHPvG5x//jo5c/9c' +
        'Urn/3TK+n/Hz/1HKdHrlxDevS/rl9y/qNPf5sLpHzJkcxUg22n/7Z' +
        'te+Wox5+ZWbJdKdlL2/XF565bDvb+yZ89n5JV8viz19N2+v+Fb72Y' +
        'UtpO/1Ph9D8VuHztRRyVtrlMqjalLzzfrY99vrNdaePyXwzbaQPJ8' +
        'oftTTEpgF0+Uw639KUX/upLx7exzRvp/9eOT9cFdkrHt9P/p17sU1' +
        'pvH99eb2yqsiQFbIPLI9mB2+3j28+cveJT2iX/LaG8He7LpI0rp9+' +
        'xDdu29/KVX7316rPL79tG7QRSQg38iYrvYbNhb2rlU7K3RibOx7bT' +
        'O+Ic7DQs4SVOyXLkbPGR+ZuxYlwPH4sDcaq2wV+XfHzba9vpWHwWf' +
        'A/2zcgXiJJpF05Vfib+Wvgnk5JI/GE5X66x7ct8xdo1OVx7fOXnnJ' +
        '2uf9xBnHDTpcrD23Nquvai3csDLgwdfMunAptk+WuIPXvdcgbQPXt' +
        '9gGEGoOTYRjoW21uWPv3thPREcvjnSaUnpBvMP3X5KvM5vTVOZn2G' +
        'mzNP77U+n0ywAlnXhjL6ecNM/OcNYI1+Bb9LQIeX6XyYfgUAy8vA/' +
        '75FGeFYSTZcgSHuGIxyON+Mts214QYUQH399vfAQEvGh5TPHGC2YB' +
        'vp2kuvp2Qb4a5aQp04PKU/f/nv1tsvD2Wuv/L3KaWN2Xd+uN7+m9f' +
        'SLsvUXXnbjl1vpBo2ha1A2rYN/B/K5DfC2yENZV5+nf9b5ekkkckp' +
        '5fAHTx+HD+difOZ4OzmB47/9UUqS6ctIYfm84/Wkb/Wl1/GF2EfjL' +
        '2d9tvmbRPInvP0h6LvibxIHWoXbnym/C9dsu6qFX9r+mjicrxy+Gu' +
        'WlpXSR+4sZidtNNJ2WuF2T5hV3UNhgoa3k2xYFQg5s7/QSHZwGFm2' +
        '2rRFpsCimU0lCTgnpn37iK+hRNaR/8r88ZTw3IVqtn8AIgSdn7mkm' +
        'mVvYbnZZEoloX6xvzaHxhISsuOznwIGmPfBjobzlC0XxQdIu1ku4B' +
        'vhywkvbsAsyHegvV1y0tavX7o41WzI57UbgAriRtzcjwdDfkokPtp' +
        '025t//sb1M+WnbMi3/KJMk/f/L1/6X/bdidhRSemlvZLtSsZRsg19' +
        'ywq6b/+MnvowcKBsoye+SUqrKEhfrfvizE8qRc5uY+E3xFrLNJ4CU' +
        '3jqdgB1uZ2I5Kd3MG3aSlm6/8TNs25eDwpbwpfGXIF+I3wi/f6Qb/' +
        '/OncpR9Fnt5snnTCyZcJ+tL5btvtgsffe8Ot252XaFRS5npyjyil/' +
        'bfLuOjfGC6BdJdY3uxwQ0f7jVtAesCRu5N3hve12hEUgMkgsqwY6I' +
        'IjAJwGHSiA2VDHp9ZKKbthPTHv/FNBMyY8ZIkuunzQfHmhzJ5hpKn' +
        'Zjuf9EHssxgegTiDYZjJqISwZGDyN+O/Q/tOwu92+7tkJWZgHIRlC' +
        'dXnXvrBIG+y/GB1gSsEwhJE9XLISoLGLM/s8jvKgAVO0zVvL48Mrd' +
        '+7Y9cw7gtDq5WZAqKjfJTdnoYRu21PiD+ASbrH7TZHDhKzxWoAf3x' +
        'hYxRjSjL7H/8yPMqX5wNvv/lzHD7k0Mv0X1LatXjz556Z7STntrjz' +
        'S65hkc8B35gca0nOxypJx/q9aVdKtr38yf+Wj3A7n799kPQfn2j0S' +
        '/NJzlaSVT5av69q+ndbS/PX3l5feK+9jcbFGsHpbUe6We5V68M3l9' +
        '2AfKumm5RL+rteUoKGcQMAwcvRR5I9kjEzIf3hJ582nluf6f0f+ag' +
        'hfdDnG2gzb+3xB8itnQzYiIfZMJOf0YSishdPeTiweMoGjYmioCvn' +
        'pAuAv1soVcs35OKHxrb9uHPSt/zrQ40c5Q1mLG9ACOGQtnS8mS9vk' +
        'U+4swzFADJKTrkZ5Ra2vR65guj1vQ/W5e3bGVnGIssHr7AxmkC2l9' +
        '+6KxuSLJ/LS0kPSaYon9L005P6kXzOyz/5F34ZnoycJIrVCk85W/u' +
        'A0sq0C5/+6B8lB4l/U9klpzG0XCl/8+tbZqpZG8fNJXfrR/+InIu0' +
        'DsXF/9rblnnz9beRiZIpc303vf62HXXBJsAnoYG1MoYUJHnZaAjkk' +
        'VxyAFjLhPlpKSH9wYcfs0h1o/p9H/zQ555cuy7gudGbjxKLwLbNKJ' +
        'hl0xJMlhP2mVC5jG7xE0YT6plvDAHYC2kbz6HHudk92nzn7CGsVfH' +
        'mV4AkZlabhDYXgn+yUSDPSdMyZoFl2x4E8Gvrq86uQ2zw1c4kP4kE' +
        'thWwd+yzWFU9dme4Q1kHchru0E2BEAuDaHTE9uwVQBmyVm//ygqnD' +
        'T6E0ccbxkYukA48/4f/k/5jO5WxCtO27bLyacMSn9XZW/+SUvh2/v' +
        'zt8FSnleHKcTJ2JnaeKI+SOAEr1mgFUFWjCdg7NSr0fA7bDjSFtfJ' +
        'hDacbevf0tMKXTXEVbXYV4mHzMv1PTcCt3DqgXUBKbyHPIMJzeSiw' +
        '5wLcaHavoby9vFl5TOBDpjxKGCgM+GJgtsFuRG3n+LYgMTAh/Y8ef' +
        'eLSZjwpvPSk0h9/9jqQbg2BeSMCbfZ1xaNI2PS9Jz7TRPU8epBBRx' +
        'KcW/+NsV/n5bHx3FJYzCg9OBX0+Mb2BQN87mxG9lfD0wB7sZGuUlg' +
        'WTGbIDJ92sg6Q7CXfRFBcQuApii6ENgMhMW0ottlYy2ZsvHXXswv0' +
        '8xwDAw3X2BakM9Utxzawl7etJN7IqM75zF4c5RMozY0Fb8jh+KL8O' +
        'Uhtspexz+1LKOwb6A4biCkNh31FNcJPTDvx3+g9uECmPd74mT1ENI' +
        'w7Q/opMb+LjCbR81xAmoC0bd0NLJZAfiOAbbMYC6T7q1VHSMyBWgo' +
        'dXeuY4EaBi5lKNy/dQtbfc9/9Cel/8mfPw0UfDJPsnFhjwQmc505w' +
        '4FqjEVymIN0HBszLjjnf9WYv8eyDYoC2FF7nVH4FQfo8cuqkU88uA' +
        '+4vQ1OOFj+lhnKQiwp6YEoyn5lvDWBwy3Dybz3P/d1nN1HN8ajBAS' +
        'J2fQJv3TUCG+EZy0ywjKlCq7O+BcqETqzSBd1CdY9WpnrKP9vUw4f' +
        '7hkao67nNH4fZ6w9kbvPn8lW12TvFopFK/M/dBqw9zuzB84s/YkDA' +
        'G9KN5NafYhd85zxAvpUE713u9+G7rIH0bvOoi3sQVBfHBv3gbScHJ' +
        'gwUe2KyYdkyWfHOy6gD8N8LWu47ZrCbSsdEAYb0P37qOQtNhOvCXr' +
        'c5MGn7uZd+kLbTf9vYNiJkYkNgi/ZGJgdjgMmM9NRGQGBbAe7Q994' +
        '1w1b4z9QNy3MkRtEQUN+NFRCvw469SaEOwHhHcQ6K4qy9T8oCfMFM' +
        'l+X80iqX28QQbZpZmC9IR/kpVBekW8KxDQnNSE+JWYrCDLT0sicZz' +
        'ERtvxSq8wmzCeNBLUjHu59VBLxg2YNd0lnxJRRPEKvIqzFzyT6FP8' +
        'ma6g53Sc8sCqCYuiI7SvQ9JH3ozweZ9NQZivZU4LQ0akLgt/uLO+q' +
        'rsjuRvRoEEqxv840/P98Y9bEg39AbnvCQEtVf+XtIdM9wyecc0DKk' +
        'Oqt089LXKv3yVVPpFk8okSE4PJEc9g7CPxpBrWEmny1Hxxm9EdcEb' +
        '1wUOCOdDXCJf2tEsoUlERQXkn+ew+SsGDhsDD/JKn1cXUd2CoLfuh' +
        '9q9yWgXeN5l/uhTIovSL1zbyOz2hzgiYIcxXDjixnOVOydLAfSe2d' +
        '087aBK0Gem57QUQkNloZQ92+actI3JkhnxrJDHorziakGdm/FCKh7' +
        'EuRM5hDpxrpV+YwTIt0/CMje1KwITqdTeg+eJwJzL+3EqtAnyzfI6' +
        'aaqibieUqwj02a42bMhD5jXfNfQ7/UP/pxzVNrsPqedDOkP5Mm+gH' +
        'SodIQXWog1wv/gpXNvLCL9cA4W9WdmS5jJDx2z3AXJDxoSR81ID2V' +
        '5TbSzbjevTBS+D/oF4U8oPJiDjRnpordNmZ+4AkL18LpiL8ULcpPf' +
        'XaUDFCEooeyxTDFqNiS5+3IZYWLOiaBegkwE6UJgZjso5EnLnF+V9' +
        'gWb55IYvGFi5yRUs7W3gAnjMdtAdOic+EO8M4P3AqVtr/jY0pLWPh' +
        'QfYs8+Nar7+oXecF0sH+0FFx7l7U5UH3Xdsdfgn/7bvWCdsJLarPb' +
        'obuD9hCIc2JBHPENNn+MZ39NbCAbzeb8kXvqlzey7KdmsL9Y9akHp' +
        'Mg4L8ZOmz2d5uJnZL9IbK344++SSKeXxAdk/L4Yt5GLz0kvxghypy' +
        '163dZh25HX7JKNU5mWXKLxxDCoxMssIEb4k2EgfrJjX3xaVnrbtCa' +
        '6m4TkHvkq6mO1BEnsl2rDLoSm4B0/e+AVUjdxBBgEjM5snnt4++QB' +
        'Ck7hiuRi62Yph6LEkXlIcYC5wd5ThYZKz8owVZ54PnIj0VTZS5GTE' +
        'fvEErtWMqmDC+IbVmAw4o7byN/0VwO739nXf2wPfdDv2wmZvp1r9U' +
        'xjuC3N5u9otHpIZDji32T4q0cM0IJp4Dv7Y9h4RkvDVB3HrOkwnRj' +
        '/ONqEpCelfvvYCpnM0L/1zT141pNuoIsQr+vE7GKQzo7j6Wi9nI3N' +
        'e+ufQ59jVeJYRlxvfcEOr+6qOKHbRQB2OcGRKe4l+0w0SlFa+c7a5' +
        'pNB1B8Zl265kuzLBcxTrs+toocLAO2qAJwlVv8q+B2DeuONQGJwxl' +
        'PUU/tE7w4QzGdQCVQaC8FP6MRsJR6WmwWfWfOza251VKg/PBB+wIa' +
        'fl8DOqeZlNfuO5/06kkepL171dsobchmjvc+TnHo5KA+lTGB6+5Ge' +
        'EWxvFzpRmpPt7Zz+ew07vsusiIcfT09AlmjE+zz7zdG57cQ72Jhon' +
        'pD/y1auYnndQ6ZevXr72ok2Vw0OKLNyFg9IR8W5CHcGNsxxYzriuZ' +
        'XKwIuOa/fN59l6wy/skbddlTh2gPkmF2xY5p5v5N5Xa1uqaOCzbDU' +
        'Tzxcb6HMlQLCaeXaVwbHgXxlQavW/nwPIt1e8Mqr6rhCzuccOyOB/' +
        '4SWxHPnjCcr1GQhwVmudh8jBvmzZnG4T6Xs5a+UbDEe6tnZVvMlbZ' +
        'REIvrZFTqM6B9PKgwRZKiHQU24m0QlRY642LZL8ox4m1ycMm95DWU' +
        'k29c85EttuNvPbMN+OY5uLA7Mhzfjm/gN/C4hwmSUL6Q489iaFGNr' +
        'nuHz/13J/82fOGdMzRZBs8Nn9GM41gINKMRgz5rtJa/6nvxp2XMec' +
        'YhCvMR8z56JCf0JAJ1PsmuEWiIufZkOGXuBjwc3uYeyUPwYDyPnC9' +
        'dtWNig3Y7NjoyHjhQxalnY6XizwQaWKHqWd7DnTZhrvA3MCgIZAQ/' +
        '5nhZtfslGoSXejHGFwnksQo3w8GVNEMNZBe47l3loTJ/M2gjAyDWl' +
        'EHLohtZ46zBf89z2GA4/DpOA1FMs5kSitwbxMMc6F6g8Ph+KMwdrE' +
        'GdusyO6FJhKwntBiptFHsI3Z6SXX+jwgQmXxgD6pj9KjN8WIq3eZ4' +
        'SUiHSjfjBYLczBbuIUWFnAMXhRneyJTQR7jlkN9iyIgmlyGfc2eYc' +
        'LIfQgrznEgn0bghKwOqI4gxDFM09T6l9W8kSHF5fkTN/jqEboEDA5' +
        'ibdIe7yFGOLH4YyxIG6SEP1524NIQjbrT6XYGbj05HAfNGQlbvyvb' +
        'QpvYeiw9frInqBrfbPA8rbHjpZ+wLvTV8VyCzHCitktTZZ8+KUV8T' +
        '8z11odb4DKTf2y7RPcC+yJMYdDkGYCLSvUbyhSeKdo/06VpdVPr1P' +
        'PUTI/2IJtmr5UjCAP9wJkZGus2IxeHoLLl96AtjOeS2z/QkZ2L7Hl' +
        'IOR2kIcpHf12nOQK5ZBTz9NF3pvdivaczHA1cj8vwiJO8oglG6eNp' +
        'IX9CQajgtMNKhc5jnXe4n3el+DEHXl4YJ9DYCqsMO0zaidypZI3BI' +
        'eG9ijCrwJcXeN1AfVtWAOdjL/nn6us7e/mecmHgvsGVYojOZ/Vszw' +
        'PEWAnmoerZ0rE2ZgvTfQMI1bPeCj2DEtgWoh0AeHWrqk8xxt9V1mQ' +
        'OWOXHCsVk5Bufi3gs4XEP648/MMOmihbjMqHsUSMeYIzFSmNISrBh' +
        'mzvIcCCHS+SXzvDEVwNxNgjonL13sd980hI2FxZyf5OhEXAYnUWdo' +
        'I3bRNwEwYXygi78mrQD31/grU8yW4cTe/KfTKPq3+2GB97bcAjRge' +
        'ntAwRLfW2zvdyDox08BNfB6sNfaqVF9flY2B1Kg4b1wU+IbHTnkLD' +
        'stXANT1wvvFT1r+GO9hcLEXmZX316Klz4K9neO/AhTxMva/XLyxi8' +
        'aglxyRksWDM9x6SwCuwn9pPDSTZ/Py2GYF08W8RJOrrtW6XlWXnZa' +
        'wtnAfPiiV+ZevXv//C9pam5OItFHgTzPXZwoCZJ32XXxsTHhL2KVy' +
        'FPVlHGdN8sucl9AgtJhqvQyv2s52uh2Ob9r+7K0XlHUA3GCm45vDY' +
        'kokOiCdJRnAu79vhR+9v8iJJ+O9JXzOsCrxhjPhp5fueGZod4GzD3' +
        'JJfZSEAqLCQXQvpy5+n0T0JeOCitwft/8Ee56x6aPbBZW4/jd2bTh' +
        'kUe+j1Ium2UZxH7Pk3SP2lVtAQDD9kac1JDeYPsU+CvSkdh+qbgxc' +
        'F2g0hH9Mq9M+TIxEgZdmeHkup97coh4+drxqfWK1mb0XWv1l7Zz3o' +
        'bcbidxXUSoc7iLDB0N5TSPDw3jzxvHek2OYkNV+Wfi+R+Q2rJ81zQ' +
        'EqLjRo7dpDnB+/EQBXPNdfizFRb6gIUgsbxoSK9yL1IZezR6/t0n4' +
        'LGxnNhIqa/HtQb7ofyvmrRUxZMImY0mB+r6BMAKj69Mjne0UjsA8I' +
        '70t5QuXxgl1/inh5EizvqQ+VoO8XANe6ve5x/ad5jlOlUcYwXjkUf' +
        '8+QN2if6dHvDDPb5QzdxWmumd7W7RTFN8wuffFgtJnOeKl4aVvxxm' +
        '9PMS9PFsuHmFghzJnPqNPE9z2mdIKSJRLbbRRGFsO7d1lfV7z2xGJ' +
        'NCVxtRgF7PtDp18Y7aFtcLm7LK27chKArfC+sw1uQeS51/kdjSQVq' +
        'jceovmWBOs2OFp3ktboKiR8p2G+qndThj6G2DKe/F57s5BuJzsT/x' +
        'ZcOUfIywnYV31WnlIorbljt3eWC7/kQ0KtzketnBUDhrOR7rV9QxL' +
        'c82QqxS5jPGOiz6h2c/lJXZAzZZwpnsrRhcqp407SujKcuwhGIL0x' +
        'yGiPlJD+8c9+HhGMSaVbECOMl63HQiOMuFHgyVsa3aCzsj8UGzKSl' +
        'JmPnHkZ0Cgkn+fhV4zxLhsspqj5f0OfcxNwkn14VAjH234mxvh0ic' +
        '6zRvBL1FZcvfU5XgYaU/ChjDlCA4HCnZPctVsPwS2IWmFKN4IMfzN' +
        'Irwlp0cyjEJZjwzB1sUewIW2KiPnzHMNTS8x5r6i9byN89vk1BrJv' +
        'I/q8fVRfei+hS9O4lnbtSJ3u0qM88xkuosie2t23U2Ix77cHkk9Au' +
        'sBc2f5qEKPunfZR792GGoUqHXO8iHPuV7UQ5yScU/eI0M2Zx2U+J+' +
        'Cd5+nyXaJepYtc34rzctrbkOdMda7E4lEH/JYjg25SIz5vztbFV1T' +
        'Yv2kY72l2aJ8wazRf/9yz2fFqbjnWhQuHK7shaNyGjmJQp032kmdK' +
        'vDsdtu+0OB9V0aXZopQOUQwrYwqN3Ynd9W+3ipx5BjhOfjvUiLa9Y' +
        'l9lp0WiHD2fw9PwGj7k+SrHw8N7EZ579u43De/eyfS5TbcovordC7' +
        'c2s2SA+bLRRaM85D4NbZkqz7+vc7k0fIDqaKNXL6TSDZt+qBEiXgz' +
        'pEuXCa1j4toNbkOt56q0ZBVX6TE9yfEA2z6HVrUCtS7RmtiQIS4cp' +
        'H8UbgnQbQdDROr/IEZ438NtOvDTGggbs9+SfDNqbrJWayEGSubmkR' +
        '6kvh+1jxq1l9oTLqPJhBaKdkLtr+uuf/Xoncb7K40BX2dOQE/B0nZ' +
        'LkqLDtsMr5xMLzPKdZy5a5T1Pea4hCJHv8jNoXL9fR4nh3hZErrYB' +
        '/FghJDnFuL8/KyMm+KeynyPJ7TvvbebSFqPTR1IiTYXqHSOe5ducU' +
        'vshIb0wUAJ5D3CI/prrLOaK1MkOkf2128oEHLrXj0vlAH3/IZN4jW' +
        'F10vmjvQ1z6IS59esmJoBadHJap1dNoYlalo+6PDd/X0iEufWI6xK' +
        'UjyVKhtp5mQ6UjLl2Qfj1a2EKYP9sxWH12iEvPuD7Epe+H9PNDXPo' +
        'hLv1dFpeOqboM6VZnqNJ9XHrotNj8ABigalPHgOTTg9Vnh7j0Q1z6' +
        'vkjnAkLIQ1z6IS7930Bcek2fi0RH5KF1j77vwx8D0u/74IcQl461p' +
        'Gf1hS2k1TCkTw9WF9flEJcOAh/i0vfwW4TtzEZC5SEu/RCX/v9NXP' +
        'pE1wUvEZeO0aMJ6eylc2FhLzNZGI5WQPT5IS69O8Sl3zuYryIbRIS' +
        'uR7qU98bRIS4d8DzEpXf/6uPSZeotQ/oHHrj0ex+9pDMxUlx6yF4g' +
        'PYyB8Ycc4tK7MgiKXx7i0neFeajMWTOPQliOPcSlC6sPcek46l9PX' +
        'PpoSkj/o0efMJX++3/4CUY6BzGifLiGRZvk7WD1Q1w6FzjEpU8X56' +
        'MqujRblNIhimFlTKGxO7FDXPoOTL5gOsSlN5D+4MOPJZVuSOeIFzF' +
        'eGgtboDXhxTXEeGHOzw9x6dFj3SEufSdxvjrEpZc6nJErrYB/FghJ' +
        'DnHeH+LS/9XEpdei0BtI//QTX7GIl4T0P3jwk++5735Z1QjjRiGeP' +
        'diBdIa/pzqgzfleqM9o9SLx0hueCQPZhy96YksHqBBeRH6IbqxS6v' +
        'nsec7CO6ytzxKaZfZwYOZzyHO+ZbrszMA8kaUuumaP572l9ERW76T' +
        'PhbSimUNZPhHmYavBlfBbLHMkZ/gt1SrnMBXsAueXpU8eeiah6W35' +
        'iHgJD/c1hxcA2zsc5TLKZF/4HcL4Ii85iltsFOkN1KNfdbQVqK0sD' +
        'OwDKcisqXR2GAx0iGw0pA8bhPfp4euYLx0q3eZ4qal074fzG8FUN+' +
        'Ynwpvlwmd1nJecQ4K74l0XsN2E+mi4S6NLlHeFB0q1WJqqgXSfOSW' +
        '+EcUkUqX7YTFugheGtthFHiJUW0guXUv8kgHe0FFYMJTRXSP8FPY2' +
        '8L4f4RswZzyKm7FL0nCXM9LD3HAIqEcbvlW21s+c0vaKnT+RqPS20' +
        'q7B3NcWrnPksQlEs9NSwzv3n75zSDd0WyRYuhES1UPjhVk9eiee1m' +
        'vomt679Jl2pNu7PG5lFOleuq+7UDMhhxiYLG6nIx1eus2vaypdZmI' +
        'Uj+V6NFbo+iZSHdp70OoU+jLLqyzJo4Q/VQlxuU5LkUK9p8/rre9G' +
        'XCKMl3m2YsBq7lG1dJIz0QRgLVHW8ALwdicp/+K1JIODgHr2zxnpH' +
        'uwdBbTUFI655Tic6R3C6nyCi76HUEem3ys5DRXtNTkouocal3bhrE' +
        'Si1AyVDsXO0r0U9nett1QQ7Ukr7xgivd9IYi7QZytbeC7AR8PBxWo' +
        'Bhwh3gRsTjlyQvb8xlW7pFsUuGplvUUAjYNtgO9wVi37hkhLJwPn8' +
        'jM81gB6IchxwseOS09ttFwQyLx0bdEcy0j/+2c9j9GhC+nvf/7uPX' +
        'Ll2+S+6Lx3fvnL6nZQkItH3cnrzhFkNET6jyV6kjRCY84aHeSi8vV' +
        'DH8KI5+TBisNzMIz3D5gBSXHLmOXjG/+JMbB65v0cQ7Gnu32nfFOa' +
        'BtwpU9PyKRugDOKPis6bADcIiwsNM5NQ4X5PxhaB16PPcnkJ1fyAD' +
        '3I8kOi8teq4HDAf8OehFNDMLcuatz4RXc0ZIb/gqEl4OpMvQJJ9Qu' +
        'GbRyEtPeB6C5CNY2jJj7zRomDzOiHtCmc81qoc35hCo/HowQhDlt4' +
        'OJNoHN4qtLgZ0WJxWqj5Qk3+Z6nuPlwYcf8yp9bbwc337m7BWeTdc' +
        'jXUxydsh9+EpNlrOG522cdo3nwnCGOTQ562fvutwkNY4Chmv45Ddz' +
        'gwvCy5MXUsN12YawRiNJRZbjWpWcnRKLtEoBFd597lYLrYOJOYL0G' +
        'r1ZokuZhjPT1ttez9cUO2AbYh+ZZ67wsgyP9I0gq3ep3DcfAnBhuG' +
        'T64EYuiSlfkPoyOsVb9IJu4T8iWJau49UzOWR7SOxQxu9NdX6qhcf' +
        'OQ414r5dMPrORjPBFZ2gG9ZbzMv7IRpiWPN/JkNkprUn73TdlqBEi' +
        'Xr7wrW0QI5vkgPM8Givke0IF8mKqz8ouXTbbAXOhOveTSppndwVCG' +
        'j9HGJ2IFkFsc554x5DufTMR5H4v++RzejobTbUY8kYyoQ6Gn+fZV/' +
        'hRXZIBB0Es4iTXiDqd8KEgfyf6SWucnJJqLYWgntsF/7wgVVkfJet' +
        '2EeE8MVdNMIuvwpxnnjOQPdKZ1V6fM/n7cgi/7JJUy/fW+n6U3pXn' +
        '21j0zTsicLd2c/HGTk/NFv/WyWQveZudFhmLJAwHXnZiu9gIMGEYl' +
        'SnTVLr30h+5cs26R6+cfsdmU5SgF97gMUdee9fUOwQ5VzKn+RJh13' +
        'jXJZzahcX2Cc3owuI8VOldDlAMvz1DetFYR/3douRDuT4a0HjBK3x' +
        'VTrrSU1iagH3Ln038OZDehnMb2ns3B3tTPURxG84h0r0sX3F45E9/' +
        'HX6u2gdZOb+l5qJ72rPBIlQXm2VZRhj2NMuWZXI8+dL554J979Usa' +
        'CqAif6JwPadRvoiT5chkxTd2rwM7zV0rbbFOWbkC4EvxouVgXk+J+' +
        '+lK+PbUaabEAmzjz7fSHRT6Q8+/Bh76cOEABsvHREvz730Ax/xMov' +
        'GCrUtGuY5twXXc3DjPBtE7KiHYN81ebccYp5Fe/ry0RkKgIeIZoBz' +
        'AbkSZCCbDOev8bxmgI9SHbdtqkHs0DyA6C4P/+zzmJT9pDK/NLAz6' +
        'vdD+hQx7wVzSO+J2BfMyoFnkaQ/LztDz0tVf+6UvCBdJbcj/NL56g' +
        'xqmVa3r0S89GVQYs11CeMVfcnaVSe7Rr2X0aZBbPlqMZsHqVI5uk2' +
        '3VeVJM3CGuPvCXtHOOe1z130GqgttdGz4ZqCiPe/7IPaLJA4LtCAZ' +
        'U+mXHvpMoro3XpJK//rt76UkoJ67sUJhOE3ouos+hwPDNdv/6+Wsj' +
        'FOQnk7Jegp8BLtEqrPZkv4bltM3b//bA4jwI7ZVtxCbN3ggf1+xWX' +
        'alupOdg5cCaMNm6XOv6HlzdP8Ulhp+sZ007Tn1iu7aTDTeK6S3byN' +
        '8gT2oztxmpHMBNtjDd4EDU2P1ihzyFfV+blkaTfYiSp5tc4E5IlLA' +
        'czCcmwZP+LBF8Ehv6/CGu97AuD9KDrzlpob2bypH8WzS0oHb0Glhn' +
        '5eAmsuYDi/Mltfe7pxV2wjJ20Ks7ButhV4z9GwDES/oHk08T+k999' +
        '3/qS9esVWNTKiHSBfbhP32msfO4S6g93UKQZ9nU+XIOS3spVdhnnk' +
        '+RaWLnS5S/KYbQyQp7A0PE+IPOaeGcaRl2RXlN3wqyXYXvZ/9MM9t' +
        'HIXIa1JMkeu1ApZfC2LZ6SlASL7eyC2FUNqD3WNW9LBANQS+z1yWv' +
        'aKGa3lfLsMwj2V5iVD/dox0RX3FMO/LoBRsyFB9PsqMGq7NxzTiZb' +
        'qEeJcPqlm4yRtHaS/0DtPEpsSju1F+QRN/hVqdwyA5HhIAR9dnY9I' +
        'AozpYYaiZaKFLx9+UtmCWJ9flOV4M6UmlI44x8Vzi0v1YoZpK54nW' +
        'G2EwYqqgmZhXukcF7AZzuECWI52heDI6cTN3dTTGn0MT7wnPOXHXT' +
        'F/R50s3BrDn2Vd+UoQxeKR7vk3E9RTkMvF2OhBOOw6Btm8r+e2Z/1' +
        'QbBS+P22fIwMR3tWpOjei/N2RKkviZZTZkCkFe8jxsYliTi6Ni1wA' +
        'z2aySkPk1mW3lgW6YLazVF9EMup7DIdIbe2uwFY+lQfLRxLfViGNz' +
        'p5iPt3bD1twY4Jp53pb3Bo3pSJ+4NNKc+kkHzGYv3QcxJqTbUCNDu' +
        'lB9yrQD1qlaEP7l1wXmWGN6npc04rFF8ljBon27dzPYyrvxkrrmxO' +
        'n2c3AH604KvJvW9elVuue5IJpJ3ucO0C3q37orh0ArhrANZe3EFHa' +
        'A8vbeNovo7Vpb02iSBOmNxqgmyxv5/lMvK6OZ5CXA7jOXrvfTBy7i' +
        'B+UDQSpWwigMgW0b0kOKbaaudIyyaBcGntGqRtJh6hsOOTGpqmGtS' +
        '+XtBsKfzMSGYHHnl16QC8x5VClm4pW4Ne79bPSoFg1BBk5KNydzO5' +
        'yuZO7iXszoMKQnmAvSMccL5lcXPtdUOtvm1qnqwxo5gjEU6kFjRMR' +
        'm6W7tyxGtncFNwIzmE+A2gp127t1AQPtOPB+V5bJCYp/H/uMKFGXF' +
        'fPb3xTIvEif3fl/a6fcW6RdJ7Thzf24XTNJGtEHdQHotJ2ws8NK7K' +
        'Ctnv0iHIyN95WzzZemBy+8eui4g87Li18GQEaRDpbOFgkZBFHUoj6' +
        'fgtJHphXqI+vCoRv215qCjBXnl5m3DORya1E6m0jFoXYeXTkN6mGz' +
        'eAESbJKRfeugzptITz3kmRjNebEIAP+AoRHrVgXn5dQE+I11izsPT' +
        'lgJmmx+VxxrbWb17he+/JftWzYRHJ+mUX6ox/60oc+sM7aJx/Tsld' +
        'JjyvWYWIouxUeLdQ3jeQ86jNtgy4VtMfFNp3bze5pdLiiEMUcxBnr' +
        'VKzp0g9+JcWA2JjogX6aNEJlPaCwDOkWGkXEy4x0hflFGLyOcC7Ml' +
        'z+1IjvLdQwjMZTX2e3cUTe6JE97sgsaZP3njBZEhnnl88mUo3pAOt' +
        'CelfvvYCR7wklf7pp/7bI1eufeH5rZceTvMSjhVqWDGc5nlFD3SVe' +
        'pO80RPKFhDYHgJ8SreClN+p8W0nMH9BC8wx1ZnSfX7Qrl2ZvFcEvG' +
        'i8dxrmF8c4tmtCPXzQOM8O/E4+Tw3pKLCsjPc8b87QC+r2Y+tQn2c' +
        'B77tEwV6vz32YCsC7ypMxCuH5EG+2sxUDSkPVcyUCVRbzXqifueXt' +
        'emetC9Kn87whzsOctquD/7V5Azix5QIfZm8UiJE+3XVp8HyYB+C7b' +
        '7IHYmuPJpLLctI8zYsYL+2xQrVOUh6pdFQZ+N/AuLjr9hI63Orhhf' +
        'z2Qzq+fCB9D6rLGNL+x3H8edc00vdIjJr/VzxvkzacAcafpN9uVLI' +
        'T1UcbC8//NqVDzof5MvyTy3Mo46rsJPWQ5+iUvpyPRWQ5Qz5Eum8s' +
        'vDL3Sluwya47v0V4PTeqmgLzWiVST19Gv9RQ39HcvG2k3yuehxF3F' +
        '0S6X9vOTwhgk+t+4VsvQqWLUG+PFZq5hTDYe7lOaxXxy4mf4qh0y4' +
        '+zRD+qjEXafo2vvZ1K8iyOvnIfuLi3SmdDxqi+let3tlfURN8PySR' +
        '9eMvwjR9Csgal3wDnpzO/hnc/Icxohf57GP2YIaunQ76m4RucZ9qz' +
        'uvb0RgGPerFc/OCjQlFnec81A+/SQIzynFE8KktGER3+H0V6KOOF8' +
        'HKeu87ucsGEScCMM/fKdZlj1QyH9Me/8U3jOdYe/dTlq+geRQ8p/P' +
        'D2WKHjaK5Fdmx4tKk45BPZzkhHZuNYfIe15gMtKb8MkyxpNIXtPa8' +
        'ETZ0yiztbh7CdpAzGsCCHGdJGdA1ZYM5OcvfiPG/Mxxi+S1h+9PPG' +
        'n8IFRta+nzB/OvOZ7bVDBOnMdma4LDO0JLN9VU7tBaQvogm7vEUTF' +
        'piC69ELuOGECGk9n0NHJWxlwkN8VVNiF6dTWnLaCnBezsercn2vwa' +
        'Q1pNsSGGy8rI30bxXzpXvVHY4VkvlertP6F6FQD2drkYcL/eyUJJq' +
        'xtstn+vFZXR4NOs9zMNaS3zt9Pi6DPMYp23U1KkvkKZK1ep9DrIUb' +
        'ArRVaWgITDzSWyQs32IiWhtUrxVLyB1tAtomTLv1EaQ3viJ5ognJ3' +
        'NbhUm2tHWFdXRPqQt2Vgzwjus8GS0+iXaR4rWa4KIs7QbdmqJb9pb' +
        'sk3x72Dsty3vA+j+xtID1sO7h+XvmogXQfiwgjvcsx58UUAXlm3aM' +
        'fFKGMc56e8bVhsq8w+bmqLkj1EOkW8fK141NDOmOZ7XQZK9QOVmeR' +
        'j/Px1veUTx0S2w8dHYW8H0A6KrlT2nWckVxCwDguMy7j74U+uzQ1o' +
        'X6eJxvx3ott9DSwtCY7p6h0gdsUjNf21qZVb/Cfu1Mv8qQQNx+V0E' +
        'RPY6TGktMe7z4nrHPpLHTP80K0R766lBfA1hguyfNWrkzkL2mg6KI' +
        'cebq4EyDd6/MGwKWMFz81x0YaILuz+LkYxstOt7POr5hHGwHsMu8u' +
        'DzJVrF1gjhdBmc3W5Y0XozqMl8efvY5puxLSZbE5P1aI3fXRcBfoc' +
        '0Z6I+BwlOchybnCdjDMKNIlWFFk+e08t5uuVL6JcrEfOhzLwBeYeD' +
        'J8ZXZR3OMyR8j05WxdgvRV5M8wvkLa7MTnKXs9ORvrHNWeF1i631u' +
        'khx9nItK9r9JO55HgF7CHkjvU0uHeVTlJo2CQ66y9r7/ealBtaOna' +
        '6KRRMrele1vVL2jCrlC040abAvAa0iHXGd2y7Zm/N8N9ul7OWCtIf' +
        '/jJpzHOKKX7P/LRhPTLf9HZtF3moktguR8rNBqaLgm9mTg3TLd1wQ' +
        '+LxftGEw8yGhXnHuzdhND0lE7e+IUfceb5D+WQCoTPsI20pAlhang' +
        'B1ZdRF6rk7wHMiUifUnOtfRF9GzK/hugp5yxPHw2ep5blrJx0a4pW' +
        '3w/pos99h6mHOY8AZS29dOZ5g+TLesChaGBpL6S8188126SGaF+4U' +
        'R6uZkfDiOSQjnq1dkoNlc7b3caQGbQll9kdZT5zlmc1nCF6fDNNOs' +
        'CLiBcxXmwmxiTUh75R571wNyiM9FFxzjyHqm/I7wuG+rQPv7mZOe2' +
        'kHDHqp3YxbmMd510vg4R0oJv5r5KerrEa0tuoZ7D3FNPI20aSniY5' +
        'qeFxV3pPxPVO9XsSCgzvwTmXjr3Hb0Bg43k9LnFUonuk87vXWC2Nx' +
        'bIMa1mVVjw2ehe73vZbBOYhQsMLry1Cato7lNyyq0F+f0qM9L7sD0' +
        'UxKKhRqtsdOs+TnzPMmd7isagg33GVujWxX71jAYqWCs7TXFjH5HU' +
        'z0j/+2c8jgjGpdAtitIgXU+mhnT4vxwoB0R7gU+R6DenTqe57GUaD' +
        '+WtPWOqrvFFQfVek+wo90uV5MHxm9MLJl+EbU8S5gF1IFaJves9jK' +
        'Kr3YHhNFfu3sG02c2pn6317qaT21uFHtnRW99JDyNfcrVUezdRoGr' +
        'yXwpl+b2jIhJEtQvueQtlDf75B4zbSQ+Hta/CiJWxBwrYAUhzdoB3' +
        'Zm7bX33E73bBen3e5w/Re2eagtyA9vZyXljJPh+W7Rx/56lWv0hPS' +
        'k0p/5uyVcPlRP1bIhyMiDIaTLCd9TPHk28H+k52TiaiXGbrEBgmmz' +
        'cyeTDv0Jfz1Q+Zjck6+iuTu8E+IIdWD+2Xj5DPVeS9DAy9Be5gtIU' +
        'Ub+N0P6Z7JntuNkwkJP4r0cxfN3v50bQm9TT/9dfiyDWf/Ec6jgKU' +
        'Q6SvnyXikj2ry0Hvvab3RZdnrykd5hgvnaxfqFE0unK89F4RPDbh3' +
        'wnsKEr2G91GYCy7A8/XCCq9v52O8QeuNFuqdyLNlUcR5aHL8Z5VuG' +
        '7PNOhcN2WzGC1Y12ka8PHsda4+KRB8dKyR45wPn5fBSBMkUSC9nPv' +
        'erEfn32hXp9t0asf2PaON2vVZvU73fjCdKgPUla0jvKILRj3fr81N' +
        'tSrhiO+oq5RuqJpA8BwQRIWEaiA6R3qB6CLE20keJOr0RYT0/9KtW' +
        'Fp6Twkzs8GxXZQ+p/N8j+QMbxgvnCOFXTsMvnWe+KqcOQwEf3IhZB' +
        'TyfGb8oKdT1Ojzc5Q8J8W5lbmVrRZIsY8Q8510TQ9NrwGfjpaOpdH' +
        'k+RmhCWUW6jTLP8DBntNcyIf1rs5MPPHAp9tI33ousbSETKs4rY4V' +
        '4V3gCR3miLe5vlQOPadbEcLHR4guJwtSlDBrNbavq+kYRkmSNqbC9' +
        'Ld1rHam+XejJ1hNch4j2mZBY4S7bOKcQx1X5eF5Bli1mp6uzWRJVP' +
        '0Wl+2K+afD5XjPX2hHfajSQjm1I99VGYBeFN+76GukE/1EgY96tUW' +
        'IL+cND/G/kX0o+t86hkh/NZE3O1wnEQ43JluORLo+cfsMDPxTzzPC' +
        '0bckrfFbjTHjbsCgFzumih/RRic69ohLE7ncN/MlafRTpYDiMF95l' +
        'g3RGrWwzXt734Y8B6fd98EPrCV6urYcaWWj6n7/8d+s4xtJ7GR0rx' +
        'AEt6D89yusfydRbM7cs3bycQV0aO8vsJizMKmtJo6ti+ytkws9pGO' +
        'l2yEB+yALt5xQq02jQpcU/zavc4gLgWyOMueJiKLykPqxl2R/Ksrz' +
        'PsevLcl4pHMUCnjmAYhi6GMI5RL0Hu0dim8Ye+A3tPVosBPL5WEjM' +
        'RIaD5AMG7eVmTsWQ0mD+9Mpr7YLvlpXfDtvS+nuee4VwNswhtp1Nj' +
        'hU7rkM/XUBDnNdEeGithA8CvqTdVlKM1fiCxn10ecSQwZYzR5U545' +
        'qluCjzLR+coy69paPzMYa9ogz2cNCoGC8cl25Ix+hRC3oxDoPnqH9' +
        'WHyskdvqw8FA+mTmtRsTR7NDbPIgp+Fybc9g7HsYCXRjpQ3qtmIeh' +
        'K9cu4Z/SP3M1nt1O3UJXzO2a8pGSq3KGxiUZp/KSU5/nVzftLUgHJ' +
        'c6zowu8Y+nStuRuABDFatq1ATd+rwbYPb0lfEVO1Vc+WueuyK3J78' +
        'bQpF3rr2n4vvTZOL+mxhdumQxEPy7LRe6Ad2hyfkIMdXgI5ImZItp' +
        'lW7wUtlPwMqT0+sbfRKCZaA+70hqZDHYmgI1XKrTfXlxqJMBzmK2r' +
        'Hl5oSP/AA5d+76OXeKiRIR2T68qEANPHCh3nVSqY2JjjC+d2THPk4' +
        'sB5ngV9nmdfnDipS5jke05vdyOvAItMayPwxIRfE6N9ufNUft+aPu' +
        'eXizwoqXOjh0BadmC6H26DJz3VBel8Cy/uFHs3x971WPAEEEJehHg' +
        'oA8F/licGb/O8wfbaWYW7tgdmF6XxccKpY2qNgjQ34Seqsb3WxMhH' +
        'aDQTNaSPOirLsnuUY9f9sXwV4XoTpEtVZzTLbijUQ5JLedHeNYZzg' +
        'rUiPJcb0JSVwTz9D6keIl2oLqmjuVu58D0huRfkKac9jbmsPeqRfv' +
        'XWq2a8yIFTxgqx0jawz9ldzyOerAz3ioLnFl0zOgpp/wFK1CXNenu' +
        'evZoB6Rv+H5UjwthMwzWwoA5QLxVkbFFKtzcjTAXU/HSZ0i03UQC/' +
        'XJWr1y1L23OVfRh+lGZQeD6sKPRxVBV71nk5CqSHmnMnwodE9Zo8R' +
        'PqUxZXCBmv78qdBt2n4bciu4djKA0u7BfG/DrN9lOF9aZ54wjfmkP' +
        'EXG5DOdeKqgxtTc0tCIPtdvjkQn1w2wPOTN/9JkD6dzJLC/tMG7Q0' +
        'aWLx4Xjrn+/kJmGaWec4EriH9wYcfSyody0nbtF0WxJiobhJdVPqU' +
        'sUI8ffowCcymfZm5UEbuKuWJYrazbE0T5+1ljKxdKHooyiEAiGNHy' +
        '4uXLNTtKJP37MOwtBaq830h18ntvDSGBztq85ngs2h1gbYX6r1bzl' +
        'IILxipgb0GsbCBqKWJxWpv5zEY0hhIH9Xk5+WMBHoCP/21IL3d3Gg' +
        '9lQPDE57yzcBRZ/yGU3iF+XxheOYDs2flIqSCdK+x90gh/1mWd2WE' +
        'eZjWPDeq08i+LvvtHuks0UVyw5zxVG+o98QEfsYXkjdmSm/3mULoe' +
        'mA2VPqnn/iKRbwkpNvao5/64pXL1160vtHRtUdlrNAxNSvHbmPWHI' +
        'IkYJ9Rj6qwGhHshfOT+xRC7Gt3Q21IV+4AnefhpYWTlgk/zx21tZ/' +
        'b1hvFYka48mUqdfNVUkk2WELFLrL8fDMfF0t3lkwrWvzIP+F6pK+2' +
        'Yr6ALavoGtinJ/CKRWabcoJcn99Q2qGFEh5Sayn03MjAkV38WVCzt' +
        'JLycZDjq5JvhmHrkb4qm2BpqTFKiHct7qi7bgXgkAPgcvGMiuqdGN' +
        '7/uLBZWHXbNnspPnU0CR4ccuYwP0RzJvpJPc9Dv7Sh+e1B3p7ipwx' +
        'vlGSHTNHw4r2IDe6RDuPFlsAYjJfj2zbOKEn0cH5dsV/YPwmJzR2s' +
        'w8ZmdgJ2dbbHvro97QLjRPhap7Bv6doFDNFDBzQiGHNnx0kJ9uLne' +
        'P3tmp3Och0YR6ZdpTWk46oOIQ+Y57tbl7rryZ+xe39xR5X8qv7Azo' +
        'THy5d/sjVPPNJHVeXSWQQTD2w3H+GZ1MDeSLUWJHzfie1auMtD3j8' +
        'f1b5A/1TlfzifGY4kDcW8zOvoC9eQvqj75x7XvKsWYR6mQpO/+fMa' +
        '4TlAkcW2UNpT3bo4R710ztxq8vzkDhHOK41W00bYhxHakmRirnZiL' +
        '91m7jKV/siVa1964a+AdAay1/88B2Po8IDh5uFwfIttc+VDo0BI52' +
        'FNXoofRf6MPrxMgz9UOgT8zc0C0/KENaclSm1+nvAaEDXOSMc1Btr' +
        'zhAN97iQF8GtsX5ZuJyt20WwpJSyLVucHbYEDP48DLOzzDFqRAvlC' +
        'FkkNAB00qj/Qa/IaIT0DRQyPavUGq0fFf8h/aSBkuy/7MkZbNGF++' +
        'GN5qksf6IKWovbQ3pbMx7K1wp2eNeubGd7Xe0IF9bfceM+JPD91g/' +
        '1xr/FLE+2h8OagdIDahoKGop1n5bKS3Aq0HvnbkMnK0IbetJaN2CD' +
        '9qOJ1QGwbRW2OF4weTUh/7/t/97N/ul171LpHQ6SHY4WOJ8+vy6dR' +
        'awj8eqYIklFuSyRn9A3zghox5Dc/TRHBnn0Y+a2Z6kLv2rObQXtB5' +
        'rlIevNq7KXddF3FYPdpte3TvMug9rTvywgHC1+3vZiGPQRFjSSMHW' +
        '4FQvHpIebJVhPAZ9GB3DTU6mmbLajNYz99IVNgPtruNFJ4Jme0toV' +
        'vAZm3+KHD73lZOt4oD5tFYhSl/MJNeO7V+ML1ZrZ5PkWipzInb/4T' +
        'RnN4qrOFwnqbxZIodn7KFuF9g8bv46HbToBLdjTYHx4LHzjPIRbCp' +
        'TbwJ/acssRlhPI0uVDpDz78mKj0hHSZiVFkeThWCKpbkM5h7eLJHD' +
        'ltzwX8RDFz6gWWqWCmmjDlhAmS2C1HTyjnz8thp/MyTkae7ITnoYb' +
        'HPdLR5ABd6b2f0jBnb7mvKpGNjHQ7fBkFMISIrulDTyEpIJyX/0L7' +
        '2puGYB9qiJDOBhHzuSGka45Koy2Y6Ns0mqpGan8V4TfGSA9/Apbfi' +
        'ztFKyA6HM19Q3t7uS6JByI1ki9QC02sui7l6CF0dEqfpvSuohhrbz' +
        'bbeQp0L9S5ZJeXh/bCu4si0m80AxrFW+Bqh5leDIAO6QxYU93mgfj' +
        'lpNdBjJvuUaw9Gi4PPa+MFRqV6KjqiGYS49pEpUsbwROUXWR2rxrS' +
        'mdtoW/G0NS/nb9weQqMMQG/Peb9LzBbg/ZRmlmNrvaN5QfsyNBHcF' +
        'mnteQ4moB4cBSdElDZELDZkhhM/GazHFIZYirYXfHncAZXm8+BM8B' +
        'mNOeAqkO4biJpcb8j40H7xDA8pXeP2lF3yNcpkDu3gwyV1ifIGroQ' +
        'l+Sp95IGLkQKktxX7KMxHkb7G7yYW0XSyL8OqyViNZIqdlTz76kxp' +
        'IJpvZ0tHFaQz7Q3pXmBDuqP+nfiDCgvQ2QigOtLBVSA99NIff2aWJ' +
        'LqpdCsJrT5vjhXy1kotbQ+0+HMXqCNrbWD8KX9ktHQsv3k2syBl93' +
        's6/7tyNdg5jTbySIeF4pHONgtD/jSaswuCnGMAmPxI526tOlawNaS' +
        'DEgiKWGbLHcf2zvvdIqXCIqBmRR7CFJnawCDnYPKZVbbxe1raI+Tq' +
        'dI3dYHXtKJ+kkrCZC6G9isyWFdlKXM9EpHv/BC3g4k4A6lqSkm2eh' +
        '/mnbrCnFOD4lkUOMgerUb6jAANBeiP4kCntN6RMo3vUAILQCNaBot' +
        'jbVG/bBXPvJJfz6IoZDp6nHDNe2Eu/74Mfsmm7bKG69B/lQdraWKE' +
        '2w71QRxsxj6ajEYk+kJyCz8M16eaV/tBtGVtwJHK3hic4Gi+AH8gy' +
        'rVr+oWHlCaXZM6+xnY13ofQix8DwHSQw90BYVjo6F851EbDbsVJ/f' +
        'hDYSmueN8bDfFkGTrAhLLNa8TBSX0MNzj5sL0S6bxR2Qrp3yBvQbr' +
        'RQcqpo7MJivrz/bqU5QG2+mISv+J+eRTtw3WY7FxCen43NwVhLDcs' +
        'Fu+CocGZNpYtQZ7CzLPf0lhxP9a0NC2OcjPcCJrnABZfvYcQNU6M3' +
        'g14GyL/0uqn0Sw99JlGdjRdbAoOFuhfYkgPnhI0dfjuOe5Fj2bfx8' +
        'l7aC9/SMbFlYoF5fhraFpaf5vvbvlR4KV0e5It2meNeIN35yc4TW+' +
        'JjkXBNoj90QaaKRLmw8rnlJlSXm93zfEVxL3jJSMdd6W98zMoI1Aj' +
        'SQy55AbkqJf1Wb0c6s6a3Pa79B+RTEh8mBLvU1qD9FKT774Ez2Rry' +
        'HyE8xP/3wEeOWGpCddD4jEb0L2i8JxM7yWNTyLXESA/bAlyiUNdTD' +
        'POakhcjfZGff4F0lLlRhqD7FKLbP2WHKl2GjRdIZ9tkQk9oe+H7hl' +
        'APpa/hFItEc/do4nlK77nvfqxqZEj/+u3vsVCfEtDSKO9t+WNnoXu' +
        '5zk0Gekjl48/chDMW4hI0l9TO+m+Sf1M0wXw9dNGUvIn5WOQOh7NU' +
        'WLhVVBK9b5WLSsNLL24cWuQCoV9C7z4KRxHPWZCedf7dJUXCZJgXw' +
        'e09BVRA8++UaqSqMaqtgb0SDlG5jIJh+JBduz7bFnr7468pWjZkfJ' +
        '7+iwKcOTNsBOUHPaMa8CNKN2hf7w81ngvSa/q8BvyQ1czkWxHqPc9' +
        'rSIdWF6RLZGNoqk8R5KGGD5HOM4pMF94Yyd5Guk8SygiimgNj8+XK' +
        'HC+GdPPSbTnpp17sBemz5lghz20I7/R2Ph5SAB62FzxLDKd5OQmAR' +
        'W/u8XTDgvzmhsxmsxS/nVsRqSun67lRxke1dQJTHfq8i0IWF9Hsu8' +
        'zeGhtDRHik+2pF8jEBatUusxXfhk/D/l3Rap5QsxzfwtbNmetjZQB' +
        'Kte02okHy83J+eGlBwjp9w4QTYwtLHmH4zBu9zOKlIJN/Nalhy3mH' +
        '9Cn2iFgrTPU9kH7L0ZuhDXelIdEl4qXL4/3FZpG4lzauG+lGXoSIe' +
        'S7KXGRhl93a2sS50yW6P4odDN7exqVnpPsgxvWqRhukJ55fvfUqxz' +
        'FOGSvESWgf+u2jsh/zDIDhmPeAv5PaTLxtmGPbBnwVrTB+Tfqxaki' +
        'fmLwJA2WOm8WsdVyxcjfxLePlt7+dOYemeQnGnDrjRfWeBw7sXI8a' +
        'K2BAYOLBvUFJ3+6wR3Hm2M5C9CwC6Yqs5oY3jsJp78tv3T3fBKIjX' +
        '75AORan7R8NxPEA0of8t/+ZXS983pDwvO2bg/BH4V/fLpIlGS9M8v' +
        '7HVQ5LGEy7sM8MbRYOX6kh/dRNqCgeDvvkHKzIG43OTSE5G+zhTbp' +
        'FehnhzENXbuTlLdokF/77Feja8OeARgy9rC1Ul5CeYC5IH4YabeIY' +
        'bbQRHHLhcG2sEOx6r+FrSYIVJTBSJmxUrV4aLxdN/Ei1+RXMVEGQk' +
        'qWbExYnhRovSP7mz23CLr6/urwgaU+DTBfZPMTEvNt7582f9+STYx' +
        'sjhkReli7K3Wy8qMfi2wJJCzJegG6B2FagMmbd00Tj4cIr4TbxmJ9' +
        '4O6GxD2vnauW/vGmjRRCJzuDl76TxBLT99ugDSk+xV+mCdG4+8Eud' +
        'lStB42LjLlHRCe2u0lGVHuLdc7jBfJQX1S2JtXrNPz+NpnMRzjd01' +
        'zqsRQLLs+tuyxUJ0qVwF4Wpcxj2TkLdkmj1AsUvDaNHLz30GVPpie' +
        'dD9ygm181Ir03b5ccKiesiXavSYcrSfdRRn+VQSRw133QWHNN8L8e' +
        '7zP0ySvUbFLNk48X4N2po7wbSG303XbkcBnK62jrUG6QbullXJ8HJ' +
        'rIaBEMJkSY6KPAUI4cNjBV9eMS6yLSAgZVOiRnKPfUE61LLHnbQyw' +
        '4HOFQ9bE4/0KUmQztgEaS0loS7sRRmv8Iv2MYpjWZIIZ5yOamlxyN' +
        'uUnpJqSj7U1bJLRLugHn4LasC059xvJTdjzTmHfwLq8j1o0OZ5P6R' +
        'k0TeXHXWD/5RUjKxpLmAUJh4EFA66T0j/8rUXOOJl7aVfvnr52jB6' +
        'FF46j1FiqPJYIe+6yKxf4tskhX8cjUKd0XBX43Y4HQGvf8dfi8h1M' +
        '9jviYznX1MWIbULqbHqdJeDaUP+p123N4hmHW7b/goH80HyhHHc+C' +
        'zdWdGB/6Ewxq29LEctcaaxkWnvgQOccs1czDNQtnuaAbjG9mXpuoB' +
        '1/Nkhy9kdmqi0wwJtvAuTgU2BvH0b/A0vS6UtYNeP7CZhW9zRtiPU' +
        '3m0Uc8kw3GVv5guu7bq12Vc4RkU0uQCfY87B6rY4r1E96NbM40bld' +
        'vYWzc08MZehfot0xnvmQ63bVEbQNJAucR3GMVlUKET6I1+9mkjOy0' +
        'mje3Qd8bKZMt1SGMrYGCvEVB/1W45o4elwJGkN6ds1OCpGun0z8tW' +
        'Fz0ScTmj6dI1Tqgj1dIhN5ILoxBrYb+QoLC/RZRKYngaQ9m6SRhb2' +
        'oexs9PFJSe+fsxpclnJ6WfaWNo4VSPpd3p/3/Az5VqtQKq+9nW8p5' +
        'CtqALz2NW6s8l8x1Rm2CzezCot5f9reU2KuLp1vIx6LvJyI6HYEI2' +
        'A7hfBShrU6O+e1zs1G6mhISOPJl6MTveVSKG0KfgD5fYXzcMEFQXo' +
        'UROe7RIXnDcHpd2FO2ppKlwkBfvt33m9e+heeH1S6ny994lghK4lj' +
        'G6Y6DHkeK9oeu8Qz+uKThl8LkL6TFEfQCybX9Uj3Wp3dkrZiDxNAj' +
        'cSODR4/uRjwHqpZBGCHBWpY9u7HsrTrBaS+QQkxGxodHo9iy9TsEf' +
        'GQQ/+/pnXlOSI8jaV7oJDmpnYyoZEu4GU7y9Pbq27vby9LB8wTdUm' +
        'KfXqqIb3PHffTq/KPCR7ppzRTblcGq3QuoIXTDbeMRU1ae85vFTtF' +
        's8xp4fiaxx7M61KOPGrP0MUAF6TPcgdi7cCtVrdh+9HsiJiJ8fFvf' +
        'NN4zmuPYibGZ85eMaoLqEUwi2NvlbPlYnLdNrxol9M7KicB8Hre0M' +
        '38Z6r7waRhW9lGOpzzbhNzPqfQdP5la1fO7dwB2kinbnSbIRq3YZe' +
        'HI/Vudhfx270NIiT0g9Mlx1fiLRpvoZ/lKI5Q+dfwzm3KWRkPsyy1' +
        'sccsKoSAb7QdDQEfHuKV/6oMR1m5KYt9W3YWnS0T/owmsOVdoz0Uz' +
        'Hb+vc7KgJaGZpYC0nWyE/xHNbyvMEQ0OypejQvGRWmHxG7fdIA/z9' +
        'MFJrcr5xUupC3YVmL69tVx1IhvAMTNs2EOfMmM4uhG9P2kFsRoS2D' +
        'UjBeo9BrPZ/VV8CDR2QnH9jENNa3VMHMGu9g7c7c+nb20KYgZ6eg5' +
        'nQj2Ls+3dpKnTMdPiZptwmRetE6QjpnSpydc/zLLOvcc4U6EVmf7J' +
        'aTNBuDbeXd5Tl0Wk6HWDakO+C/gGG96/UJU+mpDB5vPObRc+FRxOD' +
        '4FU05wylXVmq3VYOOveyUw1YCo6NDj8kY6n8YqDx0dRTpze1GO5/J' +
        'aHRdA/+MibnxxR196zO6h3kWih/yXAqGkhyu+yGGKN/KQ/y73e3qD' +
        'JbTNGe++b7RGeEb6NqQNeCevtX2fbsHOij2Eicv3E1LN2eXYzNBVC' +
        '18HzXzoC1R6gHRS6V+//T3wfMpYIU9+A7v0bxbxiiXPU0mz0xGO7n' +
        '0eHALIF1N4lYQXfe5Hnoo+5ySeG0/XczNPEYAmoKOwRuvrBHIh2mu' +
        'E35Z842cs0XvqCZVbhndxJsMHAY0Wcd3nGBggvaeVj0TnLyNHBWVY' +
        'Oi5oyq+wvIc8v1yUnrNIU6ln5dbd4DJCddaxklNrfdqnGhpToZBmw' +
        'xwtDjYW5aw7aBaX2TCHFS+Kl2v2wBRWM/ZrZcLknwcXtFizRzq/5P' +
        '7N8KUX6gxkMB9PspLDWPYv/X9F8WvDuhU33BTZXQ50mdOkW3wsJmC' +
        'EYt/q9prrUuc5J+MYUAaw1446LgPUGY8wXozqg/HyxSuPPv1tG2p0' +
        '5fQ7Nc3coPowLVhpnsOHkXxeYLRBb0nctKEHwSoZotajGWBkuwZ20' +
        '974HcMyJs7tCrH3gt/OoE7JYD5s10U71PhpnstF9vLdzXvhc4JXPQ' +
        '3qF9hy5qpcZ8ezLlKkd5fO0Gj4G145h0mQuHBzDhSatvS32XxgSDb' +
        'O0NNb3BWwWr4usXT4pT9z/lDy8zGrhbfMSbFZAORlvd9ToO3Jv6s+' +
        'D8U207jdKPgaarErpzk00UPeK23xzGsq3R9V6HNBbojlaN5sJnyD3' +
        'tVMSoJQ70IIyY+zSp+5iQ0t/V9SxwJL');
    TPH := High(TP);
    for I := 0 to TPH do
    begin
      TTP := LoadTextTPA(TP[i], SmallChars, H);
      for B := 0 to High(TTP) do
      begin
        Numb := ((I + 1) * 13);
        FastSetPixel(Pic, TTP[b].x + 1, TTP[b].y + Numb + 1,1052945);
        FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
      end;
    end;
    Canvas := TCANVAS.Create;
    Canvas.Handle := SmartGetDebugDC;
    DrawBitmap(Pic2, Canvas, 0, 339);
    DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
    FreeBitmap(Pic2);
    FreeBitmap(Pic);
  end;


procedure OnSmart;//Credits to Flight for his Tut ;)
begin
  PrintOnSmart(['Time ran: ' +TimeRunning+ '', 'EXP Gained: ' + FloatToStr(Trips * 980) + '', 'Times Banked: ' +ToStr(Trips)+ '', 'Trips left: '+ToStr(TripsWanted - Trips)+ ''], Point(15, 345), 50);//Left messy on purpose. Not enough time right now to write it out and get the coords.
end;


procedure Proggy;//Thanks to King Kong and Camaro' for their input on this.
begin
  Exp := 35;
  ClearDebug;
  Writeln('=======================================================');
  Writeln('                    Khazard Iron Banker');
  Writeln('            Time running: '+TimeRunning+'');
  Writeln('            Ores banked: '+ToStr(Ores)+'');
  Writeln('            Trips left: '+ToStr(TripsWanted - Trips)+'');
  Writeln('            We have gained ' + FloatToStr(Ores * Exp) + ' xp this session!');
  //Writeln('            Exp per hour: '+ToStr(Exp * 3600)+ '');
  Writeln('=======================================================');
  FindNormalRandoms;
  Antiban;
  stats_IncVariable('Iron Ore (Mined)', 28);
  stats_IncVariable('Mining EXP (Gained)', 980);
  stats_Commit;
end;


procedure DepositOres;
begin
  repeat
    OpenBankGlass('ynb', false, false);
    Wait(1000+Random(400));
    DepositAll;
  until(Invcount=0);
    IncEx(Trips, 1);
    IncEx(Ores, 28);
end;


procedure Mainloop;
begin
    repeat
      MiningIron;
    until(InvFull);
  Writeln('Attempting to bank now');
  Antiban;
  WalkToBank;
  DepositOres;
  Proggy;
  OnSmart;
  Antiban;
  WalkToMine;
end;



begin
  Smart_Server := 68;
  Smart_Members := True;
  Smart_Signed := True;
  Smart_SuperDetail := False;

  Setupsrl;
  ActivateClient;
  DeclarePlayers;
  LogInPlayer;
  CheckStats;
  CheckForPick;
 repeat
  repeat
     MainLoop;
  until (Trips = TripsWanted) or (not LoggedIn)

     NextPlayer(Players[CurrentPlayer].Active);
 until(false);
end.

SRL Stats for the lines above
http://stats.villavu.com/script/367

I took the liberty to add the script to this application, as we usually look at the script this way for applications :)
Not voting for now (no time to look at it), but good luck!

Interesting, the script posted above may have some problems if the character is not wielding the pickaxe, in fact you click the exact same spot to drop iron (580, 226) but your back up system of dropping all should catch any mess ups.

List of observations:

1. What's up with the repeat in calling a function multiple times and using a case statement? Just call it once and have it do those things, you can insert multiple exits if you need to by using the exit statement.

2. Use some randomness in your mouse clicking. There is no reason to call MMouse before Mouse because mouse will move the mouse to the position you specify.

3. Globals variables should be avoided. You made your looping variables global.

Anyway this is a decent first script keep trying, you'll need to add multiplayer support and fix those 3 things listed above to get a yes from me.

There's nothing more that I could add as in feedback that Kanah hasn't said. However, you really need to work on your standards.

No, but for now :P If you could add findcolors and maybe ATPA you should beable to come back with much success!

I'd love to see some walking in your script. :)

Even just an example that you know how to do walking/banking would be excellent.

For anyone who was curious, it appears to work decently: http://stats.villavu.com/script/355 !

I would say yes, but please just some walking and banking. :)

Khazard Iron Miner:

Start the script standing near the small summoning obelisk just outside of the Khazard docks.

Mines Iron until full then walks to Yanille Bank to deposit the ore. Keeps track of how many ores are banked and how long it is ran. I attempted to make it bank faster by using the deposit box at the docks but due to HUGE SPS lag in the general area Yanille was the only direction it would actually let me walk to.(unsure why)

So basically:
-Walking
-Banking
-Checks for pickaxe in the equipment tab, otherwise logs out.
-Standards?
Multiplayer

program KhazardMiner;
{$DEFINE SMART}
{$i srl/srl.scar}
{$i sps/sps.simba}
{$i SRL\SRL\Misc\stats.simba}

const
  SRLStats_Username = '';// SRL Stats ID
  SRLStats_Password = '';// SRL Stats Pass
  TripsWanted = 10;//Change this to how many trips you want to make

var
  Trips : Integer;
  Ores :Integer;
  Exp : Extended;
  ReturnWalk : TPointArray;
  BankWalk : TPointArray;


procedure DeclarePlayers;

begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  with Players[0] do
  begin
    Name        := '';
    Pass        := '-';
    Pin         := '';
    BoxRewards  := ['XP','xp','lamp'];
    LampSkill   := 'Herblore';
    Active      := True;
  end;
end;


procedure Antiban;//Antiban to help prevent getting caught :D

begin
  case Random(192) of

    0:  HoverSkill('Mining', False);

    1:  begin PickUpMouse; SleepAndMoveMouse(3000 + Random(500)); end;

    2:  ExamineInv;

    3:  RandomAngle(1);

    4:  begin GameTab(Tab_Stats); Wait(3000 + Random(500)); GameTab(Tab_Inv); end;

    5:  HoverSkill('random', False);

    6:  FindNormalRandoms;

  end;
end;


procedure CheckForPick;
begin
  GameTab(Tab_Equip);
  MMouse(582, 303, 1, 1);
  if WaitUpText('pick', 200) then
    begin
      GameTab(Tab_Inv);
      Writeln('Found the pick!');
      MakeCompass(340);
      SetAngle(True);
    end else begin
      Writeln('No Pick Equiiped. Logging out');
      Players[CurrentPlayer].Active := False;
      LogOut;
              end;
end;


procedure WalkToBank;
begin
  if not LoggedIn then Exit;
    SPS_Setup(RUNESCAPE_SURFACE, ['5_10']);
    SPS_Continue := True;

    BankWalk := [Point(2339, 4099), Point(2337, 4151), Point(2332, 4192),
                   Point(2305, 4231), Point(2286, 4287)];

    SPS_WalkPath(BankWalk);
    FindNormalRandoms;
    FFlag(9);
    Wait(4000+random(500));
end;


procedure WalkToMine;
begin
  if not LoggedIn then Exit;
    SPS_Setup(RUNESCAPE_SURFACE, ['5_10']);
    SPS_Continue := True;

    ReturnWalk := [Point(2294, 4254), Point(2322, 4207), Point(2344, 4162),
                     Point(2342, 4110), Point(2338, 4066)];

    SPS_WalkPath(ReturnWalk);
    FindNormalRandoms;
    FFlag(0);
end;


procedure MiningIron;//Mining process
var
  x, y:Integer;

begin
  if not LoggedIn then Exit;
    Wait(500+Random(300));

  if (FindObjCustom(X, Y, ['Mine','ne Ro','cks'], [2503511,2569562,3360116 ], 10)) then
    ClickMouse2(true);

  if DidRedClick then
    Wait(2000+Random(300))
    else

      While IsMoving do
        Writeln('Moving to rock');
        Wait(2000+random(500));
        FindNormalRandoms;
        exit;
end;


procedure Proggy;//Thanks to King Kong and Camaro' for their input on this.
begin
  Exp := 35;
  ClearDebug;
  Writeln('=======================================================');
  Writeln('                    Khazard Iron Banker');
  Writeln('            Time running: '+TimeRunning+'');
  Writeln('            Ores banked: '+ToStr(Ores)+'');
  Writeln('            Trips left: '+ToStr(TripsWanted - Trips)+'');
  Writeln('            We have gained ' + FloatToStr(Ores * Exp) + ' xp this session!');
  Writeln('=======================================================');
  FindNormalRandoms;
  Antiban;
end;


procedure DepositOres;
begin
  OpenBankGlass('ynb', false, false);
  Wait(1000+Random(400));
  DepositAll;
  IncEx(Trips, 1);
  IncEx(Ores, 28);
end;


procedure Mainloop;
begin
    repeat
      MiningIron;
    until(InvFull);
  Writeln('Attempting to bank now');
  Antiban;
  WalkToBank;
  FFlag(0);
  DepositOres;
  Proggy;
  WalkToMine;
  FFlag(0);
end;



begin
  Smart_Server := 88;
  Smart_Members := True;
  Smart_Signed := True;
  Smart_SuperDetail := False;

  Setupsrl;
  ActivateClient;
  DeclarePlayers;
  LogInPlayer;
  CheckForPick;
 repeat
  repeat
     MainLoop;
  until (Trips = TripsWanted) or (not LoggedIn)

     NextPlayer(Players[CurrentPlayer].Active);
 until(false);
end.       

=======================================================
                    Khazard Iron Banker
            Time running: 11 Minutes and 27 Seconds
            Ores banked: 84
            Trips left: 7
            We have gained 2940 xp this session!
=======================================================

To be honest about my Iron rock finding method. I like it very much it has proven to be extremely stable by progress reports and SRL Stats.

program new;
{$i srl/srl.scar}

const
  RockColor = 2503511;

var
  x, y:integer;
  TPA : TPointArray;
  ATPA : T2DPointArray;
  I, H : Integer;

function FindIron(Var X, Y : Integer): Boolean;
Begin
    FindColorsSpiralTolerance(MSCX, MSCY, TPA, RockColor, MSX1, MSY1, MSX2, MSY2, 10);
    ATPA := TPAtoATPA(TPA, 25);
  If Length(ATPA) = 0 Then
    Exit;
    H := High(ATPA);
  For I := 0 To H Do
    Begin
      MiddleTPAEx(ATPA[I], X, Y);
      MMouse(X, Y, 3, 3);
      Wait(50 + Random(50));
    If IsUpText('Rocks') Then
      Begin
        GetMousePos(X, Y);
        Result := True;
        Exit;
      End;
    End;
End;

procedure MineIron;
begin
  if DidRedClick then
    begin
      Wait(400+random(100));
      Writeln('Clicked Iron');
    end else begin
      ClickMouse2(true);
      SleepAndMoveMouse(3000);
      end;
end;

begin
  SetupSRL;
  ActivateClient;
  repeat
    repeat
      FindIron(x, y);
    until(True);
      MineIron;
  until(InvFull);
end.  

Also ATPA/TPA iron clicking?

standards…
#facepalm

I like that you listened to people's suggestions.
You have a lot to work on but i'm going out on a limb and voting yes regardless.

From: footballjds
standards…
#facepalm

I like that you listened to people's suggestions.
You have a lot to work on but i'm going out on a limb and voting yes regardless.

Thank you for the vote of confidence. As for the "Standards" you mention, do you speak of the first script(M1D1) or the latest (Khazard Miner)?

From: MrDerp
Thank you for the vote of confidence. As for the "Standards" you mention, do you speak of the first script(M1D1) or the latest (Khazard Miner)?

both.

Script with mining and banking? Yes from me.

The standards are fine. It's easily readable. I can easily see where a begin and end terminates (just two spaces in front of what you're used to). Although, MrDerp, I don't really like the looks of your main loop from your initial script (try to keep things within a begin..end statement indented).

Voted yes. Good luck :)

Yup. :)

How long is the poll open for?

From: MrDerp
How long is the poll open for?

Check at the top: This poll will close on 01-03-2012 at 11:35 PM

From: KingKong
Check at the top: This poll will close on 01-03-2012 at 11:35 PM

Thanks. I am not too sure that I can actually see when it expires. I did a ctrl-F to find the date and yours is the only one that shows up. so I got a few weeks to get more 'Yes' votes lol. If anyone has suggestions or ideas that would help them decide let me know. I will continue to work on things and post them I suppose as well.



EDIT: Also if anyone is running this are they having lag issues when it calls upon SPS walking? I am unsure if it is the area or something I scripted but I encounter lag spikes when walking to either bank. I would prefer to drop box but the SPS paths I made won't walk back…. Not too sure what causes the lag spikes.

From: MrDerp
Thanks. I am not too sure that I can actually see when it expires. I did a ctrl-F to find the date and yours is the only one that shows up.

Different time zones will affect the display/value of this date.

Updated the main post with the script that has value and still linking the other. Added an on smart progress report as well as SRL Stats to this specific script. Information can be found HERE. Thanks for the time and suggest anything I can work on and I will take it to mind.

I have voted yes because you have added things that were suggested to you. At first I was going to vote no based on other people's feedback, but then you responded and made the changes they requested. In other words, I like you attitude. My only concern with you is your longevity on the forum, so I hope you stick around.

To answer your SPS question, I've noticed SPS will sometimes lag if the points you use are too close to the edge, too close to each other, or your run energy is low. I don't know that any of these actually cause it, but it seems to occur the most often in my tests under those conditions.

Also your standards are still a bit off, but you corrected most of them. Good luck man.

From: Silent SPY
I have voted yes because you have added things that were suggested to you. At first I was going to vote no based on other people's feedback, but then you responded and made the changes they requested. In other words, I like you attitude. My only concern with you is your longevity on the forum, so I hope you stick around.

To answer your SPS question, I've noticed SPS will sometimes lag if the points you use are too close to the edge, too close to each other, or your run energy is low. I don't know that any of these actually cause it, but it seems to occur the most often in my tests under those conditions.

Also your standards are still a bit off, but you corrected most of them. Good luck man.

Thank you for your feedback. I never really took interest in forum sites before now. I used to be a member of GameCheetah(old hacking site) but after it was shutdown due to DMCA threats I never thought I would come back to a forum. My intentions are very clear, I wish to gain entry and to become a productive member of this community. I think I never went out to try again because no other community has such a challenge to enter. The challenge makes me want to become the best I can become.

From: kanah
Interesting, the script posted above may have some problems if the character is not wielding the pickaxe, in fact you click the exact same spot to drop iron (580, 226) but your back up system of dropping all should catch any mess ups.

List of observations:

1. What's up with the repeat in calling a function multiple times and using a case statement? Just call it once and have it do those things, you can insert multiple exits if you need to by using the exit statement.

2. Use some randomness in your mouse clicking. There is no reason to call MMouse before Mouse because mouse will move the mouse to the position you specify.

3. Globals variables should be avoided. You made your looping variables global.

Anyway this is a decent first script keep trying, you'll need to add multiplayer support and fix those 3 things listed above to get a yes from me.

+1 yes from me goodluck

A long nerve racking time to wait. I am going to continue to develop the Khazard miner and post it as I come up with improvements until then I guess. Thanks for all the Yes votes and boo on the No votes(Gimme reasons?). Thanks again.


Also a quick update on the stability of what I could possibly produce.

Khazard Miner has total running time of 11:08:00 with 90 individual commits.
Variables of this script:
Mining EXP (Gained) : 171500
Iron Ore (Mined) : 4900

Got 91 mining thanks to it :P That is roughly 150k gold an hour at about 500 ores an hour. Could be faster but SPS doesn't want to work using the deposit box.

Could a Mod or Admin change my vote to yes? When I voted no, he had a much simpler script. He's taken all of our suggestions and make a very nice script.

Kyle Undef:Yes.

Yes.

Edit: Looks good MrD!

The script isn't overly complex, but clean and functional :)

Your use of NextPlayer(Players[CurrentPlayer].Active); is a bit redundant, but I understand your choice (I've been working on some hardware design for all night now, this would generate an ugly latch there ^-^). NextPlayer(loggedin); is also worth checking out imo, as you already logout and set the player inactive. NextPlayer updates the Players[currentplayer].active to the parameter (nextplayer(false); will make current player inactive, nextplayer(true); will make it remain active).

But that's just nitpicking. Big yes vote from me!

Joined this month, under 100 posts = no.

From: smurg
Joined this month, under 100 posts = no.

…

Attitude + script = yes.

I am sorry you feel that way. It is disappointing to think that some SRL members would just assume because of a low post count and when the applicant joined the site would mean that they are less valuable. Most of my posts are from posting responses in the 'Help section'. My feedback might not be the best but I am trying to be helpful when I can. I do not go into many other sections of the forums because I am comfortable in the script section and help section. That is when I am not in the Tut section reading. ;) Otherwise to the others that voted yes so far, Thank you and have a nice Holiday(What ever you celebrate;) ).

From: smurg
Joined this month, under 100 posts = no.

shouldn't be your entire basis for voting bro.

From: Dervish
…

Attitude + script = yes.

++1

From: MrDerp
I am sorry you feel that way. It is disappointing to think that some SRL members would just assume because of a low post count and when the applicant joined the site would mean that they are less valuable. Most of my posts are from posting responses in the 'Help section'. My feedback might not be the best but I am trying to be helpful when I can. I do not go into many other sections of the forums because I am comfortable in the script section and help section. That is when I am not in the Tut section reading. ;) Otherwise to the others that voted yes so far, Thank you and have a nice Holiday(What ever you celebrate;) ).

You'll see, someone should soon post "your argument is invalid, I got in with [insert low post count] posts".

Wait, what?
I was about to point out things then I discovered the additional scripts.
Those I like. Custom ATPA/TPA <3!!! Even if it's simple, if you understand the basics of them, it's only a matter of time till you use them in a more and more advanced way.
And multiplayer with LoggedIn checks.

I have voted no when there was only the first script, may I ask a mod to change my 'no' to a 'yes'? Thanks.
Good luck, Hero.

Thank you Sabzi. Yes since the date of posting the original script I have taken into consideration many of the comments and suggestions left on this thread and used them to show 1) That I can listen to the community and 2) That I can do most of what they ask. Gotta please the community some how ;)

From: Dervish
…

Attitude + script = yes.

What he said.

He has atpa now, so could some one change my vote to Si?

From: footballjds
shouldn't be your entire basis for voting bro.


++1

It's not my entire basis for voting, it's just the first check on the list.

SRL members isn't about someone having a good script and writing a good story.

It's about scripting ability and community to me.

If someone has 20 posts, then they aren't truly in the community yet. I could post a script and make up a nice story, but that doesn't mean it's who I am or what I actually believe (not saying he's doing that); you see that over talking to them and their additions to the community.

From: smurg
It's not my entire basis for voting, it's just the first check on the list.

SRL members isn't about someone having a good script and writing a good story.

It's about scripting ability and community to me.

If someone has 20 posts, then they aren't truly in the community yet. I could post a script and make up a nice story, but that doesn't mean it's who I am or what I actually believe (not saying he's doing that); you see that over talking to them and their additions to the community.

I'm fairly certain that when I got in, I had around 30 posts and my account was about 1 month old. I am fine with a lower post-count if the majority of those posts are full of good content.

Quality over Quantity in my opinion

Yes for attitude and willingness to learn. As suggested you should learn how to use ATPAs :) Also, I would recommend more fail-safes, but that's probably just my opinion :)

Goodluck!

EDIT: I was reading above and they say you have a script with ATPAs! Even better!

In!

Welcome.