Results 1 to 11 of 11

Thread: can not get this working..07

  1. #1
    Join Date
    Nov 2008
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default can not get this working..07

    i have tried like 30 times....can someone tell me what is wrong...i have followed the instructions to a tee
    can someone help through like teamviewer or something?

  2. #2
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    Not if you don't give us more information.
    Post the exact script you are trying to run and put it in simba tags like this:
    [simba]code here[/simba]
    and also the exact error you are getting.

    Then we can try and help.

  3. #3
    Join Date
    Nov 2008
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    [Error] C:\Simba\Includes\SRL/SRL/misc/SmartParams.Simba(282:145): Invalid number of parameters at line 281
    Compiling failed.

  4. #4
    Join Date
    Feb 2013
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Again please put the code down. We can solve much from just an error message.

  5. #5
    Join Date
    Nov 2008
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    wait forgot to add the new param thing but after i did i get this


    [Error] C:\Simba\Includes\SRL/SRL/misc/SmartParams.Simba(295:135): Invalid number of parameters at line 294
    Compiling failed.

  6. #6
    Join Date
    Nov 2008
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Simba Code:
    program WillowTreeBanker;
    {$DEFINE SMART}
    {$I SRL/SRL.Simba}
    {$I P07Include.Simba}

    var
      DsgnForm:TForm;
      TLabel12,TLabel13,TLabel14,TLabel15: TLabel;
      TEdit7,TEdit8,TEdit9,TEdit10,TEdit11: TEdit;
      TImage0,TImage1,TImage2: TImage;
      TButton3: TButton;
      TCheckBox5,TCheckBox6: TCheckBox;
      TComboBox4: TComboBox;
      bmps0,bmps1,bmps2: TMufasaBitmap;
      bmp0,bmp1,bmp2: TBitmap;
      CurTime, ProgTime, ProgBank, InitWait, InitChopWait, AxeFailSafe1, AxeFailSafe2, AxeFailSafeToggle, AxeFailSafeTime, LocFailSafe, AxeFailSafe, AnimationCheck, Skiller, RunFromCombat, Lagg, ChopWaitTime, TreeColor, BankDTM, BankColor1: integer;
      Location: string;

      const
      default = 'Comic Sans MS';

    procedure DTM;
    begin
    //make sure axe is in first slot first row or weilded
      if(TCheckBox6.CHECKED) then
      begin
        skiller := 0;
      end
      else
      begin
        skiller := 1;
      end;

      if(TCheckBox5.CHECKED) then
      begin
        RunFromCombat := 1;
      end
      else
      begin
        RunFromCombat := 0;
      end;

    Lagg := strtoint(TEdit9.TEXT) ; //lag time in ms
    ChopWaitTime := strtoint(TEdit10.TEXT) ;  //time in seconds to check if chopping
    AnimationCheck := strtoint(TEdit11.TEXT) ; //for pixelshift, chopping

      case TComboBox4.ITEMINDEX of
        0: Location := 'Willow';
        1: Location := 'Maple';
      end;

    if(Location = 'Maple') then //over at seers
    begin
    TreeColor := 12892;
    BankColor1 := 8229016;
    BankDTM := DTMFromString('mQwAAAHicY2ZgYOBnYWAQBmJpIH7IgMB//jDBMSuQD8OMSBgIAFujCPA=');
    end;
    if(Location = 'Willow') then //over at draynor
    begin
    BankDTM:= DTMFromString('mQwAAAHicY2ZgYGhmYmDohmIZBgiWAOK3bxGYiwGBGZEwEAAAMdAHog==');
    BankColor1 := 2578800;
    TreeColor := 2524788;
    end;

    end;

    Procedure P07_DeclarePlayer;
    Begin
      P07_PlayerName:=TEdit7.TEXT ;
      P07_PlayerPass:=TEdit8.TEXT ;
    end;

    //DONT EDIT BELOW

    procedure WaitHumanClick;
    begin
      case random(600) of
        1..450: Wait(RandomRange(0, 100));
        451..570: Wait(RandomRange(0, 200));
        571..590: Wait(RandomRange(0, 600));
        591..600: Wait(RandomRange(400, 1100));
      end;
    end;

    procedure FreeDTMss;
    begin
      FreeDTM(BankDTM);
      MarkTime(CurTime);
      writeln('Banked ' + inttostr(ProgBank) + ' invs in ' + inttostr(((TimeFromMark(ProgTime) / 1000) / 60)) + ' mins.');
    end;

    procedure GoToBank;
    var x, y: integer;
    begin
      P07_MakeCompassNorth;
      if(not(P07_BankScreen)) then
      begin
        WaitHumanClick;
      if(findDTM(BankDTM, x, y, 565, 7, 717, 157)) then
      begin
        case Location of
        'Willow': Mouse(RandomRange(X + 15, x + 20), RandomRange(Y - 8, Y - 13), random(3), random(3), true);
        'Maple': Mouse(RandomRange(X - 5, x + 5), RandomRange(Y + 10, Y + 15), random(3), random(3), true);
        end;
      end;
      P07_FFlag;
      wait (lagg);
      end;
    end;

    procedure BankLogs;
    begin
      wait(lagg);
      if(P07_BankScreen) then
      begin
      if(skiller = 1) then
      begin
      P07_Deposit(2, 28, True);
      wait (lagg);
      end
      else
      begin
        P07_Deposit(1, 28, True);
        wait (lagg);
      end;
      end;
      //if(((P07_InvCount < 2) and (skiller = 1)) or ((P07_InvCount < 1) and (skiller = 0))) then
      //begin
        ProgBank := ProgBank + 1;
      //end;
    end;

    procedure OpenBank1;
    var x, y: integer;
    begin
      Repeat
        If P07_FindObj(x, y, 'ank booth', BankColor1, 10) Then
        begin
          LocFailSafe := 0;
          WaitHumanClick;
          Mouse(RandomRange(X - 5, x + 5), RandomRange(Y - 5, Y + 5), random(3), random(3), false);
          WaitHumanClick;
          P07_ChooseOptionMulti(['se-q']);
        end
        else
        begin
          P07_MakeCameraAngleHigh;
          P07_MakeCompassDegree(randomrange(25, 35));
          LocFailSafe := LocFailSafe + 1;
          GoToBank;
        end;
        P07_FFlag;
        wait (lagg);
      until(P07_BankScreen)
    end;

    procedure GoToTrees;
    var x, y: integer;
    begin
      P07_MakeCompassNorth;
      WaitHumanClick;
      if(findDTM(BankDTM, x, y, 565, 7, 717, 157)) then
      begin
        case Location of
        'Willow': Mouse(RandomRange(X - 5, x - 15), RandomRange(Y + 15, Y + 25), random(3), random(3), true);
        'Maple': Mouse(RandomRange(X, x + 10), RandomRange(Y - 10, Y - 15), random(3), random(3), true);
        end;
      end;
      P07_FFlag;
      wait (lagg);
    end;

    procedure ChopTree;
    var x, y: integer;
    begin
        If P07_FindObj(x, y, Location, TreeColor, 5) Then
        begin
          WaitHumanClick;
          MMouse(x, y, Random(2), Random(2));
          WaitHumanClick;
          if (P07_ContainsText(GetTextAtExWrap(35, 8, 170, 21, 0, 5, 1, 13423640, 65, 'P07UpChars'), [Location])) then
          begin
            GetMousePos(x, y);
            LocFailSafe := 0;
            if(random(2) = 1) then
            begin
              Mouse(RandomRange(X - 5, x + 5), RandomRange(y - 5, y + 5), random(5), random(5), True);
            end
            else
            begin
              Mouse(RandomRange(X - 5, x + 5), RandomRange(y - 5, y + 5), random(5), random(5), false);  //clicks it
              P07_ChooseOptionMulti(['hop']);
            end;
          end
          else
          begin
            GoToTrees;
          end;

           P07_FFlag;
           wait (Lagg * 2 + 250);
           MMouse(x, y, 0, 0);
            if (P07_FindObj(x, y, Location, TreeColor, 5) and P07_ContainsText(GetTextAtExWrap(35, 8, 170, 21, 0, 5, 1, 13423640, 65, 'P07UpChars'), [Location])) then
            begin
              if(AxeFailSafe > ChopWaitTime) then
              begin
                MarkTime(InitChopWait);
                InitWait := 1;
              end;
              //Mouse(RandomRange(X - 5, x + 5), RandomRange(y - 5, y + 5), random(5), random(5), True);
            end
            else
            begin
              Mouse(242, 195, random(3), random(3), true);
            end;
        end
        else
        begin
          wait(2000);    //goes to trees if cant find trees
          if((LocFailSafe = 0) or (LocFailSafe = 5) or (LocFailSafe = 10) or (LocFailSafe = 15) or (LocFailSafe = 20)) then
          begin
            P07_MakeCompassDegree(randomrange(25, 35));
            GoToTrees;
          end;
          LocFailSafe := LocFailSafe + 1;
        end;
    end;

    procedure TurnOnRun;
    var x, y: integer;
    begin
       Mouse(671, 482, random(5), random(5), true);
       WaitHumanClick;
       if(FindColorTolerance(x, y, 4803917, 651, 422, 659, 430, 10)) then
       begin
         Mouse(640, 426, random(5), random(5), true);
       end;
       Mouse(644, 184, random(5), random(5), true);
    end;

    Function isMoving1: Boolean;
      var
        PBox: TBox;
      begin
        PBox := IntToBox(220, 140, 300, 200);
        Result := (AveragePixelShift(PBox, 250, 500) > AnimationCheck);
        //Writeln(IntToStr(AveragePixelShift(PBox, 250, 500)));
      end;

    Function AntiBan: Boolean;
    begin
      case random(400) of
      0: P07_HoverSkill('woodcutting', random(5000));
      1: TurnOnRun;
      2: P07_MakeCameraAngleHigh;
      3: P07_MakeCompassSouth;
      4: P07_MakeCompassEast;
      5: P07_MakeCompassWest;
      6: P07_MakeCompassNorth;
      end;
    end;


    procedure YourClickProcedure(Sender: TObject);
    begin
      if(Sender = TButton3) then
      begin
         DsgnForm.CLOSE;
      end;
    end;


    procedure InitForm;
    begin
    //DsgnForm\\
     DsgnForm:=TForm.Create(nil);
      with DsgnForm do
        begin
          Caption:='Draynor/Seers Willow/Maple Banker';
          Left:=423;
          Top:=294;
          Width:=400;
          Height:=300;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TLabel12\\
     TLabel12:=TLabel.Create(DsgnForm);
      with TLabel12 do
        begin
          Parent:=DsgnForm;
          Caption:='Pixelshift';
          Left:=86;
          Top:=165;
          Width:=48;
          Height:=16;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TLabel13\\
     TLabel13:=TLabel.Create(DsgnForm);
      with TLabel13 do
        begin
          Parent:=DsgnForm;
          Caption:='Chop wait time';
          Left:=84;
          Top:=193;
          Width:=48;
          Height:=16;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TLabel14\\
     TLabel14:=TLabel.Create(DsgnForm);
      with TLabel14 do
        begin
          Parent:=DsgnForm;
          Caption:='Lag in ms';
          Left:=82;
          Top:=221;
          Width:=48;
          Height:=16;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TLabel15\\
     TLabel15:=TLabel.Create(DsgnForm);
      with TLabel15 do
        begin
          Parent:=DsgnForm;
          Caption:='Welcome to ineedbots script!';
          Left:=37;
          Top:=105;
          Width:=48;
          Height:=16;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TEdit7\\
     TEdit7:=TEdit.Create(DsgnForm);
      with TEdit7 do
        begin
          Parent:=DsgnForm;
          Text:='Username or eMail';
          Left:=4;
          Top:=9;
          Width:=197;
          Height:=23;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
    //TEdit7.MaxLength:=x;
    //TEdit7.PasswordChar:=*;
      end;
    //TEdit8\\
     TEdit8:=TEdit.Create(DsgnForm);
      with TEdit8 do
        begin
          Parent:=DsgnForm;
          Text:='Password';
          Left:=6;
          Top:=38;
          Width:=196;
          Height:=23;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
    //TEdit8.MaxLength:=x;
          TEdit8.PasswordChar:= '*';
      end;
    //TEdit9\\
     TEdit9:=TEdit.Create(DsgnForm);
      with TEdit9 do
        begin
          Parent:=DsgnForm;
          Text:='500';
          Left:=3;
          Top:=218;
          Width:=80;
          Height:=23;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
    //TEdit9.MaxLength:=x;
    //TEdit9.PasswordChar:=*;
      end;
    //TEdit10\\
     TEdit10:=TEdit.Create(DsgnForm);
      with TEdit10 do
        begin
          Parent:=DsgnForm;
          Text:='20';
          Left:=2;
          Top:=191;
          Width:=80;
          Height:=23;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
    //TEdit10.MaxLength:=x;
    //TEdit10.PasswordChar:=*;
      end;
    //TEdit11\\
     TEdit11:=TEdit.Create(DsgnForm);
      with TEdit11 do
        begin
          Parent:=DsgnForm;
          Text:='90';
          Left:=3;
          Top:=163;
          Width:=80;
          Height:=23;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
    //TEdit11.MaxLength:=x;
    //TEdit11.PasswordChar:=*;
      end;
    //TImage0\\
     TImage0:=TImage.Create(DsgnForm);
      with TImage0 do
        begin
          Parent:=DsgnForm;
          Left:=176;
          Top:=-9;
          Width:=96;
          Height:=96;
          bmps0:=GetMufasaBitmap(BitmapFromString(96,96,'meJztnEtrE2EUhrfapvYC/hGhSFFRCTbUNtYqkaZegm1gsESqomThoguhC8FFQfBvzk/wJO/kzHeb0LSZzIX34VC6SMI3D+85p9MyjWNCCCGEEEIIIYQQQvKi0Y5WXg5WXn8p+iAlRf3c6Q5X3/1c7Z0XfaJykch58x1+1o5/rfUv1qPfRZ+rFKTh8fysDy43zv5ufP1X9BmLBHJSP73zxM/pH/iZ9QP7R82Ph09RjbtRHmdeJE54fD8/Pu1/i9pSZ/1d1OfjHanTXgsVvX8mJVpQKudD53HV/TSen1jh8fxAjq8FTsyqpx8ZPqaciZ/R8Bn7gRxfi6qQr1PkVN1PZnNN/KgcRwsM1N9PKDzqB+GBHFML6u2rR6rIl1MDP25zTeSoHzM8etWiRepw/4GUfKN+gnIq7Ueaa0p4pFQOLl+1dPa2pOBHI1RDP354DD/mK3HVYgNmDnbuS0ER/DhyauBHNvv08ATfJU5ebG+inAjVzU87umJ4gogfRMj0Y8g5GVeF/YyGT3cYXutX8LPbvOdEyNxrEz+JpQVcznxZbvXM32bMGh7gRCjLT64XkhPW8Jk9PIpOaVVUAzkxhk9GeORn5pk+ShRl+cnp8AvAba5rhUfRCKGqLgfNNZfwKOqn6nJiv7luFh4FiqouJx5v9vmGRxE/czlhgWCzB8Nzcz81IBk+OYSnHiTDh+EJsdw8wvBheIIkw4fhyQD37AxPFmlzQQ79GISb61p/Ia0l2OwMTxbY7AxPkHSzMzwh0uHD8ITQ4WOGh37A0pNOMnwYnhA6fBieIHrPTjlB2FxTsJqLcjx0s9NPkHSzT+TQj2JtdobHwxo+g0v6cUiHD8PjsfTwIB0+DI+HNFc6fPgkhYe12RkeD7O5GB4Ha7MzPB7mZmd4fMzNzvA4OJud4XEwhw+by8caPpTjYQ0f+rFxhk/Rxykdo+EjfrpDbPaij1Mubm/tiR/pr1F+ZDizuWzEz+i2FP3Vvyj6OOXi1ua2DB/4kfks86foE5WLxE+rhwdL6cdBhw/88N+wZIEHb+mHEEIIIYQQQgghpDz8B4g6Z4g='));
          bmp0:=bmps0.ToTBitmap;
          Picture.Bitmap.handle:=bmp0.handle;
      end;
    //TImage1\\
     TImage1:=TImage.Create(DsgnForm);
      with TImage1 do
        begin
          Parent:=DsgnForm;
          Left:=252;
          Top:=0;
          Width:=150;
          Height:=150;
          bmps1:=GetMufasaBitmap(BitmapFromString(150,150,'meJztnd1rZOeV7i8O5yo3hxmID5N2z7Tilmx1W5ZKUqlVknZZW9GWVFKVrF2tklW2yi11Ky2P2+2xjxtsfIaEJieESXJ8SPDgIRCbBId4GDMkJBcOGEIMJgQcCBlyk/9h8PXcZH7PekrbPY6P3d1WW+1qvWyK+thf9T7vsz7etda733vvqB21o3bUPqb9/Ld/yJ954oWXXjrsGzlqN9OAL9lpldqN0c7ayrMXf/Kb3x32HR21G2i/+P0fA75aud0YyrPjs6MDtemrr37/sO+rd9pL//rTW3r++QuPDK2llU7en00O1pK/Kg/2peV7lirVC+1bfek7pL321ttXvvXdW3Fm2IfMBKxSKwO+oUY12Xu4f34CQMdbC4NLUwD62HNXbsWl77SWX75y6f987WDPCXywDLyAD7xAEOE50WmUWrXy9jrwgeNQI2WHieby93725sFe/Q5sQ7XVhXNfxuQ4kLO9/qtfp3vtuytDIFURapmYuD53qpGAIwpRyK7PgWwpF4jHk+GLf/88oB/I1e/MBgvuOj0yXmt8chC//dqP7m/Ooez6ZkfBDqR4RWCObS4kO/nw5gJo9lWGQRMO8g1vDGKpkV59+Z8O5O/cmQ2V9BcDpz4hiN949QeWlv1pGWiEYC6txzZUS+Kb2mAjPT5+ih0AF+UIT8sbS0AM4v3p6MOX9w5KFNxp7Y133h2qN+8aHrtpECHyUCtDwZlW4Mj7uXZz8eImstTaMNltzu21QM0yln14Hak9CAFBk6NAlo9HZurNta++/MqxsUm2qXp+o8d+55//JXuqA0DwDrpV2g1QS9oNOJVe2mSbefxR5CcuIeIUZC1Ly1vL5XYNEM+sLa5eumCq8gZNeiv+4J3QZjc7x6dm+6eqN2RXQBmAABoQAYv0bx+r7DYr7Vr+zBM4FJAu2W11vvYC76d2WlPbq+ajgN7OAR32TbYaAMev1U7r1v27O6G98uYvQRCFiEa7/qOAG9ZcffX7QIZ3gP8OE5Od1spzTwrBczmCFFh5v/T0NmiCtfzBDFexJmM1T4G7tDo/lFVRkTd06aP2gQaCJ6ZmsUuRqDdx+NmvXIGGdtjRaNDNshR/c/7J8/xqSTu5tQzv+pIS6s+UxC7FnkED3jc3CYsP/H/dOc0cRBXiHt7osahC0MmeeARQhmqyMFF/SFc4iIREM+Ik8uv76jKdTjo5hGUf4GYHAK2ur0LDmxs/R+09I3hm5uaMGfwRPMG582dlhWbVpcfPoQ2xSxGtay/8nazNtRTFh1oMLyNjH96Ut/Ls6V0snDLbxhIIDiTlIxredDMHT1Sqf12u3KhBiBECdkhIcJnfWBXvdluAgu5DfvKRHcrb6yAISdF9J7IzQ+u10c5a9fI2e+KJsHO5MQc3v3D6Hhh9i/5jbzcj+MWZOYyZG3LKcAbHNupYL8jJ+QuPrF/c5g3YQUle08sdvkQnypLp5PwEW+Ed5g1kVOCplQ3UpnmPv49J88WJ04/+rydv3d/s4WYET84uYMzcUEidnaGYEeTNxb9/Ptl7GLxKdfmGpXZNKq/dQKKCGqIVqvJr9UIbmwfIbPngYhyfHR3MU5wLZOlrb719IH8KOuOnIMnvhImCQoreNTw2fbZ9/QeiBFF8IAjpUHm4D4hEpKU+5ikI8iu0Qpai+EAQ+xORezwZBrUSEK/Os2kqdX1OYYtcczsHQkPgs7ievNDmQrilvT2Fju67b+khEMSegYZvvPPu9RyFCKW3xbvdFmoOmyTpNHDxkp387PN7EA0DBqRWzm/hISItPWWqkH0giIxlh78qD+JiAJw0aeDInsjeTzI/A+nuWao8sFmfefzRwVpS2lr5fOkk0r63ybiy91RfdR4QUYXP/sM/XM8huHvYkNDwoWd24N3io82ppkAEQXQfpiYAKRgRzBqqiYAyR1tZ//wE8lP+xY4mAZB1p1CFyNVc4QyHhvl4c4FgYOKivgEuDcEtsRkqwAoZe3XuDk+wUIXX6VMAtKepw1zJ0YP45sAkQ6WRooAqMcsNp3DY4RcfPR0KBxFxyNv78yq/Ljz7OBZOfzoKGY0vnj5Q8gY1ekOxJ9SBrSMuxKnurgyVWjVwHMwqGhvrc56k7cn0OSF4ZqZ/bolXaPixghR7Y2ZzTbqmlWGEYMDguYMUnc8bzbrstFBD7EA3Qgo2SCcvHgLmCmTQnxgwfWlZhk0jBUHkMAMAoIGATTGLiCFiCAHNx/4FzdNur3NgjISakwHKW8uIa64iObCmKSAuDTFR0PyFf/v3/zig/juwhr7++g9/fBMHIrLADg4iSD9394mPzaJ55jsv0ucghbmCC5/sNseWRBz6B5gAAloN1B8EPqxN3mPY4D7Im4AjjRn0pmNPMMVB/OPjp8ohS+ln7FX5Go00ooeKGvclpY/OCQE+DYPIzKkoR67muBVX1FxQuDDs4PMPBrjsgBi5DeOSDFfsyRuV9i++/tNjY5MnUYUxxf2xglSIJ8OjzRqMg4D0EiJUkioXjhF9UEAQ7YOohAjA5M50GFHTOApeNGENkg2qgqCmTFtZX0SBUZGcB2QNH9DwOr22/KEuPzYVvDbcAOQ5WK7CmT2oIHuBoDM9JKXxYpJhnJ3b0MJhuEKlG0qyNYI49dDw2PA42vAjxgDjVgZkVkUDSt+1GxrnWJK1ZDCm0UBHfZiWQXBscwE7RyEJmzRrKSjzvUUrkpZ+Bim+sbwFbrpXriKEiv27ZFQgeJRxgvV7rVCl/wfWUnAvxLUMpPU5890TQTaouJCSBHLdQEzS1jQwYoTchhk7s5sd2HT9c8UgiBQFdxDkzUcL0quvfr8vG0fQ4U3gKQzF3ObcuRxYkZzCaF29p/7JxuEjzLpvriznPS1HhCK9b2EGONzbIuxO3lcZBsRwLty9maR0PUHbcloxN5vkcInBWoINjBhHiwHfRBhIAAGhJDzXUlgPcLzyJb9ytspuC9ENyjB9KKgty2o7NxP7A/25dvO2mtNDTdu5u568ULqCUY03wSHQ8GMFKaYFnYDxyaZZUHzzegIfsV54D+lkLaC/khKEMj1PL0wcHxsZadSQrmhAtr6gAx8dtuAQYKUn2SZiB7DgDENZpT8pgSNXHIz3CjIuTYGdHQfAAjjgAy9GAnAznJQSwJvwJoBSyrf+oJnuXKxwcHQevQ8F6owdtMN1usOfQkNN3zU8BigIVQCCjx+xwVmZMVOzJ2KCFIkKiB8qSBHOGPkTzWWkIpIKBPmINlx59mIRB7QMpHPSS8qWoT9RYf2VCU2WRvaFbRXUk+Uktod4sbWCQvzixGlw6cYygrwPpBP8F1w553Jg8YId/0iYNlILTGG9prCjSQqhPDVUacn6BWKUNd8AEyBK/QVzlQDZSMvhh8pIxunIKtzq7WPeYNKAII4e/AIUAO1up0fYwKjY+AiCtmQcpODLD+UvvTe8ucDfx4xZvXRh5vFHNZO201q+tAWCCjc0UrQVmMrI2W3SsVCVPfkVpWnS8QY3EBpyIOyAqkOh+0SlyrAzTgHaVgc9vHJ+i3HICfkebw6a4CNIfu5HjeU87jYV4WpUvXMSFrJNI06ijzs5WAMWshT0rS4l25MSYhkZwnWBmDefPlL/vwaJhOCZGRAUQPsbLOMbXi0zgYwNZ5CfeC2m1z50jhQFNLieolaMC2YMgMocpUPCjMetUFDp8jb9qemRdgPRdPYrV+BdBCkaoIz2vPiP33Twl07Way5nTUZ+LQHlqZgtp+fhKWeAU2I69mRWObO2yBgwnc13A2TaOs/q7PN7nESh56c6jBA58mjn8FywWsPHGeVY2TkwvZ4sPtoU6BjAS1O3lTakwSNRLKgHs0BHBuc1gHoyDRz5kvcDWZ33Dvhy4J8btHR+qd3AI2as8kqv2jUAAiBDYTGeUZRwE1NBwfrzZ4GPDd7B0yTmcBC5fFQM8fk9x6Fgk5RjUmKTcRseCueUe95I+UnTBammd6AMXS0TKNKluFz29C54oe+4OpeG3ZwfxPnS142UAAUxnRfHJZASfONBAqwcuHRug/9y4JUIB9Kk46rzp7+UdeVnoOkMw0LG2o8YmF8GQWjIRwvSD+RdoH0GW4vY4bhgjNVvv/YjekxeGP2cp05Lo09QfAgozactzNDVxkhxw8gjlT3fypwQFZOoEm6icHgN6KmBRDYnFJPLvz4XOVENZ2iUG3MgWF7TzM9kqwF8ks8xB8sOnFzZcfupVgAEfIDobCv4aBC5YSAT051BNz+BurSGhb+HBdPHNvydb7z6A9stqBIkZLEV+hFMC6FqEO1WFLNPDFHsutLqvD0yzgmhwk0YBTW6S6oQ76DTkIrJxBfEV2HPWFjRmexJV7N5f4U2NpYi96kKfPRnnCSHv0g8FKvTSm1m8Iqg/voPf5xEMoByNsKJUJ0U8jnYzf5oQ3CHaAwexpVngWzqcE6u4v3tnzrtihECN28fM+b6my1zaOWpgC43cQ/3xSneokEEfbody7CoPJJD0aqhmxBiRVLTxL6lB02Qh54Rlc/YbuJCJjstmCtSPL3Lq41YS1GJuMrw2EZ9/snzUmrI1WAlNwYonBDShVk7AjrSqhEHsTEDgwBI8zxYnu0GTrozVzvfvOp0R34yqeXXSzJLFPMNxwI3hzAwQPb2FKTX2ewYnkxSJ12YiQWI3ucDcxdg5Hiu4xQMdUAENc3ApNNoFijAl9gSAAd8EMQVFgJoV/F9GbFPPALpUJ104BdO3/M3k2UwHe2sRaVMFUyhBpQs7FJ2w+nguh4tgCJxzVCJlDk+OlOOQxARjBPnfhRDixMiRRVDaWkKlxHCzphbnivgtj/rNeNKHw0m2jS1tQOOBYhFA81QKE3sPWSmBn/478guZF1h0oiP2ST9CS9gBMDh4oG4YA2LxVxThVoY9vShexidK8dtYwmCAAp8Z6jAd8gCgvDImeGWrrZnHCa29VuJhEYPFfZ0Qh03w7EMA+6NQTIUtRvwtxIT8lwdfK8zQno7N4OIZrSFU5isHwARS0ae1JPnPZ5xyekozWthnbabWHeQDreivKVsGegDF0AQYYtCpAOlUuMQLBANgJhKxe7iwKGsggCEmLJ8GnL56X/GAJQfqk0BMYLUugyAYKgzAUDEcyxwigtxCHDrKhweU7WKPa2l7MxtS3LuPcwhDI/i/FzrVDLG7R1Wzx9gcyL3seFx87GwXYtJJ0QuCNKfdDUgolYwGOhw+gqjhWEsO/8JCTELUqSlzQz6jV8Bl47lIx2OT+FQBd43YwYpWlaIQb4A1AN68LpvTo45UrEUJgf9zJfIPTi1fnEbDnJy+K7z7OQITI5lqFjt8j3se+iZnUq4qNhmfM8J7aIC3+mFiXIU/muEpAp18dcOt/8PpEknxkS3FeKJ/bxuq0KURX75Sn91eqRRC5+6RffK+3t+z8XyCD36kJ4EOyQh4FpF0pn8CgeReJJ1jPw8xUCi848nwxAfvku3rs7T85xBxTItiT4gAz7NddeSoawKiEg/zoztMdFcLtyTItcRCnMhUGOAVS+0kdXcG/KBG8MSk+myUecQGbR1WVBgCoJcggshBw67+w+gwTKMT7zCQiFqxmZq9r6lh4Zqqxg8AKrZnuo80uxMW3MmSCp6CaXGUfapYZn8/YZmkpNI8e3GlRpV6DPVEdHYn318INAMLS4BxOji9KDmZ5poTE9yQhMgY5zASlQhW3BzEueIQcLVOUN4dlNSx5FowTBAIHAIV0GEQkMuhOmCRuYQZLW9GDbFVmoJ+4MsYpmT3z5T3J+wPfbC1btOjxROoqGEmHiLXS2ZKJFJjEMbrs/RS6iz42Mj6vM883wLiChbppEO5pp/xnGGgyCIN4rCckhI3Xv+LFzAa+AN3YimK4WvnQRtOdtoswZrpN2yKq+WpWg9XSumr2X5hG+oWfeOZtj4CZXHVVwezlW4EzwIINMgifAECII+52dEAbcdll5ac0MgDo95xtuuolMybOGgttiWHj+HpKIr6CLLPbrO1YJ0EV8y5pUgGt46jMAlV8+fy+lb+g1NhIylGzU5sJQixGTAtOSqO20DISzve3UeBEEWFDTDVhm5e+RedoM4TkZNL20Ki40lLFs+Mk6QsShKjopc8dSKT1zeWAVr0XmjLnM3/MpqIKjrZppb6BkavleAuO/je4pVEeEkBT4+yuFCzUUdE50PBEmU9E5E/qHVHH0oV3F9jpFPRyGikWaeoqFvu95cI71/5kylPouIoycV3G9oziQmZ6q4maAv7FLF1ulkEMTwQH+p6m1bqaqSqHttuC9fclYhv9feepsvOTDZUDorQwJWgqCk6JrGiRYvSstcC8nPUOTNUIQwQP82zIa66WYQbZR6Fs4gIvcwWWWRMnrlErYYwAioqWamGs9Wjb6lAz3tZlXomA4MmllYZvxDQ83ebGjeBpQ5nFGBFMVtLEeCmQqEw5gBeud1OOLfl4zTz184fU+4/AyVliZ/tmTVaM6trQGAfYLpy1DhQISqrrKVa7rm/BYwad6vodkkpAGDgUvzRxRmivPjEx12rx9wwzplw3LACl3Ze+r0l7L7FmYUOk81i4JBSJ9oQmx1XlZirOOkcHAIKHCEiWCqj62Mzmefvxy4m+6CHUhg+XdZRUGNTn5qNcM0AjKGhzPN+BIrlG+mVKkhymC4DsYsHAiCI2dW4DguKrphR8H3Vg0snMeodIuOzJVTy7NAhvDkzP0RDQncc8/pcatciBGlVJDKSK8WFyNbXv/VrxGV6DInf2p2K3JrPQlDhygeVEuQZoxqiIBEFYIdzZRqSQRlWahjsWGwYJ2bwSEPbNZjwlP5w4r1R/QWINThrQxqS5yupXS1lzfpj+wXQMSvlGvQluUjBHdbkxfazqSyAcxNDm8u9GXjA/UH5aXutTk2EniUtqoZ8jyD6aqraswhP7kBfMPeo2HRICMSiZGvHDBVstQGGjODjXTh2cfFhY0l9f/8BHjBSsazE7mVS7OFbVNzkuHwZnexNVQYh9O3IKj47E5LwfpIe+Ak0ESTorj5bYlKTUfPjiL0FKutTkNMEITCSsLZFpWUb6ygQyZnM1K1lbeTliWiI2HVwamB4QlPu0Vccjwy/1XBgT8i9yerYlOhlHs1UR9ZygC2taDMk91WaWtlcD112Qs/ufNjsrRVCWqApjzBCJcbMvqWYwFCMb5dTYAPhrmIQH5gdDZAaZqJfZHj5NgiCGK7wh0OxG1hsz0TQltxW2evmeOedecqSmbbyquXtwFRi01F0TFfKvViaUpGUeQnK45fS3jPGaD8vWM9W9WIjae6kqyCvQGbEJ5sdA5iM3ztCYe/xa+O4hcMe+VRRAYU8sq1MH2hzthQfIr+b604ZZRDcP2UfBiVFzY5JDYjg1GsiTzPvvgSBOHgiaGT3AmMw6FA5zq9vxKrD3XrX7hoK+MmkQATLrPqhLJThFpxJY2T2dFwf2qfL51UIlZWweUExF5yK4qGUqMznbEAFigdacBIL0SbIAO9vhNd59pPKyl1l2OyDSUTqj4im1T0Nk+dWkMHQpBKzEWLd1klSiE0/aIelqWRIpYBXZ0cmVEQEEFKP7OBteNNnJDNKxGJXCjTtqwaDbNcFf1dEMOsLdwWDQ9+5f6TEuBi83Bdxsb//n//97D7++AbHFTm3vgpBWiySoR+Mqc8sdFpKpdoZZalruNzJvCA4+mxj+zJJc22ARNjQPpLGb9aH9iliMoDDGNS0HsdtmwSBJ2kLUu4oUiTmWIaIpCl+MBia0VkjIx9c59DMGXZZNhEyGPx0SZ2SzlsMEdVuAHoz3W5SUGflDjtg4vpYff3Abef//YPyrNFrCUl7BmGKB4WI9YcxLfCqnTJJ2/ACC64HhPdN6SFg3In9MIgKaytlSiaqMlbZ+RHASCn4jxwhB5OwuN25ZFyEdsNriWCZxXncsAUELy7/9hscxnhoIGRy6YS4xpVJ/ArDzkZxzpV5HF/YMjgzComeylKb7hhvAn+GpeQNkzGQRB38rC7/IAb5pk6E1txaQpF/9pbb2O92MOCQYsXN10N6oRP+FXZbSIkcfFgR3l7HYnq/lSJRNRrOycwJmcyOhmCcDjYzW+sKrUp79YVuqqCj5JvCMY8Qw6wQyFFIQv+u2KCrZqKQNdVxGR5btcDW5cbUOY/zk5WEYK5KoudZy7XI6Q0Q4tzAly53UBKX0/522er0Uv2s4CP7ZnvvOgYnERiR+mdnqssxTz2UCwgQ79BNzoQavAeN9CFTiVP0cSCwFqiBBs1TBdNUMfsFgRR3QRmv6ZVM9QfjgBuAtaLFvVaUykZcPCRu0Ia4MoxEvhyKhbbl0cflafArTTvPLXLWarLOtJyUu08pHfVOf8aJ+0G0HNCRiZjlUv3Rrjw2oacwV+gY1fOb6EQUW2AgnSCcbAvwkBlF8hrqnNrJQk3UFzIszB4cpU57DahrYUhMI121gZbi85AUyAeGyYpgxRy1Ys8K8cs6tFGGjVooiKIZFyz3OzQbtDhjKVf/P6P4OhSes3kbOcmbymKIzi8KwSee3IoitE87YbQPrO2aLsUJeh8fkQxJ/y3f/8P/Kb1i9uH3eUH2eglqIHNIM9XlpuME5wIBCkDmw4BIE+kqCZit0mH4E0AnFdNpwNx/eifoShVMzv46AkTTwg4NReO4BhWw8LhQHPEk2mYPTggno1ho/95fyat/OlPf0LioabnLzwCyowcBkYl8iiEPmSPG9B0jUVxNillVxmG16qUCe+GV/wj74wg5Zy3YY3hJ2n8Hfpk+dKWizQlDFuLCC5GL1ufcqo1ozURBUpDseQvY95AYOwpgW2v3Rcl2DYe6CjrwVO5vEL0l6v8JCEjLo/l4wpTupcrqlRwVcOGV+D7y4G7EZ4PX977xqs/ALs/RUOwaxY9z8DL+f+uThqMumO+VGKPkmqquK5oOvkpWdXjRNbUqsphODmn/clvfseg7aWl3TH2lEUW82mQC0AZ53CH7tJa92HjZU91bDxAK7oCULSkTBiQChwENdA1zlS0esKDNjtMEBfC0+eQC1kXgY8GknMwyg9Vg5+NiymzoyBIPwMZd/Kn/abCXmXRNBACqvDNxrVyeyN1vQzS1XJYs0Ph/TGQ7p85w4DReuDLs6XIwQBZRCiC1EuvHHbHH0zT81wiQqTpUGyMyOwCDjqfV1wtr7rs1ZyUdthQmYys+vWaZWBks7S8v6LAjdTyKkxWkXQy1kaQV1gXcY6PjVTXVx3i15IXsbyeVixpCHqXjsJQZeasr3J7RpCP2DyMHIaWl7CQRcQQimgjBGQgIfBdKuXwhJLZknKkwKUKVcQQ4jwgCLvRGofd9wfTGI1KzW3MSF9k44rk7qpoSBHwqF3SRHRlWPkVe23Ps3l9HpmFMYPqJ8Ioj2VrxfXvfREjUAk8ijKbpM8Z/67JhemiBl55ZZg3aF7ea7ZtvYYNWQpP36oQhYUVijg1gvinIIhwxr7VHEIsrOEZPFjPvSkKlksIe4bcRfcuE4b1CBM0AkN0bCnlbAyM7/zzv3zWM4HdEKHKsezkGNg4Dtiiqj96/BxDWlm7W8uy8NNprUK5Oq/ywDD/6MPBdXHN4W/6Sgs9NWYsP8U+Zaxl0BPFpOKj556UoxfrzSbhESiROM8s6DBWo+pQh7ABAYIUFwYQuR93uJRmTOBA9lPhRwzFdFl3TQZV+yp4AVgA3RfujBiKDVybwhPE2Eae+Mw95krQvSjBaqflMnY8bg9+vpeIW0u9NpejM578hIDyFAIpRYWw/dKylSnfCPq0TO8pAhVxB/r87FeueBqNPnSd+2CsZyIDlatEyS2s7w9fjwPpZ4YNAgG1BYI4cX7+BVyObGSZJcokdEwk/M1YL1qiFQTtUMhzmVO0UUGxHaWIAyVn7oEU7qJp0aT12qkY+Vh9jvMy4NHyQhANWBmhZyY1t9aKlLBxjDoQUUQg1nhxLAl+2WKBJpqHaTe8dlB3leDIMgUXx99lKIakhXdRXVhzeNfWb38s+2yLlK7GB7/68j/BGhfmyxBtLns9TNtFReluZEPVPLUbqw0rx4M3ADoU60g705gzT68tH3bHH1iDbq7zYnBeW+vK+1JMk+KG0+EMeHgHKC60BCnHXtX52Thw8JONH9kY6zU2LYLhGtvwHZDSnvgCMqBxFMOOuWJSmIvJmLPjQNAos5tnh0YXpzE/BFM8/wKDSpnhcduegsMmEYKRGOBpgcHCu4/VGLQ4/44mFjiVw8cHtWbmoTdUOZKKoY7YvFY70GP8fUx6/2UtRxDugNdyUeAP8bXbBCMLN2CFs/SSQgBrqd1qhr3jeqWQvQ4MwQhVuLSbSgjc0QqKQCCfYmmKjxKkSWm2uczgAUTNs8UqKJrr3l+ozYVLfIkDi53TTbKKkJbrmBx7Ylw5mlkKGww7h/+CMcxQ6TFVWGT+XFspuXrpAn0Ogo7Fa6EYLYfeUOdkk4hEhxvgURejdgP4sFuEbJSVRUZTWniRDj9F3EqFRZoRzaVhNZkZgs4TqjgjwHFmbRFa2SLtzgOko/R8EuuAxfoMcgkfemYHFclNui5VE4DcTKTZWIC7lp8vtdDKhTZnYEOqcNoem1X78waCcr6e6kAceQGomI0lab3xUzBOHIySXuX1XdqMhZW0SjPGTCShNWIJkSnPQyrrT2sSZvFMigx294cG1OTb/uJOXEvPGbnQ9lXKjTnlCQydpKtV4bup8cBIQ1AMby6Yy65thINSBAGWs9d4RdRzn91F3SOdIE6bOjzhBLZ7x05/Fmt7r7Px19Tz7Sbo4NAd76Y0pM6ykHe/03K6iwyVte7ydOUoXIKe1lD0GwjKK4xZbufM8710HIZoyFXsVZuXKk680NbAyDMQ1+PwKiOeI6XPtTRlPTGCld2WhKrWKlFdhta9Ob+FeFSBBjTvNNDF6FOcPoTwRBQRS7rirdSmoeqDiyk7O/DRewGmouHjwxSUIz0AKFpaLRYLstuu8EFtGgT5RmUOzs+M+XB2RpDSw9Dk6qvfp4tsaSieHmEpXl2t6cROhZw2loCvEsm9qCq4D6fAHR45HYKu9jCo1GchnQR1LvtHxbxPdfDuIT5M1IUiZoHFxTcISVimzMP5bo4xf4Hb4E8xMvkeVciFeil/+9qGnaaU6Q0lDikjdDt3bqeWNYhZaK85oMTC4JeXBdaKo1F8rdy/S5vwBSW1+GjT2Up0uyqe1ue8EldfZFabIFEs3/KUXTzAQslI5XhjuxE2eXHv7Oldl8ksXtzUI4QubUJb1SRGQUcpKiYwibFwOIN82wuPaDmp82ehMKoQVevqG37lnGfSymH39K1qioEmpdMLE4CoyEKszSW3K9ckjOb8Y7pMwi1PAYj96UYALZboQb5BQ1wS2EHv+QFAXn1CPkjkTdmD8zObXBbqmJQ9C7qaDQShIRt34mWjHMl1rZmfHwRzXZEt4zaWDILO3P8b77yr4H4jZU8tudBR1b+nW7ln5wD0qir86suvOE6q1PpYi0kZv35EXVahq3Hw+XIyvsHyx+NWhXVkh0qU5ZnKl7ZX6WHP8Dh3IsaAwsGTrUY3KztiDf2xypaNDRCkh2HutYJUCHYajCUQlNe/OA09gYnze05GxS+NOX3ZboQ9rNlXdIH2bFRhK1pyKh6+wP3oAYuZHrqHIOXOe1KQas26KD/3Ygga4XutqFnIGLp0pquwYSI8pZfocC+rhZBUOk143OhQrdz1+DksEHwBxX0iB0OzAZ38rtNK61XZdZg0So9v15zfwq+QN8LN3ZzSu/uP0ecyq6L+FAcWTepiCs8YMDA89+4nCqnEozEn4PiyoScQMR5AEBeGM4Mjg0dlbv3HeqO+/s8bCIIdMkdRm1jZwGsyQ0D+NQIN+wECKpDx+DkkFYAaQS9BkMTKMHIuvnlVgac40M740LpCsfQt8I0187+Z7C594Hpeh+9hMaPCcS6vUmJV6KURQc25WM9850WNmZbi8kDGuFINr6+CTqwn3KdGiNiaYzNrZbBO/ovf/xEEYZ/iFyP33j9z5rA7+5Y0cTDPgCYmXmL1pHYNyxN+YY3TA54UtZvPbvQq39CfUBIZSE/aKFUh/HNPisLncpkrWrGn5TUS6VgQPDamqZtKrGngmvfuwgg1pesYQXiEFGXkeHEMroKdCXdUUoqBFAvDeukwlWyHatYClWtS0F4XCOL7ORpe04/T4mtoVepgdy9F6oumdR0jhj4Raw4k0cP351XkIVqPsQ3pnAnsTGxZFGEl0m/OCNUSJX/7WLiNqixTuW5WUW17rKqHnlKR++KStqzK9zY2vDwm3ct5sIen15a1WkIk6NLVoFmOp5A8fHkPdabZ2sjp9TSpH0DjWmMrSoQzau6Fl17CnwVBzSRkk0rpT4axar792o+KqdfD7u8DbphndAJIaY3Hi5teAI3hjZXCv6ZD7LlraqtdYwc6H5Rdt0tvgDtmgyZn9trdMplOrnV9KyN+sB0Har2mDRViz252Yj2umifTuuVmjTlnGCIbnYFsr5BXPXU0MrLYB59F3kc8xcDPwnCusqqZIuvbib7cvx7Ntjhdjnldr/6th9Sko+zjjOLD7vIDbiCIFELmMNQRm3Qp7NOqFNk44guZQ897XSw92qCutUNdHCENlVUQbjDIS+T5MRM2SFT/G7NtmrqMaILqzja0eCk/aZmgeuJqUzxu51RAEDoZ6hlBzZGuz+HxORdLa3Z5CcRIu+J7zqmnJXa0pij3z0cksNJcI48uCnDyz5dOgibSlTeFq9JjVTA/+c3vvJQWXp5WjHl6FzNAC8jEIgOIUz0HbVt6LdYfKNsHtOWp1YTOb2Hvxcp1ilwoh1PF7A2vEeRwoR5en2c2YrurAG0sgWMpOAhn6VJ+jUDtJGrLrocs0lriahoGFfcG3F//4Y+9woyeadLMvA4JLNOz1+uzMwvLjDqvqzlU1L/Mlbkow4MhxMn/57H/0UsB3/ciMugZYMy2q69+X4s7RTV0BCmmNGlZT7yGpFff0mI+seIrGNEVOHF0mvK3Y6kQsHa2hhc00CNg2lp11lMuSrGoTqv/V+eB7PSXMkiEOQSRz6wt4ie+9K8/pbdNFhCkwz2iMES1WOV2zhsIy10htDW69tPhYsX7UfZBkjhR2SsaIefLkcXBTwwMnHoQ5IZ7yStE2dHhjH/MABDUehTN7lMeGNUu8gVBrxREp5UjrjQWK3WjvAAxQuSjri0CMmVf1BJ2iFhGmDobUkzAgcV7MklVeRRFYTgXQC+fpTKknMaswj3YaNHWf4wOl849t4Gox9RR6mmecVE5O7G8M/xSdujc5KCWhy3rOW4bNYeGgQkEPU3Ev0OTOkLBaW+3ZZw/SWMo2orgz9LJdrIcxwcI/qlmmEEwHk6H+cGr0n1jYWet7JSMcSyd74I+C0yvhwZxIJefh+61B1FwOICjTT1y9IHNel8y7gI3ehsCYnIoYSme/aFa+5F7TUPeMMacRwoBOeREdkZPsojl8roEDKMIXoNaOYxVxRAjrdHJb5LeSUmZbOHX90y83o3/qDXGO0ofghFwh49wxAvJOvurEqst+Yk5WpBkp+V5by9yPhyFaVoCsa3xnz/zBBuMgFBJBAGllRaX8P60ImUuMwaIneurcu+FGeDzE0jRVjAOIGyLmoZghzDEptI6fq2MAaOFoGvTCFglndZUSKhp2HYT6L2ODTsDup5UsqryNAeFCz+lxxCEWZCFbsGNwmIvRWwOK66rCqP2VivwPHuRkdxdZSLWJ1H20daKuLnXUsbL5W3nyWv560gSw7CPGUstn65FJyLxaWB4Qkuf7ejZlMoFDQT9SCaw09omWYUhVHAQBLG1QEGLFEVKJPx1yrdyevefImTysnEhLs2tOuP0eGTWaU4mFnbm+zNppcfCTN154KYe7QEvlF4LjlsrmjFene+PWFJZD2bSTItNC6+BH+vGaPVX+pCTgCwjH3PID5SBC6qBklOmrCrwAlYk512nR7SoWgSFVWYYOeEwHSrRz/zkUIWnuCVF+49JNuYyXF1Er6SmcAkBFCyUo7XefeAIXNPMeWWEO8G0VqJFnnE/eLXdwOX8BMOjx6pgcMkdW0cEOUEa+FTJ28mnqnN8qfWx43FLWuUj1hIELwQadIC8dIjS+NsNz8kw8vXQXhz5Jx7xg5wUXow6bgXok3GsF3+v5WSr02PNHM0IrKJVMoy7DfvwGSGdEcR0tP2PIB0M/1ElEo0UgLg00OBfDEaJokvYhmKKntvgV/4OUtQIciosLgYJ/7eXCKha7I0lTT2Nn4qHg8gd9gp1CDrMQhmQfqxnLfGcDB+/8eoPtLzn3sPIvVfe/KUL9GTv7c936UE8edVrFCgyGCEJPU1ybGQo0+MFNcO5Oq/1txs1LFtHLly0qHBkLXFZPd2O0HNZqB5YmQz7eaPcBroMjAAUiwUacksOhNkw5vZw7ZUAmUtvMmYYG9yhA8eH3esH2RjAaAqlM1WGgYN+YIg+kE5U4ulLnpD0mgMqYMc931pm87wx/UnHIpGggyZ2VuetSZ0Aj7hzjo3SnKLGE6Gq5WVwRrRcm5aCcRkLsg5iQj18Ga5oNnnyBPZZZyHJORCk/Lg9KMatKgM/6uhdZ+EpQcwnhDZ3qPmBYCXHclo2fmI37qeXEmboBzliUV0Lj/iItlI2+/qcn63slAk9MC4pOx+mFKumu3AGG4NucXHQxX/8puDLxp3RjVAFmu7s1saSCn5jvhQuOI0TBP+6XIGD0ESZbLUEfQcHvRQw+zy4mNpuNMdxc+h/AHU1mYZQJB4zuoxgdX3Vyx3wyuVgKMciQl08+F64Tm+88y6CtJfWHVU0NoLsgEUH8tcckGUMe6EPTYRGAph9By9NoCrOxgzCFvaxJ3YLvarF8S5vYyh68ZDBeJIv7zVdE0nyyl0ci9XRQ0iCpsKFtdVKJ3fVrbKvY3YIv4ObYWwgQouoOgYnoHh9LU8jqHw4V1IW3ASjAhdEKIzj1eS9tl6JwxlCvfQgZkmtqL9DRilGE8YhQxdDBSsFcYcUTWIdiXKsMw+z9Mjd2dGheGqPV2aTnKxNl7fXtV7Weg3ZqLm1mPBExiIbJ+KhS1pZaDXTIupbetykFzXFT1QljtyBcReRdS2fdJQDXdjrW0VQc5NOdIFlAKSZh3Wt4MfVwcWQfeAPfsD1g4M95gyi+0SHKLsTsyJpgUFrgYb3TbfIifCzPmM+LSIF2WRke/IN9r+KbZdQkXpiiOv4sPNtzNNdEOR4PPbFD/RESmNvwMTTX8pOTCl91AsYQiUYChCAyznRYkgADoeGhQx0vNJ3zkcoybW4KExn/95bMeZ6GkzxE4tQQ4x2DAPkJAOV/kcDTsVDXoaidq/ztRcY/wgl+s2PyVbXxToDMMVVLdgYLl7gKM7A4fLx21pp2etHofu0NFCsI6TFvReXlJu6LsUqny4tR+7opBcamjt/1jBdm2CGTCgqILTscLup5P/zW8jVJB5Ke0gdeWhNS15HSSAilBEOj2CEn0oMgmMbda+y5ZRRRGLnm1f5CVmqBzU+eZ5jNZm82/TDyFT+2crQMmxQb7Sz5sIKqMSo0NMqN9cwPOy84Axq1YXZUfSgatDScjz8bpx9uBPkAFBeq8KMI1cvHqvE/XBacOSN5WcvTVlfT+PvqxApCqvBS4Gk/TUi+MmPO09iNRjoyfBW3HZHlQuaJMFnf3pXj6rPq0tPbzt2gKkPxK7A5f1ArGqIyLWtqFnNRrV/KlZrHxtxSr8KKGKNfb5EM47XGjg4ntWEs5gxvlW+KYJ611IS4Bx9OITuuw2an4RL5zg86hRr8SsbZ5wztlXid24DDUinsZsLohFZtiKSHcVuVOi3tUK305nYHqaDzlx/EFNf1n4g6OfL4KQPDE/0VefB0XWgJ2cXMEc101Kdv2t4DOUIUlAY8YuDWZiXyOSPKIHvjer4m2guc7CfyzBmo9/QZdNrejYunjJ9jkCDmyYR4m4gSgUBlGNhJV/6UT6wlZ353h6iylJw/2NpLOxPr8kDc71izPF4QiJSFCbKHA0EB+aX+fIvBrqr04MjUpdD7lh0rqeBgguf6THrEYSng+AMfoB7b9+B8gohICJHPpxl52EiOcEaUPzID07CbhgbkEiLeD9+DoHsOl/gxkPnKD9ZGLCATM8uiSfO3LdQv2/pIT3q6/TIYy9ctWyE0XeaXrvRBnYISTqq+Ibu9SwWUFq58B7igAivXpCE9zjdXq8AKMHaDAUvx2GdR8RrrJCfauWTeI58pVXzek2zmx1oCGogCHADWR1ZKgSnZkGQXy114fIRgh/dUF5eZeXaL/98ztB0w6n3Ol0wjn2s76AbNDSCoF+KkIGPQlfGw+xGcdhVE72x6vUqQTa/fAUamoOnlrGUugiejCe2s3m2HO18hOBHt+sMkyn7KNUKWhg5WI+Q0VIXxWcCWsYWyqs4CluIfTBZPVTei7XZoe2Lr/8UmPz4J4ADRL/hG9Qi9szK3lOcDXl+C//8ndRQiKBGzys7N8+KqQ++NAERd8WTYQt3m2/YbKB+YCYZiunh3akQRIQKwX1VqGcJTc3yCvseembn0/ybvdosZotlsmCW5xUxEe2godo+epEB9vzzmeTps+2+QA3ena6vgyBClTd+ihBaEreicAaP2idvlpkfWroFQDex0IcRhH0GThbp7ML9qxu8QkA+fu7uE70UQbgdGkgd4JNTuhwMQ9QIfnFmDgT56IeyYepAw4O63FE78IZWtUPBJgRnF0ANBGWRBg3Rhnj3X335lcO+06P24Q1o7FAgSCVLszofT9WbvOFL6AmI2KvjtcZh3+lR+/CmKr9rEGSDgxDQHARHP/QZB//Kt77bS6llPdPAxQjaH5QVGkKVNzZQ+ck0PDY8XriTR+32aW+8824xqwaCskLDofBH3kBDfvXjnv/b/f0nsp59At1ntMXjElbFtUyO/AN528LTkzOA6++LpwYD4toLf3fYd33U3m8//+0fQPCLaRdBe4KeIBUxF+rmI2/s4981PPbf5yaOaHj7tGsRtB60VcMr4hQQuwK23gTTQpauPHfHpcHczu2xF67iEjo8AYKySMObQHLi3UsthrMPjnwEQdzDs1/pnUzdHmh26k/GzAxIIUgBEUCRmZ6WgX1gKlgh5uyCPYvDvuuj9n4zB8W1sD8xZgq64UGw8d6pFwroLz2ELJ3d7Bz2XR+199u1HLQxY5+iIKBM0/2Yr4OJ2DOA+NWXX+ml0pXPbnvtrbexZBxjYgO+4fWtwoaxUO0iODwOfJ4vRRt+7u4TfHn6S1l++QrO/mH/jzu34dR3g7xhhSJF7RXaSbSbz08ITzSgbJuY/QZNPmobHgNNtoVzXz7sv3KHNq1EFLNnhQgFQdst+jJY6QQM8IJ9MnKmZgsEzU3esMNh/5U7samy7/KVe+brdvq8IUXZHDQUDW2IZnUZNmOT4uD+dLcQDGvH7198vafq4m/zBnYre09hw7B1PcF60zgaQX2MKVPeOGIo4bmPoFKhLEX3QUSQ9lJF5+3cwA4PAk7R+Sf2rVAwsjsPasAnQRrhQk+WWpCiBG2OFr7GtSDyOrS4dNh/rvcbMhOfDrEJKABRpG0bJs2qZfWuKgzdZ0oKwXrTWYgc5QP/C4LhaxwJ0lvaVAr9wlVVtdTX2cBoILIKwQJEbIKaa+adky4AtPt9IAjcfZGf71BFIUKtIvmIZD7sP9qzDZfNeS/Wa557MQf58n0E97WhdN9+FmJhjnp+xi6hVWFhyfi1KCo8agfbgA/u9EW4wfOf4qDnyiL2VyDojF87hhaqRrOb0R0RQ8cp7EdciyCba9YO++/2WgM+xY9i0sybQXEuk5UaX44+vC1i7scEC56+j6YDT1mdQ2yXfgBBXr/3szeh4VGp2gG2Aj67DIXfVwSMvMFNLBZALLhmo9TWaRfNoKeP6iJ4DYhG8JU3fwmIPbb88mE1zMKFc18WfHAH1KAPTnpAYNXGK1j0RZ62zM7l3H6EJ0X5xqLVis+HAKKnSe0SdhHcxxEEe2yxu0NpP//tH5Bj02fbuOqmHhvuAxuuBJgWqs0xCBucTmoy1+QGLijCy4FiZQTo2bOwVC1I30fQIIYteoTgJ2lon8eeu2K/WwGjyFYCOHDEyPcTOuhhzaEt1M0vi8RuRlMkGZp0rkGzaLXGBMFicsbefaEKu2ZMINiTzwH51Bo66Mq3vgvR6GdPlyFC+Xhtr8JQaIXkBCzLzCIMYQlpDvqjx4AtUnv39vTNSldVfADBI2/iQBpktE34oTMk+PV2KwAaNF3nYilqX95yUq+hAYsCbUeabBHZu3eQ4n2PfnjsKMb0KTRgdUjXpgsgFpB1WWanPhSo44bO+7UF663wJd+3SAPBozmZT6H94vd/BDg63zNmpmGRdW/X731/cD93FMi8m4F2GrCzoQoQj+K8n1qDKSciw9CC1NFA+4m2US1OzUf7Gt7ZZOy6G/gUkf5UGKJsR+kWn0574aWX7AYW0cCBfSexmBp1wgyvgFXozUI52pG8VpB+7u4TR/VNn1p7/Ve/xqcwsyCaOBiuRJFiUaQ82TQ1gjZEnYRvEC1Ige9Ifn76DYsUEHEHeL135WyRXe/ovBlXpFvYnulyMAxXx3mFYCwfdATfobTX3nobuxQoUYuOXByPMJMjg4BVWKqet7ErUahCT6gqpzRJj6ayD7298c67eiBdoAlqcBNAbal2S0EDQWvJQhVahB55ELdb+/lv//DVl18BFziIgLXN063UDnsVd/J4GDCov6PMitu5IRshJlAqpDs1a0kLMfkGxefnvBzB95lo2K7f+9mbr7z5S7YjlXfUDrb9J0ocg9s='));
          bmp1:=bmps1.ToTBitmap;
          Picture.Bitmap.handle:=bmp1.handle;
      end;
    //TImage2\\
     TImage2:=TImage.Create(DsgnForm);
      with TImage2 do
        begin
          Parent:=DsgnForm;
          Left:=296;
          Top:=154;
          Width:=100;
          Height:=145;
          bmps2:=GetMufasaBitmap(BitmapFromString(100,145,'meJztXVGLJOd1ndc1RgybWWiiJi6SWlxCLVQi9dDGY9PBTdRIK9SyFtwmEm6CZdohgYVAWAyGNYGwGEIEedlHP+pRj3rMT9JPyL3fOffcr3pnZme9s9Mr7xQfTXV1dU/X6Xvvd+6596v59tvv0na0enA0Xx/NN3zs5jYO/aVeoe1ovi0QbY82j476laNkEBlQtt/0R709XZSd1aG/6WG2Yjlbx8RQEjKr3dH6oT+uHh5tHvtL9rSgRBgXW8ftNQDtaLHjAAh2+QAHKPnjA0fDdsyWFjCzdXmqsbYzj7eP4zQ3vENf1pVtgc/WMcEwg7HHYh6OhpmNQeSut/HT7LEGsLz0g+2XftwOegRb8GRgZU/nm0Nf5QttR03HC4cBCCgc1DDvg2dhIDrZI3xNyNjjYuPDdjjmPM1BK7PAd9PAjpp5/vRmVI5YsRA4Ha4dJ6yKyeERA96HeI445lPhghiWaZHwAisNx3N76Et/7s2vnZP+mlN/X4wEfGDSpcfVgUg7Mh47E5bmAO54EIYEu8IRf3UTYC4OffWX3YoVrcP7dgkULGTSx1N41jyxAnS48FEwj6DUF5DxFrwdZ9LqVvne7wgfcxwQls0Nzbow3et6Jz39C0cUbeh3q7xqe6OMCiAQpXmFZ/Cu48ZPtj9nr4b5HRqJZ2wOFCPJnDEEIQuPuC5cbO0+2MFLemqX74/To3buw6FrY3846k7LmO87LBzT3lugPjQe524et0sYv7O5n7yR7LEEZLsWv5wACqaCgavbO82RGY5mZcdAww5ROj2aLYmhYK9/Asd58mpaFyc4RG9OeY9HE5yBZl9eWOkaZWkJ45wWBVs6PnFMYFTTruw3fAkfYjt25KTJI22YboH90Njsb0QJrNuTlIKVA1iOAAfEH/rail4WV8TjBHDwa3e4hqPprGu7AkgFhR33l7oCUYPTeI7t2GiHOGd2aGxGW7GfB2OL2vGpDcPBYDme3Pn0k7QlszFZ16Rcry7W0Rh8xxwNJ0y72x9/yGvHmbAxG36wT6zaId0wTPfQ8OSGTOTO54VRI9sFRM4WCoYwqtGIWR5hihc+4/UidLuFhDm5i02Pvj85mva+Y/YGlAhyV3bifL69EWiHRogbTciT3MfM3QAU5u5mNOW5XXF2a0agFcvhJdMYTt25eLAFhm5aOMfgcoj6QKlxc5oWL7YzBXVTjPPYsT00Tr5VvlbC1HxLpYVjnVFIqQoivGIXgjOuEc5F7xtoVGZODk7r4Nh+eKsjbyfj1QhN9EebIu0RH+VIHp6aui0h/UeiBwpqELkDbmldmt0mnXEJpxM1c8gp/tQpgQ3OdC0DuO0YFLATw8febk8NEzzCJSdhgcDKHgE1QtkrgBVD0+6JQ7R9wtgOzYR53yZjLPwOQV5Rq2bpoEwyBgQc98QpzQbx6niakx1mSQCFV2Vd4q7w7u70kEBJYIHY4kBBcVqkAyIcQQSuqbjoOlFC5nJ6NNzjDAh7O2nCtJqRk9ojQJMtaV5ogrjCtJLn9weE6+jBn44efl2UuuKGi10g9oCCsBwQWVtNpwnUOhMfDJLMYUQGiMlMXNQnXBgbPbFjnPc39rRMwFW8j4+HNS0QdYQpClMP6HrzQj4BCBIZBCg+lYQiH5wz/uMykcjATtyJesZz8U84HYEqVGEa75XtOZJNsohDyIAeoMyiHnzlMWpb9s2E7JEhfZ3zHWZAMfbUUtaV61WBCxC1Q+yUC28jgoFcAYTpbLL9nDOjm1AfkXygRdVxHpOFvXQI5kCh6eE3yF8mX/xTkk/I5gCHacsilcxasEJqs8dREXB8LJk4t+V8WBE0h2k/+WIbaAQ4wgoz47QnjKKmBboDYKXAbtZl4GyfVEWHRxXJnKeMKQeUcp6CTKjNMK3ZgqlNJSm8+dtfB61qHChnWW3OeiAPOMIg1idcmltn103gqRuYJ1pIXxVz2j5mLgOjQt1qtYu4FGoeEDCDsUFRZcGZHWYGoESrFKXByQGIPZKaNhmjQDYQtfjYp2OCgRTmdq1AOX1al1rMLitZDOnG2x9xdiNW85RAETdEOIUD3A1uYpwBL2HKKzPdm7/9VZX0hYbgsWuWAQpAKarT2CKU2cn4WwW0awLK/MtrefMSoCKSY/oj11pkRc+l9QhHdrLhIEPq71GpwxGEcbu6WSSGkQCSVbpJ9Dm7gXEJKGLVV0CFUfXLjGkIWddF4AkCilmwqEXhDNvH0YSwQVE466HGvuz4bEG22Q7EBKGboWkgSlDm89o7Rh5FbxgbmBVsZtoThBpMBq7IrAVge03MwQP4vOBgxgP5DlEdErEfD+9Ty4FqowhcpdZJZgWZFODAruzDAakfLDFNIYtaTVy1sJLip7wmSUWfTGzal6mBLMs++eUCpRRG9VCfBP9UuNY3hKhzDFlJh5is2g0s0FyyvOQujCCm2OUQRXqCg24tEXBE0QEOjI3xPNLn5GPzjO0YnBbD6l7mbOiALNRdEAmyPRpWqACaV6Ly7qJx6MbAVlELlGyxMaAcK6es9/0DkYBgclTuhgAFSziJOg4zl450Hfu1UTm8XVqX8kE8GjeL8PUSsQIOMKfFjhUHB9D8aDHZ/sLRsJcmne/TreaEVFW8RREfDKvtL/y0041jZQEfU6Tb2JJ2hf1iJLdc/hoc6mI/DrIUVDmgotk0WAeDedTLlDYCt5fGHDijqeKwfVJJ61tG+yIgEAQpCbaDYIWA7+WJkIubgSd7jCoWZaANZd+O2Cw5WybD5AX69fpbdNUamA6ULGP6g42BgyFhHLP6qwfKgo8ZzHwdwsuuyo5hMKr0rTL1QyZYLM3O/IGb5SYy3FCWTgoJdze8549mZh7Yyz7iFa4d5gF6Cf55Mk2nq4koGVQTilaftueuF+wLLn/VzIFsit73mJ642GVtq68afjSpTbo7n3860tj9KRWkijH2pcvx1PGx6zr9zE3LXnXcbH/tJtQt3rCnSlsAFAit6jjiZuLwsjqcBtgpHrbh0f1LwOoxKw7ATVQBEyJFvJALvKrVsC6DnXHhiZIdKBaaZ1zcCxqAV0GfJqUyaK+CUEFPUKKnylcG/Mj7QBKk9dm+KBye8nh/hXA5MrsnjOebx3cefZNYOW2I7AZaAaI36BPkBekwwhPxWcI4JlDXA0+pc6YS1REfMyqah4piXSJDwtml+CnxCsaGp/Bo1XTE7Sft1QBlYapfRCvCzp96VP+S1gXHBF+igjfumFKZZq8cT5FzxiBvvoaCyzQKXhhQ1D3pOzYM3YVhFUk4q0xQlw8MeVqf9oY0yv5imQJuw6lnV+OGFBDmm2JLKrLvUig2k0BNkPLdOjlnrcagV2pPpFKRXXkfA07UAY+nkcWUnPf7x46VvdQvGbrtfDABJxt9xnBVN0QqarG0nTv90ERQHq8AK5BMaJ7Sz9U7DeawV8wqAerO5mMbqfKNGjzmpKMIICqV1q4EvxsJ6TPuyJXAS2tnhBWpEgQ8RU3xyLpP5JWIYGbPL9b13Tz6vzQn4aMg3y2iOTZ6EdU5hnoWS1pVSQJVCUyRrESEwoB6TR1JhBgYgoQsZtmOVbDTcURqKtm5NjMQhlp5UFX6KmiDS50ozfCx6JxiWRAQ/OA8PU4zHRATjNI8R92JpwkUuXfPn15GxaQvCMa0D8bVJ1Z23OirXnLBMHQwmGK/pMlJ49K8UGLXFWDVzJnIePXhS7bCFjZ159MPKfTVfQgCTU1BdaOC2Jd2esWNOv/tKnrQVdE+8AQC9tRp2HimA/528rDOqBWyGMNUMUtna3LMFxb9Sr3vEYKVI4P+BDw6dX9ErVhUEwFcTZuKnLOoueNCJJ4jTUbLAaNZkCI2MDQjBiVP1JQneYqixDKVilooQ+LTLRyrYc1fpA/RrIwXAsrMCZUsI1QjoNY5RkBFkZRdmgO/SRvNnLgQSuh9/qa16zUDms3ufrSjG0oRVU7kmmrEH9Xraw0H2TfmRKA0rDNPRBlIMF6FfuVQuEV9aUBZkGftGAuv5lUrmtgU4k/TZw9V3ZMgjUVKC/sxevYhtFHSUgVBDkgm39KuZos75KUhRCCIAY2sBg4hWTh9co9T7gNskUaV818MqJLlNR6Z3ai2jzP1Q5sQ5NAknxWhwjRX19yzrDyOS7IozWU4ARmiWvvUqIB2jn7JsoVcWxmfOLl0CcyYjGxd/hCplL5QoZA5C9ROYAU1Dy0cmO6pRwVJgN9lr0vkOJRDg8bXgpLyWUXm2iXR3on2GIUmxHz7wKEkj9N+9LEq+jRRu/eTlyTqbej26dHxE0yaPx8rpDMQWxC1IOup/xMvAYFJ2F7diiDQ2EeEg1VoElWoHZOROdpl4aqi3JgNEa+CIN2GmqqJg1WJLtq0StWjX/rXK2hzh6XJBald+Yt/plGVpPj2x++zsuDNCZtS7FtxZmSkiiY9hKkmFkQkVvORYyqet8PIlmqsCGDQrXZIZyw+62FHYp1IAoJPOx9B6gejFolPQJhqg4+p+l/Qe26gwJcgILA9z5nVX1maAx+ULtpXax9YJF2RM2hJWq1lSUrSPNiG3qvIIzeRCDxV71AlcqpwA+PEyZjdlOZIjmhDNIalQd7RdNyGnv+cXJR1TzYurikR247Zlc99m1yDLKw6laVWo6xZvQp9rEJi4S/K8bCiTFhOqRinMBVygYwqoahaFJphFKWlJ8CchBV11CAhipne1RCrLZ5nNiQCKtAYRAhND792f7Sp0BsV1pXKt0s0Rkv2dhVcsXKtnqrQxtDfiyPLTPmp4/URzGcZr0QnKJJ3hEiRXO/iXwnGBXMSnZDzQkND2l5Y2XMANd/c/uBno348ai/bIsuULmK0gwJSFJfV0aHGMy0gyua0YM5N8EPlZW1UaproshYmmrZoWj21rCaaQhXosh4RwYpBvk8Mk3qFcSrXhqVdbkIswstXFIS1JATZHwwMUsP2SzcwEi2sOy6YoMoMp0MFsO5pRMYHK0KLi7vb/WxCgw2wnEefenP+oY2RVnwy9b+uI2qhwQ8BO+Hn9JWJVpg00SRTCxciY8UCL4UVJBe4mBZrQ34paY6ZnFsddeMty6OwEGAF4aVWFeojYWZ+vQh0qNTAKvCd4Z4FGQdKrFLrI8Sv9rTip9qr/K9ImcGvoJ12nqGs9usS4p4NFCqhCEToUoDgicKWvbp7YkBNH3zlcKGdg02zi6TuNT9PrNYjf1QqVDumKAdYtwQrlNqnVQvHdNyl0AwZ8NtoScKEO+1ZVp4GUSGBn+XJor6lb81YxzOAMkcrZkMVHUZV44aaMkLZJvqptGQbbJOyzCL9rlYeNBVGY61/lFrRRCcalYz7CMXqjXkqyGOobcZdcrlvKiASil1It/GHhnUChQzoWfyK4jCXF22zAwFSJ2QEQHc8YdivV6nj8tXWXhtP7Xc1YqwMRphqw/XaKtjChLzfYJUpCUtUVZOeaJh8SgdTae8TK5GuOp6LoT1LbTh6+A2qV/4IsWX7JG/BoVY9SMG7P+UKCMkv/TqNDWuZ1XotrGoKgR2Qq1SZKtKlBGePORSr8N+L5bxZkkkBJaomBtJWNbJmSNomnFG+L3nQxVgVuL7mlAd9mHcpEVZb5jJIbfqwNNjhiHyusuKArBm4sSE5AJTGXmtx4KhDqcgLKwiYikuzWBpQ8HHQwD0knpcARTDFYIWn0JtGglnk+ucV27Nvv1/l0kixLAgIeLUA9dZeS5XkYjLSXcax0tHH2VNRC0bljQrLEJdmBA37bYiEouWqF09npFjtPIM2DKZfJlaWU9uOGEUbbQz9UhPlURfiQ/H0y2KFXA/zXe2JEtLXjxjPVw/8Fjc1bcimF/+l3lg/iAJE6aea3yfTkK9p4muH1HtBHpQ5qr22URbTRb24cf4wRD0iVosgd+bf0lRIwhBeiQYAoAQFrDK5SwHlbXhrNyQtZNuqFl/ugWNhyi58K7r1aL/9DK3punEHAtRiw7t5uIGt5W63//GnOT35zBUhxYG6F1pBx0lNDEr1YsQu1GtgJKhN4MPdqBbUFtRGS81/wW5eO82oV3Fe3wnZ+RJAfT0KU3BArLTF1KahqhbohCo1iGkK3bgtCW6JA6ZkXw/03gYDyJAGpoKCd6mhzyr6XqQBqutYaipB6wnytIdFvfurPzhckEwV4csfMlhuzdc2HJ+29LxlWroscuIz3NC9r2QupQbhzuW/O0T1BKpc5oqswE7QIFPVoi2pNMrs4EdQWanSnPL7w9GktvGqy/IihDK65zLjs1q2ptFm7Mowa1j2fe5+8IWjAU8cog9cVQkwLtyIAJcmIev4BOrrRVjtwEKfvLH4ESc4LDhSg5AuX/MdfA015VXMcRiiBLhkIMYWmrrT+F7AtYyQvmSAKvbwvUVpvsLB6H5MpcKsyH4mIYbIU+iEYUWg8M1nC7SlvcHcc6CkAMyRI7jXRyvphVHLghV3yNI3XOunZTJ93M2M/dWr9L5Jl71qcDreKif6haTm4QdV7x+A0loAwKKSBMwAKCHvU2QGF6rJuZjVbMEWRy2x11u8qHovcyhY+0lo+CK6z5L7zK64s31MKU+3wlMuQ5uJtEW3m4BzAbrFJu0H82Ab3SkqpJ5+lgighxb4nG5Kx2O1jEuRpJ1nbRHYYhaDZ6muAUqfNf3yd8EQlGA29c1nqootaFhVm7s4an1L8Wqb/LNP/dzc0z0UawBHHVZVnX21Gy3UQtasL2DDMS9txij7gnPOfIo8WZaXuugA0cyFUMbOn2J+QBiLcfpqnQVCfd19hKajfpmdOWggVOKJZFnEo4lE4BLSaNJ1JS8s860dqEzrVtHxEjFf2V8tJsC6AHgbRdK+zHR27WZFXJTUe2hi92yRSSW8275dwmzpJ7Tei34LHZJ9EdXdT5dUdfBRSrSnvF3DxOs7S9YdmHjqhjNDqj3Sdqoq5EVAgV7CtKC3yGAWsaC7lqTqXhdUAGsJtJawpBv09/yqgcZ8TYjkgKefsQMZYPb3KAkaaAhxxbNo4dCy/FdrmeZMq8XgLCb2rONPq8aJbKIo8aqJ9eYgqN7wNqAH7OKo5cxcC2dWkQD2uuvpnNNc01flv7jnWybFY8ckyCUolSUS/ohva3+rDY0UqwCaqG3BzCQFW9rCIlfFExCugQw61tSCW6/NQRmxjTbvJkxLFTHcHoR5UOwUNz/H+7Qsaz3q6rdI9aNhFILkWTqi+y3oYO2PHe8S9ndUcjZRtSzhqw4gVO0KUAhQbXSBUpaplilxsmu9fXQa6+tVkq7ldCQ1Uoz1Up0kavrQFFnuHHVupLIsZhGCuQRP6MOqOCQa83GFqypsqWevLs3b57iLrUkalRqnLBlP4Y9DFHdEqOrLxDUW43GWpRZ3SZ2UXLRqVWXrLuX3+qPaKOW30R4JOvFU1mMW9S2kUXCDbpF2hdlw0nP1H9WqVc6S2cCwJq9A12hWDNf5qn1IW6nf+kH149L+x+t5yQfiFk8h61nUIh3ljT6q5b2S+BSrWaSo7m6RNZ24L5Z6ITAtPlXQMXPiDi/n4eiOZ9Iwxa9ww8b6Pp+1eD4qnlZUltrgOgHpTjOkNHGPFxHONpbxah2TQlCxIg/viE5aD674kxy1S11LCtg0GorS8Dp9Kwpis1iH3p9dp0gFD0MKZ4lgx1AYZFFg6aNsMfo9FKYWmwrP4lxCVWlLF91rMKH6eDuQCdQ1aLkPlgnkwUpJFviqDKqe1URTbheKjZYhnEwdKOCPX4fG2e0b1TxuNbx59AOUJ2Q8mTjvaHJk9eP6O8jYbKE0NkMQDBsaS7+i7tREw9VsMfoQeGUzpFspaDexIGIaTY/CSjEqg5UwrO5coXI2vlIzcIW46KsIKj6k3HtqZFGbx29tvyw7j/A0hSnqeCr/xaK/vV6F1M8X2VABYtnF7RlFsNWT1lUtkSRIwZEIb2UqqkcQon4ElMKduChVnSiEYZpohlFIzxqH7ukX5UXR2vJ7ncu04q4U3OecGIVCpDnIkaUwIMgjQtYCQh2clbg1wTDVlSetko1DMX/V81pdAVTdcC/0TasSPH3tVOoBiYcm32lX4aOOtT4xV8XteZpnuPId2nsXzY3KkTEVZsk+ahnAs52ngAD6JJVgVi22Ut6hIKM1NfVTickoh4kpabJropJVG4yqsTH5UocHFBCTp7mKMPltl3crvRRQUIzjnuG3hndHNKB4oh9kaXWXb+zXoUxWvdNtpMPSRhTQ6oLySabAd975Sf7czdAsPw8+kK1rlYp+ynjY5r0XsvVRvEKRbRptt3BYLe/tWC6kEnLpLmXOjKu4N9oiGKaKyOXg/rswYw5RByRWdQtfVRlkGUIrSdukRtVk1/zDJp52o+XhAkcQjRsb/PzjsC4VLKZxTwxM3Hb8+xOm51j8BUcuS88uidUIgVrTK7Z07pmnG95doURvtz39mvFjEUMIzrA0ZNai2cehruj2XyJa4pOwnGknF8v6cnpoRSqU2ui0WSxImc5uYWGs1ppByvhz154g2hfLOcOcsHnZC9kKkrv+Xn6lNhqlFPkVhBGB56HgKcPVMpOTuBdfkqgwMLwFnbRwqK4qOndRd86JoN+3ZLVMiHhwBdnzhfcX2Sju0Q2Xo1kye9oHai9S80SHMhMJrLhKK3oaYQzteIEzZECsVFLuLC1a80stR4vet/O0bWbu13cvI49dyIhhNqo4gFyJuiNKY2T4rZNfTYX9qFFtRDtnSCo9W+x4jxpy8mmsjGuj9kp+KNteVNNQ1aB1iT6HKwJqQ0Fsvom7LkR9WXNQFolOc8YUb0fZdNKm9ynCa5ZXftdzvWQCAi+mIS3SSYtayABVVEF+YRWjESWuCyj/06VMT85pg3GsLHpi2QJ3qyimdTJlPG8jvc05PShQXXmR01V2wr8LBFDH6asmHLpYx/L0cO9W0V3xLi4rmEmdXl8fUDCqeaTMc//TxR/XoRiveBuZ081tyOOZgEQnvPgPujtQvskRSHpcGilOaG8YsUpUfy60lme29l35Zh7ns+Fq99csDBWmEV/DkPHaDdKc0833Fp9Rfq+NRHKK7EpZQM3TBG93xgJAHKF1ReSBOV0zIJfZiuUUNxzbM8oT7/3mjz/8+F+dZMbNPQigprAmqgZZmu9Yz9I66NnimSxI3vdyr/bFNpCx8zZhhXH7rTnH3fdyblJYboYcXTSHMAd0PnDud2i5JOrqL+8at7/f/bdjtfwcQ0A5VqBS/eq2fBPuFiHL1dFLTOsswhbt6Dov7cq3fawKSsSqsB1MUmh4wFuSXbBOtLw4t40Vc99toGwb/uV//vb9rcYYq1OGr2IVeouIARnj5ab165z9X9J2HlZmLW+e3j/vXa/mLPayt+Hf/vfuB19oJFbDvTvv/OTQ3+4V2syo3vns92diZePQ3+7V2gwrG3c/2mncYHXe5kCdY1Q3WO1tF2H11uH/Icsrtd1gdfmtxkp0/QarpzcD6q37/y6sjCHcYHXedhFWJSs89Bd8hTbD6u1f/AeAmrz3Mxs3WJ23WdYso7rB6uLt7V/+LrEa3rdxg9V5m7IbAJVYhdx36C/4qmzmgO/+6g/QFnDDChs3WJ253WB1+e3df/5PGw7Ujz/RuMHqzO29X/+XjRusLrMBKBt/89P7GjVQN1hpe+83fzwDqBusztosthtWKgt6ZfAGq7M2MypMgjdYXbwZUDYsE1RNMMuCFVCG3qG/6eE3YFXXT2+wOnMDVRBh2C8L1lgtPz/0lz3wBpT2jCp5e0FJTw/9ZQ+5GUpv//J3Njyq1w5YmdOND2Krve+ZWBnjOvT3PdiGBNDG3Q++OBercch63eAybuDjl78zQmUDQO0zq7fmLra/3lj98OcPMAyudz77PcS9p7EyoDBeZzpq852Pnz8gUB/tzgRq8t7PzsMKTnro67iODe0cBhemv8tiVcFlzOEve0JkDC/IQFH32lbB7WmsUMGRG77RvL2H1Zs//uQvO3ChSGruY8gYUHBGsXTpMA4UChMFMRvEqoLL8DS47NMOfU0vcZP9GG5nYlUDtW9XFVw40wzMzPLQ1/QSN2CyB1RiNbxvCACuGisNYGWv2sn20l924MIG2nAmUDVWQKbGCnC5Uf34k9eEQuwZFcoQwgrR2x4B19NYvQ4QadP0l1gFPtwp0Ikz3Hrzro0arkNfwbVudfNeYhUDsV0p4dNYvYbN25gWDSiLV2BNwop9MsUH97Cy8RpihQ0oYdRYiVABqz24Dv2tD7bRwOCDMRUKrj2sDv1lX4lNWDlc4YaH/lKv9FZH+EN/l4u2/wfcPZqe'));
          bmp2:=bmps2.ToTBitmap;
          Picture.Bitmap.handle:=bmp2.handle;
      end;
    //TButton3\\
     TButton3:=TButton.Create(DsgnForm);
      with TButton3 do
        begin
          Parent:=DsgnForm;
          Caption:='Start!';
          Left:=263;
          Top:=265;
          Width:=75;
          Height:=25;
          OnClick:=@YourClickProcedure;
          //Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TCheckBox5\\
     TCheckBox5:=TCheckBox.Create(DsgnForm);
      with TCheckBox5 do
        begin
          Parent:=DsgnForm;
          Caption:='Run from combat';
          Checked:=false;
          Left:=4;
          Top:=276;
          Width:=85;
          Height:=19;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TCheckBox6\\
     TCheckBox6:=TCheckBox.Create(DsgnForm);
      with TCheckBox6 do
        begin
          Parent:=DsgnForm;
          Caption:='Wielding axe';
          Checked:=false;
          Left:=4;
          Top:=249;
          Width:=85;
          Height:=19;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    //TComboBox4\\
     TComboBox4:=TComboBox.Create(DsgnForm);
      with TComboBox4 do
        begin
          Parent:=DsgnForm;
          Left:=210;
          Top:=181;
          Width:=187;
          Height:=23;
          //add your items here
          Items.Add('Draynor Willows');
          Items.Add('Seers Maples');
          //End items
          OnClick:=@YourClickProcedure;
          Font.Name:=default;
          Font.Color:=clDefault;
          Font.Size:=0;
      end;
    end;

    procedure SafeInitForm;
    var
      v: TVariantArray;
    begin
      setarraylength(V, 0);
      ThreadSafeCall('InitForm', v);
    end;


    procedure ShowFormModal;
    begin
      DsgnForm.ShowModal;
    end;


    procedure SafeShowFormModal;
    var
      v: TVariantArray;
    begin
      SetArrayLength(V, 0);
      ThreadSafeCall('ShowFormModal', v);
    end;


    begin
      SafeInitForm;
      SafeShowFormModal;
      SetupSRL();
      P07_DeclarePlayer;
      SetupP07Include;
      ActivateClient;
      Wait(2000);

      If (Not P07_LoggedIn) Then
      begin
        P07_LogInPlayer;
      end;

      P07_MakeCameraAngleHigh;
      P07_MakeCompassNorth;
      InitChopWait := 0;
      InitWait := 0;
      ProgBank := 0;
      MarkTime(ProgTime);
      DTM;
      AddOnTerminate('FreeDTMss')
      TurnOnRun;
      LocFailSafe := 0;
      AxeFailSafe := 80;
      AxeFailSafeToggle := 0;
      AxeFailSafe1 := 0;
      AxeFailSafe2 := 0;
      MarkTime(AxeFailSafeTime);

      repeat
          AntiBan;

          if(TimeFromMark(InitChopWait) > (ChopWaitTime * 500)) then
          begin
            InitWait := 0;
          end;

          if(timefromMark(AxeFailSafeTime) > 500) then
          begin
             if(AxeFailSafeToggle = 0) then
             begin
              AxeFailSafe1 := p07_invCount;
              AxeFailSafeToggle := 1;
             end
             else
             begin
              AxeFailSafe2 := p07_invcount;
              AxeFailSafeToggle := 0;
              if (AxeFailSafe2 = AxeFailSafe1) then
              begin
                AxeFailSafe := AxeFailSafe + 1;
              end
              else
              begin
                AxeFailSafe := 0;
              end;
             end;
             MarkTime(AxeFailSafeTime);
          end;

            if(((CountColorTolerance(255, 220, 140, 300, 200, 2) + CountColorTolerance(65280, 230, 130, 280, 180, 2)) > 100) and (RunFromCombat = 1)) then
            begin
              Mouse(305, 174, random(10), random(10), true);
              P07_FFlag;
              wait (lagg);
                if((CountColorTolerance(255, 220, 140, 300, 200, 2) + CountColorTolerance(65280, 230, 130, 280, 180, 2)) > 100) then
                begin
                  GoToBank;
                  if(((P07_InvCount > 1) and (Skiller = 0)) or ((P07_InvCount > 2) and (Skiller = 1))) then
                  begin
                    OpenBank1;
                    BankLogs;
                  end;
                  GoToTrees;
                end;
            end;

            if(not P07_TabInventoryTab(4)) then
            begin
              P07_TabInventoryTab(4)
            end;

            if(P07_InvFull) then
            begin
              GoToBank;
              OpenBank1;
              BankLogs;
              GoToTrees;
            end
            else
            begin
              if(not isMoving1) then
              begin
                ChopTree;
              end
              else
              begin
                if((AxeFailSafe > ChopWaitTime) and (InitWait = 0)) then
                begin
                  ChopTree;
                end
                else
                begin
                  if(random(10) = 1) then
                  begin
                    MMouse(RandomRange(-100, 900), RandomRange(-100, 600), random(10), random(10));
                  end;
                end;
              end;
            end;
      until (Not P07_LoggedIn or (LocFailSafe > 25) or (AxeFailSafe > 100))
      TerminateScript;
    end.

  7. #7
    Join Date
    Sep 2010
    Posts
    5,762
    Mentioned
    136 Post(s)
    Quoted
    2739 Post(s)

    Default

    It looks like you tried to edit smart and did something wrong

  8. #8
    Join Date
    Nov 2008
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I did not edit anything i have been following yoho's tutorials

  9. #9
    Join Date
    Sep 2010
    Posts
    5,762
    Mentioned
    136 Post(s)
    Quoted
    2739 Post(s)

    Default

    Take out {DEFINE SMART}

  10. #10
    Join Date
    Nov 2008
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    that helped a little, i got a window to pop up of the wc thing

  11. #11
    Join Date
    Sep 2010
    Posts
    5,762
    Mentioned
    136 Post(s)
    Quoted
    2739 Post(s)

    Default

    He probably added some sort of anti-leech that you will have to solve, I am going to bed

Thread Information

Users Browsing this Thread

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

Posting Permissions

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