SRL Archive - RS3 Outdated / Broken Scripts

Archaic's Port Phasmatys Cannonball Crafter


Archaic

2012-03-31 20:30:59

Archaic's Port Phasmatys Cannonball Crafter


Features:
  • ACA TPA object finding
  • SPS Walking/Positioning
  • Anti-ban, failsafes, random detection
How to Use:
  1. Download/Copy and paste the script
  2. Fix the (small) anti-leech
  3. Fill in the proper log-in information in the script
  4. MAKE SURE YOUR CHARACTER IS WEARING AN AMULET OF GHOSTSPEAK
  5. Position your character directly next to a ghost banker in the Port Phasmatys bank
  6. PUT STEEL BARS IN VERY FIRST SLOT (TOP LEFT CORNER) OF BANK
  7. Click Run
  8. Leave feedback/rep/a progress report:D

Author Comments:

Hello everyone! I began work on this little script as soon as the new update increasing the speed of cannonball production while using the new achievement diary reward came out. Done fairly quickly, but I have gone through about 6000 cannonballs with it so it works fairly well–though there may be a few clunky errors here and there. Gets around 15k xp an hour making about 3400-ish cannonballs an hour with the new update and reward. Make sure you are directly next to a ghost banker and are wearing a ghost speak amulet before you click that little green button!

Enjoy!:)

~Archaic

program ArchaicCannonBallCrafter;

var
x, y, BarsInteger: integer;
XPGain, LoadsDone, TimeGone, CannonBalls: Integer;
XPPerHour, LoadsPerHour, CannonballsPerHour, SteelBarsPerHour, CurrentXP, OriginalXP: Integer;


{Begin Player Setup}
const

Bankpin ='1234'; //BankPin here!
BarsToCraft = 300; //Number of bars to craft!
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
with Players[0] do
begin
Players[0].Name := 'Zezima';//username here!
Players[0].Pass := 'asdfasdf'; //Password here!
Players[0].Nick := ''; //three letters of name here!
Players[0].Active:=True;
end;
end;

procedure SetupLogin;
begin
ClearDebug;
Smart_Server := 6; //world

{End Player Setup}

Smart_Members := True;
Smart_Signed := True;
Smart_SuperDetail := False;
SetupSRL;
DeclarePlayers;
LoginPlayer;
MakeCompass('N');
SetAngle(SRL_Angle_High);
end;

Procedure Antiban;
begin;
case random(100) of
0-5: BoredHuman;
6-10: HoverSkill('random', false);
11-15: HoverSkill('Smithing', False);
16-20: PickupMouse;
21-25: RandomRClick;
26-30: PickupMouse;
31-40: ExamineInv;
end;
end;

procedure Proggy;
begin
ClearDebug;
TimeGone := (GetTimeRunning/1000);
CurrentXP := GetXPBar(1);
XPGain := (CurrentXP - OriginalXP);
XPPerhour :=(3600*(XPGain))/((TimeGone));
LoadsPerhour :=(3600*(LoadsDone))/((TimeGone));
CannonballsPerHour := (3600*(Cannonballs))/((TimeGone));
SteelBarsPerHour := (3600*27*(LoadsDone))/((TimeGone));
begin
Writeln('******************************************************************');
Writeln('*/////////---------- Archaic`s Cannonball Crafter ----------\\\\\\\*');
Writeln('*/////////----------*******************************----------\\\\\\\*');
Writeln('******************************************************************');
Writeln('*/////////We have done: ' + IntToStr(LoadsDone) + ' Loads / ' + IntToStr(LoadsPerHour) + ' loads per hour');
Writeln('*/////////We have gained: ' + IntToStr(XPGain) + ' smithing xp /' + IntToStr(XPPerHour) + ' Smithing xp per hour');
Writeln('*/////////We have crafted ' + IntToStr(Cannonballs) + ' Cannonballs /' + IntToStr(CannonballsPerHour) + ' CannonBalls Per Hour');
Writeln('*/////////We have crafted ' + IntToStr(27*(LoadsDone)) + ' Steel Bars /' + IntToStr(SteelBarsPerHour) + ' Steel Bars per Hour');
Writeln('');
end;
end;

