Bugs and issues in current version: 1.2
1)There is a bug With SafeSPot-walking failure Detection!, the solution is simple: head to line 1737 (or search Procedure Curseloop; and delete the following lines: 1741, 1742 & 1801.
Simba Code:
if (AtSafeSpot and (not(getHpBarAbove)) and (meleer)) then // line 1741
begin // 1742
And the end; on line 1801:
Simba Code:
end; // 1801 delete this
end; // 1802 leave this.
That way the script will know to kick out of the loop if it cant find the monster/failed to reach safe spot!
------------------------
2)Edit.2: Do not use EntranceMode No.1, this mode leads to crashes, it needs to instantly find the cave and enter/get cave message, if it continues to search for it, it will reach an out of range Error. Use Entrance Mode No.2!
---------------------------------------------
3)Edit.3: Found another bug that can cause a crash, another simple bug, one line:
Forget the past fix, it still can cause an out of range error, i am not sure if this works but just try to copy paste the locate monster function, simply press control f and search then press Minus and just copy paste the new one:
Simba Code:
Function LocateMonster(Color:TintegerArray; Tol,CTS:integer; hMoD,sMoD:Extended; Uptext: Array of String): Boolean;
var
R,ii,X,y,i,tmpcts:integer;
TPA:Tpointarray;
ATPA:T2DPointArray;
Boxm :tbox;
begin
if (not(Loggedin)) then exit;
if (not(meleer)) then exit;
if (findbanksymbol) then exit;
if findtherandoms and findtalk2 then
findnormalrandoms;
MouseSpeedz;
FindIfonMagetab;
Mouse(RandomRange(663, 670),RandomRange(260, 265), random(1),random(1),mouse_move);
if WaitUpTextMulti2(['Curse'],300) then
begin
clickmouse2(mouse_left);
waitshortclick;
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(CTS);
SetColorSpeed2Modifiers(hMoD, sMoD);
FindColorsTolerance(TPA, Color[ii], MSX1, MSY1, MSX2, MSY2, Tol);
ColorToleranceSpeed(tmpCTS);
setColorSpeed2Modifiers(0.2, 0.2);
if Length(TPA) < 0 then exit;
if (Length(TPA) > 0) and (Length(TPA) < 100) then
setangle(1);
case random (10) of
0..7: begin
end;
8..10:begin
R := Random(GetArrayLength(ATPA));
DeleteValueInTPA(TPA, R);
end;
end;
SplitTPAWrap(TPA,10,ATPA);
Boxm := GetATPABounds(ATPA);
case random (500) of
0..480: SortATPASize(ATpA,true);
481..499: SortATPAFromFirstPoint(ATPA,IntToPoint(MSCX,MSCY));
end;
for I := 0 to HIGH(ATPA) do
begin
mousespeedz;
MiddleTPAEx(ATPA[i], X, Y);
MMouse(x, y, RandomRange(-17, 17), RandomRange(-17, 17));
if WaitUpTextMulti2(['Curse'],300) then
begin
wait(randomrange(90,120));
clickmouse2(mouse_left);
if Didclick(true,1000) then
begin
IncEx(cast,29);
if (dosmartprogress = true) then
SmartProggy;
progressreport;
case playermode of
1: begin
case random (100) of
0..80: begin
end;
81..100:Antiban;
end;
case random (50) of
0..42: waitafterCast;
43..48: waithumanclick2;
end;
end;
2: begin
end;
end;
result := true;
exit;
end
else
begin
inc(Failcast);
exit;
end;
end
else
begin
inc(failcast);
end;
end;
end;
end;
No guarantee this will work, i am very paranoid atm about botting at fight caves, tbh just wait for a while before you bot there and if you do, dont let it run for too long. So i cant continue testing + i ran it for 24 hours...Only thing that can mess up the script is pretty much high CPU, the script uses low CPU but if you run youtube/play other games with a low end machine it will reach high cpu and lead to mess up, one thing you can do is raise the slider but that for me doesnt really do anything.
Originally Posted by Parapa6
will do that (might try tomorrow but idk when).. Still got another script to finalize
