Results 1 to 8 of 8

Thread: Simple CowKiller

  1. #1
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Simple CowKiller

    Hi guys

    Was bores so decided to make a cow fighter with Reflection.
    Don't wear anything you would like to lose. Thumbrule: Max 3 items.

    Features:
    Deathwalk - checks if player is in Lumbridge - if true it walk to the cows.
    Finds cows - Only find cows that are not fighting and walks to them.

    V 1.1:
    Added better cow finding.
    Health check. Runs if health falls below a percent.

    Upcoming features:
    Bone burying.
    Meat cooker.
    Hide banker.


    Please post what you think, also post proggies.
    Last edited by Frt; 03-21-2009 at 09:19 AM.

  2. #2
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Post reserved for good proggies.
    Frbahanbh:
    Cows Killed: 48
    Time Running: 20 Minutes 50 Seconds
    Exp Gained: 1656

    Frdabaha:
    Cows Killed: 35
    Time Running: 12 Minutes 10 Seconds
    Exp Gained: 1220

    Total Cows Killed: 83
    Total Time Running: 1 Hours, 24 Minutes and 39 Seconds
    Total Exp Gained: 2876

  3. #3
    Join Date
    Oct 2007
    Location
    The deep web
    Posts
    2,496
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    SCAR Code:
    if (FindObjCustom(x, y, ['Cow', 'ow', 'Co'], [4018778, 9870498], 4)) then
          begin
            MMouse(x, y, 4, 4);

    line 130-132, a little less bannable, and 1/3 chance more of finding cow.
    Did someone say GDK?

  4. #4
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by jakeyboy29 View Post
    SCAR Code:
    if (FindObjCustom(x, y, ['Cow', 'ow', 'Co'], [4018778, 9870498], 4)) then
          begin
            MMouse(x, y, 4, 4);

    line 130-132, a little less bannable, and 1/3 chance more of finding cow.
    Yeah, currently working on a new way to attack it, but really can' seem to get anything working.
    Tried the ClickNPC funvtion in the D-Include but almost alle the times it clicks beside the cow.

    Got any ideas on how to click it?
    Perhaps just use a simple FindColorSpiralTolerance?

  5. #5
    Join Date
    Oct 2007
    Location
    The deep web
    Posts
    2,496
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    SCAR Code:
    function bonesonground:boolean;
    Var
      CTS, I: Integer;
      TPA: TPointArray;
      ATPA: Array of TPointArray;
    begin
      CTS := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      SetColorSpeed2Modifiers(0.03, 0.08);
      FindColorsSpiralTolerance(MSCX, MSCY, TPA, 0000000, MSX1, MSY1, MSX2, MSY2, 84);
      ColorToleranceSpeed(CTS);
      ATPA := TPAToATPAEx(TPA, 15, 15);
      For I := 0 to High(ATPA) do
      begin
        MiddleTPAEx(ATPA[i], x, y);
        MMouse(x, y, 2, 2);
        If(IsUpTextMultiCustom(['Cow'])) then
        begin
          Result := True;
          GetMousePos(x, y);
          Break;
        end;
      end;
    end;

    try this one mate.... were it says 000000 put the cow colour there.
    Did someone say GDK?

  6. #6
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by jakeyboy29 View Post
    SCAR Code:
    function bonesonground:boolean;
    Var
      CTS, I: Integer;
      TPA: TPointArray;
      ATPA: Array of TPointArray;
    begin
      CTS := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      SetColorSpeed2Modifiers(0.03, 0.08);
      FindColorsSpiralTolerance(MSCX, MSCY, TPA, 0000000, MSX1, MSY1, MSX2, MSY2, 84);
      ColorToleranceSpeed(CTS);
      ATPA := TPAToATPAEx(TPA, 15, 15);
      For I := 0 to High(ATPA) do
      begin
        MiddleTPAEx(ATPA[i], x, y);
        MMouse(x, y, 2, 2);
        If(IsUpTextMultiCustom(['Cow'])) then
        begin
          Result := True;
          GetMousePos(x, y);
          Break;
        end;
      end;
    end;

    try this one mate.... were it says 000000 put the cow colour there.
    Why would I do that when it's done in Reflection? I can just use the GetAllGroundItems?

  7. #7
    Join Date
    Nov 2008
    Location
    Melbourne, Australia
    Posts
    2,240
    Mentioned
    3 Post(s)
    Quoted
    11 Post(s)

    Default

    I was all these errors well they were hints saying something wasn't used in script.

    will post progress report
    Click here to find out how to get full screen without members! | Click here to check out my Ultimate Bitmap Tutorial! Edited to work with Simba! |

  8. #8
    Join Date
    Nov 2008
    Location
    Melbourne, Australia
    Posts
    2,240
    Mentioned
    3 Post(s)
    Quoted
    11 Post(s)

    Default

    Good script, logged me in set it to strength and logged me out:

    Cows Killed: 0
    Time Running:
    Exp Gained: 0

    Total Cows Killed: 0
    Total Time Running: 41 Seconds
    Total Exp Gained: 0
    Click here to find out how to get full screen without members! | Click here to check out my Ultimate Bitmap Tutorial! Edited to work with Simba! |

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 5
    Last Post: 03-26-2007, 07:57 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
  •