function FindDoor(var fx, fy: Integer): Boolean;
var
arP, arAP: TPointArray;
arC, arUC: TIntegerArray;
ararP: T2DPointArray;
tmpCTS, i, j, arL, arL2: Integer;
P: TPoint;
R, G, B: Integer;
X, Y, Z: Extended;
begin
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(0.08, 0.58);

if not(FindColorsTolerance(arP, 2836291, MSX1, MSY1, MSX2, MSY2, 8)) then
begin
Writeln('Failed to find the color, no object found.');
ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
Exit;
end;

arC := GetColors(arP);
arUC := arC;
ClearSameIntegers(arUC);
arL := High(arUC);
arL2 := High(arC);

for i := 0 to arL do
begin
ColorToRGB(arC[i], R, G, B);

if (R >= 46) and (R <= 86) and (G >= 50) and (G <= 91) and (B >= 27) and (B <= 61) then
begin
ColorToXYZ(arC[i], X, Y, Z);

if (X >= 2.55) and (X <= 8.24) and (Y >= 3.04) and (Y <= 9.59) and (Z >= 1.53) and (Z <= 5.71) then
begin
for j := 0 to arL2 do
begin
if (arUC[i] = arC[j]) then
begin
SetLength(arAP, Length(arAP) + 1);
arAP[High(arAP)] := arP[j];
end;
end;
end;
end;
end;

SortTPAFrom(arAP, Point(MSCX, MSCY));
ararP := SplitTPAEx(arAP, 10, 10);
arL := High(ararP);

for i := 0 to arL do
begin
if (Length(ararP[i]) < 10) then Continue;
P := MiddleTPA(ararP[i]);
MMouse(P.x, P.y, 5, 5);
Wait(100 + Random(100));
if (IsUpText('pen')) then
begin;
Result := True;
Break;
end;
end;

ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);

if (i = arL + 1) then
begin
Writeln('Door seems to be open! Going through...');
Exit;
end;

GetMousePos(fx, fy);
end;

function FindFurnace(var fx, fy: Integer): Boolean;
var
arP, arAP: TPointArray;
arC, arUC: TIntegerArray;
ararP: T2DPointArray;
tmpCTS, i, j, arL, arL2: Integer;
P: TPoint;
R, G, B: Integer;
X, Y, Z: Extended;
begin
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(0.40, 0.46);

if not(FindColorsTolerance(arP, 3816256, MSX1, MSY1, MSX2, MSY2, 7)) then
begin
Writeln('Failed to find the color, no object found.');
ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
Exit;
end;

arC := GetColors(arP);
arUC := arC;
ClearSameIntegers(arUC);
arL := High(arUC);
arL2 := High(arC);

for i := 0 to arL do
begin
ColorToRGB(arC[i], R, G, B);

if (R >= 44) and (R <= 81) and (G >= 42) and (G <= 78) and (B >= 42) and (B <= 77) then
begin
ColorToXYZ(arC[i], X, Y, Z);

if (X >= 2.36) and (X <= 7.29) and (Y >= 2.44) and (Y <= 7.56) and (Z >= 2.61) and (Z <= 7.93) then
begin
for j := 0 to arL2 do
begin
if (arUC[i] = arC[j]) then
begin
SetLength(arAP, Length(arAP) + 1);
arAP[High(arAP)] := arP[j];
end;
end;
end;
end;
end;

SortTPAFrom(arAP, Point(MSCX, MSCY));
ararP := SplitTPAEx(arAP, 40, 40);
arL := High(ararP);

