Results 1 to 16 of 16

Thread: Killing Cows for Hides?

  1. #1
    Join Date
    Dec 2011
    Posts
    8
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Killing Cows for Hides?

    im new and i dont really know how to search forums for the scripts if there is one already can someone please link me

  2. #2
    Join Date
    Dec 2011
    Location
    Kosovo
    Posts
    831
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Do you just want a simple Cow killer? and collecting hides. I can make a simple cow killer for you
    Goals:
    Understanding TPAs
    Making Proggy for fighting
    Getting on SRL members
    Get 500 posts

  3. #3
    Join Date
    Dec 2011
    Location
    Kosovo
    Posts
    831
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Here, I made it quick fast. Just killing cows. I might need myself this later on.

    Simba Code:
    // by begginer. thanks for using it. Enjoy it :)

    program AttackCow;
    {$DEFINE SMART}
    {$i SRL/srl.simba}
    {$i SRL/SRL/skill/fighting.simba}
         var
       x: Integer;
    const
      SRLStats_Username = '';   //Insert your SRL stats username here.
      SRLStats_Password = '';   //Insert your SRL stats password here.
      BreakEvery        = 120;  //How many minutes before breaking?
      BreakFor          = 5;    //How many minutes to break for?
      Version           = '1';
      NumbOfPlayers     = 1;    //How many players are you using?
      StartPlayer       = 0;    //Which player will you start with? (0 means first)

    procedure DeclarePlayers;
    begin
      NumberOfPlayers(NumbOfPlayers);
      CurrentPlayer := 0;

      Players[0].Name     :='';     //Insert player username here.
      Players[0].Pass     :='';     //Insert player password here.
      Players[0].Active   := True;  //Leave True to use this player.
    end;


    function FightCow:Boolean;
    var
      x, y: Integer;
    begin
      if FindObjCustom(x, y, ['att', 'ack', 'Cow', 'ow'], [4148562, 3950926, 7112099, 5007241], 5) then
      Mouse(x, y, 3, 3, True);
         wait(5000+Random(5000));   // Change this if you want for faster attacking. 1000 = 1SECOND
      Writeln('We found a Cow. Attacking it');
    end;

    procedure AntiBan;

    begin
    Writeln ('Anti-banning');
      x := Random(50)  case x of 0: HoverSkill('Attack', false);
        1:
          HoverSkill('Strength', false);
        2:
          HoverSkill('Defence', false);
        3:
          HoverSkill('hitpoints', false);
        12..15:
          PickUpMouse;
        16..25:
          RandomMovement;
        26..27:
          RandomRClick;
        28..32:
          BoredHuman;
        33:
          ExamineInv;
         34..50:
         RandomRClick;


         end;

      Wait(RandomRange(800, 1200));
    end;

    procedure EatIfLow;
    var
      MMColor: string;
      x, y, Lobster: Integer;
      begin
      Lobster := DTMFromString('mlwAAAHicY2dgYJjPxMCwGIoXAvFMIF4AxEuAuJ8RgicB8XQg7oLiDiDm4+NjKLcRZJjtJ86wJVqaYV2EFMP8AHGGbTHSDFxAc3FhRjwYCgD3pg8b');

    begin
      GetMMLevels('hp', MMColor);
      if (MMColor = 'Red') then
      repeat
        if FindDTM(Lobster, x, y, MIX1, MIY1, MIX2, MIY2) then
        begin
          InvMouse(CoordsToItem(x, y), 3);
          if WaitUpText('Eat Lobster', 100) then
          begin
            ClickMouse2(true);
            Wait(RandomRange(350, 525));
          end;
        end else
          Break;
        GetMMLevels('hp', MMColor)
      until((MMColor = 'Green'))
     end;
     FreeDTM(Lobster);
    end;




    begin
      SetupSRL;
      ActivateClient;
      DeclarePlayers;
      EatIfLow;
      repeat
        FightCow;                // this will be for repeating action
        EatIfLow;                   // this will be for repating eating
        AntiBan;

      until(false);

    end.
    Goals:
    Understanding TPAs
    Making Proggy for fighting
    Getting on SRL members
    Get 500 posts

  4. #4
    Join Date
    Dec 2011
    Posts
    8
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    cheers mate but does it collect the cow hides? since they are 530gp each and cows like 1 hit kills for me but whoever can make one like ty im off to bed wont be on till tomorrow so if there is one in the morning i thank you in advance

  5. #5
    Join Date
    Dec 2011
    Location
    Kosovo
    Posts
    831
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    So, I can add collecting cow hides. Then try experimenting with walking
    Goals:
    Understanding TPAs
    Making Proggy for fighting
    Getting on SRL members
    Get 500 posts

  6. #6
    Join Date
    Dec 2011
    Posts
    8
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    cheers man please update me on how its going i would like to know tyvm

  7. #7
    Join Date
    Jan 2012
    Location
    gfdgfd
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    i tried the cow killing script works great =]

  8. #8
    Join Date
    Dec 2011
    Location
    Kosovo
    Posts
    831
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Yeah, but trying to put looting cowhides.
    Goals:
    Understanding TPAs
    Making Proggy for fighting
    Getting on SRL members
    Get 500 posts

  9. #9
    Join Date
    Jan 2012
    Location
    gfdgfd
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Oh that would be good =]

  10. #10
    Join Date
    Dec 2011
    Posts
    1,162
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Lol, haha. Begginer thats your flesh scrawler with changed colors and names! :P

  11. #11
    Join Date
    Dec 2011
    Location
    Kosovo
    Posts
    831
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Working cool . While LOLing u can help with pickup hides
    Goals:
    Understanding TPAs
    Making Proggy for fighting
    Getting on SRL members
    Get 500 posts

  12. #12
    Join Date
    Dec 2011
    Posts
    1,162
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    MY sig has a perfect solution! :P
    My first TUT! :P

  13. #13
    Join Date
    Jan 2012
    Location
    gfdgfd
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Has looting been added?
    Last edited by Nz Peeps; 02-15-2012 at 05:04 AM. Reason: idk

  14. #14
    Join Date
    Jan 2012
    Location
    gfdgfd
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    have cow hide looting beendded yet?

  15. #15
    Join Date
    Dec 2011
    Location
    Kosovo
    Posts
    831
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    No still not. Adding this feature is kind of goldfarming, so this might be kept private
    Goals:
    Understanding TPAs
    Making Proggy for fighting
    Getting on SRL members
    Get 500 posts

  16. #16
    Join Date
    Dec 2011
    Posts
    1,162
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Ya, it is goldfarming... and we dont care for goldfarming here.! :P

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
  •