very nice script. using it now ill post proggy soon
very nice script. using it now ill post proggy soon
I get this
only since I updated to V1.60PHP Code:[Hint] C:\Simba\Includes\Reflection\./Core/Antirandoms\Forester.simba(100:3): Variable 'B' never used at line 99
[Error] (853:41): Invalid number of parameters at line 852
help please![]()
okay the script runs fine now and compiles, just now my SMART wont actually load up at all even though it says it is as shown below
I hope you know the problem to this alsoPHP Code:[Compiled succesfully in 1063 ms.
OpenFile - Exception. Could not open file: C:\Simba\Includes\SRL/logs/SRL log 10-01-11 1.txt
SRL Compiled in 16 msec
No SRL update / Plugins update available!
No Reflection update
SMART Initialized.
Loaded: Server 105, Members: False, Signed: True, Super Detail: False.
haha
I guess I am way too impatient hahahaha
will do that now, thanks for the help so fast<3
Script Taken down While i Fix some bugs, wont post version 1.60 again, will skip to Version 1.65
Edit:
Script now back up and hopefully working.
I messed up with V1.60 i thought i had fixed the bugs on the first re post of it but it then had a different bug.
so i decided to completely skip re releasing V1.60 as it was to bug ridden.
I have hopefully fixed the bug where it will not log out once it reached all skill level goals, but it need more testing please, also i think that the range and magic support should still be fine but yet again please let me know if there is something funny going on.
Hope you enjoy Version 1.65
Last edited by Bobzilla69; 01-10-2011 at 07:15 PM.
Got the stats going? I noticed you have removed the label from the first post saying "not in use...yet!"
Anyway, I'm going to send the ninth battalion to battle the rats again, would be nice to get some numbers to my Stats account too
EDIT: Took the time and looked at the code:
Yay, no more commenting there! Thanks!Simba Code:Stats_Commit;
SendSRLReport;
Last edited by bugger0001; 01-10-2011 at 07:57 PM.
A Chinese wiseman once said: "Shu ciu!", it was considered very smart, but now people know it means: "Something stinks here!"
FalBuggySmelter v.1.31
[Updated on the 1st of March 2010]
RimmBugger BETA V1.8
1.65 is working perfectly so far, and awesome about stats now =D just wondering, is there a way to make it so it doesn't break? because it still breaks for the random amount (like 2 mins) when switching users.
the new version is great
just one little thing, if you 1 hit KO the rat it doesn't add to your current rat kills and possibly thinks that someone else took the rat kill maybe? I don't know :/ Just thought I should let you know![]()
yes i thought that would happen, but thanks for the info
i changed the way it detects if your attacking a rat or not to stop it counting miss clicks where you simply walk or the attack option is not available when right clicking.
i will have to look into a better way to detect it
Bobzilla69 Thanks for all the help with the Stats earlier figured out what I was doing wrong. Also You should try and add EXP gain to this script join the TOtal EXP Gain club on Stats.
~BraK
"Sometimes User's don't need the Answer spelled out with Code. Sometimes all they need is guidance and explanation of the logic to get where they are going."
Progress Report:[==========================================================] [ Ratinator 1.65 ] [ by Bobzilla69 ] [==========================================================] [ TimeRunning : 4 Hours, 22 Minutes And 21 Seconds ] [ Active Players : 0 ] [ Total Rats Attacked : 679 ] [ Total DeathWalks : 24 ] [==========================================================] [ Ratinator 1.65 ] [==========================================================] [========================================================] [ Nick | Active | Rand | Rats Attacked | Deathwalk Count ] [========================================================] [ oly | False | | 219 | 3 ] [ ollo | False | | 198 | 15 ] [ ohe | False | | 62 | 4 ] [ otpu | False | | 200 | 2 ] [========================================================]
Runs great, except for some reason the two middle ones turned false for no reason? oly and otpu reached the level limits, but ollo and ohe were just standing there, not sure why it turned false.
The other script i'm running on the other hand is great (i'm running two scripts with 4 chars each), one reached the target levels and stopped, and the others who haven't reached it are still going.
EDIT:
Ratinator is beating MSI on SRL stats =p
Last edited by XRaye; 01-11-2011 at 02:31 AM.
are you going to add bone burying eventually?
This is the other one I was running
Progress Report:[==========================================================] [ Ratinator 1.65 ] [ by Bobzilla69 ] [==========================================================] [ TimeRunning : 6 Hours, 15 Minutes And 45 Seconds ] [ Active Players : 0 ] [ Total Rats Attacked : 1093 ] [ Total DeathWalks : 24 ] [==========================================================] [ Ratinator 1.65 ] [==========================================================] [========================================================] [ Nick | Active | Rand | Rats Attacked | Deathwalk Count ] [========================================================] [ ryad | False | | 280 | 6 ] [ unt | False | | 201 | 3 ] [ ury | False | | 278 | 7 ] [ ron | False | | 334 | 8 ] [========================================================]
Everyone reached their target level =)
How about using DidClick? Here's a function written by Solemn Wishes to give you an idea:
Simba Code:function ClickM(left:boolean):boolean; {Solemn Wishes}
var
tries,b,c:integer;
begin
GetMousePos(b,c);
HoldMouse(b,c,mouse_left);
repeat
if DidClick(True,5) then
begin
Result:=true;
Break;
end;
if DidClick(False,5+random(20)) then
begin
Wait(10+Random(40));
ReleaseMouse(b,c,mouse_left);
Wait(250);
FFlag(0);
Exit;
end;
Inc(tries);
until(tries>6);
Wait(10+Random(40));
ReleaseMouse(b,c,mouse_left);
if DidClick(True,500) then Result:=True;
Wait(100+Random(100));
end;
That way you'd be able to know wether or not you misclicked. If it noticed a red cross and chat doesn't say anything about "someone else..." and inventory count remains the same, then you most probably killed the darn rat.
EDIT: Tore the function apart and "improved" a little bit
Simba Code:function ClickM(left:boolean):boolean;
var
tries,b,c:integer;
begin
GetMousePos(b,c);
HoldMouse(b,c,mouse_left);
repeat
Result := DidClick(True,5);
if Result then Break;
if DidClick(False,5) then Break;
Inc(tries);
until(tries>10);
Wait(10+Random(40));
ReleaseMouse(b,c,mouse_left);
end;
Last edited by bugger0001; 01-11-2011 at 10:00 AM.
A Chinese wiseman once said: "Shu ciu!", it was considered very smart, but now people know it means: "Something stinks here!"
FalBuggySmelter v.1.31
[Updated on the 1st of March 2010]
RimmBugger BETA V1.8
Progress Report:[=========================================================] [ Ratinator 1.65 ] [ by Bobzilla69 ] [=========================================================] [ TimeRunning : 5 Hours, 7 Minutes And 25 Seconds ] [ Active Players : 1 ] [ Total Rats Attacked : 740 ] [ Total DeathWalks : 29 ] [=========================================================] [ Ratinator 1.65 ] [=========================================================] [========================================================] [ Nick | Active | Rand | Rats Attacked | Deathwalk Count ] [========================================================] [ pker | True | | 740 | 29 ] [========================================================]
Ran very well, but got stuck in the class room and thought it was doing a death walk :/
NP, i think i kinda wrote it funny the first time but good to hear you got it
I will see about getting the EXP Gained And Total EXP to my script.
Woohoo I am winingbut for how long
MSI has a large user base so i am sure they will catch up and beat me.
As for your problem, i am not sure what happened, i think i will add a Line at the end of the Report that will have a bit more info about why we logged out.
No i have no Plans to support Bone Burying, The script was intended to Maximize exp/hr
You could probably add bone burying as an option in user setup. using Player[0].Booleans[0] := True or false. I believe someone created the procedures for it somewhere already. You just need to add it and the Option support.
@Bugger0001 I believe that similar stuff is in the SRL include already.
~BraK
"Sometimes User's don't need the Answer spelled out with Code. Sometimes all they need is guidance and explanation of the logic to get where they are going."
@Bobzilla69 Here's the link to the thread about bone burying by Marpis. The functions in the include for the Clicking.
// * function DidClick(Red: Boolean; Time: Integer); // by Rasta Magician
// * function DidRedClick: Boolean; // by Rasta Magician
// * function DidYellowClick: Boolean; // by Rasta MagicianSimba Code:{*******************************************************************************
function DidClick(Red: Boolean; Time: integer): boolean;
By: Rasta Magician
Description: Checks for the X after a click, Times Out after Time.
*******************************************************************************}
function DidClick(Red: Boolean; Time: integer): boolean;
var
TimeOut, x, y, Trash, w, h: 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
With B do
if FindColor(Trash, Trash, 255, x1, y1, x2, y2) then
begin
if Red then
Result := true
else
Result := false;
exit;
end;
With B do
if FindColor(Trash, Trash, 65535, x1, y1, x2, y2) then
begin
if Red then
Result := false
else
Result := True;
exit;
end;
wait(5);
end;
end;
{*******************************************************************************
function DidRedClick: boolean;
By: Rasta Magician
Description: Checks for the Red X after a Click, Times out after 500 ms
*******************************************************************************}
function DidRedClick: Boolean;
begin
Result := DidClick(true, 1000);
end;
{*******************************************************************************
function DidYellowClick: Boolean;
By: Rasta Magician
Description: Checks for the Yellow X after a Click, Times out after 500 ms
*******************************************************************************}
function DidYellowClick: Boolean;
begin
Result := DidClick(false, 1000);
end;
~BraK
"Sometimes User's don't need the Answer spelled out with Code. Sometimes all they need is guidance and explanation of the logic to get where they are going."
ohhhhhh, thanks alot for that. this would be very usefull.
Edit:
Just to say i might not update this for a day or so to check if any bugs pop up, also to take a small break from constant coding.
should be back to updating this tomorrow
Last edited by Bobzilla69; 01-11-2011 at 11:06 AM.
There are currently 1 users browsing this thread. (0 members and 1 guests)