Back to "spiritspeak" skill

Auto Summoner w/auto healing by dennozz

#Auto-summoner ver.3.00 #********** INFORMATION **********# #Made by @dennozz on discord. #Inspired/learned by other scrips in https://outlands.uorazorscripts.com/ #This script will auto summon your desired followers and also auto heal you. #********** SET YOUR SETTINGS **********# @setvar! earthElementals 1 @setvar! waterElementals 1 @setvar! airElementals 0 @setvar! fireElementals 0 @setvar! summonDaemons 0 @setvar! summonCreature 1 #--- Set Necromancy Spells ---# @setvar! NecroVengefulSpirit 0 @setvar! NecroBloodOath 0 @setvar! NecroWither 0 #--- Set mushrooms ---# @setvar! mushroomCount 4 @setvar! mushroomTimerCD 60000 settimer mushroomTimer mushroomTimerCD #--- Set meditation ---# @setvar! useMeditation 1 @setvar! meditateManaReach 50 @setvar! meditateUntilManaReach 55 #--- Set Mage auto heals ---# @setvar! miniHeal 1 @setvar! greaterHeal 1 @setvar! cureSpell 1 #--- Set Mage Buffs ---# @setvar! magicReflect 1 @setvar! bless 1 @setvar! armorReflect 1 @setvar! protectionSpell 1 @setvar! miniumManaToBuff 50 #--- Set potions ---# @setvar! drinkStr 1 @setvar! drinkAgility 0 @setvar! drinkMagicResist 0 @setvar! drinkHeal 1 @setvar! drinkCure 1 @setvar! drinkRefresh 1 @setvar! strengthLowerThan 100 @setvar! staminaLowerThan 10 #--- Auto healing hp diffs ---# @setvar! lowDiff 12 @setvar! medDiff 25 @setvar! highDiff 40 @setvar! extremeDiff 60 @setvar! criticalDiff 75 #--- Optional : Have a cooldown named `Heal Pot` ---# @setvar! healingPotCD 11000 @setvar! maxwaittimeinms 650 #********** DO NOT EDIT FROM HERE BELOW **********# @setvar! necroGump 622436516 @setvar! unholyPoints 0 #-- elementals variables --# @setvar! maxFollowers 0 @setvar! currentFollowers 0 removelist maxFollowersList createlist maxFollowersList if earthElementals = 1 pushlist maxFollowersList x pushlist maxFollowersList x elseif earthElementals = 2 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x endif if waterElementals = 1 pushlist maxFollowersList x pushlist maxFollowersList x elseif waterElementals = 2 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x endif if airElementals = 1 pushlist maxFollowersList x pushlist maxFollowersList x elseif airElementals = 2 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x endif if fireElementals = 1 pushlist maxFollowersList x pushlist maxFollowersList x elseif fireElementals = 2 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x endif if summonDaemons = 1 pushlist maxFollowersList x pushlist maxFollowersList x elseif summonDaemons = 2 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x endif if summonCreature = 1 pushlist maxFollowersList x elseif summonCreature = 2 pushlist maxFollowersList x pushlist maxFollowersList x elseif summonCreature = 3 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x elseif summonCreature = 4 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x elseif summonCreature = 5 pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x pushlist maxFollowersList x endif if list maxFollowersList = 0 @setvar! maxFollowers 0 elseif list maxFollowersList = 1 @setvar! maxFollowers 1 elseif list maxFollowersList = 2 @setvar! maxFollowers 2 elseif list maxFollowersList = 3 @setvar! maxFollowers 3 elseif list maxFollowersList = 4 @setvar! maxFollowers 4 else @setvar! maxFollowers 5 endif if not varexist earthFirsty or followers = 0 @setvar! earthFirsty 0 endif if not varexist earthSecondly or followers = 0 @setvar! earthSecondly 0 endif if not varexist waterFirsty or followers = 0 @setvar! waterFirsty 0 endif if not varexist waterSecondly or followers = 0 @setvar! waterSecondly 0 endif if not varexist airFirsty or followers = 0 @setvar! airFirsty 0 endif if not varexist airSecondly or followers = 0 @setvar! airSecondly 0 endif if not varexist fireFirsty or followers = 0 @setvar! fireFirsty 0 endif if not varexist fireSecondly or followers = 0 @setvar! fireSecondly 0 endif if not varexist daemonFirsty or followers = 0 @setvar! daemonFirsty 0 endif if not varexist daemonSecondly or followers = 0 @setvar! daemonSecondly 0 endif if not varexist creatureFirsty or followers = 0 @setvar! creatureFirsty 0 endif if not varexist creatureSecondly or followers = 0 @setvar! creatureSecondly 0 endif if not varexist creatureThirdy or followers = 0 @setvar! creatureThirdy 0 endif if not varexist creatureFourthy or followers = 0 @setvar! creatureFourthy 0 endif if not varexist creatureFithy or followers = 0 @setvar! creatureFithy 0 endif #-- list creation --# if not listexists earthListy or followers = 0 removelist earthListy createlist earthListy endif if not listexists waterListy or followers = 0 removelist waterListy createlist waterListy endif if not listexists airListy or followers = 0 removelist airListy createlist airListy endif if not listexists fireListy or followers = 0 removelist fireListy createlist fireListy endif if not listexists daemonListy or followers = 0 removelist daemonListy createlist daemonListy endif if not listexists creatureListy or followers = 0 removelist creatureListy createlist creatureListy endif @setvar! globalMessageCD 5000 settimer globalMessageTimer globalMessageCD @setvar! summonMsgCD 1500 settimer summonMsgTimer summonMsgCD @setvar! manaMsgCD 2500 settimer manaMsgTimer manaMsgCD @setvar! guardMessageCD 5000 settimer guardMessageTimer guardMessageCD #--- Script msgs timers ---# @setvar! noRegsMessageCD 3000 settimer noRegsMessageTimer noRegsMessageCD #--- Resources timers ---# @setvar! pouchMessageCD 5000 settimer pouchMessageTimer pouchMessageCD @setvar! aidsMessageCD 4000 settimer aidsMessageTimer aidsMessageCD @setvar! whiteMessageCD 3000 settimer whiteMessageTimer whiteMessageCD @setvar! blueMessageCD 3000 settimer blueMessageTimer blueMessageCD @setvar! blackMessageCD 2500 settimer blackMessageTimer blackMessageCD @setvar! orangeMessageCD 2000 settimer orangeMessageTimer orangeMessageCD @setvar! yellowMessageCD 1500 settimer yellowMessageTimer yellowMessageCD @setvar! redMessageCD 1000 settimer redMessageTimer redMessageCD #--- Magery buffs timers ---# @setvar! magicReflectCD 15000 settimer magicReflectTimer 15000 @setvar! armorReflectCD 15000 settimer armorReflectTimer 15000 @setvar! protectionCD 15000 settimer protectionTimer 15000 #sysmsg "MAX: {{maxFollowers}}" 34 while not dead if timer globalMessageTimer > globalMessageCD overhead "* Auto summoning *" 11 settimer globalMessageTimer 0 endif #********* EAT TRAY FOOD ********* if not findbuff "food" and findtype "tray" backpack as fody dclick fody wait 200 endif #********** AUTO HEALING START **********# while diffhits >= lowDiff or paralyzed or poisoned #sysmsg "auto-healing activated" 11 #--- Trapped ---# if paralyzed if findtype "pouch" backpack 38 yell "[pouch" wait 200 else if timer pouchMessageTimer > pouchMessageCD overhead "Out of Pouches!" 34 settimer pouchMessageTimer 0 endif endif endif #--- Self bandage ---# if diffhits >= 1 and not bandaging if skill 'healing' >= 50 or skill "veterinary" >= 50 if findtype 'clean bandage%s%' backpack if targetexists hotkey 'cancel current target' endif dclicktype 'clean bandage%s%' waitfortarget maxwaittimeinms target 'self' wait 200 else if timer aidsMessageTimer > aidsMessageCD overhead "Out of bandages" 34 settimer aidsMessageTimer 0 endif endif endif endif #--- Drink str pot ---# if drinkStr = 1 and str < strengthLowerThan if not findbuff "Strength" if findtype "White Potion" self dclicktype "White Potion" wait 200 else if timer whiteMessageTimer > whiteMessageCD overhead "Out of str pots" 34 settimer whiteMessageTimer 0 endif endif endif endif #--- Drink agility pot ---# if drinkAgility = 1 if not findbuff "Agility" if findtype "Blue Potion" self dclicktype "Blue Potion" wait 200 else if timer blueMessageTimer > blueMessageCD overhead "Out of agility pots" 34 settimer blueMessageTimer 0 endif endif endif endif #--- Drink magic resist pot ---# if drinkMagicResist = 1 if not findbuff "Magic Resist" if findtype "Black Potion" self dclicktype "Black Potion" wait 200 else if timer blackMessageTimer > blackMessageCD overhead "Out of resist pots" 34 settimer blackMessageTimer 0 endif endif endif endif #--- Poisoned ---# if 1 = drinkCure or 1 = cureSpell while poisoned if findtype "Orange Potion" self dclicktype "Orange Potion" wait 200 else if timer orangeMessageTimer > orangeMessageCD overhead "Out of cure pots" 34 settimer orangeMessageTimer 0 endif if diffhits > highDiff or not findtype 3972 self or not findtype 3973 self break endif if skill 'magery' >= 40 and mana >= 6 and 1 = cureSpell and not casting cast 'cure' wait 50 while not casting if targetexists hotkey 'cancel current target' endif cast 'cure' wait 50 endwhile while not targetexists and casting endwhile waitfortarget maxwaittimeinms target 'self' wait 200 else break endif endif endwhile endif #--- Drink Heal Pot ---# if diffhits >= highDiff and 1 = drinkHeal if findtype "Yellow Potion" self as hPot getlabel hPot potLabel if "next" in potLabel #do nothing else @setvar! ch 0 if counttype 3852 self as c @setvar! ch c endif clearsysmsg dclicktype 3852 getlabel backpack xxx wait 200 if ch != counttype 3852 self or insysmsg "potion satchel used" cooldown "Heal Pot" healingPotCD endif endif else if timer yellowMessageTimer > yellowMessageCD overhead "Out of heals pots" 34 settimer yellowMessageTimer 0 endif endif endif #--- Drink red pot ---# if stam < staminaLowerThan and 1 = drinkRefresh if findtype "Red Potion" self dclicktype "Red Potion" wait 200 else if timer redMessageTimer > redMessageCD overhead "Out of refresh pots" 34 settimer redMessageTimer 0 endif endif endif #--- Cast heals ---# if skill 'magery' >= 40 and diffhits >= lowDiff and diffhits < medDiff and mana >= 4 and miniHeal = 1 and not casting cast 'heal' while not casting if targetexists hotkey 'cancel current target' endif cast 'heal' endwhile while not targetexists and casting endwhile waitfortarget maxwaittimeinms target 'self' wait 200 elseif skill 'magery' >= 60 and diffhits >= medDiff and diffhits <= highDiff mana >= 11 and greaterHeal = 1 and not casting cast 'greater heal' while not casting if targetexists hotkey 'cancel current target' endif cast 'greater heal' endwhile while not targetexists and casting #--- Poisoned ---# if 1 = drinkCure while poisoned if findtype "Orange Potion" self dclicktype "Orange Potion" wait 200 else if timer orangeMessageTimer > orangeMessageCD overhead "Out of cure pots" 34 settimer orangeMessageTimer 0 break endif endif endwhile endif #--- Drink Heal Pot ---# if diffhits >= highDiff and 1 = drinkHeal if findtype "Yellow Potion" self as hPot getlabel hPot potLabel if "next" in potLabel #do nothing else @setvar! ch 0 if counttype 3852 self as c @setvar! ch c endif clearsysmsg dclicktype 3852 getlabel backpack xxx wait 200 if ch != counttype 3852 self or insysmsg "potion satchel used" cooldown "Heal Pot" healingPotCD endif endif else if timer yellowMessageTimer > yellowMessageCD overhead "Out of heals pots" 34 settimer yellowMessageTimer 0 endif endif endif endwhile waitfortarget maxwaittimeinms target 'self' wait 200 elseif skill 'magery' >= 40 and diffhits > highDiff and mana >= 4 and miniHeal = 1 and not casting cast 'heal' while not casting if targetexists hotkey 'cancel current target' endif cast 'heal' endwhile while not targetexists and casting endwhile waitfortarget maxwaittimeinms target 'self' wait 200 endif endwhile #********** CHECK FOR ANY DEAD ELEMENTAL **********# while followers < maxFollowers and diffhits < medDiff #********* CREATE MUSHROOMS ********* if counttype 29012 backpack = 0 while counttype 29012 backpack < mushroomCount cast 'create food' wait 100 endwhile endif if earthFirsty != 0 and dead earthFirsty if list earthListy != 0 poplist earthListy 'front' sysmsg "pop earth 1" endif @setvar! earthFirsty 0 endif if earthSecondly != 0 and dead earthSecondly if list earthListy != 0 poplist earthListy 'front' sysmsg "pop earth 2" endif @setvar! earthSecondly 0 endif if waterFirsty != 0 and dead waterFirsty if list waterListy != 0 poplist waterListy 'front' sysmsg "pop water 1" endif @setvar! waterFirsty 0 endif if waterSecondly != 0 and dead waterSecondly if list waterListy != 0 poplist waterListy 'front' sysmsg "pop water 2" endif @setvar! waterSecondly 0 endif if airFirsty != 0 and dead airFirsty if list airListy != 0 poplist airListy 'front' endif @setvar! airFirsty 0 endif if airSecondly != 0 and dead airSecondly if list airListy != 0 poplist airListy 'front' endif @setvar! airSecondly 0 endif if fireFirsty != 0 and dead fireFirsty if list fireListy != 0 poplist fireListy 'front' endif @setvar! fireFirsty 0 endif if fireSecondly != 0 and dead fireSecondly if list fireListy != 0 poplist fireListy 'front' endif @setvar! fireSecondly 0 endif if daemonFirsty != 0 and dead daemonFirsty if list daemonListy != 0 poplist daemonListy 'front' endif @setvar! daemonFirsty 0 endif if daemonSecondly != 0 and dead daemonSecondly if list daemonListy != 0 poplist daemonListy 'front' endif @setvar! daemonSecondly 0 endif if creatureFirsty != 0 and dead creatureFirsty if list creatureListy != 0 poplist creatureListy 'front' sysmsg "pop creature 1" endif @setvar! creatureFirsty 0 endif if creatureSecondly != 0 and dead creatureSecondly if list creatureListy != 0 poplist creatureListy 'front' sysmsg "pop creature 2" endif @setvar! creatureSecondly 0 endif if creatureThirdy != 0 and dead creatureThirdy if list creatureListy != 0 poplist creatureListy 'front' sysmsg "pop creature 3" endif @setvar! creatureThirdy 0 endif if creatureFourthy != 0 and dead creatureFourthy if list creatureListy != 0 poplist creatureListy 'front' sysmsg "pop creature 4" endif @setvar! creatureFourthy 0 endif if creatureFithy != 0 and dead creatureFithy if list creatureListy != 0 poplist creatureListy 'front' sysmsg "pop creature 5" endif @setvar! creatureFithy 0 endif if mana <= 50 if timer mushroomTimer > mushroomTimerCD if counttype 29012 backpack as c @setvar! cm c dclicktype 29012 backpack wait 200 if cm != counttype 29012 backpack settimer mushroomTimer 0 endif else overhead "No mushrooms found!" 34 endif endif endif if mana < meditateManaReach and 1 = useMeditation skill 'meditation' getlabel backpack xxx wait 200 if findbuff 'meditating' while mana < meditateUntilManaReach and diffhits < medDiff #interrupt here if hp is low if not findbuff 'meditating' break endif endwhile endif endif if mana < 50 if timer manaMsgTimer > manaMsgCD overhead "No mana to summon" 34 settimer manaMsgTimer 0 endif break endif @clearsysmsg @setvar! wasInterrupted 0 #********** ACTIVATE NECROMANCER BAR IF USING ANY NECRO SPELLS **********# if NecroVengefulSpirit = 1 or NecroBloodOath = 1 if findtype 'necromancer book' backpack yell '[necromancyhotbar' while not gumpexists 622436516 yell '[necromancyhotbar' waitforgump 622436516 maxwaittimeinms endwhile endif endif #********** ACTIVATE NECROMANCER VENGEFUL SPIRIT SPELL **********# if ingump "20/" 622436516 @setvar! unholyPoints 20 elseif ingump "19/" 622436516 @setvar! unholyPoints 19 elseif ingump "18/" 622436516 @setvar! unholyPoints 18 elseif ingump "17/" 622436516 @setvar! unholyPoints 17 elseif ingump "16/" 622436516 @setvar! unholyPoints 16 elseif ingump "15/" 622436516 @setvar! unholyPoints 15 elseif ingump "14/" 622436516 @setvar! unholyPoints 14 elseif ingump "13/" 622436516 @setvar! unholyPoints 13 elseif ingump "12/" 622436516 @setvar! unholyPoints 12 elseif ingump "11/" 622436516 @setvar! unholyPoints 11 elseif ingump "10/" 622436516 @setvar! unholyPoints 10 elseif ingump "9/" 622436516 @setvar! unholyPoints 9 elseif ingump "8/" 622436516 @setvar! unholyPoints 8 elseif ingump "7/" 622436516 @setvar! unholyPoints 7 elseif ingump "6/" 622436516 @setvar! unholyPoints 6 elseif ingump "5/" 622436516 @setvar! unholyPoints 5 elseif ingump "4/" 622436516 @setvar! unholyPoints 4 elseif ingump "3/" 622436516 @setvar! unholyPoints 3 elseif ingump "2/" 622436516 @setvar! unholyPoints 2 elseif ingump "1/" 622436516 @setvar! unholyPoints 1 else @setvar unholyPoints 0 endif if 1 = NecroVengefulSpirit and 0 < unholyPoints clearsysmsg yell '[vengefulspirit' wait 200 while not insysmsg! "unholy symbols remaining" and not insysmsg! "you must wait another" yell '[vengefulspirit' wait 200 endwhile if insysmsg "unholy symbols" say '[>Vengeful Spirits<]' 44 endif endif #********** ACTIVATE NECROMANCER BLOOD OATH SPELL **********# if ingump "20/" 622436516 @setvar! unholyPoints 20 elseif ingump "19/" 622436516 @setvar! unholyPoints 19 elseif ingump "18/" 622436516 @setvar! unholyPoints 18 elseif ingump "17/" 622436516 @setvar! unholyPoints 17 elseif ingump "16/" 622436516 @setvar! unholyPoints 16 elseif ingump "15/" 622436516 @setvar! unholyPoints 15 elseif ingump "14/" 622436516 @setvar! unholyPoints 14 elseif ingump "13/" 622436516 @setvar! unholyPoints 13 elseif ingump "12/" 622436516 @setvar! unholyPoints 12 elseif ingump "11/" 622436516 @setvar! unholyPoints 11 elseif ingump "10/" 622436516 @setvar! unholyPoints 10 elseif ingump "9/" 622436516 @setvar! unholyPoints 9 elseif ingump "8/" 622436516 @setvar! unholyPoints 8 elseif ingump "7/" 622436516 @setvar! unholyPoints 7 elseif ingump "6/" 622436516 @setvar! unholyPoints 6 elseif ingump "5/" 622436516 @setvar! unholyPoints 5 elseif ingump "4/" 622436516 @setvar! unholyPoints 4 elseif ingump "3/" 622436516 @setvar! unholyPoints 3 elseif ingump "2/" 622436516 @setvar! unholyPoints 2 elseif ingump "1/" 622436516 @setvar! unholyPoints 1 else @setvar unholyPoints 0 endif if 1 = NecroBloodOath and 3 < unholyPoints clearsysmsg yell '[bloodoath' wait 200 while not insysmsg! "unholy symbols remaining" and not insysmsg! "you must wait another" yell '[bloodoath' wait 200 endwhile if insysmsg "unholy symbols" say '[>Blood Oath<]' 55 endif endif #********** ACTIVATE NECROMANCER WITHER SPELL **********# if ingump "20/" 622436516 @setvar! unholyPoints 20 elseif ingump "19/" 622436516 @setvar! unholyPoints 19 elseif ingump "18/" 622436516 @setvar! unholyPoints 18 elseif ingump "17/" 622436516 @setvar! unholyPoints 17 elseif ingump "16/" 622436516 @setvar! unholyPoints 16 elseif ingump "15/" 622436516 @setvar! unholyPoints 15 elseif ingump "14/" 622436516 @setvar! unholyPoints 14 elseif ingump "13/" 622436516 @setvar! unholyPoints 13 elseif ingump "12/" 622436516 @setvar! unholyPoints 12 elseif ingump "11/" 622436516 @setvar! unholyPoints 11 elseif ingump "10/" 622436516 @setvar! unholyPoints 10 elseif ingump "9/" 622436516 @setvar! unholyPoints 9 elseif ingump "8/" 622436516 @setvar! unholyPoints 8 elseif ingump "7/" 622436516 @setvar! unholyPoints 7 elseif ingump "6/" 622436516 @setvar! unholyPoints 6 elseif ingump "5/" 622436516 @setvar! unholyPoints 5 elseif ingump "4/" 622436516 @setvar! unholyPoints 4 elseif ingump "3/" 622436516 @setvar! unholyPoints 3 elseif ingump "2/" 622436516 @setvar! unholyPoints 2 elseif ingump "1/" 622436516 @setvar! unholyPoints 1 else @setvar unholyPoints 0 endif if 1 = NecroWither and 4 < unholyPoints and skill 'necromancy' >= 90 clearsysmsg yell '[wither' wait 200 while not insysmsg! "unholy symbols remaining" and not insysmsg! "you must wait another" yell '[wither' wait 200 endwhile if insysmsg "unholy symbols" say '[>Wither<]' 66 endif endif if list earthListy = 0 #sysmsg "Earth List = 0" elseif list earthListy = 1 #sysmsg "Earth List = 1" elseif list earthListy = 2 #sysmsg "Earth List = 2" endif if list waterListy = 0 #sysmsg "Water List = 0" elseif list waterListy = 1 #sysmsg "Water List = 1" elseif list waterListy = 2 #sysmsg "Water List = 2" endif if list creatureListy = 0 #sysmsg "Creature List = 0" elseif list creatureListy = 1 #sysmsg "Creature List = 1" elseif list creatureListy = 2 #sysmsg "Creature List = 2" elseif list creatureListy = 2 #sysmsg "Creature List = 2" elseif list creatureListy = 2 #sysmsg "Creature List = 2" endif if not findtype 3963 backpack or not findtype 3974 backpack or not findtype 3981 backpack if timer noRegsMessageTimer > noRegsMessageCD overhead 'Out of regs!' 34 settimer noRegsMessageTimer 0 endif elseif fireElementals = 1 and not findtype 3980 backpack if timer noRegsMessageTimer > noRegsMessageCD overhead 'Out of regs!' 34 settimer noRegsMessageTimer 0 endif elseif summonDaemons = 1 and not findtype 3980 backpack if timer noRegsMessageTimer > noRegsMessageCD overhead 'Out of regs!' 34 settimer noRegsMessageTimer 0 endif #********** CAST EARTH ELEMENTAL **********# sysmsg 'begin casting elementals...' 11 elseif earthElementals != 0 and list earthListy < earthElementals and followers < 4 and diffhits < medDiff and not casting cast 'Earth Elemental' while not casting cast 'Earth Elemental' if targetexists hotkey 'cancel current target' endif endwhile while not dead if diffhits >= medDiff @setvar! wasInterrupted 1 sysmsg "interrupted low health" 33 interrupt break endif if not casting getlabel backpack xxx wait 200 if insysmsg "Your concentration" @setvar! wasInterrupted 1 sysmsg "interrupted concentration" 33 else sysmsg "casting finished" 11 endif break endif if timer summonMsgTimer > summonMsgCD overhead "* summoning earth... *" 634 sysmsg "* summoning earth... *" 634 settimer summonMsgTimer 0 settimer globalMessageTimer 0 endif endwhile if 0 = wasInterrupted sysmsg "Summon Earth Successful" pushlist earthListy 'x' 'front' while not dead if findtype 158|14 ground -1 -1 12 as ele menu ele 1 waitfortarget maxwaittimeinms if targetexists if ele != earthFirsty and ele != earthSecondly hotkey 'cancel current target' if earthFirsty = 0 @setvar! earthFirsty ele sysmsg "add earth 1" 11 overhead "Earth 1" 634 ele else @setvar! earthSecondly ele sysmsg "add earth 2" 11 overhead "Earth 2" 634 ele endif break endif endif @ignore ele endif endwhile @clearignore endif #********** CAST WATER ELEMENTAL **********# elseif waterElementals != 0 and list waterListy < waterElementals and followers < 4 and diffhits < medDiff and not casting cast 'Water Elemental' while not casting cast 'Water Elemental' if targetexists hotkey 'cancel current target' endif endwhile while not dead if diffhits >= medDiff @setvar! wasInterrupted 1 sysmsg "interrupted low health" 33 interrupt break endif if not casting getlabel backpack xxx wait 200 if insysmsg "Your concentration" @setvar! wasInterrupted 1 sysmsg "interrupted concentration" 33 else sysmsg "casting finished" 11 endif break endif if timer summonMsgTimer > summonMsgCD overhead "* summoning water... *" 399 sysmsg "* summoning water... *" 399 settimer summonMsgTimer 0 settimer globalMessageTimer 0 endif endwhile if 0 = wasInterrupted sysmsg "Summon Water Successful" pushlist waterListy 'x' 'front' while not dead if findtype 740|16 ground -1 -1 12 as ele menu ele 1 waitfortarget maxwaittimeinms if targetexists if ele != waterFirsty and ele != waterSecondly hotkey 'cancel current target' if waterFirsty = 0 @setvar! waterFirsty ele sysmsg "add water 1" 11 overhead "Water 1" 399 ele else @setvar! waterSecondly ele sysmsg "add water 2" 11 overhead "Water 2" 399 ele endif break endif endif @ignore ele endif endwhile @clearignore endif #********** CAST AIR ELEMENTAL **********# elseif airElementals != 0 and list airListy < airElementals and followers < 4 and diffhits < medDiff and not casting cast 'Air Elemental' while not casting cast 'Air Elemental' if targetexists hotkey 'cancel current target' endif endwhile while not dead if diffhits >= medDiff @setvar! wasInterrupted 1 sysmsg "interrupted low health" 33 interrupt break endif if not casting getlabel backpack xxx wait 200 if insysmsg "Your concentration" @setvar! wasInterrupted 1 sysmsg "interrupted concentration" 33 else sysmsg "casting finished" 11 endif break endif if timer summonMsgTimer > summonMsgCD overhead "* summoning air... *" 933 sysmsg "* summoning air... *" 933 settimer summonMsgTimer 0 settimer globalMessageTimer 0 endif endwhile if 0 = wasInterrupted sysmsg "Summon Air Successful" pushlist airListy 'x' 'front' while not dead if findtype 306|13 ground -1 -1 12 as ele menu ele 1 waitfortarget maxwaittimeinms if targetexists if ele != airFirsty and ele != airSecondly hotkey 'cancel current target' if airFirsty = 0 @setvar! airFirsty ele sysmsg "add air 1" 11 overhead "Air 1" 933 ele else @setvar! airSecondly ele sysmsg "add air 2" 11 overhead "Air 2" 933 ele endif break endif endif @ignore ele endif endwhile @clearignore endif #********** CAST FIRE ELEMENTAL **********# elseif fireElementals != 0 and list fireListy < fireElementals and followers < 4 and diffhits < medDiff and not casting cast 'Fire Elemental' while not casting cast 'Fire Elemental' if targetexists hotkey 'cancel current target' endif endwhile while not dead if diffhits >= medDiff @setvar! wasInterrupted 1 sysmsg "interrupted low health" 33 interrupt break endif if not casting getlabel backpack xxx wait 200 if insysmsg "Your concentration" @setvar! wasInterrupted 1 sysmsg "interrupted concentration" 33 else sysmsg "casting finished" 11 endif break endif if timer summonMsgTimer > summonMsgCD overhead "* summoning fire... *" 353 sysmsg "* summoning fire... *" 353 settimer summonMsgTimer 0 settimer globalMessageTimer 0 endif endwhile if 0 = wasInterrupted sysmsg "Summon Fire Successful" pushlist fireListy 'x' 'front' while not dead if findtype 24|15 ground -1 -1 12 as ele menu ele 1 waitfortarget maxwaittimeinms if targetexists if ele != fireFirsty and ele != fireSecondly hotkey 'cancel current target' if fireFirsty = 0 @setvar! fireFirsty ele sysmsg "add fire 1" 11 overhead "Fire 1" 353 ele else @setvar! fireSecondly ele sysmsg "add fire 2" 11 overhead "Fire 2" 353 ele endif break endif endif @ignore ele endif endwhile @clearignore endif #********** CAST DAEMON **********# elseif summonDaemons != 0 and list daemonListy < summonDaemons and followers < 4 and diffhits < medDiff and not casting cast 'Summon Daemon' while not casting cast 'Summon Daemon' if targetexists hotkey 'cancel current target' endif endwhile while not dead if diffhits >= medDiff @setvar! wasInterrupted 1 sysmsg "interrupted low health" 33 interrupt break endif if not casting getlabel backpack xxx wait 200 if insysmsg "Your concentration" @setvar! wasInterrupted 1 sysmsg "interrupted concentration" 33 else sysmsg "casting finished" 11 endif break endif if timer summonMsgTimer > summonMsgCD overhead "* summoning daemon... *" 235 sysmsg "* summoning daemon... *" 235 settimer summonMsgTimer 0 settimer globalMessageTimer 0 endif endwhile if 0 = wasInterrupted sysmsg "Summon Daemon Successful" pushlist daemonListy 'x' 'front' while not dead if findtype 9|722 ground -1 -1 12 as ele menu ele 1 waitfortarget maxwaittimeinms if targetexists if ele != daemonFirsty and ele != daemonSecondly hotkey 'cancel current target' if daemonFirsty = 0 @setvar! daemonFirsty ele sysmsg "add daemon 1" 11 overhead "Daemon 1" 11 ele else @setvar! daemonSecondly ele sysmsg "add daemon 2" 235 overhead "Daemon 2" 235 ele endif break endif endif @ignore ele endif endwhile @clearignore endif #********** CAST SUMMON CREATURE **********# elseif summonCreature != 0 and list creatureListy < summonCreature and followers < 5 and diffhits < medDiff and not casting cast 'Summ. Creature' while not casting cast 'Summ. Creature' if targetexists hotkey 'cancel current target' endif endwhile while not dead if diffhits >= medDiff @setvar! wasInterrupted 1 sysmsg "interrupted low health" 33 interrupt break endif if not casting getlabel backpack xxx wait 200 if insysmsg "Your concentration" @setvar! wasInterrupted 1 sysmsg "interrupted concentration" 33 else sysmsg "casting finished" 11 endif break endif if timer summonMsgTimer > summonMsgCD overhead "* summon creature... *" 881 sysmsg "* summon creature... *" 881 settimer summonMsgTimer 0 settimer globalMessageTimer 0 endif endwhile if 0 = wasInterrupted sysmsg "Summon Creature Successful" pushlist creatureListy 'x' 'front' while not dead if findtype 215|211|302|317|225|212|202|213|716|729|51|74|214|206|776|737|718|739|718|29|776|317|302|39|56|26|3|57|50|382 ground -1 -1 12 as ele menu ele 1 waitfortarget maxwaittimeinms if targetexists if ele != creatureFirsty and ele != creatureSecondly and ele != creatureThirdy and ele != creatureFourthy and ele != creatureFithy hotkey 'cancel current target' if creatureFirsty = 0 @setvar! creatureFirsty ele sysmsg "add creature 1" 11 overhead "add creature 1" 11 elseif creatureSecondly = 0 @setvar! creatureSecondly ele sysmsg "add creature 2" 11 overhead "add creature 2" 11 elseif creatureThirdy = 0 @setvar! creatureThirdy ele sysmsg "add creature 3" 11 overhead "add creature 3" 11 elseif creatureFourthy = 0 @setvar! creatureFourthy ele sysmsg "add creature 4" 11 overhead "add creature 4" 11 elseif creatureFithy = 0 @setvar! creatureFithy ele sysmsg "add creature 5" 11 overhead "add creature 5" 11 endif break endif endif @ignore ele endif endwhile @clearignore endif endif if followers > 0 say 'ALL Guard ME' 11 endif endwhile #********** AUTO-MAGERY BUFFS IF NEEDED ********** if magicReflect = 1 and skill 'magery' >= 70 and not findbuff "Magic Reflection" and mana >= miniumManaToBuff and diffhits < lowDiff if timer magicReflectTimer > magicReflectCD cast 'Magic Reflection' while not casting and diffhits < lowDiff getlabel backpack xxx wait 200 if insysmsg "that spell will not" or insysmsg "that spell is already" settimer magicReflectTimer 0 break endif if targetexists hotkey 'cancel current target' endif cast 'Magic Reflection' endwhile while casting and diffhits < highDiff #--- Poisoned ---# if 1 = drinkCure while poisoned if findtype "Orange Potion" self dclicktype "Orange Potion" wait 200 else if timer orangeMessageTimer > orangeMessageCD overhead "Out of cure pots" 34 settimer orangeMessageTimer 0 break endif endif endwhile endif #--- Drink Heal Pot ---# if diffhits >= highDiff and 1 = drinkHeal if findtype "Yellow Potion" self as hPot getlabel hPot potLabel if "next" in potLabel #do nothing else @setvar! ch 0 if counttype 3852 self as c @setvar! ch c endif clearsysmsg dclicktype 3852 getlabel backpack xxx wait 200 if ch != counttype 3852 self or insysmsg "potion satchel used" cooldown "Heal Pot" healingPotCD endif endif else if timer yellowMessageTimer > yellowMessageCD overhead "Out of heals pots" 34 settimer yellowMessageTimer 0 endif endif endif endwhile wait 200 endif endif if armorReflect = 1 and skill 'magery' >= 30 and not findbuff "Reactive Armor" and mana >= miniumManaToBuff and diffhits < lowDiff if timer magicReflectTimer > magicReflectCD cast 'Reactive Armor' while not casting and diffhits < highDiff getlabel backpack xxx wait 200 if insysmsg "that spell will not" or insysmsg "that spell is already" settimer armorReflectTimer 0 break endif if targetexists hotkey 'cancel current target' endif cast 'Reactive Armor' endwhile while casting and diffhits < lowDiff endwhile wait 200 endif endif if protectionSpell = 1 and skill 'magery' >= 40 and not findbuff "Protection" and mana >= miniumManaToBuff and diffhits < lowDiff cast 'Protection' while not casting and diffhits < highDiff if targetexists hotkey 'cancel current target' endif cast 'Protection' endwhile while casting and diffhits < lowDiff endwhile wait 200 endif if bless = 1 and skill 'magery' >= 50 and not findbuff "Cunning" and mana >= miniumManaToBuff and diffhits < lowDiff sysmsg 'blessing..' cast 'Bless' while not casting and diffhits < highDiff if targetexists hotkey 'cancel current target' endif cast 'Bless' wait 50 endwhile while not targetexists and casting endwhile waitfortarget maxwaittimeinms target 'self' wait 200 endif endwhile