PDA

View Full Version : SuperBatMans SuperAlcherV1.1



superbatman
01-21-2009, 04:50 AM
Sup All, this was actually my first script ummmm... it works really good, Ive ran it for quite a while b4(sry no proggys), And I THink It could Run Forever if You Had A ton of Alchs in your inv. Anyways.... hereyago!!

*ANTIRANDOMS
*ANTIBANS
*RANDOMTALK
*BUYS MORE ALCHS IF YOU CHOOSE
*HIGH ALCH, LOW ALCH, AND CAMMY TELE
*SMART

PLEASE POST UP PROGGYS!!!!

CRITISIZM HIGHLY APPRECIATED

TELL ME HOW IT WORKS (OR IF IT DOES XD)

I USED IT TO GET ME FROM 72 MAGE TO 79 MAGE, THEN I GOT BORED OF IT AND DECIDED TO GO WRITE ANOTHER SCRIPT<------LAWL

0wn 4 skill
01-21-2009, 11:41 AM
Well, ive had a look and it seems pretty... Ugly.


CRITISIZM HIGHLY APPRECIATED

You really need to work on your standards alot - Won't take long.

Whats the Confb Bitmap for? Maybe name it something so other scripters can understand what its about.

How did you manage 8k alchs while you went to school? I do not see a sleep function in there. Its kinda impossible to be quite honest.


-I might ad SMART but i really dont fully understand what it is.
If you could kindly explain it to me, im all ears.

Heres how to add smart, just add it after SetupSrl;

SmartSetupEx({World to load}, {Members world?}, true, false);
SetTargetDC(SMARTGetDC);
While Not RSReady Do Wait(100);

I feel bad for my critisms, but i hope you take them in your stride and don't let them knock you back because this is a good first Junior Member release!
Keep working at it. It will be great some day!

Naum
01-25-2009, 09:26 AM
Looks good,

Usage of cases :)

Procedure AlchThemAll;
begin
Cast(Spell);
wait(50+random(20));
If(Spell='High Level Alchemy') then
begin
MouseItem(13,true);
wait(1600+random(100));
end;
If(Spell='Low Level Alchemy') then
begin
MouseItem(8,true);
wait(1500+random(100));
end;
If(Spell='Camelot Teleport') then
begin
Wait(1000+random(100));
end;
end;

to


Case Spell Of
'Camelot TELEPORT' : Begin
end;

Would shorten out code alot, also try reading this tutorial on cases
http://www.villavu.com/forum/showthread.php?t=20298?t=22165

WT-Fakawi
01-25-2009, 10:00 PM
Granted Promising Newcomer (http://www.villavu.com/forum/showthread.php?t=41106?p=534905#post534905) award. Good work! Keep it up!


WT.