Page 27 of 87 FirstFirst ... 1725262728293777 ... LastLast
Results 651 to 675 of 2158

Thread: [Reflection] ineedbot's AIO Woodcutter

  1. #651
    Join Date
    Mar 2013
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    lol just been staring at the trees for like 20 mins and it doesnt do anything =/

  2. #652
    Join Date
    Mar 2013
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    If it is just staring at trees:
    Reset the script and re-run it. Also, try to keep clicking 'Disable SMART' to a minimum. This causes the script to mess up and do random things.

    If that doesn't work just delete the file you downloaded and re-download it.

    If it still does not work, set up SMARTv8.0 (Click here for video guide) and then at the beginning of the script change
    Code:
    {$DEFINE SMART}
    To:
    Code:
    {$DEFINE SMART8}
    And if that still doesn't work, post please.
    Do not forget to go to line 143 and replace
    Code:
    P07_ChooseOptionMulti(['se-q']);
    With this
    Code:
    P07_ChooseOptionMulti(['ank']);
    Which enables banking.
    Last edited by old dougie; 03-24-2013 at 03:30 AM.

  3. #653
    Join Date
    Mar 2013
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    I was using the bot all day but now I get, "Invalid number of parameters at line 165" and it shows this by opening another tab in simba called "mouse". Anyone get this issue? It just happened out of nowhere.

  4. #654
    Join Date
    Mar 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by lemon tree View Post
    I was using the bot all day but now I get, "Invalid number of parameters at line 165" and it shows this by opening another tab in simba called "mouse". Anyone get this issue? It just happened out of nowhere.
    I just got this error as well.

  5. #655
    Join Date
    Nov 2007
    Posts
    127
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    [Error] D:\Simba\Includes\SRL/SRL/core/mouse.simba(166:36): Invalid number of parameters at line 165
    Compiling failed.
    [Error] D:\Simba\Includes\SRL\SRL\core\mouse.simba(178:36) : Invalid number of parameters at line 177

    Getting issue too recently, seems like RS updated?

  6. #656
    Join Date
    Mar 2013
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    I got an error similar to that earlier.. The only thing I did was set up SMART 8 and define it in the script.

  7. #657
    Join Date
    Feb 2013
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Default

    same error...

  8. #658
    Join Date
    Dec 2012
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    I think everyone is getting [Error] C:\Simba\Includes\SRL/SRL/core/mouse.simba(166:36): Invalid number of parameters at line 165
    Compiling failed.

  9. #659
    Join Date
    Mar 2013
    Posts
    21
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    Glad to see it wasn't just me. I've been using it all day as well. Recently been getting the same error. I'm using the Lumby Deathwalk to Rat script as well and it's giving me the same error as well.

  10. #660
    Join Date
    Mar 2013
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    HEY!YOU GUYS GETTING THAT MOUSE ERROR RIGHT LMFAOOO WELL TO FIX IT YOU GOTTA GO TO YOUR C FOLDER THEN SIMBA THEN INCLUDES SRL THEN SRL AGAIN THEN CORE LOL AFTER THAAT CLICK MOUSE.SIMBA AND DELETE ALL THAT CRAP IN THERE AND PASTE THIS INTO IT THAT SHOULD DO IT

    (*

    Mouse
    =====

    Mouse routines.

    .. contents::

    *)


    // TODO: Constant/Var docs
    var
    MouseSpeed: Integer;

    {$IFDEF UseLaptopMouse}
    LMouse_MissChance: Integer;
    {$ENDIF}

    const
    mouse_move = 3;
    (*
    WindMouse
    ~~~~~~~~~

    .. code-block:: pascal

    procedure WindMouse(xs, ys, xe, ye, gravity, wind, minWait, maxWait, maxStep, targetArea: extended);

    Moves the mouse along a spline defined by

    .. note::

    by Benland100

    Example:

    .. code-block:: pascal



    *)
    procedure WindMouse(xs, ys, xe, ye, gravity, wind, minWait, maxWait, maxStep, targetArea: extended);
    var
    veloX, veloY, windX, windY, veloMag, dist, randomDist, lastDist, step: extended;
    lastX, lastY: integer;
    sqrt2, sqrt3, sqrt5: extended;
    begin
    try
    sqrt2:= sqrt(2);
    sqrt3:= sqrt(3);
    sqrt5:= sqrt(5);
    while hypot(xs - xe, ys - ye) > 1 do
    begin
    dist:= hypot(xs - xe, ys - ye);
    wind:= minE(wind, dist);
    if dist >= targetArea then
    begin
    windX:= windX / sqrt3 + (random(round(wind) * 2 + 1) - wind) / sqrt5;
    windY:= windY / sqrt3 + (random(round(wind) * 2 + 1) - wind) / sqrt5;
    end else
    begin
    windX:= windX / sqrt2;
    windY:= windY / sqrt2;
    if (maxStep < 3) then
    begin
    maxStep:= random(3) + 3.0;
    end else
    begin
    maxStep:= maxStep / sqrt5;
    end;
    end;
    veloX:= veloX + windX;
    veloY:= veloY + windY;
    veloX:= veloX + gravity * (xe - xs) / dist;
    veloY:= veloY + gravity * (ye - ys) / dist;
    if hypot(veloX, veloY) > maxStep then
    begin
    randomDist:= maxStep / 2.0 + random(round(maxStep) div 2);
    veloMag:= sqrt(veloX * veloX + veloY * veloY);
    veloX:= (veloX / veloMag) * randomDist;
    veloY:= (veloY / veloMag) * randomDist;
    end;
    lastX:= Round(xs);
    lastY:= Round(ys);
    xs:= xs + veloX;
    ys:= ys + veloY;
    if (lastX <> Round(xs)) or (lastY <> Round(ys)) then
    MoveMouse(Round(xs), Round(ys));
    step:= hypot(xs - lastX, ys - lastY);
    wait(round((maxWait - minWait) * (step / maxStep) + minWait));
    lastdist:= dist;
    end;
    if (Round(xe) <> Round(xs)) or (Round(ye) <> Round(ys)) then
    MoveMouse(Round(xe), Round(ye));
    except
    end;
    end;

    (*
    MMouse
    ~~~~~~

    .. code-block:: pascal

    procedure MMouse(x, y, rx, ry: integer);

    Moves the mouse. rx and ry are total range of the randomness for the mouse. i.e. if rx:=6 then the randomness of the mouse will be from x-3 to x+3.

    .. note::

    by Benland100, laptop mouse by Hobbit (and nielsie95)

    Example:

    .. code-block:: pascal

    *)
    procedure MMouse(x, y, rx, ry: integer);
    var
    cx, cy, halfRx, halfRy : integer;
    randSpeed: Extended;
    {$IFDEF UseLaptopMouse}
    seg, e, f, g, nx, ny, hypo: Integer;
    a, b, c: Extended;
    Miss: Boolean;
    {$ENDIF}
    begin
    GetMousePos(cx, cy);
    halfRx := rx / 2;
    halfRy := ry / 2;
    {$IFDEF UseLaptopMouse}
    miss := (Random(LMouse_MissChance) = 0);
    e:= 0;
    a:= x - cx;
    b:= y - cy;
    c:= Pow(a,2) + Pow(b,2)
    hypo:= Round(Sqrt(c));
    case hypo of
    0: Exit;
    1..225: seg:=1;
    226..600: seg:= Random(2) + 1;
    601..1800: seg:= random(3) + 2;
    else seg := 5;
    end;
    f := Round( a / seg);
    g := Round( b / seg);
    repeat
    Wait(30 + random(50));
    {Begin: Modified from MMouse by Benland100}
    randSpeed := (random(MouseSpeed) / 2.0 + MouseSpeed) / 10.0;
    if randSpeed = 0.0 then
    randSpeed := 0.1;
    getMousePos(cx,cy);
    nx:= (cx + (f * e)) + randomrange(-halfRx,halfRx);
    ny:= (cy + (g * e)) + randomrange(-halfRy,halfRy);
    {End: Modified from MMouse by Benland100}
    if Miss then
    begin
    nx:= nx + RandomRange(rx, rx * 2);
    ny:= ny + RandomRange(ry, ry * 2);
    end;
    WindMouse(cx,cy,nx,ny,11.0,8.0,10.0/randSpeed,12.0/randSpeed,10.0*randSpeed,10.0*randSpeed);
    e:= e + 1;
    until(e = seg);
    GetMousePos(cx, cy);
    if not PointInBox(Point(cx, cy), IntToBox(x, y, x + rx, y + ry)) then
    begin
    Wait(30 + random(30));
    WindMouse(cx,cy,(x + random(rx)),(y + random(ry)),11.0,6.0,10.0/randSpeed,15.0/randSpeed,10.0*randSpeed,10.0*randSpeed);
    end;
    {$ELSE}
    randSpeed:= (random(MouseSpeed) / 2.0 + MouseSpeed) / 10.0;
    if randSpeed = 0.0 then
    randSpeed := 0.1;
    X := x + RandomRange(-halfRx,halfRx);
    Y := y + RandomRange(-halfRy,halfRy);
    WindMouse(cx,cy,x,y,9.0,3.0,10.0/randSpeed,15.0/randSpeed,10.0*randSpeed,10.0*randSpeed);
    {$ENDIF}
    end;

    (*
    ClickMouse2
    ~~~~~~~~~~~

    .. code-block:: pascal

    procedure ClickMouse2(button: variant);

    Clicks the mouse in a human way on the current mouse spot.

    .. note::

    by SRL Community

    Example:

    .. code-block:: pascal

    *)
    procedure ClickMouse2(button: variant);
    var
    a,b,c : integer;
    iButton: Integer;
    begin
    { Eventually, should be made to just use Integers }
    if VariantIsBoolean(button) then
    begin
    if (button) then
    iButton := mouse_left
    else
    iButton := mouse_right;
    end else
    iButton := button;

    if (iButton = mouse_move) then Exit; { we aren't actually clicking! }

    GetMousePos(b, c);

    HoldMouse(b, c, iButton);
    repeat
    Wait(20 + Random(30));
    a := a + 1;
    until (a > 4);
    GetMousePos(b, c);
    ReleaseMouse(b, c, iButton);
    Wait(50+Random(50));
    end;

    (*
    Mouse
    ~~~~~

    .. code-block:: pascal

    procedure Mouse(mousex, mousey, ranx, rany: Integer; button: variant);

    Moves then clicks mouse (will only move if 'mouse_move' passed).

    .. note::

    by Mutant Squirrle, Harry

    Example:

    .. code-block:: pascal

    *)
    procedure Mouse(mousex, mousey, ranx, rany: Integer; button: variant);
    begin
    MMouse(mousex, mousey, ranx, rany);
    Wait(60 + Random(30));
    ClickMouse2(button);
    Wait(50 + Random(50));
    end;

    (*
    MouseBox
    ~~~~~~~~

    .. code-block:: pascal

    procedure MouseBox(x1, y1, x2, y2: Integer; ClickType: Integer);

    Moves mouse into a random position in the box. Clicks if told to.

    .. note::

    by Nava2

    Example:

    .. code-block:: pascal

    *)
    procedure MouseBox(x1, y1, x2, y2: Integer; ClickType: Integer);
    var
    fx, fy: Integer;
    begin
    GaussBox(fx, fy, x1, y1, x2, y2);

    if InRange(ClickType, mouse_Right, mouse_move) then
    Mouse(fx, fy, 0, 0, clickType)
    else
    srl_Warn('MouseBox', 'ClickType is NOT a valid number!', warn_AllVersions);
    end;

    (*
    MouseTBox
    ~~~~~~~~~

    .. code-block:: pascal

    procedure MouseTBox(Box: TBox; ClickType: variant);

    Moves the mouse to the Indicated Box, and performs the ClickType

    .. note::

    by PhaseCode

    Example:
    Mouse(InvBox(1),1);
    .. code-block:: pascal

    *)
    procedure MouseTBox(Box: TBox; ClickType: variant);
    begin
    MouseBox(Box.X1, Box.Y1, Box.X2, Box.Y2, ClickType)
    end;

    procedure MouseAction(mx, my, rx, ry: Integer; a: fnct_ActionOptions);
    begin
    case (a) of
    Move: MMouse(mx, my, rx, ry);
    ClickLeft: Mouse(mx, my, rx, ry, mouse_left);
    ClickRight: Mouse(mx, my, rx, ry, mouse_right);
    ClickMiddle: Mouse(mx, my, rx, ry, mouse_middle);
    end;
    end;

    (*
    SleepAndMoveMouse
    ~~~~~~~~~~~~~~~~~

    .. code-block:: pascal

    procedure SleepAndMoveMouse(Time: Integer);

    Waits for specified time and moves mouse around like bored human would.

    .. note::

    by RsN

    Example:

    .. code-block:: pascal

    *)
    procedure SleepAndMoveMouse(Time: Integer);
    var
    Moving: Boolean;
    mx, my: Integer;
    x, y, xv, yv: Extended;
    gx, gy: Extended;
    T: Integer;
    begin
    GetMousePos(mx, my);
    x := mx;
    y := my;
    if (Random(2) = 0) then
    Moving := False
    else
    Moving := True;
    gx := 130 + Random(500);
    gy := 130 + Random(300);
    T := GetTickCount;
    repeat
    Sleep(10);
    if (Moving) then
    begin
    if (gx > x) then
    xv := xv + 0.1
    else
    xv := xv - 0.1;
    if (gy > y) then
    yv := yv + 0.1
    else
    yv := yv - 0.1;
    x := x + xv;
    y := y + yv;
    MoveMouse(Round(x), Round(y));
    end;
    if (Random(100) = 0) then
    Moving := not Moving;
    if (Random(30) = 0) then
    begin
    gx := 130 + Random(500);
    gy := 130 + Random(300);
    end;
    until (Abs(GetTickCount - T) >= Time);
    end;

    (*
    IdleTime
    ~~~~~~~~

    .. code-block:: pascal

    procedure IdleTime(Time, Rand: integer; Gravity: extended);

    Randomly moves the mouse (Rand, and Gravity) for Time milliseconds

    .. note::

    by BenLand100

    Example:

    .. code-block:: pascal

    *)
    procedure IdleTime(Time, Rand: Integer; Gravity: Extended);
    var
    H, W, Cx, Cy, i, n, St: Integer;
    Controls, Path: TPointArray;
    LastC, LastP: TPoint;
    begin
    St := GetSystemTime;
    GetClientDimensions(W, H);
    SetArrayLength(Controls, 4);
    GetMousePos(Cx, Cy);
    LastP.x := Cx;
    LastP.y := Cy;
    LastC.x := LastP.x + (Random(Rand * 2) - Rand);
    LastC.y := LastP.y + (Random(Rand * 2) - Rand);
    repeat
    Controls[0].x := LastP.x;
    Controls[0].y := LastP.y;
    Controls[1].x := LastP.x + -(LastC.x - LastP.x);
    Controls[1].y := LastP.y + -(LastC.y - lastP.y);
    Controls[2].x := Controls[1].x + (Random(Rand * 2) - Rand);
    Controls[2].y := Controls[1].y + (Random(Rand * 2) - Rand);
    Controls[3].x := Controls[2].x + (Random(Rand * 2) - Rand);
    Controls[3].x := Controls[3].x + Round(-(Controls[3].x - (W / 2)) *
    (Gravity));
    Controls[3].y := Controls[2].y + (Random(Rand * 2) - Rand);
    Controls[3].y := Controls[3].y + Round(-(Controls[3].y - (H / 2)) *
    (Gravity));
    LastC.x := Controls[2].x;
    LastC.y := Controls[2].y;
    LastP.x := Controls[3].x;
    LastP.y := Controls[3].y;
    Path := MakeSplinePath(Controls, 0.01);
    Path := MidPoints(Path, 5);
    n := GetArrayLength(Path);
    for i := 0 to n - 1 do
    begin
    MoveMouse(Path[i].x, Path[i].y);
    Wait(Random(2) + 2);
    if (GetSystemTime - St >= Time) then Break
    end;
    until (GetSystemTime - St >= Time)
    end;

    function WaitUpTextMulti(S: TStringArray; Time: Integer): Boolean; Forward;

    (*
    SpiralMouseMulti
    ~~~~~~~~~~~~~~~~

    .. code-block:: pascal

    function SpiralMouseMulti(var fx, fy: Integer; x1, y1, x2, y2: Integer; UpText: TStringArray; PpC, aInc: Integer): Boolean;

    Spirals the mouse in a circle from the center of the defined box.
    It will continue to spiral until it finds a spiral completely outside
    the box, always skipping points outside.
    Returns the occurance of the first occurance of UpText into fx, fy.
    Takes multiple UpTexts as a TStringArray.
    PpC: The number of pixels to increase per spiral.
    aInc: The number of stops to make around each spiral.
    Takes some testing to get the right combination of PpC and aInc.

    .. note::

    by Nava2

    Example:

    .. code-block:: pascal

    *)
    function SpiralMouseMulti(var fx, fy: Integer; x1, y1, x2, y2: Integer; UpText: TStringArray; PpC, aInc: Integer): Boolean;
    var
    aStep, a, rStep, rV, oB: Extended;
    pX, pY, ms: Integer;
    sP: TPoint;
    L2R: Boolean;
    begin
    Result := False;
    ms := MouseSpeed;
    MouseSpeed := 25 + RandomRange(-3, 3);
    sP := MiddleTPA([Point(x1, y1), Point(x2, y2)]);
    aStep := Pi / (aInc / 2);
    a := 0;
    rStep := (PpC / aInc);
    L2R := Random(2) = 0;
    //Writeln('aStep: ' + FloatToStr(aStep) + ' rStep ' + FloatToStr(rStep));
    repeat
    rV := rV + rStep;
    pX := Round(rV * cos(a)) + sP.x;
    pY := Round(rV * sin(a)) + sP.y;
    if L2R then
    a := a + aStep
    else
    a := a - aStep;
    if InRange(pX, x1, x2) and InRange(pY, y1, y2) then
    begin
    oB := 0;
    MMouse(pX - 2, pY - 2, 5, 5);
    if WaitUpTextMulti(UpText, 300) then
    begin
    GetMousePos(fx, fy);
    Result := True;
    end;
    end else
    oB := oB + aStep;
    until Result or (oB > (2 * Pi));
    MouseSpeed := ms;
    end;

    (*
    SpiralMouse
    ~~~~~~~~~~~

    .. code-block:: pascal

    function SpiralMouse(var fx, fy: Integer; x1, y1, x2, y2: Integer; UpText: String; PpC, aInc: Integer): Boolean;

    Spirals the mouse in a circle from the center of the defined box.
    It will continue to spiral until it finds a spiral completely outside
    the box, always skipping points outside.
    Returns the occurance of the UpText into fx, fy.
    See `SpiralMouseMulti` for more information
    .. note::

    by Nava2

    Example:

    .. code-block:: pascal

    *)
    function SpiralMouse(var fx, fy: Integer; x1, y1, x2, y2: Integer; UpText: String; PpC, aInc: Integer): Boolean;
    begin
    Result := SpiralMouseMulti(fx, fy, x1, y1, x2, y2, [UpText], PpC, aInc);
    end;


    (*
    DidClick
    ~~~~~~~~

    .. code-block:: pascal

    function DidClick(Red: Boolean; Time: integer): boolean;

    Checks for the X after a click, Times Out after Time.
    DidClick Time must be at LEAST 200 now.

    .. note::

    by Rasta Magician
    Modded by Narcle on Feb. 4th, 2012

    Example:

    .. code-block:: pascal

    *)
    function DidClick(Red: Boolean; Time: integer): boolean;
    var
    TimeOut, x, y, w, h, R, G: integer;
    B: TBox;
    begin
    GetMousePos(x, y);
    GetClientDimensions(w, h);
    B := IntToBox(x - 15, y - 15, x + 15, y + 15);
    if B.x1 < 0 then B.x1 := 0;
    if B.y1 < 0 then B.y1 := 0;
    if B.x2 > w then B.x2 := w;
    if B.y2 > h then B.y2 := h;
    TimeOut := GetSystemTime + Time;
    while (GetSystemTime < TimeOut) do
    begin
    R := CountColorTolerance(395675, B.x1, B.y1, B.x2, B.y2, 15);
    G := CountColorTolerance(1695663, B.x1, B.y1, B.x2, B.y2, 15);
    if Red then
    begin
    if (G > 8) then
    Exit;
    Result := (R > 20);
    end else
    begin
    if (R > 5) then
    Exit;
    Result := (G > 35);
    end;
    if Result then
    Exit;
    end;
    end;

    (*
    DidRedClick
    ~~~~~~~~~~~

    .. code-block:: pascal

    function DidRedClick: Boolean;

    Checks for the Red X after a Click, Times out after 500 ms

    .. note::

    by Rasta Magician

    Example:

    .. code-block:: pascal

    *)
    function DidRedClick: Boolean;
    begin
    Result := DidClick(true, 1000);
    end;

    (*
    DidYellowClick
    ~~~~~~~~~~~~~~

    .. code-block:: pascal


    function DidYellowClick: Boolean;

    Checks for the Yellow X after a Click, Times out after 500 ms

    .. note::

    by Rasta Magician

    Example:

    .. code-block:: pascal

    *)
    function DidYellowClick: Boolean;
    begin
    Result := DidClick(false, 1000);
    end;

    (*
    MouseOval
    ~~~~~~~~~

    .. code-block:: pascal

    procedure MouseOval(cx, cy, mx, my, clickType: Integer);

    Clicks a random point within an oval shape.
    * cx, cy: The center point of the oval.
    * rx, ry: X and Y radius of the oval.
    * clickType: mouse_Move, mouse_Left, mouse_Right, or mouse_Middle.

    .. note::

    by mixster
    Last Updated: Unknown.

    Example:

    .. code-block:: pascal

    *)
    procedure MouseOval(cx, cy, rx, ry, clickType: Integer);
    var
    o: TPoint;
    begin
    if not InRange(clickType, 0, 3) then
    begin
    srl_Warn('MouseOval', 'ClickType is NOT a valid number!', warn_AllVersions);
    exit;
    end;

    o.y := Random(ry) * ((Random(2) * 2) - 1);
    o.x := Random(Round(Sqrt(Sqr(ry) - Sqr(o.y)) * rx / ry)) * ((Random(2) * 2) - 1);

    case clickType of
    mouse_right..mouse_middle: Mouse(cx + o.x, cy + o.y, 0, 0, clickType);
    mouse_move: MMouse(cx + o.x, cy + o.y, 0, 0);
    end;
    end;

    (*
    MouseCircle
    ~~~~~~~~~~~

    .. code-block:: pascal

    procedure MouseCircle(MidX, MidY, Radius, clickType: Integer);

    Same as MouseOval, but clicks within a circle instead.

    .. note::

    by mixster
    Last Updated: Mar. 21st, 2012 by Coh3n

    Example:

    .. code-block:: pascal

    *)
    procedure MouseCircle(MidX, MidY, Radius, clickType: Integer);
    begin
    MouseOval(MidX, MidY, Radius, Radius, clickType);
    end;

    (*
    MouseBoxEx
    ~~~~~~~~~~

    .. code-block:: pascal

    procedure MouseBoxEx(x1, y1, x2, y2: Integer; Dist,ClickType: Integer);

    Does mouse stuff (ClickType), and uses a point that is within Dist from
    the closest point between mouse and the box.

    .. note::

    by Raymond

    Example:

    .. code-block:: pascal

    *)
    procedure MouseBoxEx(x1, y1, x2, y2: Integer; Dist,ClickType: Integer);
    var
    PT : TPoint;
    begin
    GetMousePos(pt.x,pt.y);
    PT := RandomPointBoxEx(pt,inttobox(x1,y1,x2,y2),Dist);
    case ClickType of
    mouse_right..mouse_middle : Mouse(pt.x, pt.y, 0, 0, clickType);
    mouse_move : MMouse(pt.x, pt.y, 0, 0);
    else
    srl_Warn('MouseBox', 'ClickType is NOT a valid number!', warn_AllVersions);
    end;
    end;

    (*
    DragMouse
    ~~~~~~~~~

    .. code-block:: pascal

    procedure DragMouse(StartX, StartY, SRandX, SRandY, EndX, EndY, ERandX, ERandY: Integer);

    Leftclicks StartX, StartY and drags mouse to EndX, EndY.

    .. note::

    by NaumanAkhlaQ

    Example:

    .. code-block:: pascal

    *)
    procedure DragMouse(StartX, StartY, SRandX, SRandY, EndX, EndY, ERandX, ERandY: Integer);
    begin
    MMouse(StartX, StartY, SRandX, SRandY);
    Wait(150 + Random(20));
    GetMousePos(StartX, StartY);
    HoldMouse(StartX, StartY, mouse_left);
    Wait(250 + Random(320));
    MMouse(EndX, EndY, ERandX, ERandY);
    Wait(250 + Random(120));
    GetMousePos(EndX, EndY);
    ReleaseMouse(EndX, EndY, mouse_left);
    end;

    (*
    DragMouseTBox
    ~~~~~~~~~~~~~

    .. code-block:: pascal

    procedure DragMouseTBox(StartBox, EndBox: TBox);

    Left clicks a point within StartBox and drags mouse to a point within EndBox,
    of which the points selected follows a normal distribution from the centre of the box.


    .. note::

    by riwu, modelled after DragMouse by NaumanAkhlaQ

    Example:

    .. code-block:: pascal

    *)
    procedure DragMouseTBox(StartBox, EndBox: TBox);
    var
    StartX, StartY, EndX, EndY: Integer;
    begin
    MouseTBox(StartBox, mouse_move);
    Wait(150 + Random(20));
    GetMousePos(StartX, StartY);
    HoldMouse(StartX, StartY, mouse_left);
    Wait(250 + Random(320));
    MouseTBox(EndBox, mouse_move);
    Wait(250 + Random(120));
    GetMousePos(EndX, EndY);
    ReleaseMouse(EndX, EndY, mouse_left);
    end;

  11. #661
    Join Date
    Mar 2013
    Posts
    15
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    [Error] C:\Simba\Includes\SRL/SRL/misc/SmartParams.Simba(295:135): Invalid number of parameters at line 294

    getting this error. just downloaded the script

  12. #662
    Join Date
    Jan 2012
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    Quote Originally Posted by exonyte View Post
    [Error] C:\Simba\Includes\SRL/SRL/misc/SmartParams.Simba(295:135): Invalid number of parameters at line 294

    getting this error. just downloaded the script
    Follow the instructions on the first page. you have to download the includes and put them in the correct files.

    __________________________________________________ __________________________________________________ __________________________________________________ ____________________

    I have a sugestion for the script

    Perhaps when you tele'd to a random location as a result of a failed random event, the script could tele you back to lumby and walk back to draynor.. just an idea.

  13. #663
    Join Date
    Mar 2013
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Noticed that it moved too quick to click everything, thinking that's why it banks axe after around 300-450 logs. Nice script though.

  14. #664
    Join Date
    Mar 2013
    Posts
    12
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Is anyone else having this problem? After 5 minutes of botting it just stops...

  15. #665
    Join Date
    Mar 2013
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Default

    Umm.. it's loading EOC rather than old school now. Last night it was working fine so I don't know what to do about this now... anyone else getting this, or can help?

  16. #666
    Join Date
    May 2012
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Quote Originally Posted by weweregiants View Post
    Umm.. it's loading EOC rather than old school now. Last night it was working fine so I don't know what to do about this now... anyone else getting this, or can help?
    You need to setup bot again for 07 like you did at the start, it updates randomly sometimes download the sticky files and place them in simba etc

  17. #667
    Join Date
    Mar 2013
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Default

    You mean the attatched files? Just did that and same thing. Am I the only one getting this problem? ;/

  18. #668
    Join Date
    Mar 2013
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Default

    Would it help if I posted my current script as is?

  19. #669
    Join Date
    Mar 2013
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    17 Post(s)

    Default

    Actually, I believe I have fixed it. I had to reinstall Smart Params again... so if anyone else is getting this problem, that should do it.

  20. #670
    Join Date
    Mar 2013
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    I was having the same problem and I just re-downloaded the 07 include, replaced the original 07include... and smart is still loading EOC. sorry if i'm too noobish to figure this one out but would really appreciate and help or advice


    edit:
    Quote Originally Posted by weweregiants View Post
    Actually, I believe I have fixed it. I had to reinstall Smart Params again... so if anyone else is getting this problem, that should do it.
    i will try this now thanks

    edit again:

    YES THIS WORKED!
    Last edited by hcmichael21; 03-24-2013 at 03:44 PM.

  21. #671
    Join Date
    Jan 2013
    Posts
    17
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    The bot doesn't have an issue woodcutting but when it tries to bank it has a hard time right clicking and banking. It doesn't have an issue with the bankDTM itself, don't know what the issue is.

  22. #672
    Join Date
    May 2012
    Location
    John's Creek, Georgia, United States
    Posts
    392
    Mentioned
    0 Post(s)
    Quoted
    86 Post(s)

    Default

    Quite Good. Just a bit choppy when it gets to the bank. Would put some more failsafes. Other than that its great!

  23. #673
    Join Date
    Mar 2013
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    banking needs to be fixed but it cuts fine

  24. #674
    Join Date
    May 2012
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I left this bot on and went to bed, woke up with 800 maple logs! Thank you very very much for this great script.

  25. #675
    Join Date
    Mar 2013
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    works good, although my axe got broken twice and including some anti randoms would help alot

Page 27 of 87 FirstFirst ... 1725262728293777 ... LastLast

Thread Information

Users Browsing this Thread

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

Posting Permissions

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