SRL Archive - RS3 Outdated / Broken Scripts

This is my first EOC script I know its not 100% great coding but it works and it will repeat it until you stop it!

Supports:
CastleWarsBank
Fast Setup
Great Magic XP
SMART8 Compatible

ToDo:
Make It Stop If It Can't Find Gold Amulets
Better Detection Of Everything
Improve The Whole Script

How To Setup

[ATTACH=CONFIG]20144[/ATTACH]
This Is How To Have Your Magic Book Setup


[ATTACH=CONFIG]20145[/ATTACH]
This Is Where To Stand To Start The Script

[ATTACH]20262[/ATTACH]SMART8 Version




[PHP]Proggress Reports:
4Hours!!
*************JStringJewelleryEOC*************
Total Time: 4 Hours, 7 Minutes and 37 Seconds
Amulets : 6129 (1485 Per Hour)
*Magic XP earned: 508707 (34 P/H)
By Hexless
*************JStringJewelleryEOC*************


45Mintues:
*************JStringJewelleryEOC*************
Total Time: 45 Minutes and 28 Seconds
Amulets : 1161 (1532 Per Hour)
*Magic XP earned: 96363 (35 P/H)
By Hexless
*************JStringJewelleryEOC*************[/PHP]

Congratz on release :P, I havn't got time to look through atm but I will soon :)

From: The Killer
Congratz on release :P, I havn't got time to look through atm but I will soon :)

thanks :D

From: Hexless
:D

You should incorporate some of the SRL functions into your script.

For example, your withdraw procedure:

Procedure TakeOutAmulets;
Begin
MMouse(59,165,13,13);
wait(250+random(250));
ClickMouse2(False);
wait(500+random(250));
ChooseOptionMulti(['All']);//Takes out all Amulets
wait(1000+random(250));
mmouse(491,97,5,5);
ClickMouse2(True); //Closes Bank;
 End;  

Could be written as:

If BankScreen Then
Begin
   Withdraw(9, 0, 28); // i.e. this will withdraw 28 from last column, top row.
   CloseBank;
End;

If you want to stop the script when you are out of gold amulets then you could simple add this before it takes out the amulets:

If (GetBankItemAmount(9, 0) < 28 ) Then // i.e. if there is less than 28 items in last column, top row.
Begin
   WriteLn('You have less than 28 amulets in your bank - terminating script');
   LogOut;
   TerminateScript;
End; 

Also, instead of clicking coordinates to open the bank (what if the compass rotates or something):

Procedure CastleWarsBank;
Begin
MMouse(305,225,20,20);
wait(250+random(250));
ClickMouse2(True);
wait(1000+random(750));
End;

You could find the bank using SRLs built-in functions:

If OpenBankChest(SRL_BANK_CW) Then
   //Withdraw stuff here

You may want to modify your magic and crafting XP P/H equations too :)

From: The Mayor
You should incorporate some of the SRL functions into your script.

For example, your withdraw procedure:

Procedure TakeOutAmulets;
Begin
MMouse(59,165,13,13);
wait(250+random(250));
ClickMouse2(False);
wait(500+random(250));
ChooseOptionMulti(['All']);//Takes out all Amulets
wait(1000+random(250));
mmouse(491,97,5,5);
ClickMouse2(True); //Closes Bank;
 End;  

Could be written as:

If BankScreen Then
Begin
   Withdraw(9, 0, 28); // i.e. this will withdraw 28 from last column, top row.
   CloseBank;
End;

If you want to stop the script when you are out of gold amulets then you could simple add this before it takes out the amulets:

If (GetBankItemAmount(9, 0) < 28 ) Then // i.e. if there is less than 28 items in last column, top row.
Begin
   WriteLn('You have less than 28 amulets in your bank - terminating script');
   LogOut;
   TerminateScript;
End; 

Also, instead of clicking coordinates to open the bank (what if the compass rotates or something):

Procedure CastleWarsBank;
Begin
MMouse(305,225,20,20);
wait(250+random(250));
ClickMouse2(True);
wait(1000+random(750));
End;

You could find the bank using SRLs built-in functions:

If OpenBankChest(SRL_BANK_CW) Then
   //Withdraw stuff here

You may want to modify your magic and crafting XP P/H equations too :)

Thank you! ive been trying to work out how to use the openbank thing for awhile :p and thanks for the other info

From: Hexless
Thank you! ive been trying to work out how to use the openbank thing for awhile :p and thanks for the other info

If I was you I'd check out all the files in the include (C:\Simba\Includes\SRL\SRL) and get familar with it. It can be a very useful tool if you know your way around it :D