Results 1 to 6 of 6

Thread: Find ent

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

    Default Find ent

    Need help I need there to be a find ent and avoid ent
    Anyone plz help

    SCAR Code:
    program PowahChopah;
    {.include SRL/SRL.scar}

    const
    treecolor1= 3044197;//set the color of the rock
    treecolor2= 2978147;//set color of rock (these aren't the real colors)

    var x,y: integer;

    Procedure ChopWillow;
    begin

      if not LoggedIn then
      Exit;

        repeat
        if FindObjCustom(x, y, ['Wil', 'low'], [treecolor1, treecolor2], 7) then
        begin

          MoveMouseSmoothEx(x,y,  20,40,45,25,20);
          Wait(1);
          clickmouse(x,y,false);
          Wait(500+(random(150)));

            ChooseOption('hop')
            writeln('found tree');
           wait(8000 + random (500));
              end else
              writeln('couldnt find rock');
                until( InvFull )
                end;

    Procedure Droplogs;
    var
      X, Y: Integer;
      I : Byte;

    begin
      if InvFull then
        for i := 2 to 28 do
          if ExistsItem(I) then
          begin
            MMouseItem(I);
            Wait(10 + random(7));
            if Pos('log', RS_GetUpText) <> 0 then
            begin
              GetMousePos(X, Y);
              Mouse(X, Y, 0, 0, False);
              ChooseOption('rop');
              Wait(10 + random(7));
            end;
          end;
    end;


    begin
    SetupSRL;
          repeat
            ChopWillow;
              droplogs;
                until(false);
                 end.

    Thanks

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

    Default

    SCAR Code:
    {.include srl/srl/skill/woodcutting.scar}
    FindEnt(x, y, True);

    *Good ol' Sum!*

  3. #3
    Join Date
    Sep 2006
    Posts
    199
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Where did you copy that from it says writeln('couldnt find rock'); you forgetting to credit someone?

  4. #4
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    credit for what?

    writeLn(''); is a function in scar, not a guy who made it from srl forums...

  5. #5
    Join Date
    Jul 2007
    Location
    Right now? Chair.
    Posts
    8,488
    Mentioned
    3 Post(s)
    Quoted
    12 Post(s)

    Default

    what you missed zytex, is that it says can't find rock in a wcing script.

    hamish, he probably copied from a tut and is trying to learn. no need to be harsh.

    ~RM

    I & I know Zion. It is in the spirit, body and mind of every one of us
    RMouse(obj: TMSIObject): boolean;

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

    Default

    Yeah Dallas is learning give the kid a break.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. how did i ever find this...?
    By legendaryhero90 in forum Music, Movies and TV
    Replies: 9
    Last Post: 02-03-2008, 12:53 AM
  2. Find Gas
    By Lacky in forum Research & Development Lounge
    Replies: 4
    Last Post: 11-04-2007, 12:56 PM
  3. have to find out
    By the scar noob in forum OSR Help
    Replies: 5
    Last Post: 01-13-2007, 10:19 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
  •