for i := 0 to arL do
begin
if (Length(ararP[i]) < 10) then Continue;
P := MiddleTPA(ararP[i]);
MMouse(P.x, P.y, 5, 5);
Wait(100 + Random(100));
if (IsUpText('urnace')) then
begin;
Result := True;
Break;
end;
end;

ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);

if (i = arL + 1) then
begin
Writeln('FindObject could not find object.');
Exit;
end;

GetMousePos(fx, fy);
end;


function FindGhostBanker(var fx, fy: Integer): Boolean;
var
arP, arAP: TPointArray;
arC, arUC: TIntegerArray;
ararP: T2DPointArray;
tmpCTS, i, j, arL, arL2: Integer;
P: TPoint;
R, G, B: Integer;
X, Y, Z: Extended;
begin
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(0.24, 0.55);

if not(FindColorsTolerance(arP, 8497289, MSX1, MSY1, MSX2, MSY2, 21)) then
begin
Writeln('Failed to find the color, no object found.');
ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
Exit;
end;

arC := GetColors(arP);
arUC := arC;
ClearSameIntegers(arUC);
arL := High(arUC);
arL2 := High(arC);

for i := 0 to arL do
begin
ColorToRGB(arC[i], R, G, B);

if (R >= 93) and (R <= 196) and (G >= 105) and (G <= 217) and (B >= 87) and (B <= 186) then
begin
ColorToXYZ(arC[i], X, Y, Z);

if (X >= 11.51) and (X <= 55.73) and (Y >= 13.37) and (Y <= 64.19) and (Z >= 11.19) and (Z <= 55.28) then
begin
for j := 0 to arL2 do
begin
if (arUC[i] = arC[j]) then
begin
SetLength(arAP, Length(arAP) + 1);
arAP[High(arAP)] := arP[j];
end;
end;
end;
end;
end;

SortTPAFrom(arAP, Point(MSCX, MSCY));
ararP := SplitTPAEx(arAP, 10, 10);
arL := High(ararP);

for i := 0 to arL do
begin
if (Length(ararP[i]) < 10) then Continue;
P := MiddleTPA(ararP[i]);
MMouse(P.x, P.y, 5, 5);
Wait(100 + Random(100));
if (WaitUpTextMulti(['host', 'anker', 'alk-to', 'Ghost', 'host banker'], 1000+random(200))) then
begin;
Result := True;
Break;
end;
end;

ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);

if (i = arL + 1) then
begin
Writeln('Could not find the ghost banker.');
Exit;
end;

GetMousePos(fx, fy);
end;

Procedure BankItLikeBeckham(var BarsInteger:integer);
begin
if FindGhostBanker(x, y) then
begin
Mouse(x, y, 0, 0, Mouse_Right);
Wait(randomrange(100,400));
ChooseOption('Bank');
Wait(1400+random(400));
if PinScreen then
begin
InPin(BankPin);
Wait(1000+random(1200));
Withdraw(0, 0, 27);
Wait(250+random(300));
CloseBank;
Wait(400+random(800));
end else
begin
Wait(200+random(200));
Withdraw(0, 0, 27);
Wait(250+random(300));
CloseBank;
Wait(400+random(800));
end;
end;
BarsInteger:= BarsInteger + 27
SPS_WalkToPos(point(6575, 2745));
if FindDoor(x, y) then
begin
Case random(2) of
0: Mouse(x, y, 1, 1, Mouse_Left);
1: begin
Mouse(x, y, 1, 1, Mouse_Right);
Wait(300+random(50));
ChooseOption('pen');
end;
end;
SPS_WalkToPos(Point(6585, 2730));
end else
SPS_WalkToPos(Point(6585, 2730));
end;

Procedure MakinBalls;
Var
x, y: integer;
begin
GameTab(Tab_inv);
SteelBar := DTMFromString('mbQAAAHicY2VgYMhlYmAoBeJ0IM4A4jwgfggUfwDEr6D0MyBOSUhgaKmrY1BSVISz+YHi6JgRCwYDAHGsDJw=');

If FindDTM(SteelBar, x, y, MIX1, MIY1, MIX2, MIY2) then
begin
Case Random(2) of
0: Mouse(x, y, 1, 1, Mouse_Left);
1: begin
Mouse(x, y, 1, 1, Mouse_Right);
ChooseOption('Use');
end;
end;
if FindFurnace(x, y) then
begin
Case Random(2) of
0: begin
Mouse(x, y, 2, 2, Mouse_Left);
Wait(1500+random(300));
MouseBox(229, 398, 290, 456, Mouse_Left);
end;
1: begin
Mouse(x, y, 2, 2, Mouse_Right);
Wait(600+random(300));
ChooseOption('teel');
Wait(1500+random(50));
MouseBox(229, 398, 290, 456, Mouse_Right);
Wait(500+random(100));
ChooseOption('ake');
end;
end;
repeat
Antiban;
Wait(500+random(40));
until not (FindDTM(SteelBar, x, y, MIX1, MIY1, MIX2, MIY2));
end;
if (not(FindDTM(SteelBar, x, y, MIX1, MIY1, MIX2, MIY2))) then
begin
wait(200+random(700));
SPS_WalkToPos(Point(6575, 2740));
if FindDoor(x, y) then
begin
Case random(2) of
0: Mouse(x, y, 1, 1, Mouse_Left);
1: begin
Mouse(x, y, 1, 1, Mouse_Right);
Wait(300+random(50));
ChooseOption('pen');
end;
end;
SPS_WalkToPos(Point(6590, 2785));
end else
SPS_WalkToPos(Point(6590, 2785));
end;
end else
begin
WriteLn('It looks like we are out of steel bars, logging out to be safe.');
Proggy;
ExitToLobby;
TerminateScript;
end;
end;

Procedure Mainloop;
var

Position:String;

Begin
OriginalXP := GetXPBar(1);
If (loggedin) then
repeat
SPS_GetMyPos;
Position := toStr(SPS_GetMyPos);

If (Position = '(6590, 2785)') or (Position = '(6595, 2785)') or (Position = '(6585, 2785)') or (Position = '(6585, 2780)') or (Position = '(6590, 2780)') or (Position = '(6595, 2780)') or (Position = '(6600, 2780)') then
begin;
FindNormalRandoms;
BankItLikeBeckham(BarsInteger);
end;

If (Position = '(6580, 2725)') or (Position = '(6585, 2730)') or (Position = '(6580, 2730)') or (Position = '(6580, 2735)')then
begin
FindNormalRandoms;
MakinBalls;
IncEx(Cannonballs, 108);
Inc(LoadsDone);
Proggy;
end;

If (Position = '(6575, 2720)') or (Position = '(6580, 2720)') or (Position = '(6585, 2720)') or (Position = '(6590, 2720)') or (Position = '(6595, 2720)') then
begin
SPS_WalkToPos(Point(6590, 2785));
Writeln('woops, the door messed us up a bit, but we are back on track!');
end;
If (Position = '(6575, 2740)') then
begin
Writeln('woops, the door messed us up a bit, but we are back on track!');
if FindDoor(x, y) then
begin
Case random(2) of
0: Mouse(x, y, 1, 1, Mouse_Left);
1: begin
Mouse(x, y, 1, 1, Mouse_Right);
Wait(300+random(50));
ChooseOption('pen');
end;
end;
SPS_WalkToPos(Point(6590, 2785));
end else
SPS_WalkToPos(Point(6590, 2785));
end;
If FindNormalRandoms then
SPS_WalkToPos(Point(6590, 2785));

until((BarsInteger + 27)>= BarsToCraft);
end;



begin
SetupLogin;
LogInPlayer;
SPS_Setup(RUNESCAPE_SURFACE, ['16_6']);
Mainloop;
Proggy;
TerminateScript;

Jagex Mod

2012-04-01 20:20:18

I would use it and give progress reports but due to my no scripting knowledge I guess I can't.

Might just have to make these remaining 8k cballs legit then.

Destined2bGreat

2012-04-01 21:35:46

Doing the tasks then I'll test this. Great to see one made so soon.

Stanger

2012-04-05 12:03:33

You are great man as soon as i complete my last quests for tasks I will test it;)

2pacsofgum

2012-04-05 16:28:26

What does this error mean?

[Error] (17:3): Unknown identifier 'HowManyPlayers' at line 16
Compiling failed.

Archaic

2012-04-05 16:42:27

That can be solved by fixing the anti-leech;) You need a couple things after 'program' and before 'var' or you'll have some problems compiling. check out the tutorials section (or just compare this script to another script) and you'll be able to get it running in a couple minutes!

Hope people are liking it so far–please leave a proggy if you use it so I can make it better! Or that anti-leech might start getting harder…:p

kirbyn

2012-04-05 18:46:41

I've added the top bit.. but now its got errors at
 Procedure MakinBalls;
Var
x, y: integer;
begin
GameTab(Tab_inv);
SteelBar := DTMFromString('mbQAAAHicY2VgYMhlYmAoBeJ0IM4A4jwgfggUfwDEr6D0MyBOSUhgaKmrY1BSVISz+YHi6JgRCwYDAHGsDJw=');

If FindDTM(SteelBar, x, y, MIX1, MIY1, MIX2, MIY2) then
begin
Case Random(2) of
0: Mouse(x, y, 1, 1, Mouse_Left);
1: begin
Mouse(x, y, 1, 1, Mouse_Right);
ChooseOption('Use');
end;

Any hints at what i should be doing? :o

Archaic

2012-04-05 20:57:36

Any hints at what i should be doing?


Something in there is an undeclared variable;)

Good luck!

kirbyn

2012-04-06 05:41:14

Okay i think i've declared it, but now this comes up.
[Hint] C:\simba\Includes\SRL/SRL/core/mapwalk.simba(1353:3): Variable 'BOX' never used at line 1352
[Error] (1:1): period ('.') expected at line 0
Compiling failed.
There is no fullstops on any other scripts :S
Found it. >_>

Thanatos

2012-04-06 16:15:02

Seems like a good bot. I like the anti-leech (it held me back for about 5 minutes :p) but the bot seems to be decent. After I finish my current skill training I intend to use it for a bit so I can give you better feedback. Keep up the good work!!!!

Lisida19

2012-04-07 23:44:34

Does it support the morytania medium task reward, which is 50% faster while smelting cannonballs at Port Phasmatys?

Archaic

2012-04-08 00:35:51

Does it support the morytania medium task reward, which is 50% faster while smelting cannonballs at Port Phasmatys?


Yes Indeed:)

Enjoy!

themonky

2012-04-08 18:09:52

im not really the "advanced scripter" but i cant get it to go horizontally its just one extremely long vertical line and im not sure what im supposed to be looking for in th antileech :/

Stanger

2012-04-09 08:13:56

When I solve the anti leech It gives an error and close Simba?

Stanger

2012-04-09 08:42:31

Download/Copy and paste the script-Done
Fix the (small) anti-leech-Done
Fill in the proper log-in information in the script-Done
MAKE SURE YOUR CHARACTER IS WEARING AN AMULET OF GHOSTSPEAK-Done
Position your character directly next to a ghost banker in the Port Phasmatys bank-Done
PUT STEEL BARS IN VERY FIRST SLOT (TOP LEFT CORNER) OF BANK-Done
Click Run-Done
It just stands there doing nothing.??

Stanger

2012-04-09 09:27:38

It is so slow It dont reach the Mainloop @ me. It stucks @ LoginPlayer/

Stanger

2012-04-09 10:06:54

Finally got it worked. I will post my proggy when it ends;)

Stanger

2012-04-09 12:41:30

