PDA

View Full Version : [Money Making] Battousai's Headless Arrow



Battousai
02-15-2015, 11:38 PM
Start with arrow shafts in second inventory slot

Features:
Basic antiban (could improve)
Logs out when out of arrow shafts



Program new;
{$Define SMART}
{$I SRL-6/SRL.Simba}

Procedure declarePlayers();
Begin
setLength(players, 1);
With players[0] Do
Begin
loginName := ''; //UserName
password := ''; //Password
isActive := True; //Leave true
isMember := True; //Is user a Member?
End;
currentPlayer := 0;
End;

Procedure antiBan();
Begin
Case random(500) Of
0: Begin ClearDebug; writeLn('Status: Anti Ban - Hover Skill'); hoverSkill(SKILL_FLETCHING); End;
1: Begin ClearDebug; writeLn('Status: Anti Ban - Bored Human'); boredHuman(false); End;
2: Begin ClearDebug; writeLn('Status: Anti Ban - Move Mouse 1'); sleepAndMoveMouse(1000 + random(2000)); End;
3: Begin ClearDebug; writeLn('Status: Anti Ban - Dropped Mouse'); pickUpMouse(); End;
4: Begin ClearDebug; writeLn('Status: Anti Ban - Move Mouse 2'); smallRandomMouse(80); End;
End;
End;

Procedure makeHeadlessArrows();
Begin
ClearDebug;
writeLn('Status: Clicking Arrow Shafts');
tabBackPack.mouseSlot(2, MOUSE_LEFT);

If productionScreen.isOpen(5000) Then
Begin
antiBan();
ClearDebug;
writeLn('Status: Clicking Start');
productionScreen.clickStart();
End;
if progressScreen.isOpen(5000) Then
Begin
Repeat
antiBan();
ClearDebug;
writeLn('Status: Making Headless Arrows');
wait(randomRange(200, 500));
Until(Not progressScreen.isOpen());
End;
End;

Begin
setupSRL;
declarePlayers();
disableSRLDebug := True;
If Not isLoggedIn Then
players[currentPlayer].login();

Repeat
antiBan();
makeHeadlessArrows();
Until(Not tabBackPack.isItemInSlot(2));
players[currentPlayer].logout();
terminateScript;
End.

Atom
02-20-2015, 03:25 PM
Your script is good for a beginner, but I did notice that your script tries to proceed making the next 150 headless arrows before its even done with the previous 150, i.e. it doesn't wait until all 150 headless arrows are done.

But otherwise good job, since you already know some codes well as a beginner.

PioneerPete
04-07-2015, 09:19 PM
good script to make some cash if bored, too much competition in the mines so I am going to make gold through this for awhile. Thanks

ckbbe
04-30-2015, 03:57 PM
It constantly shuts down,for so noticable reason.

SRhino
07-24-2015, 06:08 PM
Nice simple little script, it does the job. I usually process 20k at a time.(Just a note if you want the script to log in guys, you need to manually set the log in variables :))

teddybear
07-28-2015, 10:37 AM
i do rounds of 60k a time, works very nicely, hasnt failed for me
could do with an improvement to detect the arrow shafts anywhere in the inventoey

teddybear
09-10-2015, 05:23 AM
hello again :) i have used this script quite a lot in the past month and have managed to account for 1% of all daily trades of headless arrows worldwide. the only problem i have encountered is that when runing multiple accounts at the same time it sometimes logs them out before they are done. this is most likely a lag connected issue, but i was wondering if there was a fix, for example to have a relogin part in the script that logs back in (from the lobby) if such an event would occur

karu
10-30-2015, 02:12 PM
Did a 20k batch of arrows, worked like charm and also logged out when done :spot:

ferry013
12-18-2015, 05:15 PM
Works very good! Nice money maker. GJ with your first script!

Clayp
02-08-2016, 05:14 AM
awesome

Trash
02-26-2016, 04:41 AM
I know its an old script, but sometimes it will drag the inventory icon away and then shut itself down. I tried locking the interface but then the script doesn't work at all. Anyone know how you'd fix it?


Edit: Fixed it by making sure the inventory wasn't the first tab.

micha2wie
03-07-2017, 04:18 AM
used it yesterday for making over 20k arrows - worked very good without any problems...I wanted to repeat today - made around 10k of arrows and it log me out - when I tried to log in back I found out that I've been banned for 48h :crying: