Results 1 to 8 of 8

Thread: Chicken Blooder problem...

  1. #1
    Join Date
    Jan 2008
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Chicken Blooder problem...

    I need help i just started scripting...

    i did this script.

    Code:
    program ChickenBlooder;
    
    var
    i,x,y: Integer;
    
    begin
     i:= 0;
    repeat
      i:= i + 1;
    if(FindColor(x,y,924015,0,0,338,178)) then
     begin
      MoveMouseSmoothEx(x,y+random(0),20,40,45,25,20);
      ClickMouse(x,y,true);
    end;
    until(not(FindColor(x,y,924015,0,0,338,178)));
    end.
    now the problem that it's click 5 times very fast on the color i choosed and stop the script...
    i wanna make it kill the chicken and wait until it's killed and kill new one...

  2. #2
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You should read more tuts Go to the Tutorial Island.
    Why dont you use SRL?
    SCAR Code:
    {.include srl/srl.scar}
    and at your main loop:
    SCAR Code:
    SetupSRL;


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

    Default

    wait(miliseconds:integer):boolean;

    wait(1000) will wait for 1 sec
    wait(60000) will wait for 1 min.

    ~RM

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

  4. #4
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Quote Originally Posted by zippoxer View Post
    I need help i just started scripting...

    i did this script.

    Code:
    program ChickenBlooder;
    
    var
    i,x,y: Integer;
    
    begin
     i:= 0;
    repeat
      i:= i + 1;
    if(FindColor(x,y,924015,0,0,338,178)) then
     begin
      MoveMouseSmoothEx(x,y+random(0),20,40,45,25,20);
      ClickMouse(x,y,true);
    end;
    until(not(FindColor(x,y,924015,0,0,338,178)));
    end.
    now the problem that it's click 5 times very fast on the color i choosed and stop the script...
    i wanna make it kill the chicken and wait until it's killed and kill new one...

    The reason it clicks loads and fast is because you have told it to repeat the section where it finds the colour and clicks it, therefore it will continue to click it until the colour has disappeared.

    What you should is this:

    SCAR Code:
    program ChickenBlooder;
    {.include srl/srl.scar}

    var
    i,x,y: Integer;

    procedure theclikybit;
    begin
     i:= 0;
    if(FindColor(x,y,924015,0,0,338,178)) then
     begin
      MoveMouseSmoothEx(x,y+random(0),20,40,45,25,20);
      ClickMouse(x,y,true);
    end;
    i:= i + 1;
    end;

    Begin
    SetupSRL;
    Repeat
      theclickybit;
    until(not(FindColor(x,y,924015,0,0,338,178)));
    end.

    This will then make it click the certain colour once.

    DR

  5. #5
    Join Date
    Jan 2008
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by dude_richard View Post
    The reason it clicks loads and fast is because you have told it to repeat the section where it finds the colour and clicks it, therefore it will continue to click it until the colour has disappeared.

    What you should is this:

    SCAR Code:
    program ChickenBlooder;
    {.include srl/srl.scar}

    var
    i,x,y: Integer;

    procedure theclikybit;
    begin
     i:= 0;
    if(FindColor(x,y,924015,0,0,338,178)) then
     begin
      MoveMouseSmoothEx(x,y+random(0),20,40,45,25,20);
      ClickMouse(x,y,true);
    end;
    i:= i + 1;
    end;

    Begin
    SetupSRL;
    Repeat
      theclickybit;
    until(not(FindColor(x,y,924015,0,0,338,178)));
    end.

    This will then make it click the certain colour once.

    DR

    thanks but Unknown identifier 'theclickybit'
    why it's unkown idnetifier?
    im using scar 3.12c with revision 13# and i tried it too with scar 3.14/

  6. #6
    Join Date
    Sep 2007
    Location
    Pennsylvania
    Posts
    3,396
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I believe those functions (Clickmouse, Movemousesmooth) are old and very detectable. To click, use "mouse(x,y,true)" (false if right click) to move mouse "Mmouse(x,y)" (I think). I have no idea what theclickybit is

  7. #7
    Join Date
    Jan 2008
    Posts
    29
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Runescapian321 View Post
    I believe those functions (Clickmouse, Movemousesmooth) are old and very detectable. To click, use "mouse(x,y,true)" (false if right click) to move mouse "Mmouse(x,y)" (I think). I have no idea what theclickybit is
    ok thanks you all i'll try to make it a good script.. :P

  8. #8
    Join Date
    Sep 2007
    Posts
    415
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    the reason it said unknown identifier was that the procedure was named "theclikybit" and in the loop it was called as "theclickybit", so just change one of them to what the other is

    EDIT: example

    SCAR Code:
    program ChickenBlooder;
    {.include srl/srl.scar}
     
    var
    i,x,y: Integer;
     
    procedure theclickybit; //changed theclikybit to theclickybit
    begin
     i:= 0;
    if(FindColor(x,y,924015,0,0,338,178)) then
     begin
      mouse(x,y,10,10,true); //changed non-srl mouse movements to SRL, and added random
    end;
    i:= i + 1;
    end;
     
    Begin
    SetupSRL;
    Repeat
      theclickybit;
    until(not(FindColor(x,y,924015,0,0,338,178)));
    end.
    Quote Originally Posted by That guy that wrote forefeathers
    <munklez>haha im too lazy, girls annoy me
    <munklez> they always wanna like, do stuff
    <munklez> and i just wanna program
    <munklez> and they always take all my money

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Chicken Killer
    By barbarianl3t in forum First Scripts
    Replies: 15
    Last Post: 10-12-2008, 08:46 AM
  2. Chicken Cooker
    By 3Garrett3 in forum RS3 Outdated / Broken Scripts
    Replies: 24
    Last Post: 06-02-2008, 07:15 PM
  3. A Chicken needs help!
    By justsh00t in forum OSR Help
    Replies: 2
    Last Post: 03-19-2008, 05:18 PM
  4. Chicken Fighter
    By ElPolloFeo92 in forum First Scripts
    Replies: 14
    Last Post: 01-02-2008, 03:01 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •