Tri-Logger #1 (Cog/Gryn/Sab) [12+]

xantan · Post by **xantan** » Fri Jun 29, 2007 10:20 am

Hi. I've come back to everquest and just now made my first few macros for my three characters.
I had a warrior/cleric/enchanter.
First macro is the chanter (he pulls)
Second macro is the cleric (he heals/assists)
Third macro is the warrior (he assists)

Spell_routines.inc is required for two macros.
Move utils and possibly other plugins are required for all macros I believe.

The only real problem is the hitting of escape a lot... well, this is just the noob macro, so, I'll probably not have so many problems when I get to a decent level and care about my macros some more.

Macro#1 (enchanter)

Code: Select all

|Xantan's Trilogger#1 - do with it what you want.
|This is the enchanter macro

#turbo

#include Spell_Routines.inc

Sub Main
/declare Nuke string outer
/declare SpellToCast string outer
/varset Nuke "Chaotic Feedback"

:MainLoop
/call oom
/call buff
/call cog
/call gryn
/call saben
/goto :MainLoop 

Sub oom
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 10
   /tar pc enchanter
   /delay 10
   :oom2
   /call buff
   /delay 1
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 10
   /if (${Me.PctMana} > 95 && ${Me.PctHPs} > 95) /return
   /delay 20
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /goto :oom2 

Sub buff
   /varset SpellToCast Breeze
   /if (${Me.Book[${SpellToCast}]}&&${Me.Buff[${SpellToCast}].Duration}<60 && ${Spell[${SpellToCast}].Stacks}) /call buff2
   /varset SpellToCast Lesser Shielding
   /if (${Me.Book[${SpellToCast}]}&&${Me.Buff[${SpellToCast}].Duration}<60 && ${Spell[${SpellToCast}].Stacks}) /call buff3
/return 

Sub buff2
/varset SpellToCast Breeze
/tar pc enchanter
/call cast "${SpellToCast}" gem5 13s
/call cast "Mist" gem2 15s
/tar pc cleric
/call cast "${SpellToCast}" gem5 13s
/varset SpellToCast Quickness
/tar pc warrior
/call cast "${SpellToCast}" gem6 13s
/call cast "Mist" gem2 15s
/call cast "Strengthen" gem3 10s
/keypress esc
/delay 2
/tar pet radius 50
   /if (${Target.ID}==FALSE) /call pet
/tar pet radius 50
/call cast "strengthen" gem3 10s
/call cast "quickness" gem6 10s
/return

Sub buff3
/varset SpellToCast Lesser Shielding
/call cast "${SpellToCast}" gem8 18s
/return

Sub fighting
   :FightingLoop
   /if (${Target.ID}) {
      /call cast ${Nuke}
      /goto :FightingLoop
      }
/return 

Sub cog
   /keypress ESC
   /if (${Me.PctMana} < 80) /call oom
   /target npc cognoggin radius 200
   /if (${Target.ID}==FALSE) /return
   /face
   /call cast ${Nuke}
   /delay 25
   /call fighting
   /sit down
   /delay 5
   /if (${Me.PctMana} < 80) /call oom
   /if (${Me.PctHPs} < 90) /call oom
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 45
   /return

Sub gryn
   /keypress ESC
   /if (${Me.PctMana} < 80) /call oom
   /target npc grynnaf Einoom radius 200
   /if (${Target.ID}==FALSE) /return
   /face
   /call cast ${Nuke}
   /delay 25
   /call fighting
   /sit down
   /delay 5
   /if (${Me.PctMana} < 80) /call oom
   /if (${Me.PctHPs} < 90) /call oom
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 75
   /return

Sub saben
   /keypress ESC
   /if (${Me.PctMana} < 80) /call oom
   /target npc Saben Tucross radius 200
   /if (${Target.ID}==FALSE) /return
   /face
   /call cast ${Nuke}
   /delay 25
   /call fighting
   /sit down
   /delay 5
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 20
   /call move 
   /return


Sub pet
/call cast "Kilan's Animation" gem7 30s
/delay 2
/return

Sub move
/stand up
/moveto loc 1173 -1728
/delay 45
/moveto off
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
/delay 2
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
/return

Macro#2 (Cleric)

Code: Select all

|Xantan's Trilogger#1 - do with it what you want.
|This is the Cleric macro

#turbo

#include Spell_Routines.inc

Sub Main
/declare Nuke string outer
/declare SpellToCast string outer
/varset Nuke "Furor"

:MainLoop
/call oom
/call buff
/call wait
/goto :MainLoop 

Sub oom
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 5
   :oomy
   /call buff
   /delay 2
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 2
   /if (${Me.PctMana} > 30) /goto :oomy2
   /delay 2
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /goto :oomy
:oomy2
   /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /delay 3
   /tar pc warrior
   /if ( ${Target.PctHPs}<=77 ) /call Heal
   /delay 3
   /tar pc enchanter
   /if ( ${Target.PctHPs}<=77 ) /call Heal
   /delay 3
   /tar pc cleric
   /if ( ${Target.PctHPs}<=77 ) /call Heal
  /if (${Me.Standing} && !${Me.Mount.ID}) /sit
