HUD ::: Pet Buffs

[krag0th]

Here's something that I cooked up for my Beastlord, which is based on Cr4zyb4rd's HUD.


Features:
- The buffs gradiate darker as you go down (for visual oooos). (I can post one that does not gradiate the colors, if you want)
- Beneficial Spells are green
- Detrimental Spells are red

If there are changes that make this shorter, let me know. I'm not that good at HUD/MQ2 Coding.

Code: Select all

;<x> pet
; ChangeLog --
; v1.3 - Fixed PetState
; v1.2 - Fixed String->String Conversion for Comparison
; v1.1 - Fixed Double checking of NULL PetBuff[n]
;
PetInfo=1,1090,720,255,234,8,Pet Information:
PetState=1,1205,720,0,255,255,${If[${Me.Pet.ID},${Me.Pet.State.Left[1]}${Me.Pet.State.Right[${Math.Calc[${Me.Pet.State.Length}-1]}].Lower}ing,]}
PetHpGuage=1,1090,732,255,000,000,${If[${Me.Pet.ID},${String[====================].Left[${Int[${Math.Calc[${Int[${Me.Pet.PctHPs}]}*.2]}]}]},]}
PetHpGuage2=1,1090,732,255,255,255,${If[${Me.Pet.ID},====================,]}
PetHpPct=1,1215,732,255,255,255,${If[${Me.Pet.ID},${Me.Pet.PctHPs}%,]}

; Type of Buffs...
PetBuff1B=1,1090,744,0,255,0,${If[${Me.PetBuff[1].Name.NotEqual[NULL]},${If[${Me.PetBuff[1].SpellType.NotEqual[Detrimental]}, 1 - ${Me.PetBuff[1]},]},]}
PetBuff1D=1,1090,744,255,0,0,${If[${Me.PetBuff[1].Name.NotEqual[NULL]},${If[${Me.PetBuff[1].SpellType.Equal[Detrimental]}, 1 - ${Me.PetBuff[1]},]},]}

PetBuff2B=1,1090,756,0,238,0,${If[${Me.PetBuff[2].Name.NotEqual[NULL]},${If[${Me.PetBuff[2].SpellType.NotEqual[Detrimental]}, 2 - ${Me.PetBuff[2]},]},]}
PetBuff2D=1,1090,756,238,0,0,${If[${Me.PetBuff[2].Name.NotEqual[NULL]},${If[${Me.PetBuff[2].SpellType.Equal[Detrimental]}, 2 - ${Me.PetBuff[2]},]},]}

PetBuff3B=1,1090,768,0,221,0,${If[${Me.PetBuff[3].Name.NotEqual[NULL]},${If[${Me.PetBuff[3].SpellType.NotEqual[Detrimental]}, 3 - ${Me.PetBuff[3]},]},]}
PetBuff3D=1,1090,768,221,0,0,${If[${Me.PetBuff[3].Name.NotEqual[NULL]},${If[${Me.PetBuff[3].SpellType.Equal[Detrimental]}, 3 - ${Me.PetBuff[3]},]},]}

PetBuff4B=1,1090,780,0,204,0,${If[${Me.PetBuff[4].Name.NotEqual[NULL]},${If[${Me.PetBuff[4].SpellType.NotEqual[Detrimental]}, 4 - ${Me.PetBuff[4]},]},]}
PetBuff4D=1,1090,780,204,0,0,${If[${Me.PetBuff[4].Name.NotEqual[NULL]},${If[${Me.PetBuff[4].SpellType.Equal[Detrimental]}, 4 - ${Me.PetBuff[4]},]},]}

PetBuff5B=1,1090,792,0,187,0,${If[${Me.PetBuff[5].Name.NotEqual[NULL]},${If[${Me.PetBuff[5].SpellType.NotEqual[Detrimental]}, 5 - ${Me.PetBuff[5]},]},]}
PetBuff5D=1,1090,792,187,0,0,${If[${Me.PetBuff[5].Name.NotEqual[NULL]},${If[${Me.PetBuff[5].SpellType.Equal[Detrimental]}, 5 - ${Me.PetBuff[5]},]},]}

PetBuff6B=1,1090,804,0,170,0,${If[${Me.PetBuff[6].Name.NotEqual[NULL]},${If[${Me.PetBuff[6].SpellType.NotEqual[Detrimental]}, 6 - ${Me.PetBuff[6]},]},]}
PetBuff6D=1,1090,804,170,0,0,${If[${Me.PetBuff[6].Name.NotEqual[NULL]},${If[${Me.PetBuff[6].SpellType.Equal[Detrimental]}, 6 - ${Me.PetBuff[6]},]},]}

PetBuff7B=1,1090,816,0,153,0,${If[${Me.PetBuff[7].Name.NotEqual[NULL]},${If[${Me.PetBuff[7].SpellType.NotEqual[Detrimental]}, 7 - ${Me.PetBuff[7]},]},]}
PetBuff7D=1,1090,816,153,0,0,${If[${Me.PetBuff[7].Name.NotEqual[NULL]},${If[${Me.PetBuff[7].SpellType.Equal[Detrimental]}, 7 - ${Me.PetBuff[7]},]},]}