******************************************************************
*/////////———- Archaic`s Cannonball Crafter ———-\\\\\\\*
*/////////———-*******************************———-\\\\\\\*
******************************************************************
*/////////We have done: 8 Loads / 24 loads per hour
*/////////We have gained: 381 smithing xp /1153 Smithing xp per hour
*/////////We have crafted 864 Cannonballs /2615 CannonBalls Per Hour
*/////////We have crafted 216 Steel Bars /653 Steel Bars per Hour

Successfully executed.
The following DTMs were not freed: [2, 3, 4, 5, 6, 7, 8, 9]

Archaic

2012-04-09 14:32:50

Thanks for the proggy:)

im not really the "advanced scripter" but i cant get it to go horizontally its just one extremely long vertical line and im not sure what im supposed to be looking for in th antileech :/


Try copy and pasting it to a text document then to simba–if I ever have a problem with it being horizontal that seem to fix it. Then from there there are a couple of compiling errors in the script that can be fixed in about 5 minutes if you have a small idea of what you are doing.

good luck;)

Andres

2012-04-09 19:19:45

Not surprised to see this. Hopefully cannonball prices fall from the update. Would be pretty great for me :D

Archaic

2012-04-09 19:39:54

Not surprised to see this. Hopefully cannonball prices fall from the update. Would be pretty great for me


That was my intention a bit too. I feel there is enough anti-leech to keep it from being crazy abused, but just enough to make cannonball prices drop a bit;)

I was considering making an AIO cannon script, but I still have a few projects ahead of that one haha.:p Would level things out in the cannonball economy though.

Lisida19

2012-04-15 16:04:25

What's the problem with the numberofplayers thing? It wont start, so can you please send me the link to how to fix it? Sorry, I am still new to scripting and am learning.

Lisida19

2012-04-15 17:46:51

error when i try to fix the part:
[Hint] C:\Simba\Includes\SRL/SRL/core/mapwalk.simba(1353:3): Variable 'BOX' never used at line 1352
[Error] (348:11): Unknown identifier 'SPS_WalkToPos' at line 347
Compiling failed.
I will be using narcles script until this script is completely fixed. too bad, i couldve doubled my xp per hour.

Archaic

2012-04-15 18:01:35

error when i try to fix the part:
[Hint] C:\Simba\Includes\SRL/SRL/core/mapwalk.simba(1353:3): Variable 'BOX' never used at line 1352
[Error] (348:11): Unknown identifier 'SPS_WalkToPos' at line 347
Compiling failed.
I will be using narcles script until this script is completely fixed. too bad, i couldve doubled my xp per hour.


The script is "completely fixed." Any compiling errors are there to stop people from just copy and pasting and never providing feedback or support.


So it looks like you may be using Narcle's script for awhile because this script will never be "completely fixed.":D

Have fun!:p

On the off chance you want to learn how to actually script and get it to compile, it would take an incredibly basic scripting knowledge and less than 5 minutes to fix the intentional compiling errors.

Take a look at some other scripts that use DTM's and SPS and you'll have it figured out in a jiffy.

Last Legend

2012-04-16 01:05:34

Haha finally :) Was wondering when someone would take advantage of Jagex's kindness through diaries, now I just have to do them XD
Cheers!
Anubis

Lisida19

2012-04-16 17:12:56

From: Archaic
The script is "completely fixed." Any compiling errors are there to stop people from just copy and pasting and never providing feedback or support.


So it looks like you may be using Narcle's script for awhile because this script will never be "completely fixed.":D

Have fun!:p

On the off chance you want to learn how to actually script and get it to compile, it would take an incredibly basic scripting knowledge and less than 5 minutes to fix the intentional compiling errors.

Take a look at some other scripts that use DTM's and SPS and you'll have it figured out in a jiffy.