/delay 3
   /if (${Me.PctMana} < 35) /call oom
/return


Sub buff
   /varset SpellToCast Center
   /if (${Me.Book[${SpellToCast}]}&&${Me.Buff[${SpellToCast}].Duration}<60 && ${Spell[${SpellToCast}].Stacks}) /call buff2
/return 

Sub buff2
/varset SpellToCast Center
/tar pc cleric
/call cast "${SpellToCast}" gem5 15s
/tar pc enchanter
/call cast "${SpellToCast}" gem5 15s
/tar pc warrior
/call cast "${SpellToCast}" gem6 15s
/return

Sub fighting
   :FightingLoop
   /if (${Target.ID}) {
      /call cast ${Nuke}
      /goto :FightingLoop
      }
/return 

Sub fighting2
   /if (${Target.ID}) {
:FightingLoop2
/tar npc saben tucross
/delay 1
   /if (${Target.ID}) {
/tar pc enchanter
/delay 2
/if ( ${Target.PctHPs}<=66 ) /call Heal
/delay 2
   /if (${Me.PctMana} < 18) /call fighting3
/delay 3
/keypress esc
/delay 2
/goto :FightingLoop2
      }
}
/return 

Sub fighting3
/tar npc saben tucross
   /if (${Target.ID}) {
/attack on
/stick on
:FightingLoop3
   /if (${Target.ID}) {
/delay 2
/goto :FightingLoop3
}
}
/call goto
/return

Sub goto
/tar pc enchanter
/stick on 10
:stickloop
/if (${Target.Distance}<40) /return
/delay 2
/goto :stickloop
/return


Sub wait
/keypress esc
:waity
  /if (${Me.Standing} && !${Me.Mount.ID}) /sit
   /if (${Me.PctMana} < 30) /call oom
/target npc fae radius 40
/if (${Target.ID}) /call fighting
/delay 5
/target npc skeleton radius 40
/if (${Target.ID}) /call fighting
/delay 2
   /target npc cognoggin radius 200
/delay 2
   /if ( ${Target.PctHPs}<=99 ) /call fighting
/delay 2
   /target npc grynnaf Einoom radius 200
/delay 2
   /if ( ${Target.PctHPs}<=99 ) /call fighting
/delay 2
   /target npc Saben Tucross radius 200
/delay 2
   /if ( ${Target.PctHPs}<=99 ) /call fighting2
/delay 2
   /if (${Me.PctMana} < 40) /call oom
/return

Sub Heal
   /varset SpellToCast Healing
/call cast "${SpellToCast}" gem2 12s
  /if (${Me.Standing} && !${Me.Mount.ID}) /sit
/return

Macro#3 (Warrior)

Code: Select all

|Xantan's Trilogger#1 - do with it what you want.
|This is the Warrior macro

#turbo

Sub Main
/declare Nuke string outer
/declare SpellToCast string outer
/varset Nuke "Furor"

:MainLoop
/call camp
/call wait
/goto :MainLoop 

Sub camp
/delay 3
   /tar pc enchanter
   /if (${Target.Distance}>49) { 
/stick on 17
/delay 45
/stick off
/return
      }
/if (${Me.Standing} && !${Me.Mount.ID}) /sit
/delay 4
/return

Sub wait
/keypress esc
:waity
  /if (${Me.Standing} && !${Me.Mount.ID}) /sit
/target npc fae radius 40
/if (${Target.ID}) /call fighting
/delay 4
/target npc skeleton radius 40
/if (${Target.ID}) /call fighting
/delay 2
   /target npc cognoggin radius 200
/delay 2
   /if ( ${Target.PctHPs}<=99 ) /call fighting
/delay 3
   /target npc grynnaf Einoom radius 200
/delay 2
   /if ( ${Target.PctHPs}<=99 ) /call fighting
/delay 2
   /target npc Saben Tucross radius 200
/delay 2
   /if ( ${Target.PctHPs}<=99 ) /call fighting
/delay 3
/return

Sub fighting
   /if (${Target.ID}) {
      /stand
      /attack on
      /stick on 10
      /goto :FightingLoop
:FightingLoop
   /if (${Target.ID}) {
/delay 2
/goto :FightingLoop
      }
}
/return

You can expect more from me, most likely to do with these three characters, thus Tri-Logger.
hopefully my skill will improve, and my patience too, and we'll see some nice macros.

enjoy.

ubatch · Post by **ubatch** » Fri Jul 13, 2007 8:09 pm

What zone/camp is this for? Sorry not family with Cog/Gryn/Sab? Haha.. Thanks. Nice macros, I might use them if I can get my computer to 3 box =P

xantan · Post by **xantan** » Fri Jul 13, 2007 11:10 pm

Lesser faydark, right near the steamfont zoneline theres a gnome camp - this is it.

discip1e · Post by **discip1e** » Wed Jul 18, 2007 5:06 pm

heya foad, wanted to let ya know that I'm gonna start a new account tomorrow to test these out. been wanting to start a chanter anyways.

jacensolo · Post by **jacensolo** » Wed Jul 18, 2007 5:27 pm

Um... who's foad? If your'e referring to xantan's avatar, I'm pretty sure thats not a nickname. It generally means "fuck off and die".