Jump to content
LordJashin

EpiX's BoneBurier

Recommended Posts

I do not take credit for this. This was soley made and orchestrated by Epix. I am proud of him for this. Note this script isn't the best yet,

and DOES not have ANY Antiban afaik. And if it does, it isn't very good. The script does work however.

 

Stability: Works

Failsafes: No idea

AntiBan: A little maybe?

Version: Like 1.1

 

For SCAR 3.35+ Only. You must have OSI Include installed

 

EpiX's BoneBurier

 

 

Burys any bones in almost any bank location.

Flawless so far and have never ran into a error/bug.

Nice GUI form for username,password,bank pin, etc.

Created by EpiX, so you know its a good script;)

 

PLEASE LEAVE A COMMENT BELOW IF YOU USED IT, LEAVE FEEDBACK, SUGGESTIONS, ANYTHING! Thnx!

 

How to setup: Download the Bot Client, go to RS2Bots.tk scripts Add this script or paste in the auth code below, and add it.

Or you can just copy and paste the source code below and run in SCAR Divi.

 

Download Bot Client:

http://rs2bots.tk/Downloads/RS2Bots.tk%20Bot%20Client.exe

 

Auth Code:

zwqifdclworrc

 

 

thebank.png

 

Source:

 

[scar]

{

 

 

Created by: EpiX

 

Property of: http://www.RS2Bots.tk

 

Version: 2.00

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

}

{$DEFINE RS2}

{$DEFINE SMART}

{$I OSI\OSI.Scar}

 

var

Form1: TForm;

Label1: TLabel;

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

Button1: TButton;

ComboBox1: TComboBox;

RSName,RSPass,RSPinn: String;

BankLoc, completed: Integer;

const

fqz = ']';

Player_Booleans_Count = 1;

gw = 'piX';

Player_Integers_Count = 1;

Player_TIA_Count = 1;

jjz = '[E';

 

procedure StartButton(sender: TObject);

begin

RSName := Edit1.Text;

RSPass := Edit2.Text;

RSPinn := Edit3.Text;

BankLoc := ComboBox1.ItemIndex;

Form1.Modalresult:=mrOK;

end;

 

procedure ClosedForm;

begin

ShowMessage('Dont close the form! Use the "Start" button to start the bot.');

TerminateScript;

end;

 

procedure sM(Text: string);

begin

writeln(jjz+gw+fqz+' ' + Text);

end;

 

 

procedure Form1_Init;

begin

Form1 := CreateForm;

Label1 := TLabel.Create(Form1);

Edit1 := TEdit.Create(Form1);

Edit2 := TEdit.Create(Form1);

Button1 := TButton.Create(Form1);

ComboBox1 := TComboBox.Create(Form1);

Edit3 := TEdit.Create(Form1);

with Form1 do

begin

Left := 653;

Top := 330;

BorderIcons := [biSystemMenu];

BorderStyle := bsSingle;

Caption := 'EpiX`s BoneBurier';

ClientHeight := 170;

ClientWidth := 170;

Color := clBlack;

Font.Charset := DEFAULT_CHARSET;

Font.Color := clWindowText;

Font.Height := -11;

Font.Name := 'Tahoma';

Font.Style := [];

OldCreateOrder := False;

PixelsPerInch := 96;

end;

with Label1 do

begin

Parent := Form1;

Left := 6;

Top := 140;

Width := 157;

Height := 25;

Caption := 'Created by: EpiX';

Font.Charset := DEFAULT_CHARSET;

Font.Color := clWhite;

Font.Height := -21;

Font.Name := 'Tahoma';

Font.Style := [];

ParentFont := False;

end;

with Edit1 do

begin

Parent := Form1;

Left := 12;

Top := 12;

Width := 145;

Height := 21;

Color := clWhite;

Font.Charset := DEFAULT_CHARSET;

Font.Color := clMaroon;

Font.Height := -11;

Font.Name := 'Tahoma';

Font.Style := [];

ParentFont := False;

TabOrder := 0;

Text := 'UserName';

end;

with Edit2 do

begin

Parent := Form1;

Left := 12;

Top := 36;

