druid power leveling macro for everquest 1

[Mconley]

once this post is accepted id like access to the everquest 1 forums

here are that instructions to use my macro



---------------------instructions for druidpowerlevel.mac------------------------------


ok it took me forever to get this darn thing to work rite but i belive
i finaly got it all figured out if this is working rite it will allow
you or a friend of your choice to control a druid out of group for
power leveling yourself or your whole group depending on what you
wanna do

ok here we go

first your gonna have to setup the macro for your druid and the character
who is gonna be using him
you will need to change lines 7 and 8 in the macro lets say your druid's
name is bob and the character who is gonna be using him is named john
then lines 7 and 8 should look like this

/declare Lobie string outer "john"
/declare Me string outer "bob"

then you will need to change all the parts of lines 57 through 62
that say Elixir of Clarity VII to the name of what ever clarity
potions you use at your druids level and equip them in your
potion belt in slot 1 (will not use any of the potions up if you have
breeze or clarity or kei my druid is only lvl 51 so didnt add anything
higher thatn KEI but feel free to copy line 54 and paste it after line 56
and just change the name breeze to any of the actual names for C4 through C6


next your gonna wanna make 3 dif spell sets for the first 2 they are
gonna be simular first one you name (single) and second one you name
(group) they will have the same spells cept the group one will have
group versions of the first set when they are available
here is what type of spells you should have in the first 2 sets and
what spell gems to put them in

gem 1 should be your snare spell
gem 2 should be your druids biggest AOE nuke just incase you pull to many mobs
gem 3 should be your sow spell (shrew if your gonna be indoors fighting)
gem 4 should be your skin buff
gem 5 should be your strength buff
gem 6 should be your damage shield
gem 7 should be your regen spell
gem 8 should be your heal spell

and the third set of spells will jsut be a bunch of diferent port spells
to diferent places you or your friend may wanna go id recomend POK for one
of them and at least one on every other continent seeing how the druid will
follow you across zone lines just cant click on books and stuff like that
that way if someone els is using your druid who cant get to your comp
to click on a book he/she can still go were he wants to just has to take the long way
there porting to the rite continent and running the rest of the way

ok now that you got your macro and spell sets setup you will have to make sure
that you have tell windows off and that all your tells are going into the
main chat window not any other one or this macro wont work rite took me hours
to figure that out

ok the druid will stay sitting in one spot and keep the person who is commanding
him healed and him/herself and he will keep the person who is controling him/her
informed about how much mana he has

ok now here is a list of the commands you have to send to the druid to get
him/her to cast the spells and do other things for you

COMMAND ACTION
.......................................................................................................

SNARE...........................snares your target

NUKE............................casts nuke on your target

SOW.............................casts sow on you (or your group if group spell)

SKIN............................casts skin on you (or your group if group spell)

STR.............................casts a strength buff on your target

DS..............................casts damage shield on you (or your group if group spell)

REGEN...........................casts regen on you (or your group if group spell)

HEAL............................casts a heal on your target (he will heal you automaticly
this is incase you have to play healer for a group when you
have no cleric or he/she is oom or afk

FOLLOW..........................this one works best for solo power leveling it puts the druid on
autofollow at a very close range so long as you dont get real
close to edges you can use on cliffs and other areas you normaly
wouldnt use autofollow in

STAY............................undoes the follow command making druid sit and heal from one spot
instead of following you around

GROUP BUFFS.....................loads up the group spell set
(druid will not heal or anything for 30 seconds wile meming spells)

SINGLE BUFFS....................loads up the single spell set
(druid will not heal or anything for 30 seconds wile meming spells)

PORTS...........................loads up the ports spell set
(druid will not heal or anything for 30 seconds wile meming spells)

JOIN GROUP......................will accept a group invite incase you need a port or something
if druid has not gotten an invite to a group this command will
invite your target to the druids group

DISBAND.........................will disbands druid from what ever group he/she is in
if druid is leader this command will disband your target
from the group

CAMP............................will cause the druid to camp to desktop and end the macro

TGB ON..........................is incase you forgot to turn target other group buff on on the druid
this command will do it for you so you dont have to go to the other
computer to do it or whatever




for the ports you will have to figure out what commands from the list above to give the druid
to get him to cast the port you want him to cast






ok now here is the macro

#Event Fizzle  "Your spell fizzles!" 
#Event OOM     "Insufficient Mana to cast this spell!" 
#chat tell
#chat group
Sub Main 

/declare Lobie string outer "Lobie"
/declare Me string outer "ME"
|-------------------------${Lobie}--------------------
|-------------------------${Me}--------------------

:Loop 
     /target ${Lobie}
     /Doevents 
     /if (${Me.State.Equal[STAND]}) /sit
     /target ${Lobie}
     /goto :CheckBuff 

:Loop1
     /target ${Lobie}
     /if (${Target.CurrentHPs} < 50 ) /goto :Heal 
     /if (${Target.CurrentHPs} > 50 ) /goto :Loop2

:Loop2
     /if (${Me.PctHPs} < 70 ) /goto :Healme
     /goto :Loop
}

:Healme
      /target ${Me}
      /delay 2
      /cast 8 
      /delay 1s 
      /cast 8
      /delay 4s 
      /if (${Me.PctHPs} < 90) /goto :Healme
      /return
}

