Moderator: MacroQuest Developers
Code: Select all
|----------------------------------------------------------------------------|
| GoMage - Mage Combat and Buff
| Zanomo Jun 26, 2004
| Usage: /mac GoMage [MainAssist]
| magic word is "Get Ready and Kill it"
|
#turbo 40
#chat group
sub main
/declare c int outer | counter variable
/declare MinHP int outer 15 | hp percentage at which to stop nuking
/declare NukeMana int outer 2000 | Actual mana at which to stop nuking
/declare BuffTime int outer 20 | Buff duration under which to recast them
/declare MA string outer | Main Assist
/declare IniFile String outer
/declare Incword String outer
/declare engagedistance int outer 100
/varset IniFile "GoIni.ini"
/varset Incword "Get Ready and Kill it"
| INI setup variables
/if (${Defined[Param0]}) {
/ini "${IniFile}" Settings MA ${Param0}
/varset MA ${Param0}
} else {
/varset MA ${Ini[${IniFile},Settings,MA,NOTFOUND]}
/if (${MA.Equal["NOTFOUND"]}) {
/echo You need to start the macro with /mac GoMage [Main Assist] and generate your .INI file.
/endmacro
} else {
/echo Assisting ${MA}
}
}
/echo GoMage started
:mainloop
/doevents chat
|/call Buffemup
/goto :mainloop
/endmacro
Sub Buffemup
/if (!${Me.Casting.ID} && !${Target.Type.Equal[NPC]}) {
/if (!${Me.Buff["Shield of Maelin"].ID} && !${Me.Casting.ID}) /call Cast "Shield of Maelin"
/if (${Me.AltAbilityReady[Elemental Form: Water]}) /call Cast "Elemental Form: Water" activate
/if (${Me.Pet.ID}) {
/if (!${Me.Buff["Elemental Draw Recourse"].ID} && !${Me.Casting.ID}) {
/call Cast "Elemental Draw"
/sit
}
/if (!${Me.PetBuff["Burnout V"]} && !${Me.Casting.ID}) {
/call Cast "Burnout V"
/sit
}
/if (!${Me.PetBuff["Kindle"]} && !${Me.Casting.ID}) {
/call Cast "Kindle"
/sit
}
/if (!${Me.PetBuff["Flameshield of Ro"]} && !${Me.Casting.ID}) {
/target ${Me.Pet.Name}
/delay 6
/call Cast "Flameshield of Ro"
/sit
}
}
}
/return
Sub Event_Chat(ChatType,Sender,ChatText)
/if (${ChatText.Equal[${Incword]} && ${Sender.Equal[${MA}]}) {
/call Assist_call
| /call Nuke
}
/return
|Sub Assist_call
/echo Incoming.
/assist ${MA}
/delay 1s
/delay 10s (${Target.Distance}<=${engagedistance})
/if (${Target.Type.Equal[NPC]} && ${Target.Distance}<=${engagedistance}) {
/stand
/pet kill
}
/return
Sub Nuke
/echo Nuking ${Target.Name} at ${Target.PctHPs}%
/delay 5s ${Me.SpellReady["Firebolt of Tallon"]}
:nuke
/delay 5s
/if (${Me.SpellReady["Firebolt of Tallon"]} && ${Target.PctHPs}>=${MinHP} && ${Me.CurrentMana}>=${NukeMana} ) /call cast "Firebolt of Tallon"
/delay 7s
/if (${Target.PctHPs} >= ${MinHP}) /goto :nuke
/sit
/return

Code: Select all
/if (${ChatText.Equal[${Incword]} && ${Sender.Equal[${MA}]}) {
Code: Select all
/if (${ChatText.Equal[${Incword}]} && ${Sender.Equal[${MA}]}) {
Code: Select all
|Necro On Command Macro. Made by people with too much time on thier hands, for people with too much time on thier hands.
|Created by Hiidan.
|Use at your own risk. Anyone giving these commands in tells or group will trigger these events.
#Event Snare "#*#tells the group, 'Snare'"
#Event Sickpet "#*#tells the group, 'Sickpet'"
#Event Makepet "#*#tells the group, 'Makepet'"
#Event Dotty "#*#tells the group, 'Dotty'"
#Event FD "#*#tells the group, 'FD'"
#Event Crip "#*#tells the group, 'Crip'"
#Event Manacheck "#*#tells the group, 'Mana Check'"
#Event Mindwrack "#*#tells the group, 'Mind Wrack'"
#Event Selfbuff "#*#tells the group, 'Self Buff'"
#Event Follow "#*#tells the group, 'follow'"
#Event EndFollow "#*#tells the group, 'endfollow'"
#Event Enrage "#*#has become ENRAGED#*#"
#Event Enrage "#*#is infuriated!#*#"
#Event Norage "#*#is no longer enraged#*#"
Sub Main
/declare tank string outer whateverthetanksnameis
/echo Necro On Command has started!
:loop
/doevents
/goto :loop
/return
Sub Event_snare
/assist Ezell
|or exchange cascading darkness with whatever snare you want
/cast 1
/return
Sub Event_Sickpet
/assist Ezell
/pet attack
/return
Sub Event_Makepet
/cast 6
|Can change Servant of Bones to whatever pet you use, edit out the next line if you dont have ornate pants
/call cast "Vorshar's Pants of the Blight" item
/return
Sub Event_Dotty
/assist Ezell
/cast 3
/cast 2
/return
Sub Event_FD
/cast 5
/return
Sub Event_Crip
/assist Ezell
/cast 6
/return
Sub Event_ManaCheck
/g Necro mana is currently ${Me.PctMana}%
/return
Sub Event_Mindwrack
/assist Ezell
/cast 7
/return
Sub Event_Selfbuff
/target self
/cast 8
/return
Sub Event_follow
/target Ezell
/follow
/return
Sub Event_endfollow
/keypress back
/return
Sub Event_Enrage
/pet follow
/pet back off
/return
Sub Event_Norage
/assist Ezell
/pet attack
/return and you have time for EQ? You can save $15 a month right there!colt45 wrote:I would donate if I could, Currently I am going to college, raising a 15 month old and just got engaged, money is tighter than it's ever been before, and so is time. I may be able to scrounge up some cash, but it may take a while.
