My exp track / chanter macro (help!)

Status
Not open for further replies.

kryologik

Member
Joined
Jul 3, 2006
Messages
157
Reaction score
0
Points
16
Code:
|-- exptrack.mac
|

#event Exp "You gain#*#" 
#event charmBreak "Your Beguile #*#"
#event newPet "#*# has been charmed"

#turbo 

Sub Main 

|-- Declare variables
/declare oldExper float outer 
/declare newExper float outer
/declare oldAAExper float outer
/declare newAAExper float outer
/declare petName string outer
    

|-- Initialize variables
/varset oldExper ${Me.PctExp}
/varset newExper ${Me.PctExp}
/varset oldAAExper ${Me.PctAAExp}
/varset newAAExper ${Me.PctAAExp}
/varset petName ${Me.Pet.Name}

/echo Beginning XPTracker.. 
/echo Tracking charm..

:loop 
/doevents 
/goto :loop 
/return 

Sub Event_Exp 

   /varset newExper ${Me.PctExp}
   /varset newAAExper ${Me.PctAAExp}

   /echo Gained ${Math.Calc[${newExper}-${oldExper}]}% experience. [${Me.PctExp}/100%]
   /if (${Math.Calc[${newExper}-${oldExper}]} > 0) {
   /echo At constant exp, you would need: ${Math.Calc.Int[(100-${Me.PctExp})/(${newExper}-${oldExper})]} more NPCs.
   }
   
   /echo Gained ${Math.Calc[${newAAExper}-${oldAAExper}]}% AA experience. [${Me.PctAAExp}/100%]
   /if (${Math.Calc[${newAAExper}-${oldAAExper}]} > 0) {
   /echo At constant AAexp, you would need: ${Math.Calc[(100-${Me.PctAAExp})/(${newAAExper}-${oldAAExper})]} more NPCs.
   }
   /popup Gained ${Math.Calc[${newExper}-${oldExper}]}% experience. [${Me.PctExp}/100%]
   /delay 30
   /popup Gained ${Math.Calc[${newAAExper}-${oldAAExper}]}% AA experience. [${Me.PctAAExp}/100%]
   
   /varset oldExper ${Me.PctExp}
   /varset oldAAExper ${Me.PctAAExp}
/return 

Sub Event_charmBreak

	/popup Your charm spell broke off of ${newPet}

/return


Sub Event_newPet

	/varset newPet ${Me.Pet.Name}

/return

K, I have it running now. hehe.
 
Last edited:
Status
Not open for further replies.