Printable View
ONLY EATS TUNA
Update-Script is not working that good it keeps saying i need to free the DTMs but i freed them already so ill post it and see if you guys can fix it but in the mean time ill be working on the attacking of the warriors and adding a few things
Update 2-I fixed the problem i was freeing the DTMs more then 1 time but i fixed it so it should run fine. The only problems it might have is banking and finding the warriors can be hard sometimes.
Sounds good, if you need any help testing your script feel free to PM me :).
boom up ,also if u need someone to test out,just pm me
ill test aswell pm me
ill test also :)
good news the script should be done tonight or for sure tomorrow
Could you post a pin-less version now so I could use it?
Hello, If you wish to have a tester, im your man. Go to the link in my Sig.
Why not just use Narcle's Fast Fighter to kill the warriors?
Thats exactly what I do right now, however there is now drop picking/looting in Narcle's script. This one, specially for Warriors, will have and thus making everyone jump for joy! :)Quote:
Originally Posted by Kunny
They could but new scripters showing their stuff is always good.
Not so sure if this one will have a loot system in it. Ive worked with the scripter and from what he has told me, there will not be one cuz guards dont drop great items.
Well good to know its almost done, and be tested soon.
Read the First/main post... He said he is adding a banking system, it could be for food, but they are level 9 so...Quote:
Originally Posted by kevin33
Also, by looting, it could just be bone burying.
Uhh I am physically helping him over pm's so I know what the script had when I last saw it and looting was not there. He may have added it but I can certainly tell you that there was no FindObject for loot.
Man i wanted to finish the script today but i cant get the walking down. The desert does not have many objects to be used with object dtm walking and i tryed another way and that also failed...i cant get this thing to walk. Also if you guys really want the script to loot I will add that later on but right now i got to get this thing walking and making sure it eats right. Sorry for the wait :(
walk to the fountain inside the castle thing, the well outside it and the bank shouldn't be too hard?
I cant wait until this comes out.
Haha try using ObjectDTM with only 1 sub point per main point...you need at least 4 points so it will find it and they need to be close the the middle of the mini map but anyway im using normal DTM walking and im about to test it now.Quote:
Originally Posted by ipesza
Also just to let you guys know i have a banking system because this is a good script for str pures and can make about 25k xp/h (or more) but with 1 def you will need to bank.
When you release the first version of this script will it be buggy? Could I be able to run it 4 hours straight without random evens and not have it glitch out?
I just got home so ill work on fixing the walking from bank (it just spins the screen around for 5 seconds and stops scrpt i dont know why but walking to bank is fine) and fix up the attacking a bit then release it and it should run for as long as you have food in bank.Quote:
Originally Posted by v0rtexer43
As with most first scripts it will be buggy. That is the point of releasing for testing, so people can test, tell the owner any bugs or issues tey have, the owner can update the script and then re-release until it is flawless.
yea your right but i would like to at least get the walking fixed so it can run for a while without stopping.Quote:
Originally Posted by kevin33
Yea the walking is key. Its hard to get it down just right. Take your time, make sure it works and then release. Did you end up sticking with SPS or did you go with soemthing else?
I used DTM but not ODTM :)Quote:
Originally Posted by kevin33
Oh very nice. GL with it. PM me if you still need any help or for any questions. Im still happy to help out.
I added the script but it needs some fixing and i cant seem to be able to fix the problem. I posted the error im getting on the first post.
I hope you don't mind me posting this here but I edited your script a bit to work a little better IMO, basically all I changed was the eating function (which should be a procedure):
EDIT: also it only eats tuna with my version, make a DTM of whatever you want to eat if you don't want tuna
Simba Code:Program Al_Kharid_Warrior_Killer;
{$i srl\srl\misc\smart.simba}
{$i SRL\SRL.simba}
{$i srl\srl\skill\fighting.simba}
Var
x, y, Food: Integer;
B: Array [0..5] of Integer;
aFound: Extended;
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := ''; // Username
Players[0].Pass := ''; // Password
Players[0].Nick := ''; // 3-4 lowercase letters from username
Players[0].Active := True; // Set to true if you want to use Player 0
Players[0].Pin := ''; // Bankpin Here
Players[0].BoxRewards := ['Xp'];
Food := DTMFromString('mbQAAAHicY2VgYGBngABOIBYBYh4gFgZibgYEAInz8vECSSYUzA8kWdEwIxYMBgA00ADA');
end;
Procedure Attackwarrior;
Var
x, y: Integer;
Begin
If FindObjCustom( x, y, ['att', 'ior', 'rid'], [4414565, 4083794, 7639448], 10) Then
Begin
GetMousePos (x, y);
Case Random (0) Of
0: Mouse (x, y, 2, 2, True)
End;
End;
End;
Procedure SetDTM;
Begin
B[0] := DTMFromString('mrAAAAHic42BgYChhYmAIAuJVQLwSiu2h2AmI7YBqUoA4EYiDgdgTiKOBOByI/YB4em8qQ7ghG4NBkgiDQoQAg5U1Kxw7JEkxiADV4MOMBDAMAACI9AxR');
B[1] := DTMFromString('mlwAAAHicY2dgYDBkYmBwAmJHKHYAYj8gjgfiQKC8CxCHAXE8EOcDsTMQOwHxzJ5UBqdEKQYbK1Y4NkoUYVAKF2AQAcrjwox4MBQAAKFHCbE=');
B[2] := DTMFromString('mlwAAAHicY2dgYIhiYmDwAOJ6NOwOxJVA+Xwg9gXiHCCuBeIJQGwJxFt70hi+/+ZmMEoUYbCxYgVjENu70IRBBCiPCzPiwVAAABJQDU0=');
B[3] := DTMFromString('mlwAAAHicY2dgYOBgZGD4DqTFgPQfIC0IpP9B6RIgHQXEkUBcCcW5QFwIxEnBTgz21uYMtpYmDBVpgQxx/vYMt3ZOZqjJDGYQAcrjwox4MBQAAF81DpI=');
B[4] := DTMFromString('mwQAAAHic42RgYOhnYmCYg4RnA3E4EJcAcQUQpwKxCVCdGxBHA3EGEGsCsS4QqwFxCRALAPHU7jQGS0s2BvkwQTjd15IIFvcoMGWY3pHOIAJURwgzEoHhAAAP1hCq');
B[5] := DTMFromString('mlwAAAHicY2dgYJjAxMBQD8QNUAxirwDiHiCOAMpXAXEeEIcDsTUQWwCxJRBv6kpjMNLkYtBPEGWQDxME0zAsApTHhRnxYCgAALMIC8s=');
end;
procedure FrDTM;
begin
FreeDTM(B[0]);
FreeDTM(B[1]);
FreeDTM(B[2]);
FreeDTM(B[3]);
FreeDTM(B[4]);
FreeDTM(B[5]);
end;
Procedure Bankit;
Begin
B[3] := DTMFromString('mlwAAAHicY2dgYOBgZGD4DqTFgPQfIC0IpP9B6RIgHQXEkUBcCcW5QFwIxEnBTgz21uYMtpYmDBVpgQxx/vYMt3ZOZqjJDGYQAcrjwox4MBQAAF81DpI=');
MakeCompass ('w')
repeat
Wait(50 + Random(25));
until FindDTMRotated(B[3], x, y, MSX1, MSY1, MSX2, MSY2, -Pi/4, Pi/4, Pi/60, aFound);
If FindDTMRotated(B[3], x, y, MSX1, MSY1, MSX2, MSY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
Wait(1500)
if not (bankscreen) then
repeat
Wait(50 + Random(25));
until FindDTMRotated(B[3], x, y, MSX1, MSY1, MSX2, MSY2, -Pi/4, Pi/4, Pi/60, aFound);
If FindDTMRotated(B[3], x, y, MSX1, MSY1, MSX2, MSY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
Wait(1500)
Withdraw(0, 0, 28);
CloseBank;
FreeDTM(B[3])
end;
end;
end;
Procedure ToBank;
begin
B[0] := DTMFromString('mrAAAAHic42BgYChhYmAIAuJVQLwSiu2h2AmI7YBqUoA4EYiDgdgTiKOBOByI/YB4em8qQ7ghG4NBkgiDQoQAg5U1Kxw7JEkxiADV4MOMBDAMAACI9AxR');
B[1] := DTMFromString('mlwAAAHicY2dgYDBkYmBwAmJHKHYAYj8gjgfiQKC8CxCHAXE8EOcDsTMQOwHxzJ5UBqdEKQYbK1Y4NkoUYVAKF2AQAcrjwox4MBQAAKFHCbE=');
B[2] := DTMFromString('mlwAAAHicY2dgYIhiYmDwAOJ6NOwOxJVA+Xwg9gXiHCCuBeIJQGwJxFt70hi+/+ZmMEoUYbCxYgVjENu70IRBBCiPCzPiwVAAABJQDU0=');
MakeCompass ('n')
if FindDTMRotated(B[0], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
FreeDTM(B[0]);
repeat
Wait(50 + Random(25));
until FindDTMRotated(B[1], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound);
end;
if FindDTMRotated(B[1], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
FreeDTM(B[1]);
repeat
Wait(50 + Random(25));
until FindDTMRotated(B[2], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound);
end;
if FindDTMRotated(B[2], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
FreeDTM(B[2]);
End;
End;
Procedure FromBank;
begin
B[4] := DTMFromString('mwQAAAHic42RgYOhnYmCYg4RnA3E4EJcAcQUQpwKxCVCdGxBHA3EGEGsCsS4QqwFxCRALAPHU7jQGS0s2BvkwQTjd15IIFvcoMGWY3pHOIAJURwgzEoHhAAAP1hCq');
B[5] := DTMFromString('mlwAAAHicY2dgYJjAxMBQD8QNUAxirwDiHiCOAMpXAXEeEIcDsTUQWwCxJRBv6kpjMNLkYtBPEGWQDxME0zAsApTHhRnxYCgAALMIC8s=');
MakeCompass ('n')
if FindDTMRotated(B[4], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
FreeDTM(B[4]);
repeat
Wait(50 + Random(25));
until FindDTMRotated(B[5], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound);
end;
if FindDTMRotated(B[5], x, y, MMX1, MMY1, MMX2, MMY2, -Pi/4, Pi/4, Pi/60, aFound) then
begin
Mouse(x, y, 3, 3, True);
FFlag(6);
FreeDTM(B[5]);
end;
end;
Procedure LowHPLetsEat;
var
I, x, y: Integer;
test: boolean;
begin
test := (HPPercent < 70) and (LoggedIn);
If(not(test)) then
Exit;
if test then
If InvEmpty then
begin
ToBank;
Bankit;
FromBank;
end else
begin
if FindDTM( Food, X, Y, MIX1, MIY1, MIX2, MIY2) then
begin
Mouse(x ,y, 5, 5, true);
Wait(100);
WriteLn('Having a bite of tuna');
end else
begin
WriteLn('couldn''t find any tuna');
end;
end else
WriteLn('health isn''t low enough to eat');
end;
begin
MouseSpeed := 18;
Smart_Server := 136;
Smart_Members := False;
Smart_Signed := True;
Smart_SuperDetail := False;
ClearDebug;
SetupSRL;
DeclarePlayers;
LoginPlayer;
SetDTM;
MakeCompass ('n')
SetAngle(SRL_ANGLE_HIGH);
repeat
SetAngle(SRL_ANGLE_HIGH);
Attackwarrior;
While(Infight)do
Wait(300);
LowHPLetsEat;
Until not LoggedIn;
end.
Wouldnt an eating procedure that goes through the inv if item exists looking for uptext Eat be better? then you can have any food and wont need dtms?
that is what i had and i think i will change it back but ty anyway causeQuote:
Originally Posted by laakerules
can we get a direct download please?
someone tell me how to do it and i will be more then happy to do it but right now the attacking is pretty bad, for some reason it attacks good when on the left side of the warrior area but when on the right side it seems to not be able to find them but tomorrow i will try to make DTMs for themQuote:
Originally Posted by kingsleyeng
I find it faster if the script goes right to the item to eat, rather than mousing every inventory spot every time. That way if you want to use a different DTM (which is pretty easy to make) you can just replace it. However if you want to have anything available to eat, make a procedure that checks each inv spot once and remembers which spots have food.Quote:
Originally Posted by laakerules
From my mom's iPhone :p
yeah very good script, but im using smart and the downloaded version (.simba) of this script and i have not edited it, when i run out of tuna, i die, is there any way that this can be changed so that I do not die? is it personal error or is the script set up not to bank? :L
ok ll post some info it works great although theres a bug sometimes goes and talks to dungeneering guy and just stays there trying to talk to him over and over again
oh and also does it eat? onyl done it on high accounts jw? nvm tuna
can u get it too eat trout please?
hey man script works good but for some reason wont bank. not bad xp hr though
out of bound expections up the ass...
lol it depost my gear so it will fite without and it not eat bad script never gonna use again
The script is decent not saying its bad it works does the job but yes it may need a little more help by a experiance scripter about
> it detecting "im out of food going to bank.." something like that .. cuz i died one time because he didnt bank.. but that was just like once out me using the script 4times ..
> something is weird about the eating procedure O_O i did play with the percentages of when to eat so i wouldn't die.. so may need a little bit more working on that you know detecting and all that .. i love reading scripts written by other people .. and i do understand them and i dont if know what im saying.. but to the point .. Narcle's fast fighter has a nice eating procedure i think it ate almost allways like above 200 life points which is in the safe zone so perhaps he may be able to help ? :D
i wish i could help with other peoples scripts.. but one of thoes guys that reads things but makes sence in my head but it doesnt.. im more of practical person haha
overall script is BEAST! appreciate it! thnx for the effort! yes this is a script that may need a babysitting or cheking up every 5-10mins :)
Simba Code:Food := DTMFromString('mggAAAHicY2NgYGhhYWCoA+IqIO4C4j4gbgBiNiYGBi4gFgRidiDmBWIWIK4Ka2SoiWhmmBa9kCHLu4ChJaCPIcw2mgEXYMSBIQAAk54LLQ==');
my dtms for swordfish! :D
What's the DTM for trout?
ill give it a test