Code:
|Enchant using AA ability or spell in slot 1 (As long as you have the supplies)
|
| 1) It will cast any AA enchant spells that are ready and you have the required components
| 2} It will cast the spell in Gem slot 1, provided it has the components.
| 3) go to step 1 and repeat - you can load up on items you'd like your chanter to make and let them run
|
| the next version will include all of the other classes / diety imbues
|
| v0.99
#include spell_routines.inc
Sub Main
:CheckCursor
/if (${Cursor.ID} && ${Me.FreeInventory}>0) {
/autoinven
}
/if (${Cursor.ID}) /goto :CheckCursor
/if (${Me.Casting.ID}) /goto :CheckCursor
:CastSpell
/if (${Me.AltAbilityReady[Enchant Alaran Metal (x10)]} && ${FindItemCount[=Alaran Metal Bar]}>9) /alt act 709
/if (${Me.AltAbilityReady[Enchant Celestial Platinum (x10)]} && ${FindItemCount[=Primordial Dynastic Radiance]}>9) /alt act 3223
/if (${Me.AltAbilityReady[Enchant Conflagrant Platinum (x10)]} && ${FindItemCount[=Conflagrant Platinum]}>9) /alt act 3221
/if (${Me.AltAbilityReady[Enchant Cosgrite (x10)]} && ${FindItemCount[=Conflagrant Platinum]}>9) /alt act 3219
/if (${Me.AltAbilityReady[Enchant Dwerium (x10)]} && ${FindItemCount[=Dwerium Bar]}>9) /alt act 3207
/if (${Me.AltAbilityReady[Enchant Feymetal (x10)]} && ${FindItemCount[=Feymetal Bar]}>9) /alt act 755
/if (${Me.AltAbilityReady[Enchant Palladium Bar (x10)]} && ${FindItemCount[=Prismatic Palladium Bar]}>9) /alt act 3204
/if (${Me.AltAbilityReady[Enchant Planar Alloy (x10)]} && ${FindItemCount[=Planar Alloy]}>9) /alt act 1801
/if (${Me.AltAbilityReady[Enchant Refined Velium (x10)]} && ${FindItemCount[=Refined Velium]}>9) /alt act 3225
/if (${Me.AltAbilityReady[Enchant Refined Restless Velium (x10)]} && ${FindItemCount[=Refined Restless Velium]}>9) /alt act 3227
/if (${Me.AltAbilityReady[Enchant Honed Bloodied Luclinite (x10)]} && ${FindItemCount[=Honed Bloodied Luclinite]}>9) /alt act 3229
/if (${Me.AltAbilityReady[Enchant Temporite (x10)]} && ${FindItemCount[=Temporite Bar]}>9) /alt act 3210
/if (${Me.Gem[1].Name.Equal[Greater Mass Purify Mana]} && ${FindItemCount[=Poison Vial]}>19 && ${FindItemCount[=Ruby]}>79 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Distill Mana]} && ${FindItemCount[=Poison Vial]}>19 && ${FindItemCount[=Sapphire]}>39 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Clarify Mana]} && ${FindItemCount[=Poison Vial]}>19 && ${FindItemCount[=Emeralds]}>19 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Crystallize Mana]} && ${FindItemCount[=Poison Vial]}>19 && ${FindItemCount[=Peridot]}>19 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Thicken Mana]} && ${FindItemCount[=Poison Vial]}>19 && ${FindItemCount[=Pearl]}>19 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Water]} && ${FindItemCount[=Water Mephit Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Fire]} && ${FindItemCount[=Fire Mephit Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Air]} && ${FindItemCount[=Air Mephit Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Valor]} && ${FindItemCount[=Metalic Liquid]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue War]} && ${FindItemCount[=War Wraith Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Nightmare]} && ${FindItemCount[=Nightmare Mephit Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Storm]} && ${FindItemCount[=Storm Rider Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Earth]} && ${FindItemCount[=Earth Mephit Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Torment]} && ${FindItemCount[=Tormentor Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Justice]} && ${FindItemCount[=Alkaline Etched Stone]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Imbue Disease]} && ${FindItemCount[=Bubonian Blood]}>0 && ${FindItemCount[=Raw Diamond]}>0 && ${Me.SpellReady[${Me.Gem[1]}]}) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Mithril]} && ${FindItemCount[=Large Brick of Mithril]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Steel]} && ${FindItemCount[=Large Brick of High Quaility Ore]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Adamantite]} && ${FindItemCount[=Large Brick of Adamantite]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Brellium]} && ${FindItemCount[=Large Brick of Brellium]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Velium]} && ${FindItemCount[=Velium Bar]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Platinum]} && ${FindItemCount[=Platinum Bar]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Gold]} && ${FindItemCount[=Gold Bar]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Silver]} && ${FindItemCount[=Silver Bar]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Electrum]} && ${FindItemCount[=Electrum Bar]}>20) /cast "${Me.Gem[1]}"
/if (${Me.Gem[1].Name.Equal[Greater Mass Enchant Clay]} && ${FindItemCount[=Large Brick of Clay]}>20) /cast "${Me.Gem[1]}"
:MedUpCheck
/if (${Me.PctMana}<20) {
/echo Medding to 99%
/sit
:MedLoop
/if (${Me.PctMana}<99) /goto :MedLoop
}
/goto :CheckCursor
/endmacro
Last edited by a moderator: