SRL Archive - Java Help and Tutorials

Question and help


nubless

2014-11-17 15:10:56

Hi all sorry if this is in the wrong section

first of i have been paying rsbot £25per month for the last year for scripts and VIP to use on my bots and half the time there not even working so probably 8 months of the year they have worked i am frankly so sick of giving them my money when i have so little myself my coding xp is level 2 if this was runescape so none i have been trying to learn so but there seems to be so so much to learn its overwhelming

OK THE QUESTION

I have this script its a granite miner i found in the mining section what i want to know is can i change a few things about this script and turn it into a runite hopper or would i have to totally do it from scratch as i said i have near 0 xp in coding maybe over the next year i can add things to it to turn it into a runite hopper saving me £25 a month i do not wish to sell the script or allow others to use unless people ask maybe and the coma says its fine other than that its for nothing but pure personal use

program graniteminer;
{$DEFINE SMART}
{$i srl-6/srl.simba}
var
Mining,XP: Integer;

procedure declarePlayers();
begin
setLength(players, 1);
currentPlayer := 0;

with players[0] do
begin
loginName := '';
password := '';
isActive := true;
isMember := true;
world := -1;
end;
end;

function FindGranite: Boolean;
var
i, s, h: Integer;
TPA: TPointArray;
ATPA: T2DPointArray;
t: TTimeMarker;
p: Tpoint;
begin
writeln('Mine');
//FindColorsTolerance(TPA, 9493247,inttobox(65,267,520,333), 4, ColorSetting(2, 0.3, 0.3));
//FindColorsTolerance(TPA, 7449049,inttobox(65,267,520,333), 4, ColorSetting(2, 0.3, 0.3));
FindColorsTolerance(TPA, 10092031,inttobox(65,267,520,333), 4, ColorSetting(2, 0.3, 0.3));
if (Length(TPA) < 1) then
begin
Writeln('nope');
Exit;
end;

ATPA := TPA.ToATPA(20, 20);
SortATPAFromMidPoint(ATPA, Point(randomRange(mainscreen.playerpoint.x - 100, mainscreen.playerpoint.x + 100), mainscreen.playerpoint.y));

h := High(ATPA);

for i := 0 to h do
begin
if (Length(ATPA) < 50) then
Continue;

Mouse(ATPA[random(High(ATPA))], MOUSE_MOVE, MOUSE_HUMAN);
if IsMouseOverText(['ine', 'ranite', 'ocks', 'Mine'], 500) then
begin
fastclick(mouse_left);
//wait(300);
if tabBackpack.waitForShift(7000+Random(450)) then
WriteLn('Uber, we gained: Granite');
Mining := Mining + 1;
//WriteLn('That is about: ' + IntToStr(Mining)/(3600.0 / (GetTimeRunning / 1000.0) + '/H');
Exit();
end;
end;
end;

procedure DropGranite;
var
dropTPA: TPointArray;

begin
writeln('Drop');
wait(650+Random(311));
repeat
if findColorsTolerance(dropTPA,4875654,actionBar.getSlotBox(5),40) then
begin
mouseBox(actionBar.getSlotBox(5),MOUSE_RIGHT,MOUSE_HUMAN);
wait(randomrange(50,150));
chooseOption.select(['Drop Gr'], 500);
wait(700+Random(150));
XP := XP + 50;
end;

if findColorsTolerance(dropTPA,4875654,actionBar.getSlotBox(6),40) then
begin
mouseBox(actionBar.getSlotBox(6),MOUSE_RIGHT,MOUSE_HUMAN);
wait(randomrange(50,150));
chooseOption.select(['Drop Gr'], 500);
wait(700+Random(150));
XP := XP + 60;
end;

if findColorsTolerance(dropTPA,4875654,actionBar.getSlotBox(7),40) then
begin
mouseBox(actionBar.getSlotBox(7),MOUSE_RIGHT,MOUSE_HUMAN);
wait(randomrange(50,150));
chooseOption.select(['Drop Gr'], 500);
wait(700+Random(150));
XP := XP + 75;
end;
until not findColorsTolerance(dropTPA,4875654,actionBar.getSlotBox(5),40) or findColorsTolerance(dropTPA,4875654,actionBar.getSlotBox(6),40) or findColorsTolerance(dropTPA,4875654,actionBar.getSlotBox(7),40);
end;

Thanks for your time in reading my crazy quest for help

best regrads
Nubless the nub :P

levunit

2014-11-17 15:19:55

This script basically just mines ore and drops it, so if you wanted to change it into a runite hopper, basically everything else would need to be added from scratch, such as the world hopping and banking.

nubless

2014-11-17 15:21:59

Thanks for your reply levunit

but is it doable by someone with so little xp in coding ? or would i atleast need to know x ammount to make it workable

Turpinator

2014-11-17 15:32:40

You know what is truly overwhelming? these 2 sentences.
From: nubless
first of i have been paying rsbot £25per month for the last year for scripts and VIP to use on my bots and half the time there not even working so probably 8 months of the year they have worked i am frankly so sick of giving them my money when i have so little myself my coding xp is level 2 if this was runescape so none i have been trying to learn so but there seems to be so so much to learn its overwhelming


I have this script its a granite miner i found in the mining section what i want to know is can i change a few things about this script and turn it into a runite hopper or would i have to totally do it from scratch as i said i have near 0 xp in coding maybe over the next year i can add things to it to turn it into a runite hopper saving me £25 a month i do not wish to sell the script or allow others to use unless people ask maybe and the coma says its fine other than that its for nothing but pure personal use




From: nubless
but is it doable by someone with so little xp in coding ? or would i atleast need to know x ammount to make it workable

no.

nubless

2014-11-17 15:33:58

All has to learn somewhere don't know unless you ask. i found it even more funny how you went out your way to make a knowledge seeker look bad and as a more advance user. :P support and help is more what i was looking for not a total troll. Guess the numbers and codes have gone to your head and you think your better than most who don't know how to code on well sad really but more funny thats how u want to spend your life :)

Torol

2014-11-17 15:40:22

From: nubless
Thanks for your reply levunit

but is it doable by someone with so little xp in coding ? or would i atleast need to know x ammount to make it workable


Sure! What can you lose anyway? My advice is to check the beginner tutorials and get into it.

nubless

2014-11-17 15:44:09

Thank you torol i will check everywhere until my quest is complete

Thanks a mil

3Garrett3

2014-11-17 15:49:59

From: nubless
Thanks for your reply levunit

but is it doable by someone with so little xp in coding ? or would i atleast need to know x ammount to make it workable


Just as a general note, there is a RS3 scripting help section here which would be better than the Java scripting section.

Also it's best to put the code in
 
tags (without the space) so that it is easy enough for people to read.

I suggest if you're interested in making a script that you look at the scripting tutorial section here, the posts there should really help you understand what's happening. I feel like you should be able to do all of the things that you want to do after reading those, but like mentioned above it will probably be just as easy to start from scratch compared to the script you found.

Edit:

And if you have specific questions, feel free to PM me with them.

levunit

2014-11-17 15:50:15

Making a runite hopper as a first script could be a daunting task, I suggest, as Torol said, to check out the beginner's help forum, and you should also try making your own power miner as a first script, to get a feel for how everything works. Cheers!