[Hint] C:\Simba\Includes\SRL/SRL/core/mapwalk.simba(1353:3): Variable 'BOX' never used at line 1352
[Error] (369:1): Unknown identifier 'SteelBar' at line 368
Compiling failed.
sorry being a noob on this, i am completely new to scripting and i really need some help. Just wanted to know, what's a DTM? I tried to add SRL/SRL/core/mapwalk.simba, but it didnt work, as there seemed to have other problems

Archaic

2012-04-17 01:26:08

Haha finally Was wondering when someone would take advantage of Jagex's kindness through diaries, now I just have to do them XD
Cheers!
Anubis


Thanks man! good luck with the diaries–I find them kinda fun haha:p

[Hint] C:\Simba\Includes\SRL/SRL/core/mapwalk.simba(1353:3): Variable 'BOX' never used at line 1352
[Error] (369:1): Unknown identifier 'SteelBar' at line 368
Compiling failed.
sorry being a noob on this, i am completely new to scripting and i really need some help. Just wanted to know, what's a DTM? I tried to add SRL/SRL/core/mapwalk.simba, but it didnt work, as there seemed to have other problems


A DTM is a dynamic template model. Generally they are defined as integers. Try looking around a bit or using the search button. And that's not the proper way to define SPS which is also leading to problems with compiling–also, ignore the 'BOX' error, that's a SPS thing not a script thing.

good luck.

Unameit07

2012-04-25 16:02:55

If you could post a finished working script that would be awesome. Anyone.

Archaic

2012-04-25 20:59:37

If you could post a finished working script that would be awesome. Anyone.


Please either attempt to learn how to script or get the hell off my thread.:D It would literally take 20 minutes to learn how to fix the errors–if you have problems I'd happily help. I spend a lot of time making my scripts and if you won't even put in the effort to do a little work then you will never use my scripts–simple as that.

And if anyone posts the fixed script it will promptly be reported as I do not give anyone other than myself permission to post my script in its entirety.

Whatmatters

2012-04-29 03:58:41

The deterrents were a fun little setback.

Anyhow, script observations:
-When it lands on the furthest left bank booth, the script stalls indefinitely.
-It's rather faithful to the scenario that the door is always closed (extremes of bot arousal).
-The script walks to the door position for each step regardless of the door being open or closed. I hope we can agree that behavior is slightly peculiar to a human user.
-The position for door to furnace is an awkward tile for that short of a distance.

Ideas:
-Redesign the loop to assume that doors are open; have it deal with doors should they appear rather than with the script always stopping for long periods of time with the idea that the door is usually closed.

Ex: Have it try walking to the bank or furnace in one click, and have the door check if the one click trip fails.

You'll probably have to use a different walk method as sps doesn't really have door-dealing ability lulz.

-For door to furnace walking, you already have a tpa furnace search. The hunk of black metal is visible from the door. You can use that for getting to the furnace be it with clicking the furnace or a spot (x - 50) away or something. Using the bar on the furnace after opening the door is plausible too (although probably more prone to griefers).

******************************************************************
*/////////We have done: 5 Loads / 27 loads per hour
*/////////We have gained: 3456 smithing xp /18994 Smithing xp per hour
*/////////We have crafted 540 Cannonballs /2967 CannonBalls Per Hour
*/////////We have crafted 135 Steel Bars /741 Steel Bars per Hour

Successfully executed.
The following DTMs were not freed: [2, 3, 4, 5, 6]

It works, but the execution is a bit blocky for running without worry. The script is on its way.

Tlachtli

2012-04-30 03:51:27

It would seem that the SPS coordinates have changed with the most recent update. For example, the tile in front of left-most bank window is now (6583, 2783) and the right-most is (6599, 2783). I only assume they have changed because I don't see either of those coordinate sets referenced in the script. I'd make the changes myself, but I have a final tomorrow and don't have the time to put into it.

It would be nice if the SPS include could use a universal offset for reading and outputting coordinates, so that it can keep track of the real coordinates internally without scripters having to change their script for every RS update. With a system like that a simple update to the include would keep everyone's scripts running post-update.

Miltank

2012-04-30 21:28:50

Yeap the script doesn't work at all now… The SPS co-ordinates are off. Anyone know the co-ordinates inside the furnace and around the doors or how to figure them out for my self?

Tlachtli

2012-05-01 02:19:02

From: Miltank
Yeap the script doesn't work at all now… The SPS co-ordinates are off. Anyone know the co-ordinates inside the furnace and around the doors or how to figure them out for my self?


To figure them out yourself, putting a Writeln command in the right places will work wonders. Whenever the script calls for a SPS coordinate, just have it Writeln whatever it gets and that will tell you where you are.

Zockuito

2012-05-01 23:03:24

Thank you! I requested this script a while ago, glad to see it is finally out. :D I tried a little work with it, but alas.. :(

brian235026

2012-05-05 19:04:58

From: Archaic


after fixing the compiling errors when i try to start nothing happens :(

Zockuito

2012-05-10 03:41:46

Rocking anti-ban.. Still working at it!!!

chicken cock

2012-05-11 11:59:13

where do u download? i've been looking for a CB maker for weeks and now that i've found one i dont know where to download it… help plz

abundances

2012-05-11 12:15:41

From: chicken cock
where do u download? i've been looking for a CB maker for weeks and now that i've found one i dont know where to download it… help plz

do you know anything about simba?

mk_shotgun78

2012-05-12 13:01:30

nice script but how do i get it to work? for some reason it does not want to compile? gives me an error for [Error] (17:3): Unknown identifier 'HowManyPlayers' at line 16
Compiling failed.

Archaic

2012-05-19 16:12:37

Sorry I've been inactive for a while, college was getting the best of me:p Ya, the script probably isn't working right now due to SPS being updated to SPS 2.0. If you use SPS 1.0 It should work just fine. I'll update the coordinates to SPS 2.0 when I get some time:)

oudshoorn

2012-06-13 12:14:50

Archaic, can you maybe upload the script as a file because i can't copy it to Simba without getting everything on one line.
I already tried to copy/paste it into notepad and from there into Simba but that didn't work and I also searched around the forums but it didn't bring me anything good.

So that's why I am asking you to upload the script as a file, can you please do that?

broski2929

2012-06-25 11:12:51

if im getting "[Error] (353:11): Unknown identifier 'SPS_WalkToPos' at line 352" am i still trying to figure out the anti-leech or is something wrong? plz pm me because i need a little help…. thank you

Edit: Got something about how "SteelBar" was never identified, added it to the list of vars at the top and now im getting [Error] (1:1): Unexpected end of file at line 0
Compiling failed.

ill keep at it i suppose

2nd Edit: what do you mean "Restarting the Simba"? just closing it, reopening and compiling again? becuase ive done that and its still getting unexpeted end of file at line 0

shmarsh

2012-06-30 17:45:58

i added the var thing correctly but i dont know what comes after it i.e. "XXXXXXXX: ????;"
and [Error] (1:1): Unexpected end of file at line 0 >.>

purerange86

2012-07-04 03:51:27

Hey Archaic :)
Just saying, I'm new to the community, and am trying to start learning scripting :p
I have pretty much zero knowledge about SRL but I can fix this…
I think anti-leech needs harder >.>
Thanks. Any ideas where to start with learning scripting/language/etc?

Edit: and broki in answer to your question you have to import SPS for there to be SPS. check out other scripts that use it if you need help.
Restarting the simba has always solved the unexpected end of file thing.
oudshoorn if you're still wondering, copy it into note pad, save as ArchaicCannonballSmelter.simba wherever you want and then run/fix :)

Terminatorbot

2012-07-04 21:12:11

Can't wait to get this working

MotorMouse

2012-07-05 13:31:41

I can better write my own script insteed of fixing the anti-leech from others.