PDA

View Full Version : POWERBURYER one that works.. for me at least



Dawg
10-15-2006, 09:30 PM
ANTI-BAN UPDATE POWERBURYER BY DAWG

UPDATED!! WITH RANDOM AND MOUSE ANTI-BAN!!!!

Most Bone Burying Scripts either didn't work for me or too slow, messes up in middle etc..

I created here a simple yet effective Bone Buryer that doesn't rely upon colors too much

so usually will not mess up. It is the fastest bone buryer I've seen and yes since it is fast

it may miss some bones ONLY if there is lagg, so no lagg=no misses!!

This is my first script so any compliments, questions or just random thoughts you

reply will be highly appreciated, Thanks!!! :cool:

I added RANDOM and MOUSE which will greatly decrease chance of getting banned.... i think.. :P :D

UPDATED!! WITH RANDOM AND MOUSE ANTI-BAN!!!!

--------------------------------------------------------------------------------------------------------
Here are the VERSION 1.20 New instruction:
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\//\\POWERBURYER 1.20 BY DAWG//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\ ANTI-BAN CRITICAL UPDATE FOR MOUSE V1.20//\\//\\//\\//\\//\\
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\1.Choose LOW detail (less lag)//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\2.Drag Crosshair To RS Client //\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\3.Set To V-Bright //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\4.All Public,Private,Trade Off//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\5.Start In Bank //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\6.Bones Must Be In First Slot //\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\7.Nothing In Inventory //\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\8.Set Up The Few Things //\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\9.Hit Run //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\//\\//\\ /Warning:\ //\\//\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\-Check Progress Once A while //\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\-DO NOT Pause During Burying Process //\\//\\//\\//\\
//\\//\\//\\//\\(any other time is fine) //\\//\\//\\//\\//\\//\\//\\
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\

WT-Fakawi
10-15-2006, 09:54 PM
You should really build in some mouseclick randomness inside this script. This script will get you banned pretty fast.

Try this BoneBurier. Much shorter and wont get you banned.

program BoneBurier;
{.include SRL/SRL.scar}

var
Bone: integer;
begin
Bone := BitmapFromString(4, 4, '000001000001000001D2CCCC9B9' +
'090A19595CEC7C79B909089807FDED9D9CAC3C29A8E8E0000 01C7' +
'BFBFA99D9D000001');
SetupSRL;
ClickAllItemsBmpTolWait('ury', Bone, 50, 250); // bury bones

end.

Yes, SRL is cool :)

Home
10-15-2006, 10:26 PM
You should really build in some mouseclick randomness inside this script. This script will get you banned pretty fast.

Try this BoneBurier. Much shorter and wont get you banned.

program BoneBurier;
{.include SRL/SRL.scar}

var
Bone: integer;
begin
Bone := BitmapFromString(4, 4, '000001000001000001D2CCCC9B9' +
'090A19595CEC7C79B909089807FDED9D9CAC3C29A8E8E0000 01C7' +
'BFBFA99D9D000001');
SetupSRL;
ClickAllItemsBmpTolWait('ury', Bone, 50, 250); // bury bones

end.

Yes, SRL is cool :)

Hahaha, Kinda Owned :D

Fawki --- > :spot:

WT-Fakawi
10-15-2006, 10:37 PM
[smilie=8,2,9] Oops, didnt mean to.
You have done well though, Dawg. Every home made script is a good one, since you've taken the time to make something usefull.
Good work. Didnt mean to "own", just demonstrating to you the power of SRL.

Dawg
10-15-2006, 11:16 PM
Hey thanks for telling me woah that was close!!!

I Updated mine for two reasons:

1. Your script did not work
2. I like to learn from mistakes

Now i added randomness (lots of it) and mousesmooth thingy and stuff...

PLEASE check it again and see if it's good or bad

thanks!!!

Mutant Squirrle
10-15-2006, 11:25 PM
Looks pretty good first script?

Dawg
10-15-2006, 11:37 PM
Thanks and yes it says right up there:

"This is my first script so any compliments, questions or just random thoughts you

reply will be highly appreciated, Thanks!!! :cool:"

Hopefully the randoms work..

_ChArMz
10-15-2006, 11:47 PM
ClickMouse, is detecteable is it not?

Dawg: I recommend useing the procedures..

MMouse(x, y, 0, 0); - Moves Mouse
Mouse(x, y, 0, 0, True); True For Left Click, False For Right Click

legendaryhero90
10-16-2006, 08:47 PM
it doesn't pick up bones?
how do you add this procedure in?

legendaryhero90
10-16-2006, 08:51 PM
so....
im guessing it doesnt pickup bones:(

EDIT: sorry for double posting.... my computer lags sometimes

I Pick Axes
10-16-2006, 10:17 PM
it doesn't pick up bones?
how do you add this procedure in?

Use FindColorSpiralTolerance for a bone color.
Check if IsUpText matches.
MouseFlag the bone, Wait for the pickup.
Repeat this Until your have InvFull.

And alternately call that and the burying procedure.

Dawg
10-16-2006, 10:50 PM
Hey Charmz i dont get when you said


MMouse(x, y, 0, 0); - Moves Mouse
Mouse(x, y, 0, 0, True); True For Left Click, False For Right Click

How does that work?? it says unknown identifier or Invalid number of parameters when i press run..

EDIT: NEVERMIND i know and i updated it so it has that MMouse and Mouse!! Thanks alot.. Phew!!

legendaryhero90
10-17-2006, 01:05 AM
ok I Pick Axes
ill try that but knowing that im not too good at scripting yet...
ill probably screw up the entire script...
but im going to try anyways

thanks again:D

flapjacks
12-18-2006, 05:42 AM
lol is works but slow and laggy

anandacote
12-19-2006, 04:51 PM
ok i am gonna try it