This program will clean herbs, and make potions from a vial of water to a finished potion. Remember, in setting the row and colem, they both start on zero, so the first bank slot would be 0 0, the one to the left would be row 0, col 1, ect. Tabs are not supported.
Features:
Smart
can work in specific bank, or any bank with an npc.
I am posting this for fair use, and I am not required to post anything, If I feel that my work is appreciated, I will let it collect dust on my hard drive.
Also note, there is no random event detector or solver. usualy the program will break. I never worry about it, for I sit by my computer while it runs. I do not support having a script train while you are away from your computer, so do not look for random even solvers to be added.
PLEASE post any issues you may have, for this script was not rigorously tested like my other posts, so there may still be a bug or two.
Enjoy!
Code:// ----------------SETUP----------------------------- // must be in any bank that has a NPC loadcount= 10 ; //how many cycles you need sorc=1 ; //0 for cleaning, 1 for vial and first ingredient, 2 for colb= 1 ; //Clean herb row rowb= 2 ; //Clean herb col cols= 0 ; //Vial of water col rows= 2 ; //Vial of water row colu= 5 ; //unfinished pot row rowu= 2 ; //unfinished pot col coli= 3 ; //second ingredient col rowi= 2 ; //second ingeredient row col= 2 ; //dirty herb row row= 2 ; //dirty herb col bankty= 1 ; //0 for any npc bank, 1 for specific bank specific='vwb' ; //some valed inputs are: 'veb', 'vwb' 'feb' var x, y: integer; counter: Integer; count:integer; procedure DeclarePlayers; begin HowManyPlayers := 1; NumberOfPlayers(HowManyPlayers); CurrentPlayer := 0; with Players[0] do begin Name := ''; //set username Pass := ''; //set password Nick := ''; //set nick 3-4 char Active := True; // ---------------END SETUP----------------------------------------



Reply With Quote