:Heal 
      /target ${Lobie}
      /cast 8 
      /delay 1s 
      /cast 8
      /delay 4s 
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
      /delay 1s 
      /if (${Target.CurrentHPs} < 70) /goto :Heal 
      /sit 
      /goto :Loop 
}

:CheckBuff 
      /if (${Me.Buff["Breeze"].Duration.Ticks} > 10 ) /goto :Loop1
      /if (${Me.Buff["Clarity"].Duration.Ticks} > 10 ) /goto :Loop1
      /if (${Me.Buff["Koadic's Endless Intellect"].Duration.Ticks} > 10 ) /goto :Loop1
      /if (${Me.Buff["Elixir of Clarity VII"].Duration.Ticks} < 10 ) /echo Clarity Buff not present. Casting Now. 
      /if (${Me.Buff["Elixir of Clarity VII"].Duration.Ticks} < 10 ){
      /potionbelt Activate 1
      /delay 4s 
      }
      /if (${Me.Buff["Elixir of Clarity VII"].Duration.Ticks} > 300) /sit 
      /goto :Loop1
}


:Healhim 
      /target ${Lobie}
      /keypress forward
      /delay 5
      /cast 8 
      /delay 1s 
      /cast 8
      /delay 1s 
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
      /delay 3s 
      /if (${Target.CurrentHPs} < 70) /goto :Healhim 
      /goto :Follow
}

:Mana 
      /delay 1m 
      /if (${Me.PctMana} > 40) /tell ${Target.Name} You may proceed, I'm at 40m so be careful. 
      /if (${Me.PctMana} < 40) /tell ${Target.Name} Still low on mana. 
      /if (${Me.PctMana} < 40) /goto :Mana 
      /return 
}




Sub Event_Fizzle 
      /echo shit i fizzeled need more practice
      /return 

Sub Event_OOM 
      /tell ${Lobie} I'm out of mana!!!, please hold 
      /sit 
      /tell ${Lobie} ${Me.PctMana} % Mana Remaining 
      /return

Sub Event_Chat(ChatType, Sender, ChatText)

  /if (${ChatText.Equal[DS]}) {
      /cast 6
      /delay 1s 
      /cast 6
      /delay 1s 
      /cast 6
      /delay 5s  
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[REGEN]}) {
      /cast 7 
      /delay 1 
      /cast 7
      /delay 1 
      /cast 7 
      /delay 10s 
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[SKIN]}) {
      /cast 4 
      /delay 1 
      /cast 4 
      /delay 1 
      /cast 4 
      /delay 10s 
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[STR]}) {
      /assist
      /delay 1s
      /cast 5
      /delay 1
      /cast 5
      /delay 1
      /cast 5
      /delay 6s
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[SOW]}) {
      /cast 3
      /delay 1
      /cast 3
      /delay 1
      /cast 3
      /delay 8s
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[NUKE]}) {
      /assist
      /delay 1s
      /cast 2
      /delay 1
      /cast 2
      /delay 1
      /cast 2
      /delay 8s
      /target ${Lobie}
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[SNARE]}) {
      /assist
      /delay 1s
      /cast 1
      /delay 1
      /cast 1
      /delay 1
      /cast 1
      /delay 3s
      /target ${Lobie}
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[HEAL]}) {
      /assist
      /delay 1s
      /cast 8
      /delay 1
      /cast 8
      /delay 1
      /cast 8
      /delay 5s
      /target ${Lobie}
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
}

  /if (${ChatText.Equal[FOLLOW]}) {
      /stand
      /goto :stayclose
}

  /if (${ChatText.Equal[STAY]}) {
      /sit
}

  /if (${ChatText.Equal[CAMP]}) {
      /sit
      /delay 2s
      /camp desktop
      /delay 5s
      /endmac
}

  /if (${ChatText.Equal[GROUP BUFFS]}) {
/memspellset group
/delay 30s
}

  /if (${ChatText.Equal[SINGLE BUFFS]}) {
/memspellset single
/delay 30s
}

  /if (${ChatText.Equal[PORTS]}) {
/memspellset ports
/delay 30s
}

  /if (${ChatText.Equal[JOIN GROUP]}) {
/assist
/delay 1s
/keypress ctrl+i
}

  /if (${ChatText.Equal[DISBAND]}) {
/assist
/delay 2s
/keypress ctrl+d
}

  /if (${ChatText.Equal[TGB ON]}) {
/tgb on
}

/return

:stayclose
      /target ${Lobie}
      /if (${Target.CurrentHPs} < 50 ) /goto :Healem 
      /if (${Target.CurrentHPs} == NULL) /goto :Stayclose1}
