How do I alter this healbot.mac?? (1 Viewer)

[hotdog]

I am trying to PL three toons at once. This healbot.mac does an amazing job with one toon at a time. However, I would like to PL three toons at once with the Druid casting heals on anyone of three PLees as well as replenishing their buffs when they fade.

How do I alter this macro so that the druid constantly cycles through the toons that he is supposed to heal and keep buffed? Can anyone configure this so that Toon_Being_PL'd can be expanded into Toon_Being_PL'd01, Toon_Being_PL'd02, and Toon_Being_PL'd03?

Much thanks in advance for anyone how can work it out.

 

[edud]

Tested this time need to change your EVENTS to make this work

|---------------------------------------------------------- 
|Healbot.mac 
|Simple Healer Macro to watch the health of a single target 
| 
|Usage: /mac Healbot <Percent> <Healspell> 
| 
|Effect: watch target health and cast specified spell at 
|specified health. This is just like Healwatch.mac but uses 
|spellcast.inc for simplicity/uniformity 
| 
|By Fantum409 (MODIFIED)
|Date: 05/01/2004 
|---------------------------------------------------------- 

#turbo 40

#include Spell_Routines.inc

#event hpbuff 	"Your Skin like Nature spell has worn off of#1#."
#event thorns 	"Your Shield of Thorns spell has worn off of#1#."
#event strength "Your Storm Strength spell has worn off of#1#."
#event regen 	"Your Chloroplast spell has worn off of#1#."
#event gate 	"You have insufficient mana to cast this spell#1#."
#event mehpbuff "#*#Your skin loses its dire resiliences#*#"
#event mask 	"#*#Your features return to normal#*#"
#event mythorns "#*#The viridiflora fall away#*#"
#event dzquit 	"#*#You have entered Nedaria's Landing#*#"

|------------------------------------------------------|
|               EXAMPLE
|------------------------------------------------------|
#event invis "Your Invisibility spell has worn off of#1#."
|------------------------------------------------------|


Sub Main
	/echo Healbot started
	/declare j int outer 0
	/declare plee[3] string outer
	/varset plee[1] "Player1"
	/varset plee[2] "Player2"
	/varset plee[3] "Player3"
	:loop
	/if (${Me.Standing} && !${Me.Mount.ID}) /sit
	/doevents
	/if (${Me.PctHPs}<20) {
		/gate
		/endm
	}
	/for j 1 to 3
		/target ${plee[${j}]}
		/delay 1s
		/if (${Target.PctHPs}<40) {
		/call cast "Invisibility" gem1 4s
		}
	/next j
	/goto :loop
/return	


|------------------------------------------------------|
|               EXAMPLE
|------------------------------------------------------|
Sub Event_invis(string, playername)
	/echo ${playername} has lost invisibility
	/target ${playername}
	/call cast "Invisibility" gem8 4s
/return
|------------------------------------------------------|


Sub Event_hpbuff(string, playername)
	/echo ${playername} needs HP buff
	/target ${playername}
	/call cast "Skin like Nature" gem2 4s
/return

Sub Event_thorns(string, playername)
	/echo ${playername} needs DS
	/target ${playername}
	/call cast "Shield of Thorns" gem3 4s
/return

Sub Event_strength(string, playername)
	/echo ${playername} needs strength
	/target ${playername}
	/call cast "Storm Strength" gem4 4s
/return

Sub Event_mehpbuff
	/target myself
	/call cast "Direwild Skin Rk. II" gem6 4s
/return

Sub Event_mask
	/target  myself
	/call cast "Mask of the Wild" gem7 4s
/return

Sub Event_mythorns
	/target  myself
	/call cast "Viridifloral Shield Rk. II" gem8 4s
/return

Sub Event_gate
	/gate
	/endmacro
/return

Sub Event_dzquit 
	/echo Your exepdition has ended.
	/delay 45s
	/sit on
	/camp desktop 
	/q
	/endmacro 
/return

 

[hotdog]

Oh man, you rock!!! I'll give it a whirl when Eq gets back up.

 

[edud]

Just had another look over code.
It will probaby cast the buffs each time it wears of one PC. Which would mean it would cast each buff 3 times x 3 players.

"/doevent flush" after it has cast the buffs may fix that problem but may cause it to miss another event.

Another option i can think of is to put a timer after each buff for 10 minutes and not to cast that buff again untill at least the timer runs out.

Or you can take your events to the next stage and get it to pick up on which player the buff wore off and cast on that player only. The #event code at the top has allready has that in place you just need something like this.

Sub Event_regen(string, playername)
	/target ${playername}
	/call cast "Chloroplast"
/return

 

[hotdog]

I gave this a whirl, but it didn't work.

 

[edud]

I modified the above macro again and tested this time.. the healing part works but you may need to change the events at the top to make this buff charactors. I put an example in for invis which i tested. I dont have a druid so i cant test your others.
You need to enter the player names and also the healing spell.

 

[hotdog]

Right on bro. I'll give this a whirl tomorrow.