|
you only have to setup the follow things nothing else !!
Const HOTKEY_CRITS = "%4" '"Finishing Moves"
this means make a macro like this for your finisher moves:
/Cast "rout II"
/Cast "Maul of the Gods III"
Harvest Macro Which is on ALT-2
/targetnextnode
/autoattack
Loot Macro Which is on ALT-1
/lootall
/TargetNextCorpse
'********************************************************************'
'* Author : Mik ( Kumpel100) *'
'* Release : 4/13/07 *'
'* Version : 1.6 *'
'* License : TaultUnleashed Premium Members ONLY *'
'* Credits : Modified Bloodmage bot from Binafus *'
'********************************************************************'
'****************************************************'
'* MOVEMENT KEYS MUST BE SET AS FOLLOWS *'
'* a = Turn LEFT *'
'* d = Turn RIGHT *'
'* w = FORWARD *'
'****************************************************'
'********************************************************************'
'* Set up your primary HOT BAR in game as follows *'
'* Slot 1 = *'
'* Slot 2 = Holy Nuke *'
'* Slot 3 = *'
'* Slot 4 = *'
'* Slot 5 = *'
'* Slot 6 = *'
'* Slot 7 = Instant Heal *'
'* Slot 8 = Heal HoT *'
'* Slot 9 = Self Heal *'
Const NUKE_DOOM = "2" ' Holy Nuke
Const HEAL_PLAYER_INSTAND = "7" ' instandheal
Const HEAL_PLAYER_HOT = "8" ' Heal Hot
Const HEAL_PLAYER = "9" ' Healing Touch
Const SPELL_SLEEP = 2100 ' SPELL DELAYS
Const MELEE_SLEEP = 1000 ' MELEE DELAYS
'********************************************************************'
'********************************************************************'
'* Set up your ALT HOT BAR in game as follows *'
'* Slot 1 = Loot Macro *'
'* Slot 2 = Harvest Macro *'
'* Slot 3 = *'
'* Slot 4 = HOTKEY_CRITS means your Finisher moves in one Macro *'
'* Slot 5 = Power_of_Reprisal *'
'* Slot 6 = BUFF_Spirit *'
'* Slot 7 = BUFF_Renewal *'
'* Slot 8 = BUFF_Bestowal *'
'* Slot 9 = BUFF_Resolution *'
'* Slot 10 = BUFF_Endowment *'
Const BUFF_Renewal_II = "%3" '"Reneval III"
Const HOTKEY_CRITS = "%4" '"Finishing Moves"
Const BUFF_Power_of_Reprisal = "%5" '"Spirit Damage"
Const BUFF_Spirit_Ressist = "%6" '"Spirit Ward"
Const BUFF_Renewal_III = "%7" '"Reneval III"
Const BUFF_Bestowal = "%8" '"Buff I"
Const BUFF_Resolution = "%9" '"Buff II"
Const BUFF_Endowment = "%0" '"Buff III"
'********************************************************************'
'********************************************************************'
'* Set up your CTRL HOT BAR in game as follows *'
'* Slot 1 = Auto_Attack *'
'* Slot 2 = MeleeI *'
'* Slot 3 = MeleeII *'
'* Slot 4 = MeleeIII *'
'* Slot 5 = MeleeIIII *'
'* Slot 6 = Aegis *'
'* Slot 7 = Ward *'
'* Slot 8 = Gift *'
'* Slot 9 = Transmutation INVIS *'
'* Slot 10 = *'
Const HOTKEY_AUTO_ATTACK = "^1" ' Auto Attack Key
Const HOTKEY_MeleeI = "^2" ' Meleee Attacks
Const HOTKEY_MeleeII = "^3" ' Meleee Attacks
Const HOTKEY_MeleeIII = "^4" ' Meleee Attacks
Const HOTKEY_MeleeIIII = "^5" ' Meleee Attacks
Const HOTKEY_Aegis = "^6" ' Meleee Attacks
Const AegisUse = 1 'Aegis of Blades 1 = yes 0 = No
Const HOTKEY_Ward = "^7" ' Meleee Buff
'Const HOTKEY_Gift = "^8" ' Meleee Dmg Buff
Const HOTKEY_INVIS = "^9" ' Invis
HAVE_INVIS = 1 ' Does your Class have Invis
'********************************************************************'
'****************************************************'
'* EDIT the following Consts to match your settings *'
'****************************************************'
Const LEVEL_TRAINED = "48" ' Last level trained
Const HOTKEY_NEXT_MOB = "z" ' Cycle mobs
Const HOTKEY_NEAREST_MOB = "u" ' Nearest Mob
'*****************************************************************'
'* If you set your hotbar up as instructed these are fine *'
'* If you want to have your hotbar different change these *'
'* The Sleep are cooldown timers. *'
'* If you cast too fast you will run out of power on harder mobs *'
'*****************************************************************'
'*****************************************************************'
'*****************************************************************'
Const QUIT_ON_TELL = 0 ' Set to 1 if you wish the bot to exit on recieving a tell
Const AVOID_PLAYERS = 1 ' Set to 1 to avoid players, invis move to next waypoint to stay away from them
Const STOP_DEAD = 1 ' Set to 1 if you wish Vanguard to exit if you die or it runs max loops
Const MAX_MOB_LEVEL = 50 ' Max level of mob you wish to attack
Const MIN_MOB_LEVEL = 1 ' Min level of a mob to attack, some world items are level 1
Const MAX_RUNS = 500000 ' How many loops to do
Const WALK = 2500 ' How long the player will walk to the next waypoint, he will not stoped if attacked.
ControlBar = 1 ' 1 = Turn on Control Box 0 = Turn off Control Box
Const XMAX = 2000 ' Max Difference X Cords of Waypoints
Const YMAX = 2000 ' Max Difference Y Cords of Waypoints
Const ZMAX = 500 ' Max Difference Z Cords of Waypoints
'**********************************************************************************************************************'
'* WAYPOINTS = needs to equal how many waypoints u are actually using *'
'* WAYPOINTS = 0 will equal no movement just stand in one place and kill
'* Dim WAYPOINT_ARRAY(X,2) fill in X with the number that you put in WAYPOINTS
'**********************************************************************************************************************'
Const WAYPOINTS = 2 ' Set to 0 if you are not using Waypoints
Dim WAYPOINT_ARRAY(2,3) ' Set to x,2 where x is the number of waypoints
WAYPOINT_ARRAY(0,0) = -69563
WAYPOINT_ARRAY(0,1) = 20284
WAYPOINT_ARRAY(0,2) = 6213
WAYPOINT_ARRAY(1,0) = -67332
WAYPOINT_ARRAY(1,1) = 19359
WAYPOINT_ARRAY(1,2) = 5980
'*****************************************************************************************************************************************'
' If you wish to Skin/Harvest the mobs you kill Change HARVEST_MOB = 1 and fill in the mobs you will be harvesting in the GoodSpawns
'*****************************************************************************************************************************************'
Const HARVEST_MOB = 0 ' Try to Skin mobs just killed ? 1 = true 0 = False
Const HARVEST_DELAY = 6 ' If you are still Harvesting when it tries to Loot raise this number, if it is waiting too long to loot lower it
'***********************************************************************'
'* EDIT the following Mob list if you will be skinning them *'
'***********************************************************************'
Dim GoodSpawns(7)
GoodSpawns(0) = "Fallen Wolf"
GoodSpawns(1) = "Fallen Bear"
GoodSpawns(2) = "Troll Zombie"
GoodSpawns(3) = "Deadland Aggressor"
GoodSpawns(4) = "Deadland Aggressor"
GoodSpawns(5) = "Deadland Aggressor"
GoodSpawns(6) = "Deadland Aggressor"
GoodSpawns(7) = "Deadland Aggressor"
'***********************************************************************'
'* EDIT the following Player list to Players not to exit on tells from *'
'* Change the Dim GoodPlayer(x) Where X = the length of the array *'
'* This only matters if you have AVOID_PLAYERS set to 1 *'
'***********************************************************************'
Dim GoodPlayer(4)
GoodPlayer(0) = "Joe"
GoodPlayer(1) = "Test"
GoodPlayer(2) = "Bill"
GoodPlayer(3) = "Tom"
GoodPlayer(4) = "Edd"
'************************************************************************************************************************************'
' HARVEST_NODES = 1 will turn on harvesting, Then fill out the array with nodes you wish to harvest.
' You do not need the full name of a node if you wanted to harvest Cotton and Mature Cotton you would only need the word Cotton
' List of items
' REAPING T1-Jute T2-Cotton T3-Firegrass T4-Silkbloom T5-Veilthread T6-Steelweave
' LUMBER T1-Weakened T2-Barbed Thorn T3-Dry Arid Desicated T4-Knotted Warped Gnarled T5-Dusky T6-Aged
' METAL - T1-Copper T2-Tin Nickel T3-Iron T4-Pyrite Embersteel Sunflame T5-Mithral Silver T6-Draconite
' STONE - T1-Basalt T2-Slate Gneiss T3-Sandstone Soapstone Alabaster T4-Limestone Travertine Marble T5-Granite Skarn T6-Obsidian Onyx
' GEM - T1-Quartz T2-Garnet Carnelian T3-Amethyst Moonstone Soulstone T4-Jade Malachite Peridot T5-Sapphire Lapis T6-ToothAgate Topaz
' So if you wanted Teir 2 in Reaping and Teir 1 and 2 in Lumber you would put the following in the array
' The array can be as many lines as you need just make number of items in your array match X Harvest_Array(X)
'*************************************************************************************************************************************
HARVEST_NODES = 0 '// 0 = No 1 = Yes
Dim Harvest_Array(4)
Harvest_Array(0) = "Cotton"
Harvest_Array(1) = "Weakened"
Harvest_Array(2) = "Barbed"
Harvest_Array(3) = "Thorn"
'*******************************'
'* DO NOT EDIT BELOW THIS LINE *'
'*******************************'
Let me know how the bot runs for you and if you are experiencing any problems while running the bot.
for Waypoints use the Waypoints 1.1.
ClericBot 1.1 : Buffing works now correct.
ClericBot 1.2 : Fixet Harvesting and LoS problems with mobs, running to fleeing mobs and kill/Harvest them.
ClericBot 1.3 : better double add handling/ move to loot works now better.
(Beta) 12 hr tested and no problems!!
ClericBot 1.4 also with XP status / Avoid Players / little control window for Pause,UnPause,Exp,Exit (atleast all that have the Newest Binafus BM version have)
Binafus Heat up good work.
ClericBot 1,5 use chat read to see "no line of sigh" to fix LoS problems.
ClericBot 1,5 Harvesting Notes works now.
(bug) you can get stuck on trees etc when you harvesting Notes.
Hope find a Fix soon.
| Attachments: |
- ClericBot 1,6.vbs Register to unlock hidden link
- Harvesting Notes works now.
(bug) you can get stuck on trees etc when you harvesting Notes. - (48.97 KiB) Downloaded 127 times
|
- ClericBot 1,4 .vbs Register to unlock hidden link
- ClericBot 1.4 also with XP status / Avoid Players / little control window for Pause,UnPause,Exp,Exit (atleast all that have the Newest Binafus BM version have)
- (42.53 KiB) Downloaded 50 times
|
Last edited by kumpel100 on November 4th, 2007, 7:16 am, edited 9 times in total. |