Page 3 of 45 FirstFirst 1234513 ... LastLast
Results 51 to 75 of 1103

Thread: P1nky's PowerChopper!

  1. #51
    Join Date
    Dec 2007
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    oh, and btw, I got the box random 2 times, and the autoer just kept on woddcutting...
    So the box anti-random doesnt work



    But nice anyway

  2. #52
    Join Date
    Dec 2007
    Posts
    0
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    yeah they should really do something bout postcountlovers ! .. and btw nice work :O

  3. #53
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    ok noobscam thanks for the suggestion (remember to post PROGGIES GUYS)

    update is comming out soon ive added so much
    even a draynor banker



    SCAR Code:
    program P1nkys_PowerChopper_C;
    {$DEFINE SMART}
    //$define srl5}
    {$i srl\srl.simba}
    //$i SRL\SRL\Misc\Stats.simba}
    //$loadlib sps}
    //$i sps/sps.simba}
    {$i SRL/SRL/misc/paintsmart.scar}

    {===================================================}
    { P1nky' PowerChopper Since 11/12/07 }
    {===================================================}
    {
    Step 1: Have a Hatchet(axe) either on FIRST SLOT or WIELDED.
    Step 2: Surrond your Character around the Trees that you have chosen.
    Step 3: Start the script.
    Step 4: Watch the script run for a good Minute.
    Step 5: Enjoy The Script. Also, Please post PROGGIES keep the Thread Alive <3.

    {===================================================}

    //\\ Make Sure To Progress Reports on The Thread! //\\
    {===================================================}

    const
      DoWhatToLogs = 'burn';
      TakeBreaks = False;
      PowerChop = True;
      DropType = 'fast';
      Loads = 18;
      AntiBan = False;
      OakColor = 3492702;
      WillowColor = 2374714;
      RegTreeColor = 3690597;
      Ver = 'C';
      DoYouLoveSRL = True;
      SRLStats_Username = 'p1nky';
      SRLStats_Password = 'jara99';


      {===================================================}
    {########     ##   ##    ## ##    ## ##    ##
     ##     ##  ####   ###   ## ##   ##   ##  ##
     ##     ##    ##   ####  ## ##  ##     ####
     ########     ##   ## ## ## #####       ##
     ##           ##   ##  #### ##  ##      ##
     ##           ##   ##   ### ##   ##     ##
     ##         ###### ##    ## ##    ##    ##}

    {===================================================}

    procedure DeclarePlayerz;
    begin
      HowManyPlayers := 2;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
      with players[0] do
      begin
        Name := 'pur3pker7';
        Pass := 'desert99';
        Active := True;
        Pin := '';



        with players[1] do
        Name := 'pur3pker7';
        Pass := 'desert99';
        Active := True;
        Pin := '';
      end;
    end;

    var
      DTM4, FailFind, e, PLANBB, Burned, DTM3, SPOTCDTM, WCLVL, Loads1, Debugged, sleeper, Breaktime, Break, x, y, TreesChopped, Dropper, level, axe, Chopped, NextBreak, DTMSPOT, DTM1, DTM2: integer;
      Chop: TComboBox;
      Version: string;
      LastestVersion: Boolean;

    procedure Grats;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        exit;
      if (FindBlackChatMessage('Congratulations')) or (FindBlackChatMessage('you just advance')) or InChat('Congratulations') or InChat('just advance') or InChat('congratulations,') then
      begin
        Writeln('Gained a levled!!!');
        begin
          case Random(18) of
            0: TypeSend('woot finnally LEVELED!!');
            1: TypeSend('muwahah lvled');
            2: TypeSend('leveled yay me!');
            3: TypeSend('woot got wcing lvl :)');
            4: TypeSend('omg.. i didnt even know i just leveld');
            5: TypeSend('yay me');
            6: TypeSend('w00t grats');
            7: TypeSend('Dang!');
            8: TypeSend('fireworks@!');
            9: TypeSend('yay leveld!');
            10: TypeSend('woot didnt notice since lagged lol');
            11: Typesend('good i just leveld wc');
            12: TypeSend('yay!');
            13: TypeSend('Hleveled');
            14: TypeSend('.lvld just now guys grats me jk');
            15: TypeSend('lol');
            16: TypeSend('lol...');
            17: TypeSend('fireworkz');
          end;
        end;
        writeln('you HAVE JUST LEVELED WOODCUTTING!');
        level := level + 1;
      end;
    end;

    procedure FindRandoms;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Grats;
      Status('Looking For Randoms');
      FindNormalRandoms;
      wait(400) FindLamp('Woodcutting');
    end;

    procedure RandomButton;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Grats;
      case Random(3) of
        0:
          begin
            KeyDown(VK_Left);
            wait(Random(600) + 500);
            KeyUp(VK_Left);
          end;
        1:
          begin
            KeyDown(VK_Right);
            wait(Random(600) + 500);
            KeyUp(VK_Right);
          end;
        2:
          begin
            KeyDown(VK_Up);
            wait(Random(600) + 500);
            KeyUp(VK_Up);
          end;
      end;
    end;

    procedure randomcompass;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Grats;
      case Random(6) of
        0: makecompass('N');
        1: makecompass('S');
        2: makecompass('E');
        3: makecompass('W');
        4: setangle(1);
      end;
    end;

    procedure MyAntiBan;
    var
      DBanMe: Integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Grats;
      Status('Performing P1nkys AntiBan');
      DBanMe := Random(12);
      case DBanMe of
        0: PickUpMouse;
        1: GameTab(1 + Random(15));
        2: DoEmote(1 + Random(15));
        3: RandomRclick;
        5: RandomButton;
        7: ChooseOption('cancel');
        8: MMouse(Random(MSX2), Random(MSY2), 0, 0);
        9:
          begin
            HoverSkill('woodcutting', false);
            sleepandmovemouse(200 + Random(100));
            gametab(4);
            ChooseOption('Cancel');
            RandomButton;
            MMouse(Random(MSY1), Random(MSX1), 0, 0);
          end;
        10:
          begin
            GameTab(1 + Random(13));
            wait(1000 + Random(600));
            gametab(4);
            RandomButton;
            ChooseOption('Cancel');
            setangle(1);
          end;
        11:
          begin
            HoverSkill('random', false);
            sleepandmovemouse(200 + Random(100));
            RandomButton;
            ChooseOption('Cancel');
            setangle(1);
          end;
      end;
    end;

    Procedure PrintOnSmart(TP: TStringArray; Placement: TPoint; Colour: integer);
      var
        mx, my, Pic, Pic2, I, B, H, TPH, Numb: Integer;  //Add another Pic here (I used Pic2)
        TTP: TPointArray;
        Canvas: TCanvas;
      begin
        SmartSetDebug(True);
        GetClientDimensions(mx, my);
        Pic := BitmapFromString(mx, my, '');
        Pic2 := BitmapFromString(286, 40, 'meJztvddzo8e2L9YACAIgiJxzz' +
            'jkHIgMEwZxzjpPICZwoTqQmaUZhpJlR3gqjra19tu65TlUuu+q6yv' +
            'aDy74vfrD96v/Fq/sDQDCNRvucU/uUr6paKpLzodG9ev1W7vUhGkJ' +
            '/jD/GH+OP8cf4Owb+j4HHP3wl/z7Xg5fE+He3pH/5XuCXf/xi6GS0' +
            'k8FCiEl+/XewsKO0YuCFveunaGQXzMa+muOdZ/g32UjreoDUbX8nP' +
            'x/sjtWYik6morU8QMh18EBb45kTH/gXL+kfOw5IcWSwfuPEKZqcJl' +
            'gO8d7vQesBoNrpqI2BmAzURjs4febvmOrfhFzHCdUYb/sUrcnAZEc' +
            'Hg47Z5hjE8H+Mf1u5jWfG504jFG6sp62xTtbv+N6W3bXM1nYaoRgn' +
            'HOvBoB08wDz8GBGwpzHYP5AlTqctLL4NtbUjBjVYiEFHzMZ2jnHyI' +
            'W3SHMwG0OjoVJIeg2orNusfpDDObFkPnQz8M+OAwv8IId8gF52Qi9' +
            'WgFfzcgo6TFtYgF6z/8KYOtkY/iceOUe9fiX8aSgG+lHXKeg4U2Tu' +
            'RpY6XY7ur8xKZDcOkcayHvo4QkBIyJz6An2EeQP6tJPo7j/Xv1QIn' +
            'T1gHDkVbJqKzEJsa7aidebCdI7K0ralN6JgIdCYhHePorjGVmlBlY' +
            'hHUdohDTiEOvY5x+PY2spgODo0Pg4U47YhFFtlkQuY77JH+r0c0Wi' +
            'vkmXjjB4NijwZJGcfWgLfGrO+LxUYcDk1A7YtN4xGCt7Xii0aox2y' +
            'RdQ3mbMf0/33ccgzph9ZDnfvBegip2dSODo7st7iIQigT44gDH2+d' +
            'qh2zAb39gMfaW7+OjbjNr2t5hsOmcZuTkGc4zMP4YhAwNsQCJn5jt' +
            'b9T/vw2WlvN2nedsCFC22Dx5JQFbCTCg8aDvVP4Yh5TQA3IUMzPae' +
            'ya3txjK5VaeY91oHSOQq9l0Ml6OghJhWwk7kCKDiSFnznwK40Hq4J' +
            'nGuB6u7F6qjVyVBG8C9HImhsrZLEb507oxoe/UBSon9QxUgMZKdlF' +
            '9iXgIAkLSdhIykEi2BclOloZ7Dj12t8iUhrK9B0GsxVWQEwOPnQBC' +
            '5Na1o5PX0htjQJ7g11PoQ8BKb2OnXY2rROfERJ1IBmcGsVLHBqPgg' +
            '8MeICNfxWRZxQcJCNfJ6AwSA0MOiQgxy1j4tOXw/LIM8CQIG0Osco' +
            'REh3oNdq7HCirqWpbdOWBAm0xj3+P2XDAJ20UD8MW+EjViRQCpOYj' +
            'GQcfOuyIdxhc1AIaHFJnfhE5CwHFG9TAZMRobUpCwXHOOaIo68SnM' +
            'I7XIxMhtRipBEglRGoh0vAwkUVkKnYDXKdo/xYN2Eo05t9NNKJkGf' +
            'W9c/CO8OmL4ejZeAgaWpV+lBXJr22YJeggh4FQsK9OpIS9pNx5nzb' +
            'Kwz8DqaVErHW0EwAe0Wucxj+1sDrRXPi/o/EQykOhtsk64JNDplQL' +
            'rGAjEgFSCpDCr4smXDkukhA6C5vgqjsFtJN0PWI1xGM7QYREiJRSc' +
            'l5waiIyCDSwSKTwAr/CmcLgI6UIaSRIDdRgg5ChCahnOARNnfgxTW' +
            '9uQM208JCCi0WruCl/WvTaUQZj1YXbb5mFdSeI0nr09sacBLxHDeN' +
            'j/hHrJFuoGXih5mQSNgaCqKRID8jqclalyChGBhnScjC+YL8dFLgo' +
            'GmIOQZhDYLOCBnHgBy6WwAcWBQdTSQiSsB2JWYT9MNEO9CD9AER4A' +
            'URUYjFF/SCGg5YinQjpAqrsQHIy76rpmR74VYyUHHwKvBZL9Zh1dE' +
            'ixMhpEA9iyTiQa5b7R3u7BEWOsyY1svC+RpsM61jup4ZrYjXMn+rT' +
            'JigeLoWQRu05quUsZTpiLbnEsqi94pAmvKibAEl7c0IOEjIQgoNfa' +
            'MWGxHmE3WP24AcPAeGxrP6T3W4X5IW/usLaC9SgMXFfO22vmBrOun' +
            'ogxq2wz84nGITvCauIURdnW0MUMMpUYpAQIQEO7N64vTVUWYqayAG' +
            'llSC9CSkAKF8mAVYDNhMgQ0RdWR8/4JGk4VnhGitQcouY6kYxHMNU' +
            'dH9DS3N3xYQ1yZb1VJc0M/8QiGpDQR0AYDHMLEzOYhBIFbNTZoghO' +
            'dxYIrBp0YMKn6nwI+hTP35BmNErVcloQ99vuHmWcgCQEghA5Y1Qg2' +
            '9Xt984u7nzy4SchaU6CLCB5gBpsAoemisGancbnY843yJFZjCxyZJ' +
            'MjK1CMsL2UQ5ltWN1L+EhaTQ9EzCkBtjQocB1YUJRigqmAS0EuEUE' +
            'HR6MGVSVDBjVyDCVne4Pj3/zw1dfffJ1UV5OmigDDTUU4jdte9xeY' +
            'xyDQdKUpq1JwEtF4LURjnepU1ged8n3asd6BD/IlHEN3st/CD0z1L' +
            'lmFwWq6X8O3tSMegXyL2iI8STRmGxhCIGe82qCK5vDLU1M9y9XY4G' +
            'hubqQ4nbSUVG0ODddMRDdZJxIBufhIHrYnMqESSLx2Aq6GxK57qbQ' +
            'WX6wBIhaBMK/VbzriPZGHGdgwQ0KL3KPnuuydkeXxzZJvYKa6Otm3' +
            'YGR7Ne02GVsLOyW68rCsOExqQhPgIqEQWxeasdysk5v4888/ffvTn' +
            'wbiMyOZeTEySZBeiocOftAg92Byam1o+9U3r3788ScTLVyLjguQXk' +
            'ZOFqAXd2R4SNeTGq6GJlant2K60tbceWAwk8AjaYcliYjNySckksj' +
            'atIPlEbPEzcK/UnqW2VjwaWqL0eIHMevsgTU1OB1yAQE4hVkOcYta' +
            'OOfA7jpmMR4Jv8BxC8AU0bBtbmHyk+cvpcj3zbffLfaei8qqV8/es' +
            'osjsFkyP4gCBjFxsX8BWJBjJDq7DL0fPf708tpe2T+iRG7YPmg6Ll' +
            '4bFlBZfynpLnbHh6yCEOArakuDbGnBHTb2ANTANk8ePvMrU0KkkyG' +
            'LAlmUyKZG7pSp/Pnr12aUmcmdTUkHF7vPL49tJixlMdJ1YLx3tpNY' +
            'x+ETpzUgQO2Owq+4kxANTFwuJprkGNF4lIV5ODxCPzItRQEWPlas4' +
            'sd7pmtdI5XYYC0xPNO3KGZosOvUINQRIcYipOYiuZnvWRhem+pe6g' +
            '4PByUFD7erFh4fykxP9czpOHYBXh62DEHLJ5xduUDFp05lPN2FSC1' +
            'kijc4p/2wOU3ZKpwWNPEafooUdk3OgrLH4I/chrXZjj0XJNOyrVM9' +
            'C5PdSx5l3E7rCilzFe/IYGpybnBZxQRdLOHU3QHGCQYhERoUSMERB' +
            'uslpElvb+6OJzYDzO6zk9dVKPrNn74tOAcVyKpAZjhZA9OXc9e+/O' +
            'JrIfLtrt6xoOxyz4Xdc7ecgrgEmWTIKEKgxfs257d7oiM5e6+3MxM' +
            'Q5EZLc9OVpZ7UIDAej5AIFgYMVopW/drkdN+iFJlGq5MGsbMdb7yT' +
            'CLe3WbAIR1GwLOLQhAzEoSE4GjEXq8u6buVS9jkS0ZGAGPyypk1LG' +
            'I/ZkFEnmECYIKCwaEIiKIxzA6v/4//633to5axyXI+yN7f2v/r6Kx' +
            's3BHoZn3X9QLFH1oFEYqQ1MP3nZ24VVTPbCzd6zQthzsD9i48tjBB' +
            'AA8AlxJ6aspYdne1bKof78r7q6sSWWxnm44OWESsaDAMNUHKsNCdH' +
            'zjvXH3k7chXfiI0d1SKvDnktKPb0wfOf/vxmLn0+J5tIcsdvnr3/p' +
            '2++2bt8T4ks2BHAWGAeRVY9VkB0K2YJLg3xOjCygGhgaSgI6iUdGF' +
            'wiBhK2YdEkbRCNTxmZ7XVcsN6CLGW73ikLJe3dN67cyrq6ndKItsN' +
            '6GrII52NTUIglkjluKCZUPZ6O3GB8uuwZgY2HpUUdzStHFgn2c7GL' +
            'ARsMGpILQ6uFQK0Y6lsYXfVoAsRcFBKxySAAwUullHLDEOIyUCcDC' +
            'WgIzksIuxZiB0rFxXxIdt1QXlTUAr4FeNInS6RNPR5WfrhrbjA+40' +
            'SZWnCKGCGGDuL9EZnzdmThqURIuzV/4etvv7qy+l6IMZhXTg5Hlv/' +
            '6y1+fPHwOchKMOg1y+ATpV69evXz9edU6XTHMBuh9+9ef/vjTj4PJ' +
            'GRWyKZBdjay2jmDZN2xGybimezQ9l7MNWlAyaSzLkV1M7CIiJAFi8' +
            'r7s2ChYnfHBnKe6Mr0hpqmJuQhYoDcY48Q0a132AiXbEDsTL9+6dv' +
            'vswqUrZ25dOrO3NXfl5pV782MrGX+py5u/uHkpGyqaBA7gEB7+ahl' +
            'Wl5hVuIcjCQJi/NQ9HRK0AZiordzwxvilCL/Wa53fHLq0ULwQE/T2' +
            'BmYmiytCpBVgNuYTY6aDUlggf9wdXf/t//DPH+29unLmei08Vor0v' +
            'fnz9xX3hBI5wLCUIg2AK2RKmzuC59YuLo6u6ZhuryZKNJRSjBRatg' +
            '0UogBZZrs38vrR+3sPV4cvDMcX7SgTkVUSqioQU4MiCpR0oO5bl++' +
            'uD13UoS4x8qmQBzQaF3xezCEnIotJYr+wR67LHLyxu3d+5fLFzZuX' +
            'z+ydWdjdvbC3uXg+F+pOewrrcxu9uUGHwkugB5KwLpRazEJmI3PHa' +
            'CKLMupk7fr1xU2/Mu1Vp/yq9JmVbTXHCJx/HFn0ug3JZWNWl/amR7' +
            'cWt7u85bJjNMoZDLF7S67BlLN0aWs3YS0QgwrEJv6/X5cwsT2LIxu' +
            'bC+etnUG3Ksgl8oTYD/RGmJGyZIQ0xGUiUTKYL6RrtcLwztrFs0sX' +
            'BvLj1djIcGlqZ/PqZO8Cj0gVdiPUz8G7lmYDle31i6VQX942kBAOB' +
            'dprFfdY2T906fxu0pYHFU98ARbzwLlrpiwZTScLnunEQsOqRl4R8u' +
            'hRZrV35+57D5yoIkYBBfIYUNBA9+phoKAM+ZQoHkADDx7sz+TOKFE' +
            'CPqJFPhCnagKu7Y0rkz0LBV+tzz9rRqW4tK8/ORa35G/t7mnaHZSR' +
            'AwwAkjlqy7oFkesX3xvITujYbgPPiiMDND6zHqQ9FVkNZwHEnagN8' +
            'bUsx/3b78uQVYQszx990h0cFGDtAJwPSkf73tU7YUvX1Us3AFagaL' +
            'jY5aH8Gh7R+0LidPMpi5GwBxd+JoEarZUfunH2XlY93OdcBJpMxtf' +
            'zqvG5wpmF/g3Qzjh82vBQwMMCHQfbH4ovJPkDM5U1LRfcMW2Xqzsr' +
            'HZ5Mr+tRAMQyWMsA8Ine+ZWxDbsgDIrs6sUbUWtGSAxpmMEmCLx++' +
            'frq2fcWyuc1KHNr62GWPZ0Wj+0sXP/uu+/TmgEL6nrx9OWnn7yaTK' +
            'xXFNNF5ey5ud1PPvrs/s2HirfqrGaoCsQ7yG2Qcld3bjo7Y0JkvrR' +
            '+c3lkXYQ9aBgawPjZ5e20t7S9dQVceAGWhIfAdbg8gHngnmCBD6as' +
            '0qOKXjx7xadJyJCGEu8U2zftcCpcgFFA64DjEGENovPx092u8YS81' +
            'uud6Q/NpFT9BceQWwCTmODgRFixAvMo0p7ihbWLWuQwcrxn5i8kHB' +
            'kqgEaUTkf9RHC0XAJe6uLsytz4ooAGfrGYIEga0KduXtpbHFpjI/W' +
            'Flcv77z0i5reyYdJgZIEOBWqokac/NBsWVSZza5sTF50oP9uzZmGD' +
            '+WHkIzWFrEO5rcPJFwpZgEExMuys74Kltzp6Ps0dK2umJxObHz//7' +
            'NWrL5XIqaeBKeJ2diT+9P13D+8/rTlmqsb5dOfY7vre9z/+MJKdU2' +
            'BgOlTILkTG0a45Oy1TMA9PFzaK1mEvqzSYmdIitwQZRDjwqOSSYOZ' +
            'E79xoYSqoSfGR/s6NO1qulUXiSL+FLFbDX8DIIjFn9URpvmAd2V2/' +
            '++LDlyJk09E8cBygtcEx5GI+OQ/y/OdffgbxK8PRAHAuZEwkoJP4M' +
            'FBSxTMRM76JL4wsCdIBUvryI//Lf/5PXlQtaKaNKH9l+farz186uD' +
            'GYn6STxI3jkIKsIMiaj/P7L6xfSjlKKqCY2ZORjY8mV3TIR5ClAbX' +
            'ViZQaln1pYqMQrRl4bj4OP2rIP+nlyMFFprnezZcfv14rXL6+vD9i' +
            '3fj8xZd3dt/XoqQZdblohap38ocfvneh2nh8PcTs2xq+NjOwkrFW5' +
            'ciE47SnWoNUygMjS4CJoE5Zygs9W/2hhV//469qLBs9gE1CNLB2FO' +
            'uzZ+DXr778WsdxCbEwlLIPO/stg8R8wBrEdJAIcHpCZhV5iPumpJB' +
            'Fmc2H8571vAZ4dmCe+TTxsfJ0X2S65BzyMIpJVX9vdBw4eb5/zcBx' +
            'g0HFw3YOyB/gHLWR6+/pGp7om7UK/XxsJVJfUT87Ev+RKNn6vvyg3' +
            'xCFMyKRNyCvDswGEoAyZiw9T/afBxWZh7cf87BXq+5oWCAkjya3ib' +
            'zj1bme8HjZO+hhZ4OS/Gh2frRrYWloXcOyNXMBJ1GjGQnBlkwnNiz' +
            '1WXvPzUu3l0uX3aiyXNnRo/Sffvg2Y61ha5BmB2vQzo71RSd/+eUv' +
            'EhS9MHVdj7q2xi5fWLnkFaWUyC7HroSpPzk6kJkYiM8EhcUAuzuhr' +
            'C4Mrc1UNobyE+CJgx7hYXAppOQHhzh2bn07bO7SssFLlbNowsPIOj' +
            'HM24bqvio4pwI+tmMN/YlxKXLvrt59dO+pArl0NLeM+H3AJ0Jkmup' +
            'ZAtSfXby0NbvDw9FO0FzSmDd7YW27y1fMRar/0//8n4hYroOLOJ4Y' +
            'WQa218GJff7yGxWKfP/m+7X+HZBg17b2fJIE/Cvx+pvIksHBaZA7K' +
            'e/79b/59e7m8/fvPxksjeUdfU+ePB6JrgDKZARZEsweIIE1+k4HiZ' +
            '9jWIEdSE7fqKd5zq9dtKGcHhWGnWuv/vTyw/ufOhAYgYXzc1fy+hE' +
            'TiptRfKq8XjCO/vwf3oBtnlYMlFwjEgwKLUH6SRGMhtnGIh56J5IA' +
            'fBLGkoudHgwv/PjmRx3yN5FFwGVM26tJY6kUHHj26GMuTiKoKJPpc' +
            'PDwIPJGRTxIWgonHUB7CrH9RuUCBHWRhTqoTzUjdVS4Dx4DBgDpl7' +
            'CUVsa3+lKTfcnx0dJs0dunQg59h1OEJ1SSRA9YO1ox0qkYNi3HSfJ' +
            '62L+goklEJILfpDDwLQ55YKI2BwYkxQZkGOEINMgORAaWNqHIjcs3' +
            '9m7d68SU13HruWkYUiGSq9utoCb8stTZlYtF99BIZm6ismjjhIGR9' +
            'DxnU1w0SUHJnNZB1sMnWRK9FFlnKusuZubnn3767qdvi6bRhd4tUF' +
            'hamoMEkO065DKgyHRlfTy58vM///jps9dOZmYoPSPDdqBZiiOEJtD' +
            'R8OT0wMJAfHpraTuoyJ6d34G9GFgeVbuZj0mErWUp3rIO7CW7OCTE' +
            'tAJuV7GPIOvkehV6A1lMIiRBlWsHkhMKElR5fP8DCllEOqklWEyZr' +
            'R3+njB4Os43f/5BUI9zaijXJmrN0pH4xz+/EWPrUdnQXDjoDfyvRF' +
            'Ytgu14bm0/2JjYfnzvWVhSVmLVbJOSZARx3CQcwktwgnrkM6DYUvd' +
            'OF3vy9tmHS4nLMdrg7uI9DQrpaC7CsbBTEGJaCUaTmgKaAHMLNlzh' +
            '3OHr7LTUYGxhZ/K9xzc/vLpxZ3fu/sPdZzPJ82nFoAFFzSgGLKFG/' +
            'qpvohacBJ/axUmpCWxJuBI8mo72Zu3isVADFeUmQTxt0lTy8XKArD' +
            'dv3lDIkuM4sIaEUEx6hmsgPS1F9levXls7A2JsKBJJgmNrgkb8kN/' +
            'INNV/paghIhAg+KqTiE0KKthUgO4gvwD6BQcGpXj7ehDOTm4MtlN2' +
            'jWUt/U5Owi2IE0Wvp6gkwmxDqR4D+SMMoKSKIEtCBQ8B0co2s1UY3' +
            'N68YukMwpxgSICnIEFmQ7vHJgxrkUsLLg/dh/+PPG9+eqNkWsTE8S' +
            'eTSEi+Q0lmNhqZXo8wHtdVKoGhkCxv5QRJOEXTMI87m3HUw9Roumw' +
            'gNMBM0mtoThCtYXGl5BwdTMz2RadkyAFWHDAYbBDm1CKnAflVyDuc' +
            'WBjLL+Utw05OXIWcasxplGTQk8iwM6Yu6lBovmfLwU6GFTmApASfm' +
            'o7QXEEJahmRJGIcUsauPR/bumANgjHPOTBfTwgPMhqxFzrRtjJgkv' +
            '7UKPiDl1duU8gC3SHFZAcmgclNIIpXx85ykOb/+n//H2IlmijeBkg' +
            'mnEUB0vzl57+K8WGpCHlx6BKccRFmfoMWCxNwNt1JXQ8wMGE/hwgv' +
            'W0Psdpx14uI1qMTIqEYu0CngCoH7c3F2r9s41+uaV6KgEQWkJAtGJ' +
            'd9JYArMbxCV4A+CF4MNe5Lu1wInjOUWXr/84vLSHhifNzffzzAnB2' +
            'wrn7/+fHvlOji8euQ30PDQIC8MFfJosK4xk3S2ghzuifks+kGlBI3' +
            'LRRJYf8Kc8/IyAwRZMC1wmgyfkZZgHMS7aWX8bCcy/Ff/9X+XMldl' +
            '5CtEJAJDbZkIeXBepFxCtAZvSzpx7kMpxDoLhgpsQgEOP8pZmKpiE' +
            'jkXtOEIMIhQEQvnvnGkDkiqRGYVDoK5QEAZGT7gIkndOsWHJSCpUj' +
            'iyTkxAkI1GAeYZFfGJ4FsUfCxjMXm73GUt3fXlyy/FyEL25XXzk6D' +
            '+gFxeYcrFS0Q1eQIrrxJZwobMcGmSS8ot2nGRA2ATzlROxB3W3aA1' +
            'gAccvChoTxmOwoHE1hCJUY/bE1KIufiz8H8pTnyQ2D5VhiTAU6kVy' +
            'AQ8qcZH5lfj73WDe6UmZh5xkQwqZFZjvvWp8DMBFY5deCmNRsiuFe' +
            'GssUVBwKVBLisnDOsBbhEhs4wsiRRvYEoKcX4HFg/OqaET/xHUuoI' +
            'EefiHw4MnGoT1yBKx0mHlqlpiDJB1aXmPQpaW5mnqLBlOGdjmB9Z5' +
            'yPSf/+//nXDIAbKygR4R0v3881/l+BB1fJxsFYtZ6mKi5lGHetKDZ' +
            'g7wMAYXSBgtzQ0gTbmKCXfBrQ4Woz0pT07RZijHaz5tIqzJdIeGq/' +
            '5RJ6OraBrPakeymsHJ7HpvfAJo6FbGCpGKTxsJGGNBc6IU6zHwnEA' +
            'Hny5Wjve6VcGUp9CXGfFrk5e3rkmRCz7oQZVH+x+MJdbzhjEjik+U' +
            'liZ75inaAgfCWSfMpbyvL2YspLxlOUPLrXsK3JN0Fna1qJQuC9u6o' +
            'LPUEWMekNUXmqd0FkGWuaGzQJBa5wfXwGn9699+TRqqGvKlCpwB16' +
            'lp9rgzC+o+bs/Bk8J6tQkOjCfcWb8h5tNFYF9JT1HNtPflRlyqAPw' +
            'lbEpVkjXYspZvL6SqVq3Xa45GbUkj35kNVgLadECbLYZ6I7pcKdBf' +
            'Dg165Im4teBShLEcpmkLkdpYz5RTHtm9cB2wEDbl5sdW5kdXE44Co' +
            'FWKGQ/OVGfs9PnlqaJv4P7Nx0qAEr8rLM2HpcWlkc2h7NRk98pEfr' +
            'kWBW5xOoQROHSQFVYJuLq4sCrlzweMcTijsDVdjvVqOXaSyTUFtV2' +
            '90eGoLh9Qd9Uyo1qWQ4Jzu6BAcZQMrJ2YPRuz5RKOvJppo+qXyP8V' +
            'IFiywVI+WCtG+vKuWl98LKTMdTm6I7o8nCPFijZhqJocyftrJV9fN' +
            'TScc/aFlNmMu+rgRQS44AdOxBi35WK2QkSfS1iLGVd31FDoS40nrA' +
            'WPPAmTy2hGgJWWbZ0eXkh7S0DJZ0+ehQ25lKcCtBoojquYVh6We7K' +
            'm2jo1X1zPFNNJFgkjqy851tRZKuTTYtPLSKw+I0hCOzdU9g/7hV1f' +
            'f/OtiNjbFP8AsjL+qhiZGsgCDaIiFaEiEUOdcOWUdNtf/vYXwCkxI' +
            'XB8BnQ3WLPgnQHZb9+4C7IOJtGynJO12bix/MGDT8Dws6CEDoW7fe' +
            'P3b70/VpwjQAZ3T6HnOdyqcBsS7W7f0LE9YmI8g0DzGyMOmW95bk3' +
            'JxFwqxErWdnbuUlxVvn35/axxeHn8jIsbBxEhJpYD2LeFQK0vPQzr' +
            'gYUZ2Z6Xn7326aPsuh/0rsiKmZo660cDCutwRpsy6Q0AKwPD2xsbt' +
            '6L4F198AYaHHgV0oErowbnB1enKqgGFQLTqUWiyslQMgjpwES/brG' +
            'I6pnoX1Qznnb0HZrZfhEweRWJheF2BrPt3H9mEQTEWv0qj0G5RuGa' +
            'GFhUMAwjVrK8KcmlrccfKCoHcABsprE93ectBQ6qc6hFgJxTkhqI3' +
            'MxLVF1598iUf6bTEAA5qU/3pkc2F8x3YGgc6W4K6DCx1Y3Ln3MIlP' +
            'Yo46dmh+Nxobt4jjwWlOTvKVML9vbHpxYEtryQuJTqah2MgKhICVc' +
            '4MLcA8Hz7+RIC1gF5W5xajQxx1dIbv3ti38wLEfgNxbQGvZ6gwvT5' +
            '50UiooUUB8ID6sqNgQ4qJCUeMNP3qFLhUjvt7D41tfqK5HHlfdaw6' +
            'k/f1yLDOskYN2VpstBoeWxxZh1PWYBUZLMf7tlcvCbE6A7Vlmh9aN' +
            'bM9lzavwx4pKZf1VKLmzHjvtJypJ56FFvRCNTH03pV9ODhQdvAYLN' +
            '6nSd65ftchDZCoi5DU0Z2eLz6GrP7UmJxEMChkgckKclVGstvApYt' +
            'Dm6DH7157NNuzRpAFhjqsBNeyNpElaUEWZdhEbWmPOm5s8/zy669g' +
            '4qowMe2E8Yyg6LdWzosx8SnDyRxW5bemLg93zehQBA40LKncuHQLv' +
            'lqIvw5QrORiOSazSf3GTs/rV6990gS1NuzvOIvlVC8bR8JxTSaxk0' +
            '2wTgHSPXv0CTiqImSU1wMy4KZp3cpoLTMMf9HTfHrkEiDjVP/CWHW' +
            'CSQqA3x1ZCYIsKoJhRGHQyxoaGDwWwjb2oncgKq/O95x5cOOhCvnN' +
            'KOFkdvXHpocTi3rUFeL0TEXPBek9dlTMGPpHcrM2VhRMZfALEoYif' +
            'Pbu7vvYtaGDUefyK1IZR8+DG4/A3CXlKEZYwMbCWRlNR0IQBnOHL6' +
            'rLvf7sC0AifARYAhhMiHS92ZH+3CgfR5Ng48agJpvQl/f3HsuwVxI' +
            'CS8/REXfwYs8ef+IRx6RYpVoHUhNi5Hj+/ieb45eNKJXTjvQlJnzS' +
            'VFRSAUc1IelPKHoThnJvbMLC8RNnRIWTU8Q3BPM1bO6yCaKPHz/nI' +
            'o2ciERS3mYxMhwwybfffC8kUSY9ydoXvUOL/WdVKBZk9cwkzrtRxd' +
            '9WTShq/fHJgCRDRDEMS0iTM7cHwMIHTtNjZAFn2j3K+I2L78GCdcg' +
            'BszkFsf1bH8T0eQ32ONwAt7Ap6xCEzy9vy7H37YrjNY9dXLspxx+B' +
            'bwfOAbFgPL9+ySL2EPcKF+p4RMlbl+4VXf0ajIIQmJSgBIF0b978x' +
            'MSFT/Ws1qn54pOQBToLkPXw7hM5DiD79HTYPkAbhmeqsJK3Dr348B' +
            'MRUQdSjG4l8XfUgCyQKoAs6WFkgb0dMsVVbRaLwB9Qpf7yy59FxLA' +
            'kgtEInw3oY3K6nvLjNMgeUuU3xnancusaFMyaByaq88QqtpDvUrDr' +
            'Dgg4U/KoLatjuV+9eAlGMlBe3ebMBEqd+BvlpH5VQlVAUaXsdqlXR' +
            'gMhryb1TiANsI8WMqY/fPqxkeEHSWigebVYNJnGajNU5SpBFuNYdd' +
            'NJyDLXkfXDjz9oURAHMTDPgNfsUiLnZGklLC1//fIbM0qBqHegTNk' +
            'xsbNwI4JG5sMXlyKXQT5cm3gyotsasK0mZQNXN26Dj6BHQTMjEtMW' +
            '717ft7ZH4VfwDQF0UU353s2HTl6M8JVZRjO41WEhCRQAP5g7A1F97' +
            'sXz11LQlTi24FDTXep2Cyj0oCVBimHA2DNFDfmErvvhHRCeuBbFjK' +
            'IubtLGiX364etKYBCcJqDnWGleglyfPfvq3MIuIMvbXhpNLmaMvWl' +
            'LT7dtKqMe6otMhBX5WnpoojonwN6ZgjpxIXbiNDFbxi2MffDwIxFW' +
            '3HYqvAAKwsD0eiWpr774RoLsoKGAaXt8U8v95zKi8Zng9ojuzOdfv' +
            'L6z/lGPcGXctZVSDN29/D745pQTAUa7uS308sVrEDWAShWuGbAFtb' +
            'mUrbA8hNUZ6DKPMH1391HSVMTIojnl2Kdz+GWp9+88lGIo+dLmnmp' +
            'o5OIqiGsXkVd2A9crIk6xTx+hkAXy3ydL3dp5UPYMG7DtFAP65539' +
            'fKT/P/7P/60NCXCo5+1ZrWPIovysy8u3P/vs1VzPVkxd0eCYnsMny' +
            'tza3Rsrzm9N7cjwTv0KXJ2CkcU/CVn8BrLakQi8IVgtWHpWbjhpL3' +
            '3/3Xc8XBCLRS74GiFjQkE3UMgCPoyoixtjl0diK73eub7wtBrkPzZ' +
            'XQKqoqFpcEikC0xF/b9peBBl+79ZDEIDFcK+IoI+qVOc0Ytfserky' +
            'j1V3hwUUNuHJiCUTMefe/PSm4OkVE+MQTl9QD7/g2CARSidchjruZ' +
            '/nAGgzN/+Vvvyz0n8nZBvSYPk57e+zixpW5/vXt2etmlHaivBMVyv' +
            'rpgmr67s6jxfTOV4//sr/+2e3zDwa6JlfSu/s3nmRkI+vDlwvmMTh' +
            'Q8NC7AyNTlbXBJNABsBZwcpPD+Zmh9OxEZVFJkGXie6xisIeVFGQc' +
            '/HBMX3jx4SspCHCaD55J27uj1pyQRCSIAwWPGaP6YkJbfX/vqRxPG' +
            '9GicEhW8giSP4DOZYCms+Na5eyUHHlunL97/fwdQJYNZf3s7p3FW1' +
            '5WIaGuBHhlJy85mJkquYc6CDdy67EXClnauC3vFSaf7D8TYmSBF2Y' +
            'QkRQYqGOPKPXlF9/IkcuM4j5OsWyaun/90ZBt9Zfv/vna0LP9q08G' +
            'ElOjjs2XH7/qtkwO+JcncmukgiKQMHabGdGXL141kQVMmLDlferU9' +
            'so1MA8wskQpQFaiBVlwEAFV4snD5zIcoA5QyLq8elOBox9+UEMrE2' +
            'd59QIDNUmGYmQFpJmbO/dLzmEN1ukRDQrHdd09kdEnj55R1ZK/F1m' +
            '9SUpn3Xl4+5kSBULS0mhudnX4wurwdk4/YkRpPU6zps0oBkYsUfFq' +
            'yukmyDIcQRYorHYk9JljEpoOQKRjO5U0x0Bm4smjD3hIKcf+ji5kS' +
            'isaOgvETlRV2hi6srO6e/3s3Str7ykRHDS4LUYujjmLGrkeAUl74S' +
            'BP3Jpfn7pw+9p9IbbGyU2cevkrLsun8iOHr3FRSUx8i8TIc8K5gK+' +
            'xNLz56ScvwJszcfydJNjIqV/VOZYpPh1ZWGf98EaHop6O7GB6eqFv' +
            'c3P8UsU5YUN5I8q6UNWHej2o1uuYHzZvPNh90uOeOl+7c25uNyatm' +
            'JihnvjISvfOeuXauPfchYVrOhQC3RdRloruwStnbgB7aJG/y1INSn' +
            'IpY+XO9X0pDoAbI9Yu6uoTyeXprbxQQlt58fyViBQCucWxO7fu+nQ' +
            'JcoVHTQ4LwGWK6AtJbc/zpx8XHSMzxY252sba7NnNuQvOzigJKjpw' +
            'RsxU9PBSY13Lb978RYVCcUltpnsNsFCLjFbjQ7CwSnTQLUzkvT3lW' +
            'F8nqdU8giw3P/Hy5ec9yZHezFgtNVpLj9ZSI6OV2aAi/9Xn3yiR34' +
            'KSBetIlDX00ZMXZcvYeun6rYv3wvKCDWUK6epM6uzV2ftJxuizh5+' +
            'oscoGZFVAj7/89HMJspFUGlittpglN1FbqMYGwX42tgWwzrr6CEik' +
            'wZWETg2ygYXslEaff/DhIZ21fIMCXSHY8+ThBxycsNAQDwKYSgec6' +
            'Zdmb23fn+xeGorNzxa31qbOTPUtbi9f5pE4eRNZ724NNpH16N5zA4' +
            'qbUMyAwOwPgyVjQNnN3t2Ly+9dXtjToyioLRKT0TYiGN2tfhafZDY' +
            'pZHksYSkdywTAkZbjAMNgfmR9/86TTnzQ5jBGFk61HCBr+MqVjVta' +
            'FH398Ze1yAQV7hBhbhe1lHZICbeYUuYSSOmHd55wSWKreYnpWE6fS' +
            'jvSmlebudgjUGlZjkq0v+Cq8ZHByYt+8fmXpQjmk6PIak0Ino6sH3' +
            '/8yYrFTgKIpkdhE0roUXYhc+HW2qOt2o0sZyaEhmrG+Xn/5ee3XkX' +
            'RUsU1UnKMMjpoQIesvzuJZgF0o66z711+QMIaATsrDu7hrct3TIyw' +
            'pS2SNFZMKBSUZ25dvOsRx8El9+piQhwkVxBLT2/uDMZ0xRcfvQSju' +
            'svaszlzfmF8LWBICes8oz1Alq7nyYOP5MhfdoydW7xUNI9KMHg9Gh' +
            'ygBnPCaudHcq4+Jyvx17/9lewlDvZ5Uls9v3TFJ8hlzLWBzNRIeZq' +
            'Hw/hKUh8uYeLweIvOEqWO6CywCiidBdagAvksKFG2jsfaR/760z8F' +
            '0FSXZGAoPM+TcGGStKPcBdSwbUXoo199+Y0KBcB0TFLIevFaiEPru' +
            'EjJyPXCF105t8tBKhAIRoYX/CPQWTFDHvwXUqVmSLmL0wPzEX1WjX' +
            'WWB5DVHRja290PKXOgg5ZGN3bOXOHi2I6GYmYptqutAUDWzoNaYFK' +
            'NQovDWyDryFUL8InAVNM1asgbF89PQhb9VGQ9M6AY7B2GC+VNKLe3' +
            '/KTfsvzRg8+CqPfG0j5BnIfyTEFaZv01UKwkNgiyFNeik1vwgCyR2' +
            'xbopKuoxJMYafQcFw9pd87s7mxe4SBl2NilpANCDa3W4Exuq+waB0' +
            'X85uc3dlwBZSYl8fJGhpTHwnXdKvjehLmQtlT29wBZuCSDUy9FPlS' +
            'VR2/cqaTKhyitxyL3ZaT4qqMR7IpyaDCsyXCQ4t7tfRWzWYP9O5H1' +
            '5g3IYTISDpQ1o9zN5cd5/szzBy/KwoXF6KUR42ZNuzhuvPDg8rOdo' +
            'bu35p9cmb8zkdwIyfJdjur5md2FzMUR38a5uSugcUgIwlVw90/3LN' +
            'ZCEy5+wiNOqpEnY+vpiY1Ndi+aO312qa+TGMYizBsGO5/ys7DO0uL' +
            'iVePMwFLY3CVqpNSpMG+MIOvp/oegC0AOxJTVezcegtOkweFEG5Ue' +
            'BSyMFKbEyHr7yoOewIQWO/Lg7HjAANMz3FFThqS8KbQqybV3QVc4D' +
            '+Di44OuW4MfPPyQRJXtJHBkwneg2n1ecfqrL74lOitRtU+G0CCIgt' +
            'XU7t6ZRzc2Hkym1uOivqita3Pi4oWBvVT78PPHL4ATjCgIOstEj3z' +
            '51ZcxbSHlKA+Xplem1rPhSgdOFuAwrI7u8YgTe1feH8pPRvXZXKhv' +
            'Y+5sb37YKg7wcbmCDQ46Ze4GnXVp+Qb4X2rkFiL9nZv3CLL0DRIZQ' +
            'P2BznpvB2/ciGJ21BWSFr/97k9CzKJ2EdEaFLIYJyPrIFN8JJ9Fou' +
            '5PQTFhDqGlDSj9/P6LR5c+++L11zMTC8VU5dbZ/ZX+czgfR7ORuJC' +
            'h6AdXxfznn39RYlDjFBh1UwkjywrIUpBcm1KMh1rFtIJx/mj/ycLo' +
            'ul0cVNBNFLLAwg+r8xtjV+Z7Ngwo1ReecXOyv/4N9KCJpPkUrQYhq' +
            'SVQR8x5QNbD21gDEvSJWDTOQeQBb/yggQOzfmWG1454dn3ALHKQK5' +
            'BGKtBt5vot/PDMwLJPEybX37DOOnatuDVTfCifNUBigxac4E7aaCn' +
            'wTXYX73z14rsPH7w8s3qhGKteGL+1d+5Rj2K5R7H45MZnU64Ln975' +
            '7nzh0e2NhwPuxdX01Rvz+32uhXMz1yreUQ0OgDjBgPFIY3lP7dzyd' +
            's7Rq8ZqxekRxUO6zN61+0FdmjIFSc4XRydMnX6MrA9fS3FMxqdFdj' +
            'Mv6FFHCQrUajbYBgaARlRfSGiqT/c/IsiKB8TZhL4b2JtPyldIyFe' +
            'D021tzsH0uJER2L/9VIQjqF4NzU6gZxI3KnAk5O4MA/GdJr9Z5Ybj' +
            'FpIa7Lgt5xLEAVlCXMNppsqiYHJdm8crwX6WjBQDhISVvGb848efg' +
            '7J+/fS7jejde9uPBu0rg6b1Zzc+HY2sDoaW10cuUXEh7GfRoy8/eS' +
            'XEFo5VgI1/GQ8HqdTE1tVr6HbQWXeuPYwbilIsjY2klAtn2GWkoAI' +
            '+lTZXq6HhZgQD2LXL1y0ilZDwsK4Dl2oAH/qxn7VfC04YsNkWyTv7' +
            'RnNLy2ObPJJ6+y2dVa9uatRg1PNZcuQGZD2695TKKNlQKiboXShcm' +
            'CtuDSZmPdJE2BFPy/vOjlwzYOcX519gC4WGzpLVKa8mFoIYSO2zRX' +
            'm4ckZK9R8gdQIqbaeNicSfvXh1YfOSmJTZkKi7BcyYtbGduZ4NcBt' +
            '9HcWIrNQTmbj73n4HgSRJJVAlQGDOyQiysuBq3d97CvMTE1TMJsg6' +
            'Gi0/hiy1yLqzcRmQKKt/tUmE9CFzarw6oxc5yDWcE61BWnMeqgYDW' +
            'Jrks7r6QxhZJlw3hYnmb68sVS4MeheXhrb8yi6fIp6zDax0XSsJZv' +
            'tsC9eW7mTbpnvEyxvlq8AqFydu9+lWsrKxAK98+9I+Dvph1a+Doe9' +
            'wGbmee3v3QbnLcXGFTYMcHmV8+8zV7mR/J87MyklMBssZY6c3pst9' +
            '+hHl43tJtQPmaqB/yJQcLI0BTwKywFhK6CtP9j+U46g7LkfJuXvPz' +
            'u1U4kMC4sUL6uFTtU+dKPirBU+tJz4oxCLIKqtnW6iktgK4ESGuTe' +
            'cNeWJ0xOLgUwBrUB2zZR2C6JNHH3LrNUIakvo0aNtcPmkSdBb4Ska' +
            'siSI9/vGl3nNFxXRBNDPj3/7y86+2J24OGzfS4smErPb+jadKXGDg' +
            '1yF3wlQ2MwOvXnzeSXwHKV6nnCrhoLxjBc3iFsXA0kuYchKShxXje' +
            'BS+lMrDD+BaIGCYahiQdVNBakJAB5EnwZFXTPZNu1URKSmJxLHBiw' +
            '+qQRBxOHbk6IwGZOmff/6ZhR38OrIaPTGOlWEQSU7dz+KQonT49r7' +
            '0BGjJi8u3nj8DsnvNhE+iwt6ceOrK3J2KfTzoim6P7C317JSMU8BF' +
            'sDZiqhky/h4B0vzTP/1KsgMG0gME11QzkHB94YyGb2nHhdPSZt0O2' +
            'AyaThsbyT548gGxKNSUBRJUZTamLk5VljU4o+pP6as65L1z9d5k/z' +
            'wHCbkHVfEC6npaxJyJ2fL37zwmN/eVJFrecVK1JK0FWQAZXidN+vj' +
            'RE6cS7AQ5Eb+49CVsTa/PbbXVmzhxD1zUg45tzEZFLouY0BIQR2FD' +
            'zivM9IVmfvrlJz0KmVAEJJKfXS6pZza6rw1HF4OO2FJl+9LMnW75Q' +
            'oYz3iUZnS1vTXatmVDWg2p59ZgNFU2oC6yyc4s7Tl6ElAOBgQcOLH' +
            'CvLBfszvgr+g4niezhyiiPNuLWhFzqAKtOUmknyS8YuM6wIfvZJ+C' +
            'JaEnozAZsI0SahKsw3jsds2ZF2OaxhHT5pLEMOgscVS0Np1y9irhV' +
            'ELh/9302EpGeEriMh1SEKtzKSCU+CO5n0lFmI6m4bliqOkl7BIQ6K' +
            '119QWeMhkuU8SVQSnhGrV02Yfjpo49IrElD0m24XldJt7ilsa+++h' +
            'bUhJ7m0iOvjRkfLy1sjG9rUMKOigXdhBUVbSgfEpQWBtZTxpKGZFV' +
            'AVkQNBRPT/enL1x2kbIPf7OxR9+9AMenMAt/dG48C+hSpYlLV+4fg' +
            'mLBUQNpfgG1cjQ1uL1+VYATZyJ0pbCGXE33bm5dgtaSEwOaTJe9cf' +
            'VjyDYJDp6MBk1sznopXE99cOsPEvPHWutzGdVSqCQwDCXQ8e3dqUI' +
            'TtYfvf/uOvQVkOfjChsB4l7t3c312/tbd9f6Z3sScz9OL91wsDGxp' +
            'c+wcL03bge801NlLu330UsXSR5jxSUhKmkHH1Hn3k3u0HCBczN2sv' +
            '+WS/WOk4VEE+XUvV++k67FFLNuPsvnLuBuxXj1wiZB5KT9KQ8PH7H' +
            '3T5SgzSeKdet0mKWhOejEng3r/9kE1q5ygn6zRkUbdmSPsaUFsCpz' +
            'o8UZuxij2duGxPsrV0frQ2xaaqXuuN7Bo361ucrJaKXB44FyK6ti8' +
            '3KsM2sO35k4/Hi4s4l4RLHONrIxdA9V/f2psfXOuJju5ffXZr+64D' +
            'FS0o5WSlNubPjWbnNcivwZkF/2hubm50WctwC3DGTcUl7bxIHYvUI' +
            'HXUsgOkGE9O9bxS8k19xSFCDSqpzSNxOZFDGVC1We/ffh8MOQG2W9' +
            'QJZ6EYw0IP/qhl2URYDxq7vGU1zfHo/pMO7F+AvjaAfPBrY0lvfrh' +
            '7HMDCqTc9wHW5wJCKNkMhWl2cXLt0dtcm93JwXZ/cqvTOTiyvzq93' +
            'tokZ9QaA1LkAASWFUDeYIk8fP29DfBGpyuCTizA6rtUi8L767EtSM' +
            'qonyXQzmLiTvQubUzsqHAoGagTK7uGN+bNeaUJYL6PVAXukPAVwl1' +
            '5/+jkT98Ro9Guqbx9sM4mSYzILXRO980OVCS4SkRYr9VWRvhZAUkn' +
            'E0aVjOx/df9yOt6aV00y5SBVYC2TR04fPOkj1rEXod8pixWDv2tQm' +
            'BwPWTIW7U67CaP+UUeakk2hzC7JYJ+osEjTjBl3x967dGS6Pj3bPD' +
            'JenwT3cu/pgun9JgyvzAxFR9fG1l73u+Z3FGyF+973t5yFpQYlLKQ' +
            'xd/kItN1hJ9Kbd+aQze+vy7Vp2sJDsFTCVYo5manjeYfJOjy0N946' +
            'qxHoWbmIjqN/+xvUhfLXY0EHHnfEEbar5saWkKxuxpBZG1nrTowCu' +
            '8epsNojv5wYMsSs715KhXDvgAsHx8Tro/FpxKO7Jh02xWmE0HS6RA' +
            'k585bbtxI6UB13amMQg7FTyDB5beGFqOebLxHxZBdeI8MxC6q50S4' +
            'uetuPIIv/aYdY4drevzQwsjFSmRiozA/mJazu3lyc2bR1BLfKGBZU' +
            'nN16WDNOXVm9GhbWl8qXx5JoRSyqvmlQj26SBcqw34crlw90WsY+L' +
            's2xKLlWJ2rwKingijoLPkpFMnLBRoSrUSIzt6KAXZRvipMPFan444' +
            'chmAxXQvEC0s8vbpUg1bk/ng6X50SVgbAVdM90/2+UtJpzZ3szQ9P' +
            'Ccnm8XkAJ4OAIFV5eKlHpKA+QyOK/RQ0xCgupg5smirszG3NbFC9c' +
            'Xp1eDnjgT8UnDh85GPyigP3A4PxsvFlLdMUemJzMwO7ok7zSxcPsj' +
            'UdTbtbF0PmxJ9KQGdjYvqrkWCTFipaQ0F4BfSQ4ANWD9Pl2cuCdY0' +
            '5EmG5JyqrcvOxBxZnozA33l0Q6aCFZIdRch12x5cp56emzeawvHrK' +
            'nVuS2zwsUkzEZu4Haycd0yd2Z8KebOAYlGu6fGa1PFSHVn4wrwG5B' +
            'oqDSSD1VAKdil7rmRBXgG/r42u1WIg4jAeSWqCY9eapsYnnNb/G2k' +
            'pwHr5LskdHTQuAke60CIw8bl+lJS8IzLsPlY7eqIbe9RIe9838bHD' +
            '19tjF5QI5+aBJEEuC2ShLSNEpHuZFIG6mzD/R94hM8FdHypjUdDHD' +
            'q+ScRrNnMjySY2xTmERPh5GkYN1d9MQqwR3Nmps95mEwyPjjb8QPM' +
            'QeQzcZwAUh4h8KZcILtYJiqYFFNQ1aqrVHgvfQO+k4UkAj3A6za6q' +
            'He0HRDuhFUzjLjbIpU6EVZuAEE1O4YJPyvOUyKJGbnydoWvu0w9er' +
            'wyed7YnqWo3Ga5+pGrd8UVI0ulORExlCbtxr6Rx/YrqkdhJdt0y8E' +
            '47G3ea2NR22vBG+NQV4Lb6ccBj+AcYDNKIDwYTf5eog2h8Bu6KJmL' +
            'X28XAz2C6sBmYDXiNxpi8RudDIamul9AQD+HuH3Csnew6pvhUO7h6' +
            'L1yEYc7AJBWRjhlc3KCJ2CqEE+BXCXAIuS0rofL4pEGijHQtwwsjd' +
            '9Ul9eYhpFcPBy8V999g4g/CuXcQ6UpJPwbV0AYYiU7OAiZHuNFNJ9' +
            'XPsMFv7RzMjfCAmOri2FZnWh5FH1gtE+tiBWk3KiRmLTwjYFKNZxs' +
            'CDXZNxzzWSXVwOiU2SGu5JE6vU4nMQ9yZpm+IDXgZ8XxlyCbGgLIQ' +
            'l1/DOeg2Q2VvqftuopbmYM0hoHrPntijtdG5tHkZR9jcSyttGx2Qm' +
            'o0W2Ufyv+11FXx6L7iWS/GNtr2trb1g8o5mBzP6iYrv0CTNlptUqy' +
            'h5K9GoFBIpN6WIZqWuQ5IcurR1a81LSURcHLRQO5aMO+js19rVttl' +
            'eqaUBhYhqYNVyIvwjF6CaUdajx9SgALNxQOT2NK9p7HEOf4rV8vDh' +
            '5wWHnxS0dsM+3EGu3sKOc2iRB+s5fNBNVc4+RoH2g9ZSjS5SRx4g9' +
            '7X5RBEfJ1ErfUhzKprgRE5uNi47kL0nVOQeNIim9Ai7bq0dundGtb' +
            '7sJEqEtCjBF1hYdStX0JScLYNzWDcdEL/Z3P5IP97mAo5NdTDnacA' +
            '81hz4xIZ+1H4ZLTbhyTMc7lBxIjwZlMvW6Pjd1uxudIxoIKPk5CpE' +
            'nWiNziGgFjmHt8ZqXUCz7WfjPSn4u1gtvS+o9wLQWxrVNgjIqmuxO' +
            'nd1HDmU5r3dxveyD7fiPETelsa/FCO1zsBpdD+rP3xkJZTYaTaobK' +
            'Fw+5G7w61yo2XyZiPZ1laH7a0dL5sq4/j3NvmtSaVmq/zGAii0Ck6' +
            'hTyuJmCeSqKXf5in9PBsv5miYhYde0NBitlFWioDcaaUaV7Z2Rfvt' +
            'cbjj+tFO4IzDKHv7JM2XShxGWesbE05vxt6QM60v+2idvKWT7Vs6R' +
            'bc2ymYcoRuz8S6Ghn/NbyHaCYq79dvf8tqatw/a4dcfHIfJ28exjt' +
            'lH2k0zWad/8MjDx1byTl99fP7Wt4ccf+D4e1WOvOzmeKfZY5P8DhK' +
            'd3on9re/UaFlA60uFDusUekOpcVgNecI6eiLH30Z04mi8Agwz+XFG' +
            'an3R0mkN0t8y3uHVV4fe9XN8vNubJloS0PTfIFobIVqzMXUrfk/59' +
            'tYtnNDc+3iv75NP8K3jXd5oc7Sje/PFVYdfyNV8+9uJb8Q7QQjQ/1' +
            '4BchIvveWVT+2NBukH76Gjncpgv5fl3vmNJG+lSfMFZ9Qg2PldFPi' +
            'tl5gcdJn7rb2c3En+73q9zqEXPjJ+x2tWDmZ4C0Lb6ScQ7VAbtBP2' +
            '8ru+/XSwv/OhtB1aw98z+fFX/NAaEx576+LRGd5ylO8gT05Y4RFiH' +
            'ukL+pY3JP4W3/6rHdBpL0F4Z6T8lzZOfXPEkZP6F5/OH+P/h4P2r/' +
            'bGuv+ixh9E+2P8Mf4Yf4x/wfj/AEvH8eg=')

        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,8388736);
            FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
          end;
        end;
        Canvas := TCANVAS.Create;
        Canvas.Handle := SmartGetDebugDC;
        DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
        DrawBitmap(Pic2, Canvas, 40, 100);  //The 40 & 100 is the X/Y of where the image will be printed
        FreeBitmap(Pic);
        FreeBitmap(Pic2);
      end;

    procedure ReportScreen(TP: TStringArray; Placement: TPoint; Colour: integer);
    var
      mx, my, Pic, I, B, H, TPH, Numb: Integer;
      TTP: TPointArray;
      Canvas: TCanvas;
    begin
      SmartSetDebug(True);
      GetClientDimensions(mx, my);
      Pic := BitmapFromString(mx, my, '');
      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, 8388736);
          FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
        end;
      end;
      Canvas := TCANVAS.Create;
      Canvas.Handle := SmartGetDebugDC;
      DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
      FreeBitmap(Pic);
    end;

    procedure ReportSmart;
    begin
      ReportScreen(['P1nkys PowerChopper', '', 'Worked For ' + TimeRunning, '', 'Chopped ' + IntToStr(TreesChopped), '', 'Dropped(by loads) ' + IntToStr(Dropper)], Point(350, 223), 255);
    end;

    procedure BurnSmartReport;
    begin
    { ReportScreen(['P1nkys Chopper & Burner'], Point(5, 310), 255);
     ReportScreen (['Worked For ' + TimeRunning],Point(165, 310), 255);
     ReportScreen (['Chopped ' + IntToStr(TreesChopped)],Point(320, 310), 255);
     ReportScreen (['Burned ' + IntToStr(Burned)],Point(400, 310), 255);  }

     ReportScreen(['P1nkys Chopper & Burner',
    '',
    'Worked For ' +TimeRunning,
    '',
     'Chopped ' +IntToStr(TreesChopped),
    '',
     'Burned ' + IntToStr(Burned)],
      Point(350,223),255);
    end;

    procedure ActReport(Activity: string);
    begin
    end;

    procedure Report;
    var
      Answer, WC: Integer;
    begin
      Grats;
      WC := GetSkillInfo('Woodcutting', true);
      Answer := (WCLVL - WC);
      cleardebug;
      SRLRandomsReport;
      ReportSmart;
      Writeln('||===========================||');
      Writeln('||      P1nkys Draynor       ||');
      Writeln('||===========================||');
      Writeln('||    ' + TheDate(Date_Formal) + '    ||');
      Writeln('||===========================||');
      Writeln(' Worked For ' + TimeRunning);
      Writeln(' Chopped ' + IntToStr(TreesChopped));
      Writeln(' Dropped(by loads) ' + IntToStr(Dropper));
      Writeln(' Broken Axes ' + IntToStr(Axe));
      Writeln(' Leveled ' + IntToStr(Answer));
      Writeln(' Sleeped ' + IntToStr(Sleeper));
      Writeln(' WoodCutting level ' + IntToStr(WCLVL));
      Writeln('||===========================||');
      Writeln('||====     By P1nky      ====||');
      Writeln('||===========================||');
      Writeln('||===========================||');
      Writeln('||=====DESTROY THE TREES=====||');
      Writeln('||===========================||');
      begin
       // Stats_Commit;
        Disguise('P1nky PowerChopper ' + TimeRunning);
        ActReport('Break in Approx:');
        Debugged := Debugged + 1;
        if TakeBreaks then
          if Debugged > 5 then
          begin
            Writeln(IntToStr(Loads - Loads1) + ' Loads Left Until Sleep.');
            Debugged := 0;
          end;
      end;
      case LowerCase(Players[CurrentPlayer].Strings[1]) of
        'Oaks', 'oaks', 'Oak', 'oak': Writeln('Chopping Oaks');
        'Willows', 'Willow', 'willows', 'willows': Writeln('Chopping Willows');
        'Tree', 'tree', 'Trees', 'trees': Writeln('Chopping Regular Trees');
      end;
    end;

    procedure FireReport;
    var
      Answer, WC: Integer;
    begin
      Grats;
      cleardebug;
      SRLRandomsReport;
      BurnSmartReport;
      //PrintOnSmart([''],Point(45, 310), 255);
      Writeln('||===========================||');
      Writeln('||     P1nkys FireChopper    ||');
      Writeln('||===========================||');
      Writeln('||    ' + TheDate(Date_Formal) + '    ||');
      Writeln('||===========================||');
      Writeln(' Worked For ' + TimeRunning);
      Writeln(' Chopped ' + IntToStr(TreesChopped));
      Writeln(' Burned ' + IntToStr(Burned) + ' logs ');
      Writeln('||===========================||');
      Writeln('||===========================||');
      Writeln('||===========================||');
      begin
     // Stats_Commit;
      end;
    end;

    procedure GoodNight;
    var
      l, s, Time: integer;
    begin
      l := RandomRange(5, 7);
      s := l;
      Status('Sleeping');
      MarkTime(Time);
      Sleeper := Sleeper + 1;
      repeat
        Disguise('Sleeping For ' + IntToStr(l) + ' minutes');
        Writeln('Break Time: ' + IntToStr(l) + ' minutes left until Login.');
        Wait(1000 * 60 * 1);
        l := l - 1;
      until (TimeFromMark(Time) > 1000 * 60 * s);
      if not (LoggedIn) then
        NextPlayer(true);
      LoginPlayer;
    end;

    function FindWillows: Boolean;
    var
      TreeColors: array [0..3] of integer;
      TreeTPA: TPointArray;
      RandomOption, Chill, a, I: Integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      SetAngle(1);
      RandomButton;
      Setangle(1);
      repeat
        if FindObj(x, y, 'Chop', 1910310, 1) or FindObj(x, y, 'down', 1910310, 1) or FindObj(x, y, 'Willow', 3096126, 20) then
          Report;
        FindRandoms;
        MMouse(x, y, 0, 0);
        if WaitupText('Chop down', 545) then
        begin
          Mouse(x, y, 0, 0, true);
        end;
        Chopped := Chopped + 1;
        wait(1675 + random(654)) Fflag(0);
        writeln('Success Finding Willow');
        FindNormalRandoms;
        if AntiBan then
        begin
          MyAntiBan;
          RandomButton;
        end;
        begin
          FindRandoms;
          Grats;
          if Chopped = 5 then
          begin
            Writeln('Cant find any Willows - checking every angle!');
            RandomButton;
            RandomCompass;
          end;
        end;
      until (Invfull);
    end;

    function FindOaks: Boolean;
    var
      TreeColors: array [0..3] of integer;
      TreeTPA: TPointArray;
      Chill, a, I: Integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Setangle(1);
      repeat
        if FindObj(x, y, 'Oak', 2441301, 15) or FindObj(x, y, 'Oak', 2441301, 15) or FindObj(x, y, 'Oak', 2441301, 15) or FindObj(x, y, 'Oak', 1261120, 1) or FindObj(x, y, 'Tree', OakColor, 1) then
          Report;
        FindRandoms;
        MMouse(x, y, 0, 0);
        if WaitupText('Chop down', 545) then
          Mouse(x, y, 0, 0, true);
        Chopped := Chopped + 1;
        wait(3477 + random(1001)) Fflag(0);
        writeln('Success Finding Oak');
        if AntiBan then
        begin
          MyAntiBan;
          RandomButton;
        end;
        begin
          FindRandoms;
          Grats;
          if Chopped = 5 then
          begin
            Writeln('Cant find any Oaks - checking every angle!');
            RandomButton;
          end;
        end;
        if not FindSymbol(x, y, 'fish') then
        begin
        end;
      until (Invfull);
    end;

    procedure RegularTreeBan;
    var
      NoBan: Integer;
    begin
      FindRandoms;
      Grats;
      Noban := Random(18);
      case Move of
        0: MMouse(x, y, (10 + random(350)), (10 + random(200)));
        1: MMouse(x, y, (10 + random(400)), (10 + random(600)));
        2: MMouse(x, y, (10 + random(550)), (10 + random(400)));
        3: MMouse(x, y, (10 + random(500)), (10 + random(400)));
        4: MMouse(Random(MSX2), Random(MSY2), 0, 0);
        5: RandomRclick;
        10: setangle(1)
      end;
    end;

    function FindTrees: Boolean;
    var
      TreeColors: array [0..3] of integer;
      TreeTPA: TPointArray;
      Chill, a, I: Integer;
    begin
      if (not (loggedin)) then
        Exit;
      Setangle(2);
      repeat
        if FindObj(x, y, 'Tree', 3359565, 1) or FindObj(x, y, 'Tree', 3359565, 1) or FindObj(x, y, 'Tree', RegTreeColor, 1) then
          Report;
        FindRandoms;
        MMouse(x, y, 0, 0);
        if WaitupText('Chop down', 545) then
          Mouse(x, y, 0, 0, true);
        Chopped := Chopped + 1;
        wait(1500 + random(1001)) Fflag(0);
        writeln('Success Finding Regular Tree');
        report;
        if AntiBan then
        begin
          RegularTreeBan;
          RandomButton;
        end;
        begin
          FindRandoms;
          Grats;
          if Chopped = 5 then
          begin
            Writeln('Cant find any Regular Trees - checking every angle!');
            RandomButton;
          end;
        end;
        if not FindSymbol(x, y, 'fish') then
        begin
        end;
      until (Invfull);
    end;

    procedure PinkyBAN;
    var
      DBanMe: Integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      DBanMe := Random(12);
      case DBanMe of
        0: PickUpMouse;
        1: GameTab(1 + Random(33));
        2: DoEmote(1 + Random(75));
        3: RandomRclick;
        5: RandomButton;
        7: ChooseOption('cancel');
        8: MMouse(Random(MSX2), Random(MSY2), 0, 0);
        9:
          begin
            HoverSkill('woodcutting', false);
            sleepandmovemouse(200 + Random(100));
            gametab(4);
            ChooseOption('Cancel');
            RandomButton;
            MMouse(Random(MSY1), Random(MSX1), 0, 0);
          end;
        10:
          begin
            GameTab(1 + Random(13));
            wait(1000 + Random(600));
            gametab(4);
            RandomButton;
            ChooseOption('Cancel');
            setangle(2);
          end;
        11:
          begin
            HoverSkill('random', false);
            sleepandmovemouse(200 + Random(100));
            gametab(4);
            RandomButton;
            ChooseOption('Cancel');
            setangle(2);
          end;
      end;
    end;

    procedure SmartDrop;
    var
      logdtm: integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Writeln('using Dtm (smart way) slower though but more accurate');
      logdtm := DTMFromString('78DA63CC63626078C880029A536D18FE03694' + '620FE0F048C054035EF18D000231209A463816A9E135093015473' + '87809A3222D45413B60B0046720E26');
      gametab(4);
      repeat
        if finddtm(logdtm, x, y, 550, 203, 731, 464) then
        begin
          Mouse(x, y, 3, 3, false);
          begin
            wait(random(400) + 100);
            chooseoption('Drop');
            wait(1200 + random(1000));
           { case LowerCase(Players[CurrentPlayer].Strings[1]) of
              'tree': ReportVars[4] := ReportVars[4] + 28;
              'oak': ReportVars[5] := ReportVars[5] + 28;
              'willow': ReportVars[6] := ReportVars[6] + 28;
              'all': ReportVars[7] := ReportVars[7] + 28;  }

            //end;
          end;
        end;
      until (not (finddtm(logdtm, x, y, 550, 203, 731, 464)));
      freedtm(logdtm);
      begin
        Dropper := Dropper + 1;
        TreesChopped := TreesChopped + 27;
        report;
        FindRandoms;
        Report;
      end;
    end;

    procedure FIREFIREFIRE;
    begin
    end;

    function SetDDTM: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..4] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 688;
      dtmMainPoint.y := 195;
      dtmMainPoint.AreaSize := 2;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 3757408;
      dtmMainPoint.Tolerance := 10;
      dtmSubPoints[0].x := 688;
      dtmSubPoints[0].y := 195;
      dtmSubPoints[0].AreaSize := 2;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 3757408;
      dtmSubPoints[0].Tolerance := 10;
      dtmSubPoints[1].x := 691;
      dtmSubPoints[1].y := 182;
      dtmSubPoints[1].AreaSize := 2;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 8751242;
      dtmSubPoints[1].Tolerance := 10;
      dtmSubPoints[2].x := 697;
      dtmSubPoints[2].y := 193;
      dtmSubPoints[2].AreaSize := 2;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 2308154;
      dtmSubPoints[2].Tolerance := 10;
      dtmSubPoints[3].x := 678;
      dtmSubPoints[3].y := 187;
      dtmSubPoints[3].AreaSize := 2;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 9014414;
      dtmSubPoints[3].Tolerance := 10;
      dtmSubPoints[4].x := 685;
      dtmSubPoints[4].y := 185;
      dtmSubPoints[4].AreaSize := 2;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 9014414;
      dtmSubPoints[4].Tolerance := 10;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    function SETDTMOAK: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..5] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 919;
      dtmMainPoint.y := 182;
      dtmMainPoint.AreaSize := 3;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 732210;
      dtmMainPoint.Tolerance := 10;
      dtmSubPoints[0].x := 919;
      dtmSubPoints[0].y := 182;
      dtmSubPoints[0].AreaSize := 3;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 732210;
      dtmSubPoints[0].Tolerance := 10;
      dtmSubPoints[1].x := 919;
      dtmSubPoints[1].y := 187;
      dtmSubPoints[1].AreaSize := 3;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 2177591;
      dtmSubPoints[1].Tolerance := 10;
      dtmSubPoints[2].x := 921;
      dtmSubPoints[2].y := 180;
      dtmSubPoints[2].AreaSize := 3;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 1860415;
      dtmSubPoints[2].Tolerance := 10;
      dtmSubPoints[3].x := 922;
      dtmSubPoints[3].y := 177;
      dtmSubPoints[3].AreaSize := 3;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 1467183;
      dtmSubPoints[3].Tolerance := 10;
      dtmSubPoints[4].x := 915;
      dtmSubPoints[4].y := 181;
      dtmSubPoints[4].AreaSize := 3;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 934168;
      dtmSubPoints[4].Tolerance := 10;
      dtmSubPoints[5].x := 916;
      dtmSubPoints[5].y := 179;
      dtmSubPoints[5].AreaSize := 3;
      dtmSubPoints[5].AreaShape := 0;
      dtmSubPoints[5].Color := 1202463;
      dtmSubPoints[5].Tolerance := 10;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    function SpotC: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..4] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 690;
      dtmMainPoint.y := 197;
      dtmMainPoint.AreaSize := 0;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 8752521;
      dtmMainPoint.Tolerance := 0;
      dtmSubPoints[0].x := 690;
      dtmSubPoints[0].y := 197;
      dtmSubPoints[0].AreaSize := 0;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 8752521;
      dtmSubPoints[0].Tolerance := 0;
      dtmSubPoints[1].x := 689;
      dtmSubPoints[1].y := 190;
      dtmSubPoints[1].AreaSize := 0;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 2570808;
      dtmSubPoints[1].Tolerance := 0;
      dtmSubPoints[2].x := 690;
      dtmSubPoints[2].y := 202;
      dtmSubPoints[2].AreaSize := 0;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 8028798;
      dtmSubPoints[2].Tolerance := 0;
      dtmSubPoints[3].x := 684;
      dtmSubPoints[3].y := 197;
      dtmSubPoints[3].AreaSize := 0;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 8752521;
      dtmSubPoints[3].Tolerance := 0;
      dtmSubPoints[4].x := 697;
      dtmSubPoints[4].y := 197;
      dtmSubPoints[4].AreaSize := 0;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 8752521;
      dtmSubPoints[4].Tolerance := 0;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    function SPOTD: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..4] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 595;
      dtmMainPoint.y := 208;
      dtmMainPoint.AreaSize := - 1;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 8753038;
      dtmMainPoint.Tolerance := 15;
      dtmSubPoints[0].x := 595;
      dtmSubPoints[0].y := 208;
      dtmSubPoints[0].AreaSize := - 1;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 8753038;
      dtmSubPoints[0].Tolerance := 15;
      dtmSubPoints[1].x := 595;
      dtmSubPoints[1].y := 199;
      dtmSubPoints[1].AreaSize := - 1;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 2571581;
      dtmSubPoints[1].Tolerance := 15;
      dtmSubPoints[2].x := 595;
      dtmSubPoints[2].y := 220;
      dtmSubPoints[2].AreaSize := - 1;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 3100246;
      dtmSubPoints[2].Tolerance := 15;
      dtmSubPoints[3].x := 582;
      dtmSubPoints[3].y := 203;
      dtmSubPoints[3].AreaSize := - 1;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 8753038;
      dtmSubPoints[3].Tolerance := 15;
      dtmSubPoints[4].x := 605;
      dtmSubPoints[4].y := 208;
      dtmSubPoints[4].AreaSize := - 1;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 8753038;
      dtmSubPoints[4].Tolerance := 15;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    function SPOTDD: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..4] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 655;
      dtmMainPoint.y := 219;
      dtmMainPoint.AreaSize := 2;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 8948109;
      dtmMainPoint.Tolerance := 18;
      dtmSubPoints[0].x := 655;
      dtmSubPoints[0].y := 219;
      dtmSubPoints[0].AreaSize := 2;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 8948109;
      dtmSubPoints[0].Tolerance := 18;
      dtmSubPoints[1].x := 657;
      dtmSubPoints[1].y := 226;
      dtmSubPoints[1].AreaSize := 2;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 15920881;
      dtmSubPoints[1].Tolerance := 18;
      dtmSubPoints[2].x := 655;
      dtmSubPoints[2].y := 211;
      dtmSubPoints[2].AreaSize := 2;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 2766396;
      dtmSubPoints[2].Tolerance := 18;
      dtmSubPoints[3].x := 644;
      dtmSubPoints[3].y := 216;
      dtmSubPoints[3].AreaSize := 2;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 8948109;
      dtmSubPoints[3].Tolerance := 18;
      dtmSubPoints[4].x := 663;
      dtmSubPoints[4].y := 212;
      dtmSubPoints[4].AreaSize := 2;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 15724793;
      dtmSubPoints[4].Tolerance := 18;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    procedure LightTime;
    var
      l, s, Time: integer;
    begin
      l := RandomRange(1, 2);
      s := l;
      Status('Fire Should Be Extinguised');
      MarkTime(Time);
      repeat
        Wait(1000 * 60 * 1);
        l := l - 1;
      until (TimeFromMark(Time) > 1000 * 60 * s);
      if not (LoggedIn) then
        NextPlayer(true);
      LoginPlayer;
    end;

    procedure WalkOut;
    begin
      Writeln('.');
      Status('Going below Oak');
      MakeCompass('N');
      SetAngle(0);
      DTM1 := SetDDTM;
      if DTMRotated(DTM1, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, True);
      wait(3000);
      FLAG;
      if FindSymbol(x, y, 'water') or FindSymbol(x, y, 'quest') or FindSymbol(x, y, 'staff shop') then
        wait(3464);
      if RadialRoadWalk(8686993, 87, 86, 68, 1, 1) then
        flag;
      exit;
    end;

    procedure LeftOverLogs;
    begin
      if FindObj(x, y, 'Oak', 3564412, 1) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, False);
      ChooseOption('ake Oak');
    end;

    procedure Fail;
    begin
      if FindSymbol(x, y, 'quest') then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, true);
      if FindSymbol(x, y, 'water') then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, true);
      WALKOUT;
    end;

    procedure FireProblem;
    begin
      if IsChatBoxTextBetween('light a fire', clBlack, 8, 8) then
        FAIL;
      exit;
    end;

    procedure WalkIn;
    begin
      MakeCompass('N');
      Writeln('Finding Route to Oak');
      Status('Going to Oak');
      DTM2 := SETDTMOAK;
      if DTMRotated(DTM2, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, True);
      wait(500);
      FLAG;
      MakeCompass('N');
      SetAngle(2);
    end;

    function VarrokOaks: Boolean;
    var
      TreeColors: array [0..3] of integer;
      TreeTPA: TPointArray;
      Chill, a, I: Integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
          begin
          Status('Chopping Oaks');
          Makecompass('S');
          KeyDown(VK_up);
          wait(Random(123) + 170);
          KeyUp(VK_up);
        end;
      repeat
        if not FindObj(x, y, 'Oak', 1384994, 1) or FindObj(x, y, 'Oak', OakColor, 1) then
        begin
          FailFind := FailFind + 1;
          result := false;
        end
        else
          result := true;
        FireReport;
        FindRandoms;
        MMouse(x, y, 0, 0);
        if WaitupText('Chop down', 545) then
          Mouse(x, y, 0, 0, true);
        Chopped := Chopped + 1;
        wait(3477 + random(1001)) Fflag(0);
        writeln('Success Finding Oak');
        if AntiBan then
        begin
          MyAntiBan;
        end;
        begin
          FindRandoms;
          Grats;
          if FailFind = 2 then
          begin
            Walkin;
          end;
          if Chopped = 5 then
          begin
            Writeln('Cant find any Oaks - checking every angle!');
            RandomCompass;
          end;
        end;
      until (InvFull);
    end;






    procedure Arsonist;
    var
      l, s, Time, I, K: integer;
    begin
      SetAngle(0);
      l := RandomRange(2, 3);
      s := l;
      MarkTime(Time);
      K := 0;
      FindRandoms for I := 1 to 25 do
      begin
        if ExistsItem(I) then
        begin
          invmouse(I, 0);
          wait(RandomRange(700, 100));
         WaitOptionMulti(['ight', 'ght', 'Light'], 1500);
         // ChooseOption('Ligh');
          Wait(RandomRange(1000, 1000));
          Status('Fire Should Be Extinguised');
          l := l - 1;
          FireReport;
        end;
      end;
    end;


    procedure WalkFar;
    begin
      Writeln('...');
      Status('Going to Far End');
      MakeCompass('N');
      SetAngle(0);
      DTM3 := SPOTD;
      if DTMRotated(DTM3, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, True);
      FLAG;
    end;

    procedure WalkTowardsFar;
    begin
      Writeln('...........');
      Status('Going to Far End');
      MakeCompass('N');
      SetAngle(0);
      Writeln('Going Toward Far');
      DTM4 := SPOTDD;
      if DTMRotated(DTM4, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, True);
      FLAG;
      wait(5000);
    end;

    procedure SpotClight;
    begin
      Writeln('..');
      MakeCompass('N');
      Status('Going Near Arrow Shop');
      SPOTCDTM := SpotC;
      if DTMRotated(SPOTCDTM, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, True);
      Flag;
    end;

    function SpotB: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..4] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 728;
      dtmMainPoint.y := 186;
      dtmMainPoint.AreaSize := 0;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 8618626;
      dtmMainPoint.Tolerance := 5;
      dtmSubPoints[0].x := 728;
      dtmSubPoints[0].y := 186;
      dtmSubPoints[0].AreaSize := 0;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 8618626;
      dtmSubPoints[0].Tolerance := 5;
      dtmSubPoints[1].x := 734;
      dtmSubPoints[1].y := 192;
      dtmSubPoints[1].AreaSize := 0;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 2438453;
      dtmSubPoints[1].Tolerance := 5;
      dtmSubPoints[2].x := 728;
      dtmSubPoints[2].y := 192;
      dtmSubPoints[2].AreaSize := 0;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 2438453;
      dtmSubPoints[2].Tolerance := 5;
      dtmSubPoints[3].x := 722;
      dtmSubPoints[3].y := 187;
      dtmSubPoints[3].AreaSize := 0;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 9079177;
      dtmSubPoints[3].Tolerance := 5;
      dtmSubPoints[4].x := 723;
      dtmSubPoints[4].y := 180;
      dtmSubPoints[4].AreaSize := 0;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 9079177;
      dtmSubPoints[4].Tolerance := 5;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    {procedure WalkToSpotA;
    var
      Spot1: TPointArray;
    begin
      SPS_Setup(RUNESCAPE_SURFACE, ['11_7']);
      Writeln('Walking to Spot 1');
      Spot1 := [Point(10, 135), Point(20, 134)];
      Flag;
      MakeCompass('S');
      Setangle(True);
    end;

    procedure WalkToSpotB;
    var
      Spot2: TPointArray;
    begin
      MakeCompass('N');
      begin
        if RadialRoadWalk(8949387, 87, 86, 68, 1, 1) then
          flag;
        exit;
      end;
      SPS_Setup(RUNESCAPE_SURFACE, ['1_0']);
      Spot2 := [Point(434, 238), Point(423, 239)] if (SPS_WalkPath(Spot2)) then
        Flag;
      MakeCompass('S');
      Setangle(True);
    end;}


    procedure SPOT;
    begin
      MakeCompass('N');
      DTMSPOT := SpotB;
      if DTMRotated(DTMSPOT, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, True);
    end;

    procedure FastDrop;
    var
      i: Integer;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      Writeln('Using Fast Dropping');
      if not (LoggedIn) then
        Exit;
      GameTab(4);
      for i := 2 to 28 do
      begin
        if ExistsItem(i) then
          DropItem(i);
      end;
      begin
        Dropper := Dropper + 1;
        Loads1 := Loads1 + 1;
        TreesChopped := TreesChopped + 27;
        report;
        FindRandoms;
        Report;
        if TakeBreaks then
          if Loads1 > Loads then
          begin
            writeln('Going to Sleep');
            Logout;
            GoodNight;
            Loads1 := 0;
          end;
      end;
    end;

    function PlanB: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..4] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 664;
      dtmMainPoint.y := 202;
      dtmMainPoint.AreaSize := 0;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 8752521;
      dtmMainPoint.Tolerance := 0;
      dtmSubPoints[0].x := 664;
      dtmSubPoints[0].y := 202;
      dtmSubPoints[0].AreaSize := 0;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 15201007;
      dtmSubPoints[0].Tolerance := 0;
      dtmSubPoints[1].x := 667;
      dtmSubPoints[1].y := 199;
      dtmSubPoints[1].AreaSize := 0;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 15201007;
      dtmSubPoints[1].Tolerance := 0;
      dtmSubPoints[2].x := 665;
      dtmSubPoints[2].y := 207;
      dtmSubPoints[2].AreaSize := 0;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 8752521;
      dtmSubPoints[2].Tolerance := 0;
      dtmSubPoints[3].x := 667;
      dtmSubPoints[3].y := 202;
      dtmSubPoints[3].AreaSize := 0;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 8752521;
      dtmSubPoints[3].Tolerance := 0;
      dtmSubPoints[4].x := 660;
      dtmSubPoints[4].y := 203;
      dtmSubPoints[4].AreaSize := 0;
      dtmSubPoints[4].AreaShape := 0;
      dtmSubPoints[4].Color := 8752521;
      dtmSubPoints[4].Tolerance := 0;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    procedure SECOND;
    begin
      MakeCompass('N');
      PLANBB := PlanB;
      if DTMRotated(PLANBB, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(1500);
      Mouse(x, y, 0, 0, True);
      Flag;
      exit;
    end;

    procedure SymbolWalk;
    begin
      if findsymbol(x, y, 'water') or findsymbol(x, y, 'fur trader') then
        mmOuse(x, y, 0, 0);
      wait(500);
      Mouse(x, y, 0, 0, true);
      wait(3430);
      FFlag(0);
    end;

    function SPOTe: Integer;
    var
      dtmMainPoint: TDTMPointDef;
      dtmSubPoints: array [0..3] of TDTMPointDef;
      TempTDTM: TDTM;
    begin
      dtmMainPoint.x := 730;
      dtmMainPoint.y := 218;
      dtmMainPoint.AreaSize := 0;
      dtmMainPoint.AreaShape := 0;
      dtmMainPoint.Color := 1261931;
      dtmMainPoint.Tolerance := 15;
      dtmSubPoints[0].x := 730;
      dtmSubPoints[0].y := 218;
      dtmSubPoints[0].AreaSize := 0;
      dtmSubPoints[0].AreaShape := 0;
      dtmSubPoints[0].Color := 1261931;
      dtmSubPoints[0].Tolerance := 15;
      dtmSubPoints[1].x := 723;
      dtmSubPoints[1].y := 217;
      dtmSubPoints[1].AreaSize := 0;
      dtmSubPoints[1].AreaShape := 0;
      dtmSubPoints[1].Color := 2833725;
      dtmSubPoints[1].Tolerance := 15;
      dtmSubPoints[2].x := 724;
      dtmSubPoints[2].y := 213;
      dtmSubPoints[2].AreaSize := 0;
      dtmSubPoints[2].AreaShape := 0;
      dtmSubPoints[2].Color := 2833725;
      dtmSubPoints[2].Tolerance := 15;
      dtmSubPoints[3].x := 728;
      dtmSubPoints[3].y := 213;
      dtmSubPoints[3].AreaSize := 0;
      dtmSubPoints[3].AreaShape := 0;
      dtmSubPoints[3].Color := 3764813;
      dtmSubPoints[3].Tolerance := 15;
      TempTDTM.MainPoint := dtmMainPoint;
      TempTDTM.SubPoints := dtmSubPoints;
      Result := AddDTM(TempTDTM);
    end;

    procedure THIRD;
    begin
      MakeCompass('N');
      E := SPOTe;
      if DTMRotated(E, X, Y, MMX1, MMY1, MMX2, MMY2) then
        MMouse(x, y, 0, 0);
      wait(1500);
      Mouse(x, y, 0, 0, True);
      Flag;
      exit;
    end;

    procedure FreeDTMS;
    begin
      FreeDTM(SPOTe);
      FreeDTM(PlanB);
      FreeDTM(SpotB);
      FreeDTM(SetDTMOak);
      FreeDTM(SpotD);
      FreeDTM(SpotC);
      FreeDTM(SetDDTM);
    end;




    procedure Test;
    begin
      repeat
      Status('Testing');
    WalkOut;
    WalkTowardsFar;
      until (false);
    end;

    procedure PinkyFireMaking;
    begin
      repeat
        FreeDTMS;
        SetRun(true);
        begin
          FindRandoms;
          WalkIn;
          VarrokOaks;
          begin
            WalkOut;
            begin
              WalkTowardsFar;
            end;
            begin
              FindRandoms;
              Arsonist;
              TreesChopped := TreesChopped + 25;
              stats_IncVariable('Oak Logs Chopped',TreesChopped);
              Burned := Burned + 25;
              stats_IncVariable('Oak Logs Burned',Burned);
              SymbolWalk;
              wait(3500);
              WalkIn;
              wait(3500);
            end;
          end;
        end;
      until (false);
    end;

    procedure PinkyPowerChopper;
    begin
      if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
        NextPlayer(false);
      if (invfull) then
      begin
        case (DropType) of
          'Smart': SmartDrop;
          'Fast': FastDrop;
        end;
        TreesChopped := TreesChopped + 27;
        report;
      end;
    end;

    begin
      if not DoYouLoveSRL then
      begin
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        wait(500);
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        wait(500);
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        wait(500);
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        wait(500);
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        wait(500);
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        wait(500);
        writeln('Sorry. Terminating Script. Love SRL or GTFO.');
        TerminateScript;
      end;
      begin
        Disguise('P1nky PowerChopper & Burner - Since 2007 - Version C');
        ClearDebug;
        ClearReport;
        Smart_Server := 17;
        Smart_Members := false;
        Smart_Signed := true;
        Smart_SuperDetail := false;
        case DoWhatToLogs Of
       'Burn' , 'burn' , 'fire':
         if (SRLStats_Username = '') then
        SetupSRLStats(486, 'Anonymous', 'anon1337')
      else
       SetupSRLStats(486, SRLStats_Username, SRLStats_Password);
       'drop' , 'Drop' :
            if (SRLStats_Username = '') then
        SetupSRLStats(485, 'Anonymous', 'anon1337')
      else
       SetupSRLStats(485, SRLStats_Username, SRLStats_Password);
     end;
        SetupSRL;
        declareplayerz;
        LoginPlayer;
        Dropper := 0;
        TreesChopped := 0;
        Burned := 0;
        WCLVL := GetSkillInfo('Woodcutting', true);
        repeat
          case DoWhatToLogs of
            'Burn', 'burn', 'fire': PinkyFireMaking;
            'drop', 'Drop': PinkyPowerChopper;
            'test', 'Test': Test;
          end;
          case LowerCase(Players[CurrentPlayer].Strings[0]) of
            'Oaks', 'oaks', 'Oak', 'oak': FindOaks;
            'Willows', 'Willow', 'willows', 'willows': FindWillows;
            'Tree', 'tree', 'Trees', 'trees': FindTrees;
          end;
          if (InvFull) then
          begin
            FastDrop;
          end;
        until (false);
      end;
    end.

  4. #54
    Join Date
    Dec 2007
    Posts
    133
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  5. #55
    Join Date
    Dec 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Not bad. Good work P1nky. It's a decent script, it works, lol.

    Good to see your standards sorted out. Remember, you need to get into a good habit now so that you won't end up in trouble later on.

    Anyway, here's my proggy:
    ||===========================||
    ||P1nkys POWERCHOPPER||
    ||===========================||
    ||Post this on the thread plz||
    ||===========================||
    Worked For 19 Minutes and 30 Seconds
    Chopped 113
    Dropped(by loads) 4
    ||===========================||
    ||====P1nkys FIRST SCRIPT====||
    ||===========================||
    ||===========================||
    ||=====DESTROY THE TREES=====||
    ||===========================||

    Hope I could be of help!

  6. #56
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    why thank you =D
    yeah im not too good with standards but ill try to learn (lazy) im making a willow/banker/powerchopper and a huge ass anti-ban =D/random chat

  7. #57
    Join Date
    Dec 2007
    Posts
    44
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Nice, but it does not run away from randoms for me :S

  8. #58
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    yeah i noticed that too ima have to make a update for that soon =D

    thanks dude just post proggies please

  9. #59
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    alritey redownload v.1 i just added more finding randoms..

    but , i wont release my other script its not ready to be released its really nice though =D

  10. #60
    Join Date
    Apr 2007
    Posts
    994
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Only two proggies? O.o

    I will use this on my VM for 1 hour, see how it goes

    Be Back in a hour

    *Goal in life is to get the best proggie of a script. I tried it with forefeathers o.O *

    Okay, wait a bit

    EDIT:

    for i := 2 to 28 do
    begin
    if ExistsItem(i) then
    DropItem(i);
    end;
    Im not a really good scripter, but cant you put

    for i :=2 to 28 do
    begin
    if existsItem(i) and {shrugs, dont really know how to code} if (IsUpText('og'))
    then dropitem(i);
    end

    EDIT number 2!!!

    When do they switch players?
    [QUOTE]<GoF`> oh no its Raymooond
    <Raymooond> Heya
    <GoF`> is it ray or some other ray?
    <LeeLokHin> No idea
    <LeeLokHin> Raymond, what's the game you like the most?
    <Raymooond> Runescape
    <-- LeeLokHin has kicked Raymooond from #srl (Faker.)[/QUOTE]

  11. #61
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    why thank you -=D

  12. #62
    Join Date
    Apr 2007
    Posts
    994
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    ||===========================||
    ||P1nkys POWERCHOPPER||
    ||===========================||
    ||Post this on the thread plz||
    ||===========================||
    Worked For 26 Minutes and 40 Seconds
    Chopped 108
    Dropped(by loads) 4
    ||===========================||
    ||====P1nkys FIRST SCRIPT====||
    ||===========================||
    ||===========================||
    ||=====DESTROY THE TREES=====||
    ||===========================||

    Repeat: When does it change players

    and at 26 minutes, it lagged like hell, so i stopped the script, and it stopped lagging

    strange...

    ill try again

    When does it switch players? XD
    [QUOTE]<GoF`> oh no its Raymooond
    <Raymooond> Heya
    <GoF`> is it ray or some other ray?
    <LeeLokHin> No idea
    <LeeLokHin> Raymond, what's the game you like the most?
    <Raymooond> Runescape
    <-- LeeLokHin has kicked Raymooond from #srl (Faker.)[/QUOTE]

  13. #63
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    goes to a next player when one is forced out, by lagging or sumthing..

    and p1nky, u still didn't gime creadits on main post for doing srl stats for uuuuuu lol

  14. #64
    Join Date
    Apr 2007
    Posts
    994
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Okay

    Somehow, everytime it cant find a tree, it starts lagging. And i mean lagging

    Runescape basically froze

    hmm?

    i got niles, got teled to wizzys tower, it didnt spot that random

    couldnt find a tree, and started lagging like mad again
    [QUOTE]<GoF`> oh no its Raymooond
    <Raymooond> Heya
    <GoF`> is it ray or some other ray?
    <LeeLokHin> No idea
    <LeeLokHin> Raymond, what's the game you like the most?
    <Raymooond> Runescape
    <-- LeeLokHin has kicked Raymooond from #srl (Faker.)[/QUOTE]

  15. #65
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    use High Details if not that than use LOW!

    and timer sorry i will asap i update my script big

  16. #66
    Join Date
    Dec 2007
    Location
    Narnia
    Posts
    44
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    It works fine. I ran it for about an hour.
    Who lives in a pineapple under the sea?

  17. #67
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    ok thanks ill appreciate if you just post proggies

    im stalling my new update =)

  18. #68
    Join Date
    Aug 2007
    Posts
    39
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I've fallen in love with this, great job

  19. #69
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    Lol well yeah i would appreciate if YOU POST PROGGIES

  20. #70
    Join Date
    Dec 2007
    Location
    Malaysia
    Posts
    430
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    good work but after my guy drops the willows it jsut stops and does nothing and also after my guy has cut like 2 trees it just stays there and do nothing help please! really good script though

  21. #71
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    wow really... um im going to have to test this than... i havent used my script for a 1 month so yeah lol.. ill try to fix it and see if this happening to me if not idk

  22. #72
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Dont wrry P1nkster ill update it fo ya!!!

  23. #73
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    nty you can help though =D

  24. #74
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Quote Originally Posted by Sfts3 View Post
    it has a loop?
    z0mg D0es it????

    Well duh genious.

  25. #75
    Join Date
    Dec 2006
    Location
    Program TEXAS home of AUTOERS
    Posts
    7,934
    Mentioned
    26 Post(s)
    Quoted
    237 Post(s)

    Default

    lol yes it does... every script needs one ( its ok i know you are starting scripting)

Page 3 of 45 FirstFirst 1234513 ... LastLast

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. My first powerchopper
    By Malformed in forum First Scripts
    Replies: 6
    Last Post: 12-27-2009, 05:22 PM
  2. P1nky's Teleporter!
    By P1nky in forum RS3 Outdated / Broken Scripts
    Replies: 111
    Last Post: 06-12-2009, 05:02 PM
  3. Need help with powerchopper
    By pallooo in forum OSR Help
    Replies: 13
    Last Post: 10-29-2007, 10:48 PM
  4. Need help with my powerchopper
    By pallooo in forum OSR Help
    Replies: 26
    Last Post: 10-13-2007, 12:57 AM
  5. My First PowerChopper
    By i like mauls in forum First Scripts
    Replies: 2
    Last Post: 06-19-2007, 04:35 PM

Posting Permissions

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