Results 1 to 3 of 3

Thread: What is wrong with this?

  1. #1
    Join Date
    Jun 2007
    Posts
    26
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default What is wrong with this?

    I have this running but then it immediatly stops and doesn't do anything. Does anyone know how to fix it?

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

    Const
              BoneColor1 = 11908543;//No need to change.
              BoneColor2 = 12566470;//No need to change.
              BoneColor3 = 13685206;//No need to change.

    Procedure CollectBones;
    Var
      x,y : Integer;
    begin
      if FindObj(x, y, 'one', BoneColor1, 4)
      or FindObj(x, y, 'one', BoneColor2, 4)
      or FindObj(x, y, 'one', BoneColor3, 4) then
      begin
        MMouse(x, y, 2,2);
            Mouse(x, y, 2, 2, True);
      end;
    end;

    begin
      CollectBones;
    end.

  2. #2
    Join Date
    Apr 2007
    Location
    UK
    Posts
    2,295
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Try putting
    SCAR Code:
    begin
      SetupSRL;
      CollectBones;
    end.

    Rogeruk's Al-Kharid Tanner V1.1 [Released]
    Rogeruk's Barbarian Crafter [Coming Soon]
    Rogeruk's Guild Fisher [Coming Soon]
    !! - Taking Requests - !!

  3. #3
    Join Date
    Jun 2007
    Posts
    26
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    thank you very much

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. what am i doing wrong ?:P
    By sjlou in forum OSR Help
    Replies: 2
    Last Post: 10-01-2007, 01:52 PM
  2. What am i doing wrong?
    By One Leeter in forum OSR Help
    Replies: 7
    Last Post: 06-15-2007, 10:33 PM
  3. Replies: 8
    Last Post: 03-23-2007, 04:20 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
  •