MacroQuest64

Code: Select all

| HuDTimer.mac 
| 
| This macro will react to spells cast on your target. 
| It displays the time remaining on the spell cast,the 
| spell cast, and the mob cast upon. 
| 
| Currently it will display 5 debuffs at once. 
| It will refresh any identical buff recast on the same mob 
| It fills in timer slots from top to bottom as available 
| Displays timer list full when max timers are running 
| 
| TODO: 
| 
| - dynamically create entries in the MQ2Hud.ini file to allow for more timers 
| - read #Event information from an .ini file 
| - revisit formatting spell duration (ticks) into time (hh:mm:ss) 
| - write as HudTimer.inc and call from Personal.inc for genbot. 
| 
| by 
| Seagreen 
| 

#turbo 40 


#Event Bliss "#1# jaw falls as they begin to drool." 
#Event Apathy "#2# stares off into the distance." 
#Event Sleep "#3# falls asleep." 
#Event WoM "#4# begins to dream."
#Event Dazzle "#5# has been mesmerized."
#Event CoD "You begin casting Command of Dru#*#"
#Event Rapture "in raptured bliss." 

sub Main 
   /declare counter int outer 
   /declare DebuffSpell string outer 
   /declare HudArrayTimer[5,5] string outer NULL 
      | [1,x] 1. Ending time of debuff 
      | [2.x] 2. Name of spell cast on npc 
      | [3.x] 3. Long name of npc 
      | [4.x] 4. ID of npc 
      | [5.x] 5. Duration (formatted) 

   /echo HuD DEBUFF Timer is now ACTIVE. 

   :mainloop 

   /doevents 
   /call CheckTimer 
   /delay 1 
   /doevents
   /goto :mainloop 
/return 

Sub Event_Dazzle
   /varset DebuffSpell Dazzle
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 

Sub Event_CoD
	/echo hi
   /varset DebuffSpell Command of Druzzil
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 


Sub Event_Rapture 
   /varset DebuffSpell Rapture 
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 

Sub Event_Sleep 
   /varset DebuffSpell Sleep 
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 
Sub Event_WoM
   /varset DebuffSpell Word of Morell 
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 


Sub Event_Apathy 
   /varset DebuffSpell Apathy 
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 

Sub Event_Bliss 
   /varset DebuffSpell Bliss 
   /echo ${DebuffSpell} 
   /call SetupTimer 
/return 

Sub SetupTimer 
   /declare duration int local 

| 
| IF SAME DEBUFF IS BEING RECAST ON EXISTING NPC IN TIMER ARRAY, REFRESH 
| 
   /for counter 1 to 5 
   /if (${Spawn[${HudArrayTimer[4,${counter}]}].ID}==${Target.ID} && 

${String[${HudArrayTimer[2,${counter}]}].Equal[${DebuffSpell}]}) { 
      /varset HudArrayTimer[1,${counter}] 

${Math.Calc[${Time.SecondsSinceMidnight}+(${Spell[${DebuffSpell}].Duration}*6+6)]} 
       /varset HudArrayTimer[2,${counter}] ${DebuffSpell} 
      /varset HudArrayTimer[3,${counter}] ${Target} 
      /varset HudArrayTimer[4,${counter}] ${Target.ID} 
      /return 
   } 
   /next counter 

| 
| SETUP NEW DEBUFF OF NPC IN OPEN SLOT 
| 
   /varset counter 1 
   :counterloop 
   /echo ${counter}
   /if (!${Spawn[${HudArrayTimer[4,${counter}]}].ID} && 

!(${Math.Calc[${HudArrayTimer[1,${counter}]}-${Time.SecondsSinceMidnight}].Int}>0)) { 
      /varset HudArrayTimer[1,${counter}] 

${Math.Calc[${Time.SecondsSinceMidnight}+(${Spell[${DebuffSpell}].Duration}*6+6)]} 
       /varset HudArrayTimer[2,${counter}] ${DebuffSpell} 
      /varset HudArrayTimer[3,${counter}] ${Target} 
      /varset HudArrayTimer[4,${counter}] ${Target.ID} 
   } else { 
      /if (${counter}>4) { 
         /echo Debuff timer slots are full 
         /return 
      } 
      /varcalc counter ${counter}+1 
      /goto :counterloop 
      } 
/return 


Sub CheckTimer 
   /declare duration int local 
   /declare myhour string local 
   /declare myminute string local 
   /declare mysecond string local 

  /for counter 1 to 5 
  
   /if (!${Spawn[${HudArrayTimer[4,${counter}]}].State.Equal[DEAD]} && 

${Math.Calc[${HudArrayTimer[1,${counter}]}-${Time.SecondsSinceMidnight}].Int}>0) { 
| 
| FORMAT DURATION TO 00:00:00 
|    
      /varset duration ${Math.Calc[${HudArrayTimer[1,${counter}]}-${Time.SecondsSinceMidnight}].Int} 
      /if (${duration}>3600) { 
         /varset myhour ${Math.Calc[${duration}/3600].Int} 
         /varset duration ${Math.Calc[((${duration}/3600)-${myhour})*3600]} 
      } else { 
         [color=red]/varset myhour[/color]
      } 
      /if (${duration}>60) { 
         /varset myminute ${Math.Calc[${duration}/60].Int} 
         /varset duration ${Math.Calc[((${duration}/60)-${myminute})*60]} 
         /if (${myhour} && ${myminute}<10) /varset myminute 0${myminute} 
      } else { 
         /varset myminute 
      } 
      /if (${duration}) { 
         /varset mysecond ${duration} 
         /if (${myminute} && ${mysecond}<10) /varset mysecond 0${mysecond} 
      } else { 
         /varset mysecond 
      } 

| 
| DISPLAY HH:MM:SS IF NEEDED 
	/echo ${myhour}
      [color=red]/if (${myhour}) { [/color]
         /varset HudArrayTimer[5,${counter}] ${myhour}:${myminute}:${mysecond} 
      } else /if (${myminute}) { 
         /varset HudArrayTimer[5,${counter}] ${myminute}:${mysecond} 
      } else /if (${mysecond}) { 
         /varset HudArrayTimer[5,${counter}] ${mysecond} 
      } 
   } else { 
      /varset HudArrayTimer[1,${counter}] 
      /varset HudArrayTimer[2,${counter}] 
      /varset HudArrayTimer[3,${counter}] 
      /varset HudArrayTimer[4,${counter}] 
      /varset HudArrayTimer[5,${counter}] 
      } 
        
   /next counter 
/return