:Stayclose1
      /doevents
      /if (${Me.Sitting}) /return
      /if (${Target.Distance}> 10 ) /keypress forward hold
      /if (${Target.Distance}< 10 ) /keypress forward 
      /face fast
      /delay 2
      /if (${Me.PctHPs} < 70 ) /goto :Healmeagain
      /if (${Target.ID}) /goto :stayclose
}

:Healem 
      /target ${Lobie}
      /cast 8 
      /delay 1s 
      /cast 8
      /delay 1s 
      /tell ${Target.Name} ${Me.PctMana} % Mana Remaining 
      /delay 3s 
      /if (${Target.CurrentHPs} < 70) /goto :Healem 
      /goto :stayclose
}

:Healmeagain
      /keypress forward
      /delay 2s
      /target ${Me}
      /delay 2
      /cast 8 
      /delay 1s 
      /cast 8
      /delay 5s 
      /docommand ${If[${Me.PctHPs} < 90) /goto :Healmeagain
      /goto :stayclose]
}

ok now i will admit i did not come up with all of this on my own i took a line ot two from alot of diferent macro's once i figured out what i wanted my macro to do i found a macro that would do that part and copied what i needed and changed it to make it work for my macro

 

[someoneorsomething]

Please use CODE tags. [CODE ] [/CODE]

 

[Mconley]

sorry new at this posting thing its my first time did the

thing now hope it helps

 

[someoneorsomething]

It looks solid but i cant test it. If it works i say

YES

 

[Mconley]

i can promise you that last time i used this macro everything on it worked except for a couple things i just added before posting like the TGB command and the JOIN and DISBAND commands didnt have MQ2 running to test them but seem'd simple enough i didnt see why they wouldnt work

 

[tecktight]

Seems pretty nice,


but then again its a relief to see a submission by someone other than Roboz

 

[1997S10ss]

Seems pretty nice,


but then again its a relief to see a submission by someone other than Roboz

/Agreed

Havn't tested it yet, but seems like alot of work has been put into this. I vote YES, if mine counts

 

[tecktight]

Looks like it has a lot of effort and info put into it.
But I dont play EQ much so its up to the admin


Good luck

 

[Pugs]

Looks Good havent had a chance to test it but the code looks like it is soild although i would of used spellcast.inc instead of just spaming the key. And there is a good amount of work there. i vote YES

 

[Cade]

I can't make a decision until someone actually tests it.

Han'jin + dragondoom, this is your first warning.

 

[darkeros]

The code will work fine. It's a simple macro, but once he gets in, we can help him add spellcast inc and clean it up, if you let him in.

 

[majin1970]

This will be a good macro when it is edited for spellroutines.inc. This macro would also work well with MQ2EQBC if configured a bit differently.

Yes

 

[spelat]

used it some today found no real problems lets get him on the inside and tweak it out some. has all the makeings of one of the best pling mac's ive seen posted

 

[solar]

This is a new way of doing something that's already posted about inside. The macro is different but the method is the same. newb and highlevel druid combo is the best for powerleveling quickly.

I say Yes since it's a new way and a different macro.

 

[Mconley]

i have tried some of the ones yall got inside thats why i started making this one the others were way to complicated for me to figure out how to set them up to use i wanted something simple to setup and use were i didnt have to change much if i wasnt the same lvl as the person the macro was written for and im still new at this macro writeing stuff this is my first kinda complex macro i dont have a clue on how to make a macro use other files and stuff but if someone is willing to show me how all that is done and explain it in detail how the lines work so i understand im willing to learn but if your not willing to explain how stuff works to me dont bother trying to get me to change anything :-)

 

[tecktight]

Gosh darn it!

Hes not Roboz, thats reason enough to let him in

 

[SandLOL]

Gosh darn it!

Hes not Roboz, thats reason enough to let him in

WINNER.

 

[Creed]

Welcome to Redguides Mconley!

 

[rawwar]

Does anyone have this working lately .... followed all the directions and get an error off second string command {ME} but macro will run to the extent it only does heals nothing else no snare or buffs ... think its just me but not sure?

 

[Mconley]

im betting your problem is either you are using tell windows or your tells are not going to the main chat window they have to go to the main chat window for this to work

 

[rawwar]

Opened a new chat wondow and sending all tells there ... will work on it more though.

Thanks

 

[Maxixero]

Keep getting the error:

/declare 'Me' failed. Name already in use.
druidpl.mac@8 (main): /declare Me string outer "druid"

Failed to parse /if command. Could not find command to execute.
druidpl.mac@58 (Main): /if($(Me.Buff["Elixir of Clarity X"].duration}< 10 ){
The current macro has ended.
Usage: /if(<conditions <command>


Any help?

 

[Mconley]

change the "druid" to the name of your druid and that part should work fine
and im not sure about the /if command problem im still new at this macro writeing thing i never had a problem with it i know deleteing the line should fix it but then wont keep the clarity potion buff on your druid you will have to ask someone who is more experianced at that kind of thing sorry