are you going to be keeping this script updated?
Am I the only one who can't run this script for more than an hour without it fucking up? It's either entrance cannot be found, or the antirandom thing crashes it. Brightness is maxed everything else min.
Error: Exception: Mask is invalid. Width/Height: (9,6). WhiteHi/BlackHi: (-1,53) at line 778
The following DTMs were not freed: [SRL - Lamp bitmap, SRL - Book of Knowledge]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Minimap Mask bitmap]
Last edited by harman890; 04-30-2013 at 01:06 AM.
This is script is amazing though. Will run 8+ hours especially on pures or low levels.
373553 Current Str xp
1:42 AM <- Started Script
running for the first time
Will check back in when I wake up in a few hours![]()
Is there a way to deactivate randoms for this? I remember back in late March, early April I used mxFightCaves and would run it for 10+ hours a day easily because no randoms were implemented and the bot would escape the randoms by entering the cave.
My character just walks for 1 second, and logs out. Can someone help me?
Last edited by Someluser; 04-30-2013 at 01:01 PM.
*****Nebula Fight Caves*****
Running For: 18 Hours, 49 Minutes and 41 Seconds
Attack XP Gained: 0
Attack XP Per Hour: 0
Hitpoints XP Gained: 0
Hitpoints XP Hour: 0
*************************
Great script, though proggy still doesn't work. Ran it for 18 hours and it got me from 61-67 ranged! Thanks<3
Just wanted to say nice script, but like many others have said, is there any way to fix the problem where he gets stuck in the corner where there's no monsters? Like the scripts detects that the player is not in combat, and will move further into the map or in the middle. Please respond as there is many other people with this problem and fixing this would make the script flawless. Again, thx for the script.
Great script dude! got me 42-48 str so far
So many levels Tzhars wana find me
Amazing script man! Love it
12k tokkul
Code:*****Nebula Fight Caves***** Running For: 14 Hours, 18 Minutes and 40 Seconds Strength XP Gained: 104600 Strength XP Per Hour: 7309 Hitpoints XP Gained: 26150 Hitpoints XP Hour: 1827 *************************
Is it normal to earn 7k xp/h at lvl 50 range?
good script only one problem and it will happen to players that have higher defence or players that get to higher waves from the ranged monsters, causes players to get stuck in corners.
does this still work good if your a low level??
i had the same problem with randoms, not sure how to remove them so if u tell us that would be cool : )
i died twice already :\
script doesn't work anymore since today's update with the logout/pause system of firecaves :'(
please fix this <3
Edit : had no idea what I was doing and didn't work for me after posting so I decided to delete. It's something to do with clicktocontinue; somewhere in the script I thought though. sorry for not being any help.
Last edited by GrantB; 05-09-2013 at 09:30 PM.
In regards to Click To Continue and Termination after logging-in inside cave, not trying to Hijack thread, i pmed Nebula and got no response, and i know a lot of people love using this script, so here's a fix for it.
Simba Code:program NebulaFightCaves;///
{$DEFINE SMART8}////////////
{$i srl-osr/srl.simba}//////
var startXp: Integer;///////
//{Version 1.0}{By Nebula}//
// Thread URL: http://villavu.com/forum/showthread.php?t=101458
const
USERNAME = ''; {Account Username}
PASSWORD = ''; {Account Password}
SKILL_TRAINING = SKILL_ATTACK;{The skill you want the script to track in the
progress report besides hitpoints. valid entrys:
Skill_Attack, Skill_Strength, Skill_Defence,
Skill_Range, Skill_Magic}
CHECK_XP_CHANCE = 33; {Percent chance that the progress report is
updated inbetween caves}
PRAYER_1 = -1; {See thread for details}
PRAYER_2 = -1; {See thread for details}
PRAYER_3 = -1; {See thread for details}
PRAYER_4 = -1; {See thread for details}
PRAYER_5 = -1; {See thread for details}
{----Don't touch anything below this line!----}
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := USERNAME;
Players[0].Pass := PASSWORD;
Players[0].Active := True;
end;
function RPosNeg(Int: Integer): integer;
begin
result := RandomRange(-Int, Int);
end;
procedure Terminate(msg: string);
var
RInt: Integer;
begin
RInt := RandomRange(1000, 10000);
writeln(msg);
writeln('Please report this to the script thread: http://villavu.com/forum/showthread.php?t=101458');
Logout;
logout;
TerminateScript;
end;
function SkillToString(skill: variant): string;
begin
case skill of
0: result := 'Attack';
1: result := 'Defence';
2: result := 'Strength';
4: result := 'Range';
6: result := 'Magic';
end;
end;
Procedure Pray;
var
prayArray: array of Integer;
i: Integer;
begin
wait(4000 + RPosNeg(2000));
GameTab(Tab_Prayer);
prayArray := [Prayer_1, Prayer_2, Prayer_3, Prayer_4, Prayer_5];
for i := 0 to 4 do
begin
if prayArray[i] = -1 then
continue;
mouse(531 + 37*((prayArray[i] mod 5)+1) + RPosNeg(3), 228 + 37*(floor(PrayArray[i] div 5)) + RPosNeg(3), 0, 0, true);
end;
end;
procedure KeepLoggedIn;
begin
wait(400);
FindNormalRandoms;
if not Waitfunc(@LoggedIn, 10, 10000) then
if not LogInPlayer then
Terminate('Player logged out and could not log back in');
if LobbyScreen then
begin
Mouse(387 + RPosNeg(5), 336 + RPosNeg(5), 0, 0, true);
if not Waitfunc(@LoggedIn, 10, 10000) then
Terminate('in lobby could not play')
end;
end;
procedure AntiBan;
var
q, w, z: Integer;
begin
KeepLoggedIn;
if random(4) = 0 then
Exit;
case Random(200) of
0..1: MakeCompass(Random(360));
2..5: MakeCompass(RandomRange(round(rs_GetCompassAngleDegrees) - 90, round(rs_GetCompassAngleDegrees) + 90));
6..13: MakeCompass(RandomRange(round(rs_GetCompassAngleDegrees) - 45, round(rs_GetCompassAngleDegrees) + 45));
14..17:
begin
GetMousePos(q, w);
MMouse(RandomRange(q - 200, q + 200), RandomRange(w - 200, w + 200), 0, 0);
end;
18..25:
begin
GetMousePos(q, w);
MMouse(RandomRange(q - 100, q + 100), RandomRange(w - 100, w + 100), 0, 0);
end;
26..32:
begin
z := randomrange(300, 600);
KeyDown(vk_down);
wait(z);
KeyUp(vk_down);
wait(randomRange(300, 700));
KeyDown(vk_up);
wait(z + 75 + Random(200));
KeyUp(vk_up);
end;
end;
end;
function FindObjNebula(col, tol, sort, split: Integer; hMod, sMod: Extended; upText: array of string): Boolean;
var
cts, i, x, y: Integer;
tpa: TPointArray;
atpa: array of array of TPoint;
begin
wait(400);
KeepLoggedIn;
cts := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(hMod, sMod);
FindColorsSpiralTolerance(MSCX, MSCY, TPA, col, MSX1, MSY1, MSX2, MSY2, tol);
ColorToleranceSpeed(cts);
SplitTPAWrap(tpa, split, atpa);
case sort of
0: SortATPAFromFirstPoint(atpa, Point(MSCX, MSCY));
1: SortATPASize(atpa, true);
end;
for I := 0 to High(atpa) do
begin
MiddleTPAEx(atpa[i], x, y);
MMouse(x, y, 0, 0);
if WaitUpTextMulti(uptext, 200 + RPosNeg(25)) then
begin
Result := True;
Break;
end;
end;
end;
function InCave: boolean;
var
x, y: Integer;
begin
wait(400);
result := not (FindSymbol(x, y, 'bank') or FindSymbol(x, y, 'minigame'));
end;
procedure WaitWhileFighting;
begin
wait(400);
ClicktoContinue;
KeepLoggedIn;
while InCave do
begin
ClicktoContinue;
KeepLoggedIn;
wait(500 + RPosNeg(250));
end;
Pray;
while InCave do
begin
ClicktoContinue;
KeepLoggedIn;
AntiBan;
wait(1250 + RPosNeg(250));
end;
end;
procedure EnterCave;
var
angChanged: boolean;
begin
wait(400);
KeepLoggedIn;
MakeCompass(180);
if not FindObjNebula(10594486, 21, 1, 2, 0.27, 0.43, ['nter C', 'r Cave', 'ave entra']) then
begin
{ if clicktoContinue then
WaitWhileFighting;
} Mouse(643 + RPosNeg(3), 55 + RPosNeg(3), 0, 0, true);
FFlag(2);
keydown(vk_Down);
wait(randomrange(500, 650));
keyup(vk_down);
angchanged := true;
if not FindObjNebula(10594486, 23, 1, 2, 0.27, 0.43, ['nter C', 'r Cave', 'ave entra']) then
Terminate('could not find cave entrance');
end;
if angChanged then
begin
keydown(vk_Up);
wait(randomrange(675, 800));
keyup(vk_Up);
end;
ClickMouse2(false);
if not WaitOptionMulti(['Enter c', 'ter Ca'], 200 + RPosNeg(50)) then
Terminate('could not enter cave entrance on right click');
end;
procedure Proggy;
var
XPGained, XPPerHour: Integer;
begin
ClearDebug;
XPGained := GetXP(SKILL_TRAINING) - StartXP;
XPPerHour := Round((XpGained * 3600) / (GetTimeRunning / 1000));
writeln('*****Nebula Fight Caves*****');
writeln('Running For: ' + TimeRunning);
writeln(SkillToString(SKILL_TRAINING) + ' XP Gained: ' + ToStr(XPGained));
writeln(SkillToString(SKILL_TRAINING) + ' XP Per Hour: ' + ToStr(XPPerHour));
writeln('Hitpoints XP Gained: ' + ToStr(round(XPGained / 4)));
writeln('Hitpoints XP Hour: ' + ToStr(round(XPPerHour / 4)));
writeln('*************************');
end;
begin
{$IFDEF SMART}
Smart_FixSpeed := True;
{$ENDIF}
SetupSRL;
SRL_CombatRandoms := false;
DeclarePlayers;
LogInPlayer;
ClearDebug;
//StartXp := GetXP(SKILL_TRAINING);
repeat
wait(400);
Case random(99)+1 of
1..Check_XP_Chance: Proggy;
end;
if (not(Incave)) then
Entercave;
if (Incave) then
WaitWhileFighting;
clicktocontinue;
until false;
end.
This will Click to Continue inside cave, it will also log you in and then click to continue while inside cave. You might have to edit it a bit more to fit your needs, but this should do the work.
Again, not trying to Hijack, just helping users. Only tested for 20 minutes.
For my it enters the cave and then thinks it never entered the cave, but I'm not using SMART so that might be the problem
Yeah this doesn't work. It enters the cave, then eventually logs you out and gives you this:
could not find cave entrance
Please report this to the script thread: http://villavu.com/forum/showthread.php?t=101458
Needs testing.
There are currently 1 users browsing this thread. (0 members and 1 guests)