Results 1 to 3 of 3

Thread: Chopper

  1. #1
    Join Date
    Sep 2010
    Location
    Azeroth
    Posts
    395
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Question Chopper

    It clicks every eight seconds, when I only want it to click after not receiving a log after eight seconds.

    Simba Code:
    procedure ChopWood ;
     var
      i , x , y : Integer ;
      begin
       if not LoggedIn or InvFull then
        Exit ;
         if  FindObjCustom ( x , y , [ 'Map' , 'le' ] , [ 1649232 , 3036025 , 2639739 , 2242667 ] , 7 ) then
          begin
           Mouse ( x , y , 6 , 6 , True ) ;
           MarkTime ( i ) ;
            while TimeFromMark ( i ) < 8000 + random ( 500 )  do
              begin
               FindNormalRandoms ;
               AntiBan ;
                if
                 InvCount = InvCount + 1 then
                  begin
                   Chopwood
                  end ;
              end ;
           end ;
      end ;

  2. #2
    Join Date
    May 2007
    Location
    England/Liverpool
    Posts
    1,004
    Mentioned
    9 Post(s)
    Quoted
    106 Post(s)

    Default

    Try this

    Simba Code:
    procedure ChopWood ;
     var
      a, i , x , y : Integer ;
      begin
       if not LoggedIn or InvFull then
        Exit ;
         if  FindObjCustom ( x , y , [ 'Map' , 'le' ] , [ 1649232 , 3036025 , 2639739 , 2242667 ] , 7 ) then
          begin
           Mouse ( x , y , 6 , 6 , True ) ;
           MarkTime ( i ) ;
           a:=invCount;
           repeat
            while InvFull = false  do
              begin
               FindNormalRandoms ;
               AntiBan ;
                if (TimeFromMark(i)>2*60000)and (InvCount=a) then
                begin
                   Chopwood
                  end ;
              end ;
            until(InvFull = true)
           end ;
      end ;


    compare it to yours i set the timer for 2 minutes

  3. #3
    Join Date
    Sep 2010
    Location
    Azeroth
    Posts
    395
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Default

    im beat... blown a gasket

    i reduced you time down 2 10 seconds and it still stands there forever after chopping down a tree





    Simba Code:
    Program SeersMapleFletcher;
    {$i srl\srl.scar}

    function DidnotGetALog : Boolean ;
      begin
       if InvCount = InvCount then
        Result := True ;
      end ;



    procedure AntiBan ;
    begin
      case Random ( 1000 ) of
        0 : RandomRClick ;
        1 : BoredHuman ;
        2 : HoverSkill ( 'WoodCutting' , False ) ;
        3 : ExamineInv ;
        4 : RandomMovement ;
      end ;
    end ;




     procedure ChopWood ;
     var
      t , i , x , y : Integer ;
      begin
       if not LoggedIn or InvFull then
        Exit ;
         if  FindObjCustom ( x , y , [ 'Map' , 'le' ] , [ 1649232 , 3036025 , 2639739 , 2242667 ] , 7 ) then
          begin
           Mouse ( x , y , 6 , 6 , True ) ;
           MarkTime ( i ) ;
           t := getsystemtime;
                repeat
                 for t := 0 to 8000 do
                 WaitFunc ( @ DidnotGetALog , i , 8000 + Random ( 15 ) ) ;
                  until ( True ) ;
                    begin
                     Chopwood
                    end ;

           end ;
      end ;





    Procedure Fletch;
    begin
     if
      InvFull then
        begin
         wait(500+random(500));
         MouseItem(1,true);
         wait(500+random(500));
         Mouse(295,435,10,10,true);
         wait(500+random(500));
         Mouse(260,430,10,10,true);
        end;
    end;






    begin
     Disguise ( 'Not A Bot' ) ;
     ClearDebug ;
     SetupSRL ;
     ActivateClient ;
     sleep ( 2000 ) ;
    // MM_WalkToTree ;
    // Wait ( 7000 + random ( 500 ) ) ;
      repeat
       ChopWood ;
      until ( invfull ) ;
    Fletch ;
    // WalkBank ;
    end.

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
  •