Width := 145;

Height := 21;

Color := clWhite;

Font.Charset := DEFAULT_CHARSET;

Font.Color := clMaroon;

Font.Height := -11;

Font.Name := 'Tahoma';

Font.Style := [];

ParentFont := False;

PasswordChar := '*';

TabOrder := 1;

Text := 'PassWord';

end;

with Button1 do

begin

Parent := Form1;

Left := 11;

Top := 108;

Width := 149;

Height := 25;

Caption := 'Start Bot';

TabOrder := 2;

OnClick := @StartButton;

end;

with ComboBox1 do

begin

Parent := Form1;

Left := 12;

Top := 84;

Width := 145;

Height := 21;

TabOrder := 3;

Text := 'Bank Location';

Items.Add('Varrock East');

Items.Add('Varrock West');

Items.Add('Al Kharid');

Items.Add('Falador West');

Items.Add('Edgeville');

Items.Add('Grand Exchange');

end;

with Edit3 do

begin

Parent := Form1;

Left := 12;

Top := 60;

Width := 49;

Height := 21;

Color := clWhite;

Font.Charset := DEFAULT_CHARSET;

Font.Color := clMaroon;

Font.Height := -11;

Font.Name := 'Tahoma';

Font.Style := [];

ParentFont := False;

TabOrder := 4;

Text := 'Bank Pin';

end;

end;

 

procedure Form1_SafeInit;

var

v: TVariantArray;

begin

SetLength(v, 0);

ThreadSafeCall('Form1_Init', v);

end;

 

function Form1_ShowModal: Boolean;

begin

Result := Form1.ShowModal = mrOk;

end;

 

function Form1_SafeShowModal: Boolean;

var

v: TVariantArray;

begin

SetLength(v, 0);

Result := ThreadSafeCall('Form1_ShowModal', v);

end;

 

 

procedure EpiXSafe;

begin

case random(6) of

0: MouseSpeed := RR(14,18);

1: MouseBox(78,119,736,536,MoveTo);

2: MouseSpeed := RR(14,18);

3: waitRR(900,2000);

4: MouseBox(10,10,650,530,MoveTo);

end;

SetGameTab(4);

end;

 

procedure StartForm;

begin

Form1_SafeInit;

if Form1_SafeShowModal then

begin

WriteLn('Form returned modalresult ok');

FreeForm(Form1);

end else

begin

ClosedForm;

FreeForm(Form1);

end;

end;

 

procedure DeclarePlayer;

var

I: LongInt;

begin

SetLength(Players, 1);

for I := 0 to High(Players) do

begin

SetLength(Players.Integers, Player_Integers_Count);

SetLength(Players.Booleans, Player_Booleans_Count);

SetLength(Players.TIA, Player_TIA_Count);

end;

with Players[0] do

begin

Name := RSName;

Pass := RSPass;

Pin := RSPinn;

WorldInfo := [True, -1, False];

Active := True;

end;

end;

 

procedure InitiateCharacter;

begin

If Not LoggedIn then

begin

Login;

WaitRR(750,950);

end;

end;

 

procedure NoBank;

begin

writeln('baddd');

sM('You did not select a bank location!');

sM('Bot stopped!');

TerminateScript;

end;

 

procedure StartUp;

var

BI: TBox;

x,y: Integer;

begin

SetGameTab(4);

ClickCompass(True);

Case BankLoc of

0: NoBank;

1: OpenBankEx(Loc_VEB, True, True, True);

2: OpenBankEx(Loc_VWB, True, True, True);

3: OpenBankEx(Loc_AKB, True, True, True);

4: OpenBankEx(Loc_FWB, True, True, True);

5: OpenBankEx(Loc_EVB, True, True, True);

6: OpenBankEx(Loc_GEB, True, True, True);

end;

waitRR(500,900);

if (BankScreen) then

begin

if Random(3) = 0 then

EpiXSafe;

BI := GetBankSlotBounds(1);

MouseBox(BI.x1, BI.y1, BI.x2, BI.y2, MoveTo);

if isUpTextMulti(['Bone','Bones','ones']) then

begin

GetMousePos(x,y);

