Macro/Plugin Requests (Freelancer Program)

Alatyami · Jan 2, 2009

CComp5950 started a great thread for users to request macros. I am going to take it to a new level by increasing the incentive!

Reply to this thread with your macro requests/suggestions. If your request gets picked up you get your macro/plugin and the Freelancer that produces a working product ... we will give them a nomination for the monthly poll for helping out another NotAddicted member.

So, yammerz, what's that really mean? The freelancer will receive a minimum 50 :rc

for being nominated to the monthly poll and a maximum 500 :rc

if they win it!

With that being said ... only requests posted to this thread will qualify for the Freelancer program (feel free to repost your requests). Likewise, this thread will be heavily moderated to keep it organized (don't be surprised if your posts get merged). No project is to small ...

-Alatyami

Administrator
NotAddicted.com

CodeXtrm · Jan 2, 2009

Plugin that will let u chain click ur Backstab ability or click it for u , im sure thats prolly server side though but thats my suggestion . or simply taking the old and improving them and making them better . after ever add on to EQ with SOD ETC thres allways new abilities and new ideas that can be found im thinking

Alatyami · Jan 2, 2009

nacnac said:
Plugin that will let u chain click ur Backstab ability or click it for u , im sure thats prolly server side though but thats my suggestion . or simply taking the old and improving them and making them better . after ever add on to EQ with SOD ETC thres allways new abilities and new ideas that can be found im thinking

Doesn't MQ2Melee do this?

-Alatyami

Additional Responses:

nacnac said:
ye.. but i was thnking without a reuse timer haha, would have been nice DPS lol

VillageIdiot said:
pretty sure ability timers is serverside.

nacnac said:
ye was thinking the same thing

typenamehere · Jan 6, 2009

Re: Request for...your requests (Macros)

would anyone happen to know how to make a macro loot and destroy everything on a corpse, i have my entire macro set up, but i run into trouble with corpses id like to be able to add another section into my macro when it targets a corpse to auto loot and destroy everything, such as below,

/if (${Target.Type.Equal[Corpse]}) /goto :LootAndDestroy

i just dont know what to put in the :LootAndDestroy section. will be glad to share macro once it is finished

VillageIdiot · Jan 7, 2009

Re: Request for...your requests (Macros)

typenamehere said:
would anyone happen to know how to make a macro loot and destroy everything on a corpse, i have my entire macro set up, but i run into trouble with corpses id like to be able to add another section into my macro when it targets a corpse to auto loot and destroy everything, such as below,

/if (${Target.Type.Equal[Corpse]}) /goto :LootAndDestroy

i just dont know what to put in the :LootAndDestroy section. will be glad to share macro once it is finished

i made a macro like this for you.

posted here http://forums.notaddicted.com/showthread.php?p=177426#post177426

Accepted for January 2009 Monthly Poll -alatyami

chance98 · Jan 10, 2009

i have one guys... can anyone write a snippet.... that i can add to my macros so like i use a warrior merc sometimes in my group... i need a snippet to add into exsisting macro to manage the warrior merc... need to be able to set warrior merc to passive mode until mob is incamp and engaged then switches him to assist mode for dps..

VillageIdiot · Jan 10, 2009

chance98 said:
i have one guys... can anyone write a snippet.... that i can add to my macros so like i use a warrior merc sometimes in my group... i need a snippet to add into exsisting macro to manage the warrior merc... need to be able to set warrior merc to passive mode until mob is incamp and engaged then switches him to assist mode for dps..

the way i would do this i'd need to see the entire macro to add in a few things in a few places. Also i've never used mercs (i can't afford SoD) so i'd need to know the commands to change perc to passive and change to assist mode.

Additional Responses:

chance98 said:
the commands showing up when you make hot buttons is /stance assist and /stance passive

and i think im going to stick it in crystanes pallytank macro..... should probally put a toggle into it so you can turn it on and off

flargendingle · Jan 10, 2009

i have a request, i use farm.mac from macroquest2 site. its great for outdoor zones but absolutely useless indoors, as the toon will only run in a straight line to the target. heres the request : can anyone add (a) warp to target if stuck on a wall, or (b) cut out the running alltogether and just warp from target to target? thanks in advance

VillageIdiot · Jan 10, 2009

flargendingle said:
i have a request, i use farm.mac from macroquest2 site. its great for outdoor zones but absolutely useless indoors, as the toon will only run in a straight line to the target. heres the request : can anyone add (a) warp to target if stuck on a wall, or (b) cut out the running alltogether and just warp from target to target? thanks in advance

Have you ever thought about using the hunterwarp macro? it has an ini that will check the loots from a set ini that you set so it will only keep what yhou want and junk the rest.

Additional Responses:

flargendingle said:
i hadnt seen that, but ill look for it now, thank you for the info =)

flargendingle · Jan 11, 2009

VillageIdiot said:
Have you ever thought about using the hunterwarp macro? it has an ini that will check the loots from a set ini that you set so it will only keep what yhou want and junk the rest.

Additional Responses:

ok, i found the hunterwarp.mac, but it wont read the .ini files i made for it. here the error message i get:
[MQ2]attempting to read section "the permafrost caverns" from huntermob.ini...
[MQ2]"the permafrost caverns" is not a valid section for FILE:huntermob.ini, ending macro...
[MQ2]mob array creation error, ending macro...

ive been scouring na and mq2 site for sample ini's and they're all the same, and its not a difficult explanation on how to make the ini's, so idk whats wrong. any further help/advice?

VillageIdiot · Jan 11, 2009

flargendingle said:
ok, i found the hunterwarp.mac, but it wont read the .ini files i made for it. here the error message i get:
[MQ2]attempting to read section "the permafrost caverns" from huntermob.ini...
[MQ2]"the permafrost caverns" is not a valid section for FILE:huntermob.ini, ending macro...
[MQ2]mob array creation error, ending macro...

ive been scouring na and mq2 site for sample ini's and they're all the same, and its not a difficult explanation on how to make the ini's, so idk whats wrong. any further help/advice?

From the sounds of it, it's having trouble finding the correct zone name. It is somewhat picky. go into the zone you want to hunt in. Type /echo ${Zone.Name}

whatever it says , type that exactly in your huntermob.ini
like in my huntermob.ini i have this

Rich (BB code):

[Dranik's Scar]
mob1=a noc
mob2=a noc havocblade
mob3=a kyv
mob4=a kyv bloodhunter
mob5=a kyv heartpiercer
mob6=an ukun
mob7=an ukun slaughterhound

flargendingle · Jan 11, 2009

nada, still getting same error msg. ive checked spelling, caps, tried both zone names,(map and /echo names) useing exact spelling on the mob name , i dunno what else to try =/

typenamehere · Jan 11, 2009

got 2 macros for ya here, first one kills everything and destroys corpse, second will read from ninjadvloot.inc and loot and keep/destroy the items specified. may have to let it run for a min because it auto Keeps things, once its looted just open up ninjadvloot.inc and change the keep to destroy

http://forums.notaddicted.com/showthread.php?p=177503#post177503

VillageIdiot · Jan 11, 2009

flargendingle said:
nada, still getting same error msg. ive checked spelling, caps, tried both zone names,(map and /echo names) useing exact spelling on the mob name , i dunno what else to try =/

post a copy of your 2 ini files or PM them to me if you don't want people to know where your hunting. (pulls out his tinfoil hat)

flargendingle · Jan 13, 2009

VillageIdiot said:
post a copy of your 2 ini files or PM them to me if you don't want people to know where your hunting. (pulls out his tinfoil hat)

pm sent...tinfoil hat, equiped. hiding under desk untill its safe again...

VillageIdiot · Jan 13, 2009

replied, i'm sure what i showed ya will work. I tested it in the area you wanted and worked fine.

flargendingle · Jan 14, 2009

ok i spoke too soon, destroys everything, which is good, including whats in the loot ini, which is not good, heh

flargendingle · Jan 15, 2009

flargendingle said:
ok i spoke too soon, destroys everything, which is good, including whats in the loot ini, which is not good, heh

nm, all working perfectly now. thanks Vi

chance98 · Jan 15, 2009

need help need to ad into this mage macro.. a spot spot so when indoors and not in combat he will sit to med if there are not mobs with a 50 foot raidius of camp..

Rich (BB code):

| mage.mac 
| By Rusty~ 
| Maintained by Showme1 
| Last update 11/28/2005 
| 
| /macro mage [ma name][sa name][radius #][nuke fire|magic|bolt][minhp #] 
| 
| Description: 
|   Will assist the person set as main assist. If the main assist dies, it will assist the person 
|   set as secondary assist if there is one. Once a target is aquired, and is varified as being aggro 
|   it will then wait till the mob is engaged by the tank. It will then send in pet and debuff the mob 
|   if debuffs are enabled. It will then wait till mob is under the spcified hp, or the specified time 
|   has expired since the tank has engaged, then it will start nuking. 
|   This will also keep self buffs up, keep pet up (with weapons, belt, and mask), and buff and rod 
|   people that ask (with the spells specified in ini). Will coth people that ask for it via tells 
| 
| 
|   After running the macro for the first time, you should open the ini file generated (Auto_Yourname.ini) 
|   Most of the options are self explanatory 
|   Here's an example how the ini based buffs work: 
| 
|      BuffList1=rod,modrod 
|      BuffName1=Magi`kot's Pants of Convergence 
|      BuffType1=item 
| 
|   BuffList is a list of words (or phrases) that will trigger the buff, separated by commas 
|   BuffName is the name of the spell or item 
|   BuffType is either item, gem1-9, or alt, for items, spells, or aa respectively 
| 
|   For each self buff and clicky buff, there's a place to put all the buffs that don't stack with it: 
| 
|      SelfBuff1=Phantasmal Warden 
|      SelfBuffNoStack1=Protection of the Nine,Blessing of the Nine,Steeloak Skin 
| 
|   *note* To mem spells after death, save a spellset, and put the name of it in your ini under SpellSet 
| 
| 
|----------------------------------------------------------------------------------------------------------+ 
|  slash commands:                                                                                         | 
|----------------------------------------------------------------------------------------------------------+ 
|  /setma name                             - sets main assist                                              | 
|  /setsa name                             - sets secondary assist                                         | 
|  /buff on|off                            - turns auto buffing on or off                                  | 
|  /debuff on|off                          - turns auto debuffing on or off                                | 
|  /mount on|off                           - turns auto mounting on or off                                 | 
|  /nukedelay #                            - sets the minimum amount of deciseconds between nukes          | 
|  /engagedelay #                          - amount of deciseconds before you start nuking mob             | 
|  /companion on|off                       - sets auto pet summon on or off                                | 
|  /anchor #                               - sets the leash length when using an anchor                    | 
|  /minhp #                                - sets the minimum hp % that you'll begin nuking at             | 
|  /cleanup on|off                         - turns on auto looting of any droppable loot                   | 
|  /checknamed on|off                      - turns alerts on for named in your current zone                | 
|  /runehp #                               - sets the health % at which you'll cast your rune item or spell| 
|  /nukemode 0, 1, 2                       - mode 0 turns nukes off completely                             | 
|                                          - mode 1 uses robe if enabled, and slows nukes if low mana      | 
|                                          - mode 2 chain nukes, with only delay being the set /nukedelay  | 
|  /manarobe mode #|min #|max #            - mode 1 uses manrobe all the time                              | 
|                                          - mode 2 uses your set % to start robing                        | 
|  /radius #                               - sets the distance at which you'll engage the main assist's    | 
|                                            target                                                        | 
|  /nuketype fire|magic|bolt [spellname]   - sets your current nuke to the specified type                  | 
|                                          - include spell name to set the nuke for that type              | 
|  /ds on|off                              - turns group ds on or off                                      | 
|  /pettype earth|wind|fire|water          - Sets the ini to the desired pet type for when /companion      | 
|                                            is on it will summon that type of pet                         | 
|----------------------------------------------------------------------------------------------------------+ 

#include mage_routines.inc 
#include gen_routines.inc 
#include Wait4Rez.inc
#include move.inc 

#turbo 40 

#chat group 
#chat tell 
#chat chat 
#chat say 

#event TankDS "#*#Your Lavaskin spell has worn off of TANKNAMEHERE.#*#"
#event Coth "#1# tells you, 'coth'" 
#event Coth "#1# tells you, 'coth #2#'" 
#event Coth "#1# told you, 'coth'" 
#event Coth "#1# told you, 'coth #2#'" 
#event Gate "#1# gates#*#" 
#event Goto "[MQ2] goto #1#" 
#event PetWeps "#1# #*#'#*#pet weps#*#'" 
#event RageOff "#*#is no longer enraged#*#" 
#event RageOn "#*#has become ENRAGED#*#"

Sub Main 
   :Book_Open
   /if (${Window[SpellBookWnd].Open}) /goto :Book_Open
   /pet focus
   /declare Use_HoE bool outer TRUE
   /declare MA_Set bool outer FALSE
   /lootn always
   /squelch /alias /hoe /echo Toggle HoE
   /call GeneralDeclares 
   /call DeclareIniVar mainAssist string Settings 
   /call DeclareIniVar secondAssist string Settings 
   /call DeclareIniVar minRadius int Settings 150 /radius 
   /call DeclareIniVar engageDelay int Settings 55 /engagedelay 
   /call DeclareIniVar minHP int Settings 95 /minhp 
   /call DeclareIniVar autoBuff int Settings 1 /buff 
   /call DeclareIniVar useMount int Settings 1 /mount 
   /call DeclareIniVar useDebuff int Settings 1 /debuff 
   /call DeclareIniVar nukeMode int Settings 1 /nuke 
   /call DeclareIniVar useCharm int Settings 0 /charm 
   /call DeclareIniVar useDPS int Settings 0 /dps 
   /call DeclareIniVar usePet int Settings 1 /companion 
   /call DeclareIniVar privateChannel string Settings " " 
   /call DeclareIniVar channelAnnounce int Settings 0 
   /call DeclareIniVar autoAnnounce string Settings 1  
   /call DeclareIniVar noInterrupt int Settings 0 
   /call DeclareIniVar useManaStone int Settings 0 
   /call DeclareIniVar checkNamed int Settings 0 /checknamed 
   /call DeclareIniVar noInvis int Settings 1 
   /call DeclareIniVar useManaRobe int Settings 1 
   /call DeclareIniVar manaRobeMode int Settings 1 
   /call DeclareIniVar manaRobeMinMana int Settings 70 
   /call DeclareIniVar manaRobeMaxMana int Settings 94 
   /call DeclareIniVar nukeMana int Settings 25 /nukemana 
   /call DeclareIniVar nukeDelay int Settings 0 /nukedelay 
   /call DeclareIniVar nukeMode int Settings 1 /nukemode 
   /call DeclareIniVar ignoreList string Settings 
   /call DeclareIniVar runeHP int Settings 70 
   /call DeclareIniVar cleanUp int Settings 0 /cleanup 
   /call DeclareIniVar useGroupDS int Settings 1 /ds    
   /call DeclareIniVar clarityBitch string Settings 
   /call DeclareIniVar spellSet string Settings "Macro" 
   /call DeclareIniVar maloDuration string Settings 19m 
   /call DeclareIniVar resistsTillMala int Settings 4 
   /call DeclareIniVar resistsTillQuit int Settings 3 

   /call DeclareIniVar nuke1 string Spells "Fickle Inferno rk. ii" 
   /call DeclareIniVar nuke2 string Spells " " 
   /call DeclareIniVar magicNuke string Spells "Shock of Cineral Steel" 
   /call DeclareIniVar fireNuke string Spells "Fickle Inferno rk. ii" 
   /call DeclareIniVar boltNuke string Spells "Bolt of Molten Dross" 
   /call DeclareIniVar summonedNuke string Spells "Annihilate the Unnatural rk. ii" 
   /call DeclareIniVar shielding string spells "Prime Shielding" 

   /call DeclareIniVar windPet string Spells "Aspect of Air" 
   /call DeclareIniVar earthPet string Spells "Essence of Earth" 
   /call DeclareIniVar firePet string Spells "Core of Fire" 
   /call DeclareIniVar waterPet string Spells "Core of Water" 

   /call DeclareIniVar petSpell string Spells "Aspect of Air" 
   /call DeclareIniVar malosiniaSpell string Spells "Veil of Lost Hopes" 
   /call DeclareIniVar malosiniaType string Spells "Item" 
   /call DeclareIniVar malaSpell string Spells "Mala" 
   /call DeclareIniVar malaType string Spells "gem2" 
   /call DeclareIniVar groupDSSpell string Spells "Circle of Fireskin" 
   /call DeclareIniVar singleDSSpell string Spells "Lavaskin" 
   /call DeclareIniVar siphonSpell string Spells "Elemental Symbiosis rk. ii" 
   /call DeclareIniVar runeSpell string Spells "NULL" 
   /call DeclareIniVar runeType string Spells "NULL" 
   /call DeclareIniVar pethpSpell string Spells "Primal Fusion" 
   /call DeclareIniVar pethpBuff string Spells "Focus of Primal Elements" 
   /call DeclareIniVar pethpType string Spells "item" 
   /call DeclareIniVar petHaste string Spells "Burnout VII" 
   /call DeclareIniVar petShrinkSpell string Spells "Draconic Servant's Wand" 
   /call DeclareIniVar petShrinkType string Spells "item" 
   /call DeclareIniVar rodSpell string Spells "Wand of Prime Transvergence" 
   /call DeclareIniVar rodType string Spells "gem8" 

   /call DeclareIniVar selfBuff1 string Spells "Eidolic Guardian" 
   /call DeclareIniVar selfBuffNoStack1 string Spells "Protection of the Nine,Blessing of the Nine,Steeloak Skin,Blessing of Steeloak" 
   /call DeclareIniVar selfBuff2 string Spells " " 
   /call DeclareIniVar selfBuffNoStack2 string Spells " " 
   /call DeclareIniVar selfBuff3 string Spells " " 
   /call DeclareIniVar selfBuffNoStack3 string Spells " " 
   /call DeclareIniVar selfBuff4 string Spells " " 
   /call DeclareIniVar selfBuffNoStack4 string Spells " " 
   /call DeclareIniVar selfBuff5 string Spells " " 
   /call DeclareIniVar selfBuffNoStack5 string Spells " " 

   /call DeclareIniVar buffList1 string Spells "rod,modrod,mod" 
   /call DeclareIniVar buffName1 string Spells "Wand of Prime Transvergence" 
   /call DeclareIniVar buffType1 string Spells "gem8" 
   /call DeclareIniVar buffList2 string Spells "ds,dmg shield,damage shield" 
   /call DeclareIniVar buffName2 string Spells "ds" 
   /call DeclareIniVar buffType2 string Spells "gem3" 
   /call DeclareIniVar buffList3 string Spells " " 
   /call DeclareIniVar buffName3 string Spells " " 
   /call DeclareIniVar buffType3 string Spells " " 
   /call DeclareIniVar buffList4 string Spells " " 
   /call DeclareIniVar buffName4 string Spells " " 
   /call DeclareIniVar buffType4 string Spells " " 
   /call DeclareIniVar buffList5 string Spells " " 
   /call DeclareIniVar buffName5 string Spells " " 
   /call DeclareIniVar buffType5 string Spells " " 

   /call DeclareIniVar hpRobe string Items "${InvSlot[chest].Item.Name}" 
   /call DeclareIniVar clicky1 string Items "Earring of Celestial Energy" 
   /call DeclareIniVar clickyNoStack1 string Items " " 
   /call DeclareIniVar clicky2 string Items " " 
   /call DeclareIniVar clickyNoStack2 string Items " " 
   /call DeclareIniVar clicky3 string Items " " 
   /call DeclareIniVar clickyNoStack3 string Items " " 
   /call DeclareIniVar clicky4 string Items " " 
   /call DeclareIniVar clickyNoStack4 string Items " " 
   /call DeclareIniVar clicky5 string Items " " 
   /call DeclareIniVar clickyNoStack5 string Items " " 
   /call DeclareIniVar useFood int Items 1 
   /call DeclareIniVar statFood string Items "Bristlebanes Party Platter" 
   /call DeclareIniVar food1 string Items "Halas 10lb Meat Pie" 
   /call DeclareIniVar food2 string Items "Misty Thicket Picnic" 
   /call DeclareIniVar food3 string Items "Holy Cake" 
   /call DeclareIniVar food4 string Items 
   /call DeclareIniVar food5 string Items 
   /call DeclareIniVar meleeWep string Items "Focus of Primal Elements" 
   /call DeclareIniVar invisItem string Items " " 
   /call DeclareIniVar dispellItem string Items " " 
   /call DeclareIniVar normalMainhand string Items "${InvSlot[mainhand].Item.Name}" 
   /call DeclareIniVar normalOffhand string Items "${InvSlot[offhand].Item.Name}" 
   /call DeclareIniVar hpMask string Items "${InvSlot[face].Item.Name}" 

   /squelch /custombind add ma 
   /squelch /custombind add sa 
   /squelch /alias /anchor /echo SetAnchor 
   /squelch /alias /manarobe /echo Mana Robe 
   /squelch /alias /nuketype /echo NukeType 
   /squelch /alias /pettype /echo PetType 
   /squelch /alias /setma /custombind set ma /assist 
   /squelch /alias /setsa /custombind set sa /assist 
    
   /declare i int local 
   /declare j int local 
   /declare oldTarget int local 
   /declare tempTimer timer local 0 
   /declare cureTimer timer local 0 
   /declare petID2 int outer 0 
   /varset castSub CheckForAdds 
:check_params 
   /if ( ${Defined[Param${i}]} ) { 
      /if ( ${Param${i}.Equal[ma]} ) { 
         /varcalc i ${i}+1 
         /call SetIniVar mainAssist Settings "${Param${i}}" 
      } else /if ( ${Param${i}.Equal[sa]} ) { 
         /varcalc i ${i}+1 
         /call SetIniVar secondAssist Settings "${Param${i}}" 
      } else /if ( ${Param${i}.Equal[radius]} ) { 
         /varcalc i ${i}+1 
         /call SetIniVar minRadius Settings "${Param${i}}" 
      } else /if ( ${Param${i}.Equal[minhp]} ) { 
         /varcalc i ${i}+1 
         /call SetIniVar minHP Settings "${Param${i}}" 
      } else /if ( ${Param${i}.Equal[buff]} ) { 
         /call SetIniVar autoBuff Settings 1 
      } else /if ( ${Param${i}.Equal[nobuff]} ) { 
         /call SetIniVar autoBuff Settings 0 
      } else /if ( ${Param${i}.Equal[nuke]} ) { 
         /call SetIniVar nukeMode Settings 1 
      } else /if ( ${Param${i}.Equal[nonuke]} ) { 
         /call SetIniVar nukeMode Settings 0 
      } else /if ( ${Param${i}.Equal[debuff]} ) { 
         /call SetIniVar useDebuff Settings 1 
      } else /if ( ${Param${i}.Equal[nodebuff]} ) { 
         /call SetIniVar useDebuff Settings 0 
      } 
      /varcalc i ${i}+1 
      /goto :check_params 
   } 

   /call SwapStatFood 1 

   /if ( ${autoAnnounce} ) /announce on 

   /if (${Spawn[pc TANKNAMEHERE].ID}) {
      /memspellset macro
   } else {
      /memspellset solo
   }
   /echo Auto Mage Mode Activated 
   /if ( ${nukeMode} || ${useDebuff} ) { 
      /echo Main Assist: ${mainAssist} 
      /if ( ${Bool[${secondAssist}]} ) /echo Secondary Assist: ${secondAssist} (if ${mainAssist} dies) 
   } 
   /if ( ${nukeMode} || ${useDebuff} ) /echo Will ${If[${useDebuff},malosinia ,]}${If[${nukeMode} && ${useDebuff},then ,]}${If[${nukeMode},start nuking ,]}at ${minHP}% 
   /if ( ${autoBuff} ) /echo Auto Buff is enabled. 
   /if ( ${useMount} ) /echo Mount is enabled. 
   /if ( ${manaRobeMode} ) /echo ManaRobe Mode: ${manaRobeMode} 
:wait_for_target 
  /if ( !${petSpamTimer} ) { 
      /pet hold 
      /tell SHAMANNAMEHERE /pet hold
      /varset petSpamTimer 50 
   } 
   /if ( ${nukeMode} || ${useDebuff} ) /echo Waiting for target... 
   /varset validTarget 0 
:wait_for_target2 
   /if ( ${Spawn[pc ${secondAssist}].ID} && ( !${Spawn[pc ${mainAssist}].ID} || ${Spawn[corpse ${mainAssist}].ID} ) ) { 
      /varset mainTank ${secondAssist} 
   } else { 
      /varset mainTank ${mainAssist} 
   } 
   /if ( !${Corpse.Open} && ${Spawn[${mainAssist}].NearestSpawn[npc radius ${Math.Calc[${minRadius}*2]}].ID} && ( ${nukeMode} || ${useDebuff} ) ) { 
      /if ( ${Me.Casting.ID} ) /call WaitCast 
      /assist ${mainTank} 
      /varset oldTarget ${Target.ID} 
      /varset tempTimer 5 
   :wait_for_assist1 
      /call CheckTarget 
      /if ( ${tempTimer} && !${validTarget} ) /goto :wait_for_assist1 
   } 
   /call CheckTarget 
   /if ( !${validTarget} || ( !${nukeMode} && !${useDebuff} ) ) { 
      /call CheckPet 
      /call CheckPet2 
      /doevents 
      /call CheckBuffs 
      /call CheckLoc 
      /if (${Me.CombatState.Equal[DEBUFFED]} && ${Spawn[pc SHAMANNAMEHERE].ID} && !${cureTimer} && !${Me.Buff[resurrection effects].ID}) {
        /tell SHAMANNAMEHERE /alt activate 153
        /varset cureTimer 5s
        }
|     /if (${Me.State.Equal[SIT]} && ${Me.PctMana} > 99 && !${Window[SpellBookWnd].Open}) /stand
|     /if ((${Me.CombatState.Equal[ACTIVE]} && !${Me.Casting.ID} && !${Me.Moving} && ${Me.PctMana} < 100 && !${Me.State.Equal[SIT]}) || (!${useManaRobe} && !${Me.State.Equal[SIT]})) {
|       /call SwapItem "${hpRobe}" chest
|       /sit
|       } else {
|       /if ( !${Me.CombatState.Equal[RESTING]} && !${Me.CombatState.Equal[ACTIVE]} ) /call ManaRobe 
|       }
      /delay 0 
      /goto :wait_for_target2 
   } 
   /echo Target Aquired >> ${Target.DisplayName} << 
|  /if ( ${Me.PctMana} <= 20 ) {
|    /call SitOut
|     /goto :wait_for_target
|  }
   /varset petAttacking false 
   /varset engaged 0 
   /varset nukeWaitTimer 0 
   /varset mobID ${Target.ID}
   /varset mobHPStart ${Target.PctHPs} 
   /call UpdateMobList 
   /call AddToList mobList ${mobID} 
   /varset nukeWaitTimer 0 
   /if ( ${Defined[waitTimer${mobID}]} ) /deletevar waitTimer${mobID} 
   /declare waitTimer${mobID} int outer -1 
   /varset newAdds 0 
:nuke_loop 
   /varset addIndex 1 
:check_add_loop 
   /call CheckForAdds 
   /if ( ${addIndex}>1 ) /goto :check_add_loop 
   /call CheckPet 
   /call CheckPet2 
   /if ( !${Spawn[${mobID}].Type.Equal[NPC]} && ( !${Spawn[${mobID}].Type.Equal[pet]} || ${Spawn[${mobID}].Master.Type.Equal[pc]} ) ) { 
      /echo Target Dead! 
      /if ( ${cleanUp} ) /call CleanUp ${mobID} 
      /goto :wait_for_target 
   } 
   /target id ${mobID} 
   /if ( ${Spawn[${mobID}].Distance3D}<=${minRadius} && ${Spawn[pc ${mainTank}].NearestSpawn[radius ${Spawn[${mobID}].MaxRangeTo} id ${mobID}].ID} && ${waitTimer${mobID}}<0 ) { 
      /deletevar waitTimer${mobID} 
      /declare waitTimer${mobID} timer outer ${engageDelay} 
   }
   /if ( ( ${waitTimer${mobID}}>=0 || ${engaged} ) && ${useDebuff} ) /call DebuffMobs 
   /target id ${mobID} 
   /if ( ( ${Target.PctHPs}>${minHP} && ${waitTimer${mobID}} ) || !${assistWaitTimer} ) { 
      /if ( ${Spawn[pc ${secondAssist}].ID} && ( !${Spawn[pc ${mainAssist}].ID} || ${Spawn[corpse ${mainAssist}].ID} ) ) { 
         /varset mainTank ${secondAssist} 
      } else { 
         /varset mainTank ${mainAssist} 
      } 
      /assist ${mainTank} 
      /varset tempTimer 8 
   :wait_for_assist 
      /call CheckPet 
      /if ( ${tempTimer} && ${Target.ID}==${mobID} ) /goto :wait_for_assist 
      /if ( ${Target.ID} && ${Target.ID}!=${mobID} ) /goto :wait_for_target 
      /varset assistWaitTimer 5s 
      /goto :nuke_loop 
   } 
   /if ( !${engaged} ) { 
      /varset engaged 1
      /echo Engaging >> ${Target.DisplayName} << 
   } 
   /if ( ${Me.Pet.ID} && !${petAttacking} && !${Me.PetBuff[elemental silence]} ) { 
      /pet attack 
      /if (${Me.AltAbilityReady[Host of the Elements]} && ${Use_HoE}) {
        /call Cast "Host of the Elements" alt
        /goto :AA_Done
      }
      /if (${Me.AltAbilityReady[Frenzied Burnout]}) {
        /call cast "Frenzied Burnout" alt
        /goto :AA_Done
      }
      /if (${Me.AltAbilityReady[Servant of Ro]} && (${Me.Gem[${fireNuke}]} || ${Me.Gem[${summonedNuke}]})) {
	  /call cast "Servant of Ro" alt
        /goto :AA_Done
      }
      /if (${Me.AltAbilityReady[Fire Core]} && ${Me.Gem[${fireNuke}]}) {
        /call cast "Fire Core" alt
        /goto :AA_Done
      }
      :AA_Done
      /varset petAttacking true 
   } 
   /if ( !${Spawn[${mobID}].Type.Equal[NPC]} && !${Spawn[${mobID}].Type.Equal[pet]} ) /goto :wait_for_target 
   /doevents timer 
   /if ( !${petOff} && ( ${maloTimer${mobID}}<0 || ${maloTimer${mobID}}>1 || !${useDebuff} ) ) { 
      /doevents 
      /call CheckBuffs 
      /target id ${mobID}
      /if ( ${nukeMode} && ${Target.LineOfSight} && !${Me.TargetOfTarget.Name.Equal[${Me.Name}]} && !${nukeWaitTimer} &&  ( ${Me.PctMana}>=${nukeMana} || ${nukeMode}==2 ) && ( ${Target.Type.Equal[NPC]} || ${Target.Type.Equal[pet]} ) ) { 
         /if ( ${useManaRobe} && ${refreshTime}>2 ) { 
           /if ( !${Me.CombatState.Equal[RESTING]} && !${Me.CombatState.Equal[ACTIVE]} ) /call ManaRobe 
         } else {
           /if ( ${Me.Song[Gift of Mana].ID} || ${Me.Song[Gift of Exquisite Radiant Mana].ID} ) { 
             /call Cast "Rancorous Servant" gem10
           } else {
             /if ( ${Me.Song[Flames of Power].ID} && !${useDebuff} ) {
               /call Cast "Bolt of Molten Dross" gem3
             } else {
               /if ( ${Me.PctMana} <= 30 || ${Me.Buff[Flames of Weakness].ID} ) {
                 /if ( && !${FindItem[Summoned: Elemental Ice Sliver].Timer} && ${FindItem[Summoned: Elemental Ice Sliver].ID} ) {
                   /potionbelt activate 1
                 }
               } else {
                 /if (${Me.PctMana} < 75 && !${FindItem[Primal Element Robe].Timer} && ${FindItem[Primal Element Robe].ID}) {
		       /call Cast "Primal Element Robe" item
|                   /if (${InvSlot[chest].Item.ID} != ${FindItem[${hprobe}].ID}) /exchange ${FindItem[${hprobe}].ID} chest
		       /goto :click_nuke_done
		     }
                 /if (${Me.PctMana} < 75 && !${FindItem[Blood Fire Signet].Timer} && ${FindItem[Blood Fire Signet].ID}) {
		       /call Cast "Blood Fire Signet" item
		       /goto :click_nuke_done
		     }
                 /call Cast "${nuke1}" gem1 0 CheckPet 
                 :click_nuke_done
                 /if ( ${Macro.Return.Equal[CAST_NOTREADY]} && ${Me.Gem[${nuke2}]} ) /call Cast "${nuke2}" gem1 0 CheckPet 
                 /if ( ${Macro.Return.Equal[CAST_SUCCESS]} || ${Macro.Return.Equal[CAST_RESISTED]} ) { 
                   /if ( ${nukeMode}==1 ) { 
                     /varcalc nukeWaitMod 2*(90 - ${Me.PctMana}) 
                   } else { 
                     /varset nukeWaitMod 0                
                   } 
                   /if ( ${nukeDelay}>${nukeWaitMod} ) { 
                     /varset nukeWaitTimer ${nukeDelay} 
                   } else { 
                     /varset nukeWaitTimer ${nukeWaitMod} 
                   } 
                 } 
               }
             }
           } 
         } 
      } else { 
        /if ( !${Me.CombatState.Equal[RESTING]} && !${Me.CombatState.Equal[ACTIVE]} ) /call ManaRobe 
      } 
   } 
/goto :nuke_loop 

Sub DebuffMobs 
   /declare i int local 
   /declare tempID string local 
   /if ( ${mobList.Find[[]} ) { 
      /for i 1 to ${mobList.Count[[]} 
         /if ( ${mobList.Find[[]}>1 ) /varset mobList ${mobList.Right[-${Math.Calc[${mobList.Find[[]}-1]}]} 
         /varset tempID ${mobList.Arg[${i},[].Left[-1]} 
         /if ( !${Defined[maloTimer${tempID}]} ) { 
            /if ( !${Spawn[${tempID}].Type.Equal[npc]} ) { 
               /declare maloTimer${tempID} int outer -1 
            } else /if ( ( !${waitTimer${tempID}} && ( ${maloTimer${mobID}} || ${waitTimer${mobID}} ) ) || ${tempID}==${mobID} ) { 
               /call UpdateMobList 
               /target id ${tempID} 
               /call Malo 
            } 
         } 
      /next i 
   } 
/return 

Sub CheckPet 
   /if ( ${Zone.ID}!=${currentZone} ) { 
      /varset currentZone ${Zone.ID} 
      /varset mobList 
      /varset addList 
      /varset buffQueue 
      /varset mobID 0 
      /varset petID 0 
      /varset petID2 0 
      /varset useAnchor 0 
      /squelch alert clear 6 
      /call ClearMobList  
   } 
   /call CheckForAdds 
   /declare i int local 
   /declare tempID int local 
   /if ( ${petOff} && ${Me.Pet.ID} ) { 
      /varset petOff 0 
   } 
   /if ( !${Spawn[${petID2}].Type.Equal[NPC]} && ${petOff2} ) /varset petOff2 0 
   /if ( ${Spawn[${petID}].Type.Equal[NPC]} && !${petOff} ) { 
      /echo Pet Off! 
      /varset petAttacking false 
      /varset petOff 1 
   } 
   /if ( ${Spawn[${petID2}].Type.Equal[NPC]} && !${petOff2} ) { 
      /echo Chanter Pet Off! 
      /varset petOff2 1 
   } 

   /if ( ${petOff} && ${Me.Casting.ID} && !( ${Me.Casting.Name.Equal[malosinia]} && ${Target.ID}==${petID} ) && !${Me.Casting.Name.Equal[Elemental Silence]} && !${Me.Casting.Name.Equal[call of the arch mage]} ) /call Interrupt 
   /doevents gate 
   /doevents rageon 
   /doevents rageoff 
   /doevents setvar 
   /if ( ${castWaitTime}>5 ) /doevents chat 
/return 

Sub CheckPet2 
   /if ( !${Me.Inventory[face].Name.Equal[${hpMask}]} ) /call SwapItem "${hpMask}" face 
   /if ( ${FindItem[Wand of Destructive Protection].ID} ) { 
      /declare AETime float local 
      /varcalc AETime (${MacroQuest.Running}-${uquaAETime})%90000 
      /if ( ${AETime}>83000 ) { 
         /if ( !${Me.Inventory[offhand].Name.Equal[Wand of Destructive Protection]} ) /call EquipItem "Wand of Destructive Protection|offhand" 
      } else { 
         /if ( ${AETime}>3000 && !${Me.Inventory[offhand].Name.Equal[${normalOffhand}]} ) /call EquipItem "${normalOffhand}|offhand" 
      } 
   } else { 
      /if ( !${Me.Inventory[offhand].Name.Equal[${normalOffhand}]} ) /call SwapItem "${normalOffhand}" offhand 
   } 
   /if ( ${petOff} ) /call Charm ${petID} 
   /if ( ${petOff2} &&  !( ${maloTimer${petID2}}>=4200 ) ) { 
      /declare oldTargetID int local ${Target.ID} 
      /tar id ${petID2} 
      /call Malo 
      /if ( ${Spawn[${oldTargetID}].ID} ) { 
         /target id ${oldTargetID} 
      } else { 
         /keypress clear_target 
      } 
   } 
/return 

Sub CheckForAdds 
:check_add_loop 
   /if ( !${Spawn[${mobID}].Type.Equal[npc]} && !${Spawn[${mobID}].Type.Equal[pet]} ) { 
      /varset addIndex 1 
      /return 
   } 
   /varset addID ${NearestSpawn[${addIndex},npc radius ${minRadius}].ID} 
   /if ( ${addID} ) { 
      /if ( ${Spawn[${addID}].Distance}<=${minRadius} && ${addID}!=${petID} && ${Spawn[${addID}].LineOfSight} && ${aggroAnim.Find[|${Spawn[${addID}].Animation}|]} && ${mezTimer${addID}}!=-1 && ${Spawn[${addID}].Type.Equal[NPC]} ) { 
         /call AddToList mobList ${addID} 
         /if ( ${Macro.Return.Equal[1]} ) { 
            /if ( !${Defined[waitTimer${addID}]} ) /declare waitTimer${addID} timer outer ${engageDelay}
            /echo Add detected! >> ${Spawn[${addID}].DisplayName} << 
         } 
         /varset newAdds 1 
      } 
      /varcalc addIndex ${addIndex}+1 
   } else { 
      /varset addIndex 1 
   } 
/return 

Sub Charm(int tempID) 
   /if ( ${Me.Pet.ID} ) /return 
   /varset noInvis 0 
   /declare oldTargetID int local ${Target.ID} 
:mez_pet 
   /target id ${tempID} 
   /call Cast "Elemental Silence" gem7 3s    
   /if ( !${Macro.Return.Equal[CAST_SUCCESS]} ) /goto :mez_pet 
:malo_pet 
   /target id ${tempID} 
   /call Malo 
   /if ( !${Macro.Return.Equal[CAST_SUCCESS]} ) /goto :malo_pet 
   /target id ${tempID} 
   /call Cast "Call of the Arch Mage" gem6 5s 
   /if ( ${Me.Pet.ID} ) { 
      /if ( ${Spawn[${oldTargetID}].ID} ) { 
         /target id ${oldTargetID} 
      } else { 
         /keypress clear_target 
      } 
   } 
   /varset noInvis ${Ini[${iniName},Settings,NoInvis,1]} 
/return 

Sub Malo 
   /declare tempID int local ${Target.ID} 
   /if ( !${Defined[maloResists${tempID}]} ) /declare maloResists${tempID} int outer 0 
   /if ( ${maloResists${tempID}}==${resistsTillMala} ) /call Cast "${malaSpell}" ${malaType} 5s CheckPet 
   /if ( ${maloResists${tempID}}==${resistsTillQuit} ) { 
      /deletevar maloTimer${tempID} 
      /declare maloTimer${tempID} int outer -1 
      /return 
   } 
   /call Cast "${malosiniaSpell}" ${malosiniaType} 0 CheckPet 
   /if ( !${Defined[maloTimer${tempID}]} ) /declare maloTimer${tempID} timer outer 
   /if ( ${Macro.Return.Equal[CAST_SUCCESS]} ) { 
      /gsay %t is Malosinia'd
      /varset maloTimer${tempID} 19m | ${maloDuration} 
      /varset maloResists${tempID} 0 
   } else /if ( ${Macro.Return.Equal[CAST_OUTOFMANA]} || ${Macro.Return.Equal[CAST_OUTOFRANGE]} || ${Macro.Return.Equal[CAST_CANNOTSEE]} ) { 
      /varset maloTimer${tempID} 50      
   } else { 
      /if ( ${Macro.Return.Equal[CAST_RESISTED]} ) /varcalc maloResists${tempID} ${maloResists${tempID}}+1 
      /varset maloTimer${tempID} 1 
   } 
/return ${Macro.Return} 


Sub CheckBuffs 
/if (${Window[RespawnWnd].Open}) {
  /varset deathFlag TRUE
  /goto :dead
  } else {
  /varset deathFlag FALSE
  }

   /if ( ${Me.Combat} ) { 
      /if ( !${Me.Inventory[mainhand].Name.Equal[${meleeWep}]} && ${FindItem[${meleeWep}].ID} ) /call SwapItem "${meleeWep}" mainhand 
   } else { 
      /if ( !${Me.Inventory[mainhand].Name.Equal[${normalMainhand}]} && ${FindItem[${normalMainhand}].ID} ) /call SwapItem "${normalMainhand}" mainhand 
   } 
   /declare i int local 
   /declare j int local 
   /declare buffText string local 
   /declare targetName string local 
   /declare spellName2 string local 
   /declare spellType string local 
   /declare spellRange int local 118 
   /declare spellName string local 
   /declare buffName string local 
   /declare focusList string local Wunshi's Focusing,Focus of Alladnu,Focus of Soul,Talisman of Kragg,Focus of the Seventh,Talisman of Wunshi,Dire Focusing,Talisman of the Dire
   /declare shaman bool local false 
   /declare targetType string local 

   /if ( !${petID} && ${Me.Pet.ID} ) /varset petID ${Me.Pet.ID} 
   /if ( !${petID2} && ${Spawn[${clarityBitch}].Pet.ID} ) /varset petID2 ${Spawn[${clarityBitch}].Pet.ID} 
   /if ( !${Me.Pet.ID} && ${usePet} && !${petOff} && ${Me.CurrentMana}>=900 && ${FindItem[Rod of Prime Transvergence].ID} ) /call SumPet 


   /if ( ${Me.Hunger}<5000 && ${useFood} ) { 
      /declare foodName string local 
      /declare oldSlotID int local 
      /call GetFoodName 
      /varset foodName ${Macro.Return} 
      /if ( ${Bool[${foodName}]} ) { 
         /varset oldSlotID ${FindItem[${foodName}].InvSlot.ID} 
         /call SwapItem "${foodName}" "pack8" 
         /nomodkey /itemnotify pack8 rightmouseup 
         /if ( ${FindItem[${foodName}].ID} ) /call SwapItem "${foodName}" "${oldSlotID}" 
      } 
   } 
   /if ( ${checkNamed} ) /call CheckNamed 


   /if ( !${Me.Buff["Clairvoyance"].ID} && !${Me.Buff["Voice of Clairvoyance"].ID} && ${Spawn[pc ${clarityBitch} radius 100].ID} && !${c6Timer} ) { 
      /chat tell ${clarityBitch} c6 
      /varset c6Timer 1m 
   } 

|   /if ( !${Me.Buff[Dire Focusing].ID} && !${Me.Buff[Talisman of the Dire].ID} && ${Spawn[pc SHAMANNAMEHERE radius 100].ID}) {
|      :SHAMANNAMEHERE_loop
|      /tell SHAMANNAMEHERE Focus
|      /delay 5s ${Me.Buff[Dire Focusing].ID}
|      /if (!${Me.Buff[Dire Focusing].ID}) /goto :SHAMANNAMEHERE_loop
|   }
|   /if ( !${Me.Buff[Gallantry Rk. II].ID} && !${Me.Buff[Hand of Gallantry Rk. II].ID} && ${Spawn[pc CLERICNAMEHERE radius 100].ID}) {
|      :CLERICNAMEHERE_loop
|      /tell CLERICNAMEHERE Tenacity
|      /delay 5s ${Me.Buff[Tenacity Rk. II].ID}
|      /if (!${Me.Buff[Tenacity Rk. II].ID}) /goto :CLERICNAMEHERE_loop
|   }

   /if ( ${FindItem[Summoned: Elemental Ice Sliver].ID} && !${FindItem[Summoned: Elemental Ice Sliver].Charges} ) /call Ice_Destroy
   /if ( ${Me.Song[Gift of Exquisite Radiant Mana].ID} && ${Me.CurrentMana} >= 1450 && !${FindItem[Summoned: Elemental Ice Sliver].ID} ) {
     /call Cast "Summon Gelid Paradox" gem8
     /delay 3s !${Me.Casting.ID}
     /autoinv
   }
   /if ( ${Cursor.Name.Equal[Rod of Prime Transvergence]} ) /autoinventory 
   /if ( !${FindItem[Rod of Prime Transvergence].ID} ) /call AddToQueue "rod,${Me.Name}" 
   /if ( ${FindItem[Rod of Prime Transvergence].ID} && !${FindItem[Rod of Prime Transvergence].Timer} && ${Me.PctHPs}>50 && ${Me.PctMana}<=95 ) { 
      /call Cast "Rod of Prime Transvergence" item
   } 
   /if ( ${useMount} && !${Me.Mount.ID}) /call Cast "${Me.Inventory[ammo].Name}" item 
   /if (!${Me.Buff[Elemental Form: Water].ID} && ${Me.AltAbilityReady[Elemental Form: Water]} && !${Me.Mount.ID}) /call cast "62" alt
   /if ( ${Me.Pet.ID} ) { 
      /if ( !${Me.PetBuff[${pethpSpell}]} && !${Me.PetBuff[call of the arch mage]} && ${FindItem[Focus of Primal Elements].ID} && !${FindItem[Focus of Primal Elements].Timer} && ${Me.Pet.Distance3D}<=100 ) /call Cast "${pethpBuff}" ${pethpType} 3s 
      /if ( !${Me.PetBuff[${petHaste}]} && !${Me.PetBuff[call of the arch mage]} && ${Me.Pet.Distance3D}<=100 ) /call Cast "${petHaste}" gem7 2s 
      /if ( !${Me.PetBuff[Iceflame Tenement]} ) /call Cast "Iceflame Tenement" gem3
      /if ( !${Me.PetBuff[rathe's strength effect]} ) /call Cast "rathe's strength" gem3
      /if ( !${Me.PetBuff[burnout]} && ${Me.PetBuff[call of the arch mage]} ) /call Cast "Burnout" gem7 2s 
      /if ( !${Me.Buff[${siphonSpell} Recourse].ID} && !${Me.PetBuff[call of the arch mage]} && !${Me.Buff[Elemental Symbiosis Recourse Rk. II].ID} && ${Me.Pet.ID} && ${Me.Pet.Distance3D}<=100 && ${Me.Book[${siphonSpell}]} ) /call cast "${siphonSpell}" gem2 0 CheckPet 
   } 
   /doevents TankDS
   /if ( !${Me.Buff[${groupDSSpell}].ID} && ${useGroupDS} ) { 
      /if ( ${Spawn[pc ${mainAssist}].ID} ) { 
         /call AddToQueue "${groupDSSpell},${mainAssist}" 
      } else { 
         /call AddToQueue "${groupDSSpell},${Me.Name}" 
      } 
   } 
   /if ( !${autoBuff} ) /goto :skip_buffs 
   /if ( ${Me.PctHPs}<=${runeHP} ) { 
      /if ( ${Me.Book[${runeSpell}]} ) { 
         /if ( !${Me.Buff[${runeSpell}].ID} ) /call cast "${runeSpell}" ${runeType} 0 CheckPet 
      } else /if ( ${FindItem[${runeSpell}].ID} ) { 
         /if ( !${Me.Buff[${FindItem[${runeSpell}].Spell.Name}].ID} ) /call cast "${runeSpell}" ${runeType} 0 CheckPet 
      } 
   } 
   /doevents Indoors 
   /call CheckIniBuffs 
   /if ( ${Spawn[pc class shaman].ID} ) { 
      /if ( ${Raid.Members} ) { 
         /varset shaman true      
      } else { 
         /for i 1 to ${Group} 
            /if ( ${Group.Member[${i}].Class.Name.Equal[shaman]} ) /varset shaman true 
         /next i 
      } 
   } 
  
   /if ( ${shaman} ) { 
      /if ( ${Me.Buff["${shielding}"].ID} ) /call ClickOffBuff "${shielding}" 
   } else { 
      /for i 1 to ${focusList.Length} 
         /if ( ${Me.Buff[${focusList.Arg[${i},,]}].ID} ) /goto :skip_buffs 
      /next i 
      /if ( !${Me.Buff[${shielding}].ID} ) /call AddToQueue "${shielding}" 
   } 
:skip_buffs 
   /if ( ${Target.Name.Equal[${Me.Pet.Name}]} ) { 
      /if ( ${Spawn[${oldTarget}].ID} ) { 
         /target id ${oldTarget} 
      } else { 
         /keypress clear_target 
      } 
   } 
   /if ( ${buffQueue.Find[[]} ) { 
      /if ( ${buffQueue.Find[[]}>1 ) /varset buffQueue ${buffQueue.Right[-${Math.Calc[${buffQueue.Find[[]}-1]}]} 
      /for i 1 to ${buffQueue.Count[[]} 
         /varset buffText [${buffQueue.Arg[${i},[]} 
         /varset spellName ${buffText.Arg[1,,].Right[-1]} 
         /if ( ${spellName.Right[1].Equal["]"]} ) /varset spellName ${spellName.Left[-1]} 
         /varset targetName ${buffText.Arg[2,,].Left[-1]} 
         /call GetBuffName "${spellName}" 
         /varset spellName ${Macro.Return.Arg[1,,]} 
         /varset spellType ${Macro.Return.Arg[2,,]} 
         /if ( ${spellType.Equal[item]} ) { 
            /varset spellName2 ${FindItem[${spellName}].Spell.Name} 
         } else { 
            /varset spellName2 ${spellName} 
         } 
         /if ( ${Spell[${spellName2}].TargetType.Equal[Group v2]} ) { 
            /varcalc spellRange 1.18*${Spell[${spellName2}].AERange} 
         } else { 
            /varcalc spellRange 1.18*${Spell[${spellName2}].Range} 
         } 
         /varset targetType pc 
         /if ( !${Spawn[pc ${targetName}].ID} ) /varset targetType pet          
         /if ( ${Bool[${spellName}]} ) { 
            /if ( ${Me.CurrentMana}>=${Math.Calc[${Spell[${spellName}].Mana}+${Me.ManaRegen}]} || ${spellType.Equal[item]} || ${spellType.Equal[alt]} ) { 
               /if ( !${Bool[${targetName}]} ) { 
                  /call Cast "${spellName}" ${spellType} 4s CheckForAdds 
               } else /if ( ${Spawn[${targetType} ${targetName}].ID} && ( ${Spawn[pc ${targetName}].Distance3D}<=${spellRange} || !${spellRange} ) ) { 
                  /target ${targetType} ${targetName} 
                  /call Cast "${spellName}" ${spellType} 4s CheckForAdds 
                  /if ( ${Spawn[${oldTarget}].ID} ) { 
                     /if ( ${Target.Name.Equal[${targetName}]} ) /target id ${oldTarget} 
                  } else { 
                     /keypress clear_target 
                  }    
               } 
               /if ( ${Macro.Return.Equal[CAST_SUCCESS]} || ${Macro.Return.Equal[CAST_UNKNOWNSPELL]} || ${Macro.Return.Equal[CAST_NOTARGET]} || ( ${Macro.Return.Equal[CAST_CANCELLED]} && ( !${newAdds} || !${useMez} ) ) ) { 
                  /call DeleteFromQueue "${buffText}" 
                  /varcalc i ${i}-1 
               } 
            } 
         } else { 
            /call DeleteFromQueue "${buffText}" 
            /varcalc i ${i}-1 
         } 
      /next i 
   } 
   /return 
:dead 
/declare i int local 
/varset mobList 
/varset addList 
/varset buffQueue 
/varset mobID 0 
/varset petID 0 
/varset useAnchor 0 
/squelch alert clear 6 
/call ClearMobList
/call Wait4Rez 
/return 

Sub GetBuffName(string spellName) 
   /declare i int local 
   /declare buffText string local 
   /declare spellType string local gem3
   /if ( ${spellName.Equal[rod]} ) { 
      /varset spellName ${rodSpell} 
      /varset spellType ${rodType} 
   } 
   /if ( ${spellName.Equal[ds]} ) { 
      /varset spellName ${singleDSSpell} 
      /varset spellType gem3
   } 
   /if ( ${spellName.Equal[coth]} ) /varset spellName Call of the Hero 
   /for i 1 to 5 
      /if ( ${spellName.Equal[${buffName${i}}]} ) /varset spellType ${buffType${i}} 
   /next i 
   /if ( ${Int[${Me.Book[${spellName}]}]} || ${AltAbility[${spellName}].ID} || ${FindItem[${spellName}].ID} ) /return ${spellName},${spellType} 
/return 

Sub SumPet 
   /declare i int local 
   /if ( ${Me.AltAbilityReady[suspended minion]} ) /call Cast "suspended minion" alt 2s 
   /delay 3s ${Me.Pet.ID} 
   /if ( !${Me.Pet.ID} ) { 
      /call cast "${petSpell}" gem5 5s 
      /tar id ${Me.Pet.ID}
      /pet focus 
      /call SumWeps 
      /call Cast "${petShrinkSpell}" ${petShrinkType} 3s 
      /call Cast "${petShrinkSpell}" ${petShrinkType} 3s 
   } 
/return 

Sub SumWeps
   /if ( ${Target.Pet.ID} ) /target id ${Target.Pet.ID} 
   /if ( !${Target.Type.Equal[pet]} ) /return 
   /memspell 8 "Summon Muzzle of Mowcha"
   /delay 15
   /delay 30s ${Me.SpellReady[8]}
   /call Cast "Summon Muzzle of Mowcha" gem8 3s 
   /call GiveToPet 
   /if (${InvSlot[pack8].Item.ID} == 52709 || !${InvSlot[pack8].Item.ID}) {
     /memspell 8 "Summon Prime Armaments"
     /delay 3s
     /delay 30s ${Me.SpellReady[8]}
     /call Cast "Summon Prime Armaments" gem8 3s
     /nomodkey /itemnotify pack8 leftmouseup
     /delay 3
     /nomodkey /itemnotify pack8 rightmouseup
     /delay 3
     /nomodkey /itemnotify ${FindItem[Summoned: Tonfa of the North Wind].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 15
     /nomodkey /itemnotify ${FindItem[Summoned: Tonfa of the North Wind].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /if (${FindItem[Rod of Prime Transvergence].ID}) /exchange 52709 pack8
     /if (${Cursor.ID} == 17310) /drop
   } else {
     /echo Pack8 Not Cleared...
     /return
   }
   /if (${InvSlot[pack8].Item.ID} == 52709 || !${InvSlot[pack8].Item.ID}) {
     /memspell 8 "Summon Plate of the Elements"
     /delay 15
     /delay 30s ${Me.SpellReady[8]}
     /call Cast "Summon Plate of the Elements" gem8 3s 
     /nomodkey /itemnotify pack8 leftmouseup
     /delay 3
     /nomodkey /itemnotify pack8 rightmouseup
     /delay 3
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Helm].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Gauntlets].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Bracers].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Greaves].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Vambraces].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Boots].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Eidolon Plate Breastplate].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /nomodkey /itemnotify ${FindItem[Summoned: Lucid Belt].InvSlot.ID} leftmouseup
     /delay 3
     /call GiveToPet
     /delay 5
     /if (${FindItem[Rod of Prime Transvergence].ID}) /exchange 52709 pack8
     /if (${Cursor.ID} == 17310) /drop
   } else {
     /echo Pack8 Not Cleared...
     /return
   }
   /squelch /target clear
/return 


Sub GiveToPet 
   /declare i int local 
   /varset i 1 
:give_item 
   /delay 5 ${Cursor.ID} 
   /if ( ${Cursor.ID} && !${InvSlot[trade4].Item.ID} ) { 
      /if ( ${Cursor.Name.Find[summoned:]} || ${Cursor.Name.Find[eidolon]} ) { 
         /click left target 
         /delay 1s ${InvSlot[trade${i}].Item.ID} 
      } else { 
         /autoinventory 
      } 
      /goto :give_item 
   } 
   /for i 1 to 4 
      /if ( (${InvSlot[trade${i}].Item.ID}) && (!${InvSlot[trade${i}].Item.Name.Find[summoned:]} && !${InvSlot[trade${i}].Item.Name.Find[eidolon]}) ) /notify GiveWnd GVW_Cancel_Button leftmouseup 
   /next i 
   /if ( ${Window[GiveWnd].Open} ) { 
      /notify GiveWnd GVW_Give_Button leftmouseup 
      /delay 5s !${Window[GiveWnd].Open} 
   } 
   /if ( ${Window[InventoryWindow].Open} ) /keypress inventory 
/return 

Sub Ice_Destroy
/if ( !${FindItem[Summoned: Elemental Ice Sliver].ID} ) /return
/declare bagID int local ${InvSlot[${FindItem[Summoned: Elemental Ice Sliver].InvSlot}].Pack}
/if ( !${Window[${InvSlot[${FindItem[Summoned: Elemental Ice Sliver].InvSlot}].Pack.Name}].Open} ) {
  /squelch /nomodkey /itemnotify ${bagID} rightmouseup
}
:Ice_Pickup
:Cursor_Clear
/if ( ${Cursor.ID} ) {
  /autoinv
  /goto :Cursor_Clear
}  
/squelch /nomodkey /itemnotify ${FindItem[Summoned: Elemental Ice Sliver].InvSlot} leftmouseup
/if ( !${Cursor.Name.Equal[Summoned: Elemental Ice Sliver]} ) /goto :Ice_Pickup
/squelch /nomodkey /itemnotify ${bagID} rightmouseup
/if ( ${Cursor.Name.Equal[Summoned: Elemental Ice Sliver]} ) {
  /echo Destroying ${Cursor.Name}
  /destroy
  } else {
  /autoinv
}  
/return

Sub SitOut
/echo Sitting Out For a Bit...
/if ( !${Me.State.Equal[SIT]} ) /sit
:sit_out_loop
/if ( ${Me.PctMana} <= 60) /goto :sit_out_loop
/return

Sub Event_TankDS
/echo Refreshing DS.
/call AddToQueue "Magmaskin,TANKNAMEHERE"
/return

Sub Event_RageOn(string line) 
   /declare tempID int local ${Target.ID} 
   /if ( ${Spawn[${mobID}].ID} ) /varset tempID ${mobID} 
   /if ( ${line.Find[${Spawn[${tempID}].DisplayName}]} && ${Me.Pet.ID} ) { 
      /echo calling off pet... 
      /pet back off
      /tell SHAMANNAMEHERE /pet hold
      /pet hold 
   } 
/return 

Sub Event_RageOff(string line) 
   /declare tempID int local ${Target.ID} 
   /if ( ${Spawn[${mobID}].ID} ) /varset tempID ${mobID} 
   /if ( ${line.Find[${Spawn[${tempID}].DisplayName}]} && ${Me.Pet.ID} ) { 
      /target id ${tempID} 
      /pet attack 
   } 
/return 

Sub Event_Gate(string line) 
   /if ( ${line.Find[${Spawn[${mobID}].DisplayName}]} && ${Me.Pet.ID} ) { 
      /varset mobID 0 
   } 
/return 

Sub Event_Goto(string line,string destination) 
   /declare tempZone string local 
   /if ( ${destination.Equal[pok]} ) { 
      /call MoveToLoc -1700 428 
      /call MoveToLoc -1180 -116 
      /call MoveToLoc -274 -860 
      /call MoveToLoc -222 -945 
      /call MoveToLoc 704 -1324 
      /call MoveToLoc 726 -1443 
      /call MoveToLoc 772 -1440 
      /doortarget poktele500 
      /face nolook 
      /varset tempZone ${Zone.Name} 
      /keypress pitchdown hold 
   :wait_for_zone_pok 
      /keypress use hold 
      /delay 1 
      /if ( ${tempZone.Equal[${Zone.Name}]} ) /goto :wait_for_zone_pok 
   } 
   /if ( ${destination.Equal[wfp]} ) { 
      /keypress centerview 
      /call MoveToLoc -228 -283 
      /call MoveToLoc -452 -236 
      /doortarget pokfptport500 
      /face nolook 
      /keypress use hold 
   } 
   /if ( ${destination.Equal[ec]} ) { 
      /call MoveToLoc -636 152 
      /call MoveToLoc -559 195 
      /face heading 90 
      /keypress forward hold 
      /varset tempZone ${Zone.Name} 
   :wait_for_zone_ec 
      /delay 5 
      /if ( ${tempZone.Equal[${Zone.Name}]} ) /goto :wait_for_zone_ec 
   } 
   /if ( ${destination.Equal[nedaria]} ) { 
      /call MoveToLoc -497 -762 
      /call MoveToLoc -904 -365 
      /call MoveToLoc -1049 844 
      /call MoveToLoc -1338 795 
      /call MoveToLoc -1662 667 
      /call MoveToLoc -1671 276 
      /call MoveToLoc -1768 16 
      /call MoveToLoc -1617 -182 
      /target magus 
      /say nedaria 
   } 
   /if ( ${destination.Equal[natimbi]} ) { 
      /call MoveToLoc 1050 1528 
      /call MoveToLoc 1023 1529 
      /target magus 
      /say natimbi 
   } 
   /if ( ${destination.Equal[kodtaz]} ) { 
      /if ( !${Me.Levitating} ) { 
         /if ( ${Me.Invis} ) { 
            /target clear 
            /attack on 
            /attack off 
         } 
         /call Cast "Summon Ring of Flight" gem8 10s 
         /delay 5s ${Cursor.ID} 
         /autoinv 
         /target myself 
         /call Cast "Summoned: Ring of Levitation" item 
      } 
      /if ( !${Me.Invis} ) /call Cast "Veil of Elements" gem8 10s 
      /call MoveToLoc 36 -1458 
      /call MoveToLoc 1071 -1520 
      /call MoveToLoc 989 -447 
      /call MoveToLoc 1099 110 
      /call MoveToLoc 1029 1266 
      /call MoveToLoc 1143 1546 
      /doortarget nihobelisk800 
      /face nolook loc 1144,1555 
      /varset tempZone ${Zone.Name} 
      /keypress pitchdown hold 
   :wait_for_zone_kodtaz 
      /keypress use hold 
      /delay 1 
      /if ( ${tempZone.Equal[${Zone.Name}]} ) /goto :wait_for_zone_kodtaz 
   } 
   /if ( ${destination.Equal[kt]} ) { 
      /echo goto pok 
      /echo goto wfp 
      /echo goto ec 
      /echo goto nedaria 
      /echo goto natimbi 
      /echo goto kodtaz 
      /doevents Goto 
   } 
/return 

Sub Event_Coth(string line,string sender,string name) 
   /if ( !${Defined[name]} ) /declare name string local 
   /declare i int local 
   /declare inGroup bool local false 
   /if ( !${Spawn[pc ${name}].ID} ) { 
      /if ( ${Spawn[pc ${sender}].ID} ) { 
         /varset name ${sender} 
      } else { 
         /return 
      } 
   } 
   /for i 1 to 5 
      /if ( ${Group[${i}].Name.Find[${name}]} ) /varset inGroup true 
   /next i 
   /if ( ${inGroup} ) { 
      /call AddToQueue "coth,${name}" 
   } else /if ( ${GroupLeader.ID}==${Me.ID} ) { 
      /target pc ${name} 
      /keypress invite_follow 
      /delay 5s ${Group[1].Name.Equal[${name}]} || ${Group[2].Name.Equal[${name}]} || ${Group[3].Name.Equal[${name}]} || ${Group[4].Name.Equal[${name}]} || ${Group[5].Name.Equal[${name}]} 
      /for i 1 to 5 
         /if ( ${Group[${i}].Name.Equal[${name}]} ) /varset inGroup true 
      /next i 
      /if ( ${inGroup} ) /call AddToQueue "coth,${name}" 
   } 
/return 

Sub Event_Timer(string timerName,int timerValue) 
   /if ( !${Defined[${timerName}]} ) /return 
   /declare tempID int local 0 
   /declare oldTargetID int local ${Target.ID} 
   /if ( ${timerName.Left[9].Equal[maloTimer]} ) { 
      /varset tempID ${timerName.Right[-9]} 
      /if ( ${Spawn[${tempID}].Type.Equal[NPC]} ) { 
         /target id ${tempID} 
         /call Malo 
      } else { 
         /deletevar ${timerName} 
      } 
   } else { 
      /return ${Macro.Return} 
   } 
   /if ( ${Target.ID}==${tempID} ) { 
      /if ( ${Spawn[${oldTargetID}].ID} ) { 
         /target id ${oldTargetID} 
      } else { 
         /keypress clear_target 
      } 
   } 
/return ${Macro.Return} 

Sub Event_PetWeps(string line,string sender) 
   /declare tempID int local ${Spawn[pc ${sender}].Pet.ID} 
   /if ( !${tempID} || ${Spawn[${tempID}].Distance3D}>250 || !${Spawn[${tempID}].LineOfSight} ) /return 
   /target id ${tempID} 
   /if ( ${Stick.Status.Length} ) { 
      /stick 10 
      /delay 5s ${Target.Distance3D}<=10 
   } else { 
      /declare tempTimer timer local 5s 
   :move_to_pet 
      /face fast nolook 
      /keypress forward hold 
      /if ( ${tempTimer} && ${Target.Distance3D}<=20 ) /goto :move_to_pet 
      /keypress forward 
   } 
   /call SumWeps 
   /if ( ${Spawn[pc ${followName} radius 150].ID} && ${Stick.Status.Equal[off]} ) { 
      /target pc ${followName} 
      /stick hold 10 
   } 
/return

chance98 · Jan 16, 2009

think i found the prettiest piece of code i have ever seen for the familar thing...

}
/if (${Me.Pet.ID} && ${Me.Pet.Name.Find[familiar]}) /pet get lost
/return

ty crystane

chance98 · Jan 16, 2009

anyone come up with a meditate section for the mage mac yet?

typenamehere · Jan 19, 2009

i was wondering if there is a cope snipet i can insert into a macro or two that will count. for instance, my bard kiting macro i made, i would like to add it, that when /if (!${Target.ID}) /echo # mobs dead, so every time i have no target, it will /echo how many times my target has been cleared

VillageIdiot · Jan 19, 2009

are you trying to count how many mobs you kill?

VillageIdiot · Jan 19, 2009

for me , i had it count how many times i received exp. all based off of the event of getting exp.

if thats what you want. Let me know and i can post what i use or post your macro and i can add it and repost it for ya.

typenamehere · Jan 20, 2009

the macro im using is extremly simiple, but it gets the job done perfectly, im trying to see how many mobs it kills. this could have a few uses, and im not done with it, but i currently use it on my bard, i get to an area, /circle 50 or so, /twist my dots, then let this macro run, all it does it keeps getting a new target.

Rich (BB code):

|made by typenamehere
Sub Main
:Loop
/if (${Spawn[gm].ID}) /exit
/if (!${Target.ID})  {
                       /echo mob down! getting a new one
                       /keypress f8
                                    }
/if (${Target.ID})  /delay 5s
/if (${Target.Type.Equal[Corpse]}) /keypress esc
/goto :Loop

VillageIdiot · Jan 20, 2009

Here i added what i use to count up kills based off of getting the exp message.

Rich (BB code):

|made by typenamehere

#Event Exp "#*#experience!!#*#"


Sub Main

/declare Kill_Count 	int	outer 0
/varset Kill_Count 	0



:Loop
/doevents
/if (${Spawn[gm].ID}) /exit
/if (!${Target.ID})  {
                       /echo mob down! getting a new one
                       /keypress f8
                                    }
/if (${Target.ID})  /delay 5s
/doevents
/if (${Target.Type.Equal[Corpse]}) /keypress esc
/doevents
/goto :Loop

/return



Sub Event_Exp
/varcalc Kill_Count (${Kill_Count}+1)
/echo Kill Count - ${Kill_Count}  in  ${Int[${Math.Calc[${Macro.RunTime}/60]}]} Min, ${Int[${Math.Calc[${Macro.RunTime}-${Int[${Math.Calc[${Macro.RunTime}/60]}]}*60]}]} Sec

/return

typenamehere · Jan 20, 2009

cool, thanks, gunna try it out once mq is back working

chance98 · Jan 20, 2009

hey village any luck writing me a med when not in combat sub for my mage mac?

Akatora · Jan 20, 2009

Ok, i am looking for 2 macros
1st macro is just a autoassist macro to assist my tank, will run to assist him at 97%

2nd macro is just a basic healer macro that will use spell slots instead of names to heal the group

I have looked over and over and over, so please dont bash me about looking around, not looking for anything complicated just 2 simple things, Thanks!

VillageIdiot · Jan 20, 2009

Akatora said:
Ok, i am looking for 2 macros
1st macro is just a autoassist macro to assist my tank, will run to assist him at 97%

2nd macro is just a basic healer macro that will use spell slots instead of names to heal the group

I have looked over and over and over, so please dont bash me about looking around, not looking for anything complicated just 2 simple things, Thanks!

http://forums.notaddicted.com/showthread.php?p=177736#post177736
basic melee assist macro.

cgoodman381 · Jan 20, 2009

Assist Macro

Akatora said:
Ok, i am looking for 2 macros
1st macro is just a autoassist macro to assist my tank, will run to assist him at 97%

2nd macro is just a basic healer macro that will use spell slots instead of names to heal the group

I have looked over and over and over, so please dont bash me about looking around, not looking for anything complicated just 2 simple things, Thanks!

cgoodman381 · Jan 20, 2009

Beat me by a couple min :p

Alatyami · Jan 21, 2009

Ok guys I'm settled into the hotel now and will get caught up with combing all the responses.

chance98 · Jan 22, 2009

VillageIdiot · Jan 22, 2009

chance98 said:
need help need to ad into this mage macro.. a spot spot so when indoors and not in combat he will sit to med if there are not mobs with a 50 foot raidius of camp..

I added in a few spots for it to sit if youweren't in combat and or sitting already.

You can try this, this is a big macro and i just combed through a bit of it. Let me know if this is what you wanted.

chance98 · Jan 23, 2009

Akatora said:
Ok, i am looking for 2 macros
1st macro is just a autoassist macro to assist my tank, will run to assist him at 97%

2nd macro is just a basic healer macro that will use spell slots instead of names to heal the group

I have looked over and over and over, so please dont bash me about looking around, not looking for anything complicated just 2 simple things, Thanks!

basic healer mac located here....

http://forums.notaddicted.com/showthread.php?t=9064

chance98 · Jan 23, 2009

VillageIdiot said:
I added in a few spots for it to sit if youweren't in combat and or sitting already.

You can try this, this is a big macro and i just combed through a bit of it. Let me know if this is what you wanted.

yes it is a big macro... just been patches on patches added to it over the years... it could really use some tlc... to trim out the phat from it and get other parts working if your up for the challange let me know... it will be the first reward im offering a 30 dollar game card for..

typenamehere · Jan 30, 2009

i have this macro killing stuff on my mage while afk, i recently tried to make it cast burnout when it wears off, for some reason i can never do Events, was wondering if someone could take a look at this and tell me why it wont cast burnout on my pet when it wears off

Rich (BB code):

#include spellcast.inc
#include ninjadvloot.inc
#Event Exp "#*#experience!!#*#"
#Event burnout "#*#Burnout#*#"

Sub Main
/declare LootTotal int outer 
/declare LootSlot  int outer
/declare Kill_Count 	int	outer 0
/varset Kill_Count 	0

  :main
	/doevents
	/if (${Spawn[gm].ID}) /q
        /if (${Me.PctHPs}<=80) /goto :heal
	/delay 1s
	/if (!${Target.ID})    /keypress f8
        /if (!${Target.ID})    /target elemental
        /if (!${Target.ID})    /target velium
        /if (!${Target.ID})    /target icepaw
        /if (${Target.Type.Equal[Corpse]}) {
						/warp target
					    /call Lootcorpse
								}
	/if (${Target.ID})  /goto :move
/goto :main



  :move
	/call cast "Perfected Invisibility" activate
	/delay 2s
	/warp target
        /warp dir 20
	/delay .5s
	/pet attack
	/goto :kill

  :kill 
	/delay 1s
	/goto :wait

  :wait
	/if (${Me.PctHPs}<35) {
			        /warp succor
                                /delay 1s
 			 	/warp succor
				/fade
				/delay 40s
				/goto :heal
					     }
	/doevents
	/if (!${Target.ID}) /goto :main
	/if (${Target.ID}) /goto :kill


:heal
        /if (${Me.PctHPs}>80) /goto :main
        /if (${Me.PctHPs}<=80) { 
				 /delay 10s
				 /goto :heal
					     }



Sub Event_Exp
/varcalc Kill_Count (${Kill_Count}+1)
/echo Kill Count - ${Kill_Count}  in  ${Int[${Math.Calc[${Macro.RunTime}/60]}]} Min, ${Int[${Math.Calc[${Macro.RunTime}-${Int[${Math.Calc[${Macro.RunTime}/60]}]}*60]}]} Sec

/return

Sub burnout
/call cast "Burnout VIII RK. II" gem2
/delay 6s
/keypress esc

/return

VillageIdiot · Jan 30, 2009

First of all your sub for the even should be called

Rich (BB code):

Sub Event_burnout
/call cast "Burnout VIII RK. II" gem2
/delay 6s
/keypress esc
/return

Second , you might think about having more of the actual fade msg in the defining part of your event rather than just the word burnout. What is the exact message you get when it fades?

chance98 · Jan 30, 2009

here are the snippets i use for keeping up with pet buffs in the mage macro i have adopted...

Rich (BB code):

   /call DeclareIniVar pethpSpell string Spells "Primal Fusion" 
   /call DeclareIniVar pethpBuff string Spells "Focus of Primal Elements" 
   /call DeclareIniVar pethpType string Spells "item" 
   /call DeclareIniVar petHaste string Spells "Burnout VII"

Rich (BB code):

      /if ( !${Me.PetBuff[${pethpSpell}]} && !${Me.PetBuff[call of the arch mage]} && ${FindItem[Focus of Primal Elements].ID} && !${FindItem[Focus of Primal Elements].Timer} && ${Me.Pet.Distance3D}<=100 ) /call Cast "${pethpBuff}" ${pethpType} 3s 
      /if ( !${Me.PetBuff[${petHaste}]} && !${Me.PetBuff[call of the arch mage]} && ${Me.Pet.Distance3D}<=100 ) /call Cast "${petHaste}" gem7 2s 
      /if ( !${Me.PetBuff[Iceflame Tenement]} ) /call Cast "Iceflame Tenement" gem3
      /if ( !${Me.PetBuff[rathe's strength effect]} ) /call Cast "rathe's strength" gem3
      /if ( !${Me.PetBuff[burnout]} && ${Me.PetBuff[call of the arch mage]} ) /call Cast "Burnout" gem7 2s

Macro/Plugin Requests (Freelancer Program)

NotAddicted.com Engineer (Retired)

Active member

NotAddicted.com Engineer (Retired)

New member

Member

New member

Member

New member

Member

New member

Member

New member

New member

Member

New member

Member

New member

New member

New member

New member

New member

New member

Member

Member

New member

Member

New member

New member

Member

New member

New member

NotAddicted.com Engineer (Retired)

New member

Member

New member

New member

New member

Member

New member

Users who are viewing this thread

Cart