function skipping

[TheSantaMan]

Ok so i made a chicken killing script. The problem i have it that i have tried multiple feather picking procedures and functions but none have worked.

function PickUpFeathers(Color1,Color2,Color3 :Integer): Boolean;

var
P: Integer;
var Color: array[1..3] of Integer;
begin

    Color[1]:= 10790340;
    Color[2]:= 9728;
    Color[3]:= 9869499;


  for P := 1 to 3 do
  begin
      if FindColorSpiral(x,y, Color[1],0,0,0,0)then
      begin
        Result := True;
        Mouse(x,y,0,0,False);
        ClickOption('fea',1);
      end else
    Writeln('Missed the feathers');
  end;
end;

it seems like it should work, but it doesn't.

[Derek-]

is the 'Missed the feathers' part in your debug box or does it not work at all?


and I think you want to change

if FindColorSpiral(x,y, Color[1],0,0,0,0)then // to
if FindColorSpiral(x,y, Color[P],MSX1,MSY1,MSX2,MSY2)then

beacuse it would only be searching for color[1] and in a box with an area of ZERO the way you have it
MSX1,MSY1,MSX2,MSY2 will search the entire main RS screen. You can decrease it to the coords you want if you want to be more precise on where to look.

and also you should change

ClickOption('fea',1); //to
ChooseOption('ake');

[Sumilion]

if FindColorSpiral(x,y, Color[1],0,0,0,0)then

Your always searching for Color[1], you should be searching for Color[P].

Also, your searching in the area 0, 0, 0, 0, so that is nothing...

Try :

MSX1, MSY1, MSX2, MSY2

[TheSantaMan]

ok thanks alot lol, that's basic i forgot :P

[ShowerThoughts]

is the 'Missed the feathers' part in your debug box or does it not work at all?


and I think you want to change

[SCAR]
and also you should change

ClickOption('fea',1); //to
ChooseOption('ake');

not to take if you do that it will take stuff iwth the same color

[Derek-]

That's why you use the IsUpText function.. So you don't click something that's not a feather