need help with a script

Discussion in 'Scar/Simba Help' started by konrad112, Mar 29, 2008.

need help with a script
  1. Unread #1 - Mar 29, 2008 at 4:59 AM
  2. konrad112
    Referrals:
    0

    konrad112 Guest

    need help with a script

    hey guys i found a woodcutter script off a friend. idk where he got it. but when i use it, i get about 10 cuts then it just freezes up

    i was wondering if its a problem with the script or if its just me.


    well if anyone can help here is the script


    program TreeKiller;
    const
    TreeClr = 1256488;
    TreeClr1 =862242;
    TreeClr2 =2575942;
    AtkClr =192;
    Var
    xx, yy, x, y: Integer;

    begin
    repeat
    if(FindColor(xx,yy, AtkClr, 0, 0, 763, 499))then
    begin
    MouseBox(641, 11, 641, 11);
    Wait(200);
    ClickMouse(641, 11, true);
    end;
    if(FindColor(xx, yy, TreeClr, 0, 0, 763, 499))then
    begin
    GetMousePos(x,y);
    MouseBox(xx, yy,xx, yy)
    Wait(500 + random (750));
    ClickMouse(xx, yy, true)
    Wait(3000);
    MouseBox(0,0,764,502)
    Wait(500 + random (750));
    MouseBox(573,228,573,228);
    Wait(1000);
    ClickMouse(573,228,false);
    Wait(3000);
    MouseBox(551,272,551,272);
    Wait(1000);
    ClickMouse(551,272,true);
    end;
    if(FindColor(xx, yy, TreeClr1, 0, 0, 763, 499))then
    begin
    GetMousePos(x,y);
    MouseBox(xx, yy,xx, yy)
    Wait(500 + random (750));
    ClickMouse(xx, yy, true)
    Wait(3000);
    MouseBox(0,0,764,502)
    Wait(500 + random (750));
    MouseBox(573,228,573,228);
    Wait(1000);
    ClickMouse(573,228,false);
    Wait(3000);
    MouseBox(551,272,551,272);
    Wait(1000);
    ClickMouse(551,272,true);
    end;
    if(FindColor(xx, yy, TreeClr2, 0, 0, 763, 499))then
    begin
    GetMousePos(x,y);
    MouseBox(xx, yy,xx, yy)
    Wait(500 + random (750));
    ClickMouse(xx, yy, true)
    Wait(3000);
    MouseBox(0,0,764,502)
    Wait(500 + random (750));
    MouseBox(573,228,573,228);
    Wait(1000)
    ClickMouse(573,228,false);
    Wait(3000);
    MouseBox(551,272,551,272);
    Wait(1000);
    ClickMouse(551,272,true);
    end;
    Until(false);
    end.


    thanks for your help
     
< need help with SCAR | Im new, and this error comes up.. >

Users viewing this thread
1 guest


 
 
Adblock breaks this site