clericgroup : Almost, done, needs to be tweaked

Macro requests from before the user variable changes that broke all macros

Moderator: MacroQuest Developers

BadBoy
a hill giant
a hill giant
Posts: 158
Joined: Thu Sep 05, 2002 11:53 am

clericgroup : Almost, done, needs to be tweaked

Post by BadBoy » Tue Oct 01, 2002 10:34 pm

Code: Select all

#turbo
Sub Main
:ScanSelf
:LoopStart
/press F1
/varset v11 $target(hp,pct)
:Group2
/press F2
/Call CC2
:Group3
/press F3
/Call CC3
:Group4
/press F4
/Call CC4
:Group5
/press F5
/Call CC5
:Group6
/press F6
/Call CC6


Sub CC2
/If $target(Class)==Enchanter {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Magician {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Wizard {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Cleric {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Beastlord {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Druid {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Necromancer {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else /If $target(Class)== Shaman {
/varset v2 1
/varset v22 $target(hp,pct)
/GoTo :Group3
} Else
/varset v2 0
/varset v22 $target(hp,pct)
/GoTo :Group3
/return


Sub CC3
/If $target(Class)==Enchanter {
/varset v3 1
/GoTo :Group4
} Else /If $target(Class)== Magician {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else /If $target(Class)== Wizard {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else /If $target(Class)== Cleric {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else /If $target(Class)== Beastlord {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else /If $target(Class)== Druid {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else /If $target(Class)== Necromancer {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else /If $target(Class)== Shaman {
/varset v3 1
/varset v33 $target(hp,pct)
/GoTo :Group4
} Else
/varset v3 0
/varset v33 $target(hp,pct)
/GoTo :Group4

Sub CC4
/If $target(Class)==Enchanter {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else /If $target(Class)== Magician {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else /If $target(Class)== Wizard {
/varset v4 1
/GoTo :Group5
} Else /If $target(Class)== Cleric {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else /If $target(Class)== Beastlord {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else /If $target(Class)== Druid {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else /If $target(Class)== Necromancer {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else /If $target(Class)== Shaman {
/varset v4 1
/varset v44 $target(hp,pct)
/GoTo :Group5
} Else
/varset v4 0
/varset v44 $target(hp,pct)
/GoTo :Group5

Sub CC5
/If $target(Class)==Enchanter {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Magician {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Wizard {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Cleric {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Beastlord {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Druid {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Necromancer {
/varset v5 1
/varset v55 $target(hp,pct)
/GoTo :Group6
} Else /If $target(Class)== Shaman {
/varset v5 1
/GoTo :Group6
} Else
/varset v5 0
/varset v55 $target(hp,pct)
/GoTo :Group6


Sub CC6
/If $target(Class)==Enchanter {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Magician {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Wizard {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Cleric {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Beastlord {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Druid {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Necromancer {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else /If $target(Class)== Shaman {
/varset v6 1
/varset v66 $target(hp,pct)
/Call Heal
} Else
/varset v6 0
/varset v66 $target(hp,pct)
/Call Heal

Sub Heal

/If n $v11<=80 And
/If n $v22<=80 And
/If n $v33<=80 And
/If n $v44<=80 And
/If n $v55<=80 And
/If n $v66<=80 {
/Call :GroupHeal
}
/If n $v11<=60 {
/Call FastHeal
} Else /If n $v11 =<80 {
/Call CompleteHeal
} /If n $v22<=60 And
/If $v2=1 {
/Call FastHeal
} Else /If $v2=0 {
/Call CompleteHeal
} /If n $v33<=60 And
/If $v3=1 {
/Call FastHeal
} Else /If $v3=0 {
/Call CompleteHeal
} /If n $v44<=60 And
/If $v4=1 {
/Call FastHeal
} Else /If $v4=0 {
/Call CompleteHeal
} /If n $v55<=60 And
/If $v5=1 {
/Call FastHeal
} Else /If $v5=0 {
/Call CompleteHeal
} /If n $v66<=60 And
/If $v6=1 {
/Call FastHeal
} Else /If $v6=0 {
/Call CompleteHeal
}

Sub FastHeal
/sit off
/cast 2
/delay 50
/sit On
/GoTo :LoopStart


Sub CompleteHeal
/sit off
/cast 4
/delay 120
/sit On
/GoTo :LoopStart


Sub GroupHeal
/sit off
/cast 3
/delay 60
/sit On
/GoTo :LoopStart
Last edited by BadBoy on Tue Oct 01, 2002 10:58 pm, edited 2 times in total.

User avatar
rizwank
Huggle Police
Huggle Police
Posts: 524
Joined: Tue Jul 23, 2002 12:07 am
Contact:

Post by rizwank » Tue Oct 01, 2002 10:54 pm

shamans can have some pretty buff hp there.
#macroquest op
Macroquest Official Documentarion
Macroquest Board Moderator
All around cool guy

[img]http://medicomuerte.users.btopenworld.com/images/fairy_bounce08.gif[/img]

BadBoy
a hill giant
a hill giant
Posts: 158
Joined: Thu Sep 05, 2002 11:53 am

So do Clerics

Post by BadBoy » Tue Oct 01, 2002 10:57 pm

So do clerics, but what if they aren't buffed right? This is just making sure.

Gengis
a ghoul
a ghoul
Posts: 116
Joined: Wed Aug 14, 2002 7:46 pm

Post by Gengis » Tue Oct 01, 2002 11:25 pm

My eyes hurt

Genoius
a lesser mummy
a lesser mummy
Posts: 49
Joined: Sat Jul 13, 2002 8:20 am

Post by Genoius » Wed Oct 02, 2002 3:21 am

as a cleric, i group heal when 2 or more people are less than a certain amount hurt, not if all 6 people are less than 80%. also, when it returns a characters class, does it return "Cleric" for a level 51+ cleric? I am assuming it does, so that might work, but if it does not, you will have to add each one too.

anywho, this one looks pretty messy, but it might work!
also, as a cleric, you run OOM rather fast when buffing, so taking the time to wait 15mins after buffing one person might help also. buff each person, but take a 15 min break in between each person(or better yet, buff them when you are 80+% mana, and step to the next person then when you are 80+% again). lastly, what i have noticed is buffs get wiped away by certain mobs, so if someone were to say "lost sym" or "sym please", it would be great for the macro to symbol them, but if they said "wow, how much HP does that symbol add?", it wouldnt buff them(waste of a dot, and theyd think youre an idiot!). Just a few things i am thinking about when i am attempting to make mine!

---Genoius---