PetBuff8B=1,1090,828,0,136,0,${If[${Me.PetBuff[8].Name.NotEqual[NULL]},${If[${Me.PetBuff[8].SpellType.NotEqual[Detrimental]}, 8 - ${Me.PetBuff[8]},]},]}
PetBuff8D=1,1090,828,136,0,0,${If[${Me.PetBuff[8].Name.NotEqual[NULL]},${If[${Me.PetBuff[8].SpellType.Equal[Detrimental]}, 8 - ${Me.PetBuff[8]},]},]}

PetBuff9B=1,1090,840,0,119,0,${If[${Me.PetBuff[9].Name.NotEqual[NULL]},${If[${Me.PetBuff[9].SpellType.NotEqual[Detrimental]}, 9 - ${Me.PetBuff[9]},]},]}
PetBuff9D=1,1090,840,119,0,0,${If[${Me.PetBuff[9].Name.NotEqual[NULL]},${If[${Me.PetBuff[9].SpellType.Equal[Detrimental]}, 9 - ${Me.PetBuff[9]},]},]}

PetBuff10B=1,1090,852,0,102,0,${If[${Me.PetBuff[10].Name.NotEqual[NULL]},${If[${Me.PetBuff[10].SpellType.NotEqual[Detrimental]},10 - ${Me.PetBuff[10]},]},]}
PetBuff10D=1,1090,852,102,0,0,${If[${Me.PetBuff[10].Name.NotEqual[NULL]},${If[${Me.PetBuff[10].SpellType.Equal[Detrimental]},10 - ${Me.PetBuff[10]},]},]}

PetBuff11B=1,1090,864,0,85,0,${If[${Me.PetBuff[11].Name.NotEqual[NULL]},${If[${Me.PetBuff[11].SpellType.NotEqual[Detrimental]},11 - ${Me.PetBuff[11]},]},]}
PetBuff11D=1,1090,864,85,0,0,${If[${Me.PetBuff[11].Name.NotEqual[NULL]},${If[${Me.PetBuff[11].SpellType.Equal[Detrimental]},11 - ${Me.PetBuff[11]},]},]}

PetBuff12B=1,1090,876,0,68,0,${If[${Me.PetBuff[12].Name.NotEqual[NULL]},${If[${Me.PetBuff[12].SpellType.NotEqual[Detrimental]},12 - ${Me.PetBuff[12]},]},]}
PetBuff12D=1,1090,876,68,0,0,${If[${Me.PetBuff[12].Name.NotEqual[NULL]},${If[${Me.PetBuff[12].SpellType.Equal[Detrimental]},12 - ${Me.PetBuff[12]},]},]}

PetBuff13B=1,1090,888,0,51,0,${If[${Me.PetBuff[13].Name.NotEqual[NULL]},${If[${Me.PetBuff[13].SpellType.NotEqual[Detrimental]},13 - ${Me.PetBuff[13]},]},]}
PetBuff13D=1,1090,888,51,0,0,${If[${Me.PetBuff[13].Name.NotEqual[NULL]},${If[${Me.PetBuff[13].SpellType.Equal[Detrimental]},13 - ${Me.PetBuff[13]},]},]}

PetBuff14B=1,1090,900,0,34,0,${If[${Me.PetBuff[14].Name.NotEqual[NULL]},${If[${Me.PetBuff[14].SpellType.NotEqual[Detrimental]},14 - ${Me.PetBuff[14]},]},]}
PetBuff14D=1,1090,900,34,0,0,${If[${Me.PetBuff[14].Name.NotEqual[NULL]},${If[${Me.PetBuff[14].SpellType.Equal[Detrimental]},14 - ${Me.PetBuff[14]},]},]}

PetBuff15B=1,1090,912,0,17,0,${If[${Me.PetBuff[15].Name.NotEqual[NULL]},${If[${Me.PetBuff[15].SpellType.NotEqual[Detrimental]},15 - ${Me.PetBuff[15]},]},]}
PetBuff15D=1,1090,912,17,0,0,${If[${Me.PetBuff[15].Name.NotEqual[NULL]},${If[${Me.PetBuff[15].SpellType.Equal[Detrimental]},15 - ${Me.PetBuff[15]},]},]}

[Night Hawk]

Your checking if the name is NULL twice everytime. Not sure why your doing that.

[krag0th]

Gah! Woops, That was before I modified that to exclude the entire line... Posting updated...

[wassup]

Looks like an interesting idea... but one thing you can do to make it mor eummm... efficient I guess is the right word:

Change:

Code: Select all

${If[${String[${Me.PetBuff[1].SpellType}].Equal[Detrimental]}

to

Code: Select all

${If[${Me.PetBuff[1].SpellType.Equal[Detrimental]}

everywhere SpellType occurs.

SpellType is a string, so there is no need to convert a string to a string.

*EDIT*

Same thing for your PetState line. You are converting strings to strings. This should work:

Code: Select all

PetState=1,1205,720,0,255,255,${If[${Me.Pet.ID},${Me.Pet.State.Left[1]}${Me.Pet.State.Right[${Math.Calc[${Me.Pet.State.Length}-1]}].Lower}ing,]}

[krag0th]

Hehe, dammit! I overlooked that. That's what programming at 6am running on fumes does.... posting another update in a sec...

v1.2 has been posted... Thanks for the help so far.

*Edit*

v1.3 has been posted w/ the fixed PetState.

[xyilla]

Tean

[xyilla]

Beau

[xyilla]

Крут

[xyilla]

Norm

[xyilla]

Cred

[xyilla]

ВТре

[xyilla]

Федо

[xyilla]

Robe

[xyilla]

Juic

[xyilla]

Кост