this is a basic bone berying procedure i dont know if it works because i cant get rid of that evil bob error 3 procedures
havent done standards yet but please coment
SCAR Code:
program buryer;
procedure startscript;
begin
if InvFull then
bury;
chatsoff;
if invempty then
withdraw;
chatsoff;
end;
procedure bury;
begin
gametab(4);
MouseItem(1 ,left);
MouseItem(2 ,left);
MouseItem(3 ,left);
MouseItem(4 ,left);
MouseItem(5 ,left);
MouseItem(6 ,left);
MouseItem(7 ,left);
MouseItem(8 ,left);
MouseItem(9 ,left);
MouseItem(10 ,left);
MouseItem(11 ,left);
MouseItem(12 ,left);
MouseItem(13 ,left);
MouseItem(14 ,left);
MouseItem(15 ,left);
MouseItem(16 ,left);
MouseItem(17 ,left);
MouseItem(18 ,left);
MouseItem(19 ,left);
MouseItem(20 ,left);
MouseItem(21 ,left);
MouseItem(22 ,left);
MouseItem(23 ,left);
MouseItem(24 ,left);
MouseItem(25 ,left);
MouseItem(26 ,left);
MouseItem(27 ,left);
MouseItem(28 ,left);
end;
procedure withdraw;
//'akb', 'al kharid'
//'lb', 'lumbridge'
//'veb', 'varrock east'
//'vwb','varrock west'
//'feb', 'falador east'
//'fwb', 'falador west'
//'db', 'draynor'
//'eb', 'edgeville bank'
begin
OpenBankFast(''): Boolean;//bank location read above e.g if ur in draynor put db in the ''e.g 'db'
wait(5000);
PinScreen; if true then
InPin(0000);//pin put pin where 0000 is
wait(5000);
BankScreen; if true then
FixBank;
Withdraw(1, 1, 28);// bones must be in bank slot 1
CloseBank;
end;
please post coments i will improve it my scar isnt working im just using functions and procedures of this website
C:\Program Files\SCAR 3.14\help\SRL.html