Mouse(x,y,0,0,False);

waitRR(100,300);

ChooseOptionMulti(['All','ll','-All','Withdraw-All']);

waitRR(5,300);

CloseBank(True);

end else

begin

writeln('');

writeln('');

sM('There is no more bones in your bank!');

CloseBank(True);

LogOut;

waitRR(100,300);

TerminateScript;

end;

end;

end;

 

procedure EpiX;

begin

case random(7) of

0: MouseSpeed := RR(14,18);

1: MouseBox(78,119,736,536,MoveTo);

2: MouseSpeed := RR(14,18);

3: SetGameTab(RR(0,11));

4: MouseBox(78,119,736,536,MoveTo);

5: waitRR(1000,2000);

6: HoverSkill(Skill_Prayer,True);

end;

SetGameTab(4);

end;

 

 

procedure Bury;

var

I: Integer;

begin

if Random(4) = 0 then

EpiX;

SetGameTab(4);

for I := 0 to 27 do

begin

MouseItem(I,ClickLeft,True);

waitRR(700,950);

end;

completed := completed+28;

end;

 

procedure Report;

begin

writeln('You have buried ['+IntToStr(completed)+'] bones!');

end;

 

 

begin

StartForm;

SetupOSI;

ClearDebug;

completed := 0;

DeclarePlayer;

InitiateCharacter;

waitRR(500,900);

SetGameTab(RR(1,9));

waitRR(850,1200);

SetGameTab(4);

repeat

StartUp;

Bury;

Report;

until (not (LoggedIn));

end.

[/scar]

Edited by LordJashin
Link to comment
Share on other sites

Also, some ways to make your script better. For the Form make it in SCAR's form editor.

 

Set the Position property of the form to ScreenCenter. There is a way to fix that list you have I forget how though. Also using tab key on the form doesn't work really.

 

Maybe mention, version numbers, and how stable it is? You can say its "flawless", but I can see some flaws already :P. I would put this in the stable but no anti ban really category or fail safes. It can only get better from here though. We just need some anti ban functions for OSI especially for the inventory clicking etc...

 

so after you updated it, it should be v1.1 now xD

Edited by LordJashin
Link to comment
Share on other sites

Also, some ways to make your script better. For the Form make it in SCAR's form editor.

 

Set the Position property of the form to ScreenCenter. There is a way to fix that list you have I forget how though. Also using tab key on the form doesn't work really.

 

Maybe mention, version numbers, and how stable it is? You can say its "flawless", but I can see some flaws already :P. I would put this in the stable but no anti ban really category or fail safes. It can only get better from here though. We just need some anti ban functions for OSI especially for the inventory clicking etc...

 

so after you updated it, it should be v1.1 now xD

 

haha i did use Scar's Form Editor:P

But yeah i cud make it on the ScreenCenter to make it start in the center but i did add some antibans on it.

:P

Link to comment
Share on other sites

can anyone make a cryptocurrency bc game review is fps chess a crypto miner bitcoin in 2030 stake us. alchemy insights mining machine crypto afd bitcoin canada crypto conference 0.031 bitcoin to naira how to use coincap to buy bitcoin buy nfts with bitcoin cryptocurrency coin tracker does buying bitcoin on robinhood count as day trade how to win bitcoins

buy bitcoin from skrill 2.5 bitcoins in dollars can you buy bitcoin on cash app under 18 how to reverse bitcoin transaction on cash app 10 cents to bitcoin wopt anonymous way to buy bitcoin ballet crypto blast up crypto price prediction 0.14 crypto cryptocurrency

crypto com sign up bonus bitcoinx bcx evr airdrop uphold crypto twitter coin paxful 0.847 bitcoin how old do i need to be to buy bitcoin buy sms unit with bitcoin 0.01946537 bitcoin to usd a crypto.com

ripple.io bitcoin metrics can you pay amazon with apple pay google of cryptos $dpi crypto 1 bitcoin value in indian rupees market fear and greed index what crypto to buy budget for gta 5 how to mining helium

25m blockchain standard crypto 2095 bitcoin new alt coins john castic missing nyc day trade crypto reddit
Link to comment
Share on other sites

Ирвин Казино: Промокод и Как им Воспользоваться

Ирвин Казино это модная он-лайн-платформа для азартных игр, предлагающая широкий выбор игровых слотов, настольных игр и живых казино. Одним из методов привлечь новых игроков и поощрить неизменных является использование промокодов. В данном посте мы расскажем, как использовать промокод Ирвин Казино, какой-никакие преимущества он предоставляет и на что направить внимание.

Что есть промокод?

Промокод это композиция цифр и букв, которая предоставляет игрокам определённые бонусы или превосходства во время регистрирования или внесении депозита. Промокоды могут предлагать различные виды акций, такие как безвозмездные вращения, денежные бонусы либо повышенные ставки на определённые забавы.

Как получить промокод Ирвин Казино

Есть несколько методов получить промокод Ирвин Казино:

1. Сайт: Часто казино публикует животрепещущие промокоды на своём веб-сайте в разделе акций или призов. Часто проверяйте этот раздел, чтобы не пропустить прибыльные предложения.

2. Рассылка на электронную почту: Подписавшись на анонсы казино, вы можете быть информированными о особых акциях и промокодах прямо на свою электронную почту.

3. Соц сети: Смотрите за страницами Ирвин Казино в социальных сетях. Довольно частенько вслед за тем публикуются уникальные предложения и промокоды для подписчиков.

4. Форумы и сообщества: Участие в форумах и обществах азартных игроков может помочь для вас отыскать актуальные промокоды, которые делятся пользователями.

Как пользоваться промокодом

Использование промокода в Ирвин Казино довольно просто. Вот пошаговая практическое руководство:

1. Регистрация или вход в аккаунт: Если вы новый игрок, зарегайтесь на сайте. Если у вас теснее есть аккаунт, просто сделайте вход.

2. Переход в раздел бонусов: На веб-сайте казино найдите в этом разделе можно ввести промокод. Как обычно это находится в ходе внесения депозита или в своем собственном кабинете Irwin Промокод

3. Введите промокод: В соответственном поле введите полученный промокод и нажмите кнопку Активировать либо Применить.

4. Пополнение счета: Если промокод связан с первым депозитом, внесите нужную сумму для активации бонуса.

5. Получение бонусов: После удачного ввода промокода ваши призы будут зачислены на счёт, и у вас есть возможность начать их использовать.
Link to comment
Share on other sites

Ведущие типографии в Краснодаре, специализируются на производстве полиграфической продукции. Если вам нужны высококачественные печатные услуги, то вам нужно обратится где предлагаем широкий спектр услуг, которые помогут вам продвигать свой бренд, привлекать новых клиентов и улучшать эффективность вашей маркетинговой стратегии.

Опытные типографии предлагают различные услуги печати, отвечающие всем вашим потребностям в полиграфии. Такие компании специализируются на печати различных типов продукции, включая нагрудные значки, брошюры, бумажные пакеты, визитные карточки, календари, каталоги, листовки и наклейки. Все наши услуги выполняются профессиональными сотрудниками, использующими современное оборудование и самые передовые технологии печати листовка
Link to comment
Share on other sites

Внедрение балясин: стиль и безопасность в архитектуре

Балюстрады, являясь неотъемлемой долею архитектурного дизайна, а именно, балясин, играют важную роль в эстетическом и функциональном оформлении зданий и сооружений. Эти элементы не только придают оригинальность и изящество, но и обеспечивают безопасность на лестницах, балконах и террасах. В данной статье будут рассмотрены, что есть балясина, где и как ее можно использовать, также какие материалы чтобы достичь желаемого результата подойдут.

Что есть балясина?

Балясина это вертикальный элемент, который служит опорой для поручней и образует огораживания. Им предоставляется возможность иметь разную форму, стиль и размер, что позволяет использовать их в самых разных архитектурных решениях. Балясини могут быть выполнены из дерева, металла, стекла, камня и других материалов, выбирая подходящий вариант в большой зависимости от общего стиля строения.

Основные области применения балясин

1. Лестницы: Балясины довольно частенько используются для ограждения лестниц, обеспечивая безопасность и предотвращая падение. Им предоставляется возможность быть как в интерьере, так и на открытых лестницах.

2. Балконы и террасы: На этих элементах балясины служат не только для безопасности, а также для творения уютной атмосферы. Это особенно животрепещуще для загородных домов и дач, в каком месте балкон является зоной отдыха.

3. Парапеты: Балясины могут употребляться для оформления парапетов на крыше либо в процессе создания ограждений вокруг открытых площадок.

4. Садовые и дорожные элементы: В ландшафтном дизайне балясины могут использоваться для дизайна дорожек, цветников и прочих частей, придавая им стильный вид.

Превосходства использования балясин

- Эстетическая привлекательность: Балясины могут добавить изящества и стиля хоть какому месту. Обилие форм и материалов дозволяет создавать уникальные дизайны.

- Безопасность: Они играют главную роль в обеспечении безопасности, в особенности на лестницах и балконах, предотвращая случайные падения.

- Долговечность и обилие: В большой зависимости от используемого материала, балясины могут служить очень долго, сохраняя меня называют Господом внешний вид и функциональность.

Выбор материала для балясин

1. Дерево: Деревянные балясины делают тёплую и уютную атмосферу. Несмотря на свою красу, такие элементы требуют регулярного ухода и обработки для высокой защиты от влаги и вредителей.

2. Металл: Металлические балясины, сделанные из алюминия или стали, отличаются прочностью и устойчивостью к влиянию наружней среды. Они подходят для современных стилей и могут быть окрашены в различные цвета.

3. Стекло: Стеклянные балясины дают обеспечение легкость и визуальную открытость места. Они прекрасно подходят для современных интерьеров, но требуют кропотливого ухода мебельного щит из дерева

4. Камень: Балясины из камня либо искусственного камня придают роскошный вид и крепкость, но могут являться довольно тяжелыми и требуют осмотрительного монтажа.

Заключение

Балясины это не только многофункциональные элементы, но и важная часть архитектурного облика. Их использование дозволяет гармонически соединять безопасность и стиль в интерьере и экстерьере домов. В момент выбора балясин стоит учитывать общий стиль вашего жилого пространства, климатические условия и собственные предпочтения. Верно подобранные и отменно установленные балясины смогут сделать ваше пространство более благовидным и неопасным.
Link to comment
Share on other sites

?Казино: Мир Пыла равно Честь имею

Толпа — это безвыгодный просто заведение, где штаты наигрывают в течение увлекающиеся игры. Это круглая фэшн-индустрия, прельщающая состояние игроков с честь имею кланяться мира. В ТЕЧЕНИЕ этой посте наш брат рассмотрим важнейшие аспекты толпа, ихний ситуацию, пользующийся популярностью зрелище равным образом трансвлияние на общество.

?История Толпа

Толпа хватают собственные корни с старых времен. Выступления сверху шуршики жили на всевозможных культурах равно цивилизациях. Первоначальные популярные толпа появились на Италии в 17 веке, что-что затем эта концепция распространилась числом от мала до велика Европе да в течение Полун/очную Америку.

Постепенно казино изменились с простых картежных заведений в течение шикарные увеселительные сложные комплексы, предлагающие малограмотный чуть только игры, хотя а также рестораны, фейринг (а) также гостинничные услуги.

?Популярные Игры на Толпа

В ТЕЧЕНИЕ толпа buy drugs on ant-models.ru имеется множество игр, хотя несколько изо них стоят особого внимательности:

- Рулетка: Одна с наиболее известных игр. Инвесторы делают ставки на численности или цвета, а затем ожидают, честь имею кланяться колесо стится сверху выигрышном варианте.

- Хорс: Юкер, основанная сверху умениях да стратегии. Существует множество вариантов покера, включая Техасский Холдем равно Омаху.

- Блэкджек: Швырок представления - нанять 21 очко или отступить ко этой цифре, безвыгодный превышая её. Интересная комбинация честь имею (а) также стратегического мышления.

- Игровые автоматы: Обыкновенные а также увлекательные. Игроки скручивают барабаны в течение упованию на выигрыш.
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
  • Create New...