expv2.inc -- yaet

Post your completed (working) macros here. Only for macros using MQ2Data syntax!

Moderator: MacroQuest Developers

BardsAreTooEasy
a lesser mummy
a lesser mummy
Posts: 39
Joined: Sun Feb 27, 2005 3:01 pm

expv2.inc -- yaet

Post by BardsAreTooEasy » Tue Apr 12, 2005 9:22 pm

here's my exp tracker, bout the same as the others i guess except it wont display negative numbers if you get over 100%, and also wont display aaexp/exp if you aren't getting them. also sets a timer for oow expeditions if you are in Dranik's Hollows. No leadership, sorry. I wrote this a long time ago and thought id throw it up.

Code: Select all


#turbo
#event slain "You have slain #1#!"
#event slain "#1# has been slain by #2#"
#event popupexp "[MQ2] exp"

Sub exp
||||||||||||||||||||||||||||||||||||||||||||||||||||||
|||||||||||||||ADD A /doevents popupexp AND A|||||||||
|||||||||||||||/doevents expgained TO YOUR MACRO,|||||
|||||||||||||||AND /echo exp TO SEE EXP OUTPUT||||||||
||||||||||||||||||||||||||||||||||||||||||||||||||||||

|||||||||||||||DEFINES||||||||||||||||||||||||||||||||

	|Set this to yes to time OoW instance, otherwise set to no
	
	/if (!${Defined[oowinstance]}) /declare oowinstance string local no

	/if (!${Defined[numberkilledvar]}) /declare numberkilledvar int global 0
	
	/if (!${Defined[oldexpvar]}) /declare oldexpvar float global ${Me.PctExp}
	/if (!${Defined[expvar]}) /declare expvar float global 0
	/if (!${Defined[expperkillvar]}) /declare expperkillvar float global
	/if (!${Defined[exppermin]}) /declare exppermin float global
	/if (!${Defined[expperhour]}) /declare expperhour float global
	
	/if (!${Defined[oldaaexpvar]}) /declare oldaaexpvar float global ${Me.PctAAExp}
	/if (!${Defined[aaexpvar]}) /declare aaexpvar float global 0
	/if (!${Defined[aaexpperkillvar]}) /declare aaexpperkillvar float global
	/if (!${Defined[aaexppermin]}) /declare aaexppermin float global
	/if (!${Defined[aaexpperhour]}) /declare aaexpperhour float global
	
	/if (!${Defined[exptimevar]}) /declare exptimevar timer global 1000000000
	
	/if (!${Defined[zonetimevar]}) /declare zonetimevar timer global 214200
	/if (!${Defined[zonehourvar]}) /declare zonehourvar float global 0


	|||||||ANNOUNCE EXP|||||||||||||||||||||||||||

	/doevents slain
	
	/if (${numberkilledvar}!=0) {


		|Calc exp
		
		/if (${Me.PctExp}<${oldexpvar}) /varcalc expvar ${Me.PctExp}+100-${oldexpvar}+${expvar}

		/if (${Me.PctExp}>${oldexpvar}) /varcalc expvar ${Me.PctExp}-${oldexpvar}+${expvar}


		/if (${Me.PctAAExp}<${oldaaexpvar}) /varcalc aaexpvar ${Me.PctAAExp}+100-${oldaaexpvar}+${aaexpvar}
	
		/if (${Me.PctAAExp}>${oldaaexpvar}) /varcalc aaexpvar ${Me.PctAAExp}-${oldaaexpvar}+${aaexpvar}
		

		|Calc exp/kill
	
		/varcalc expperkillvar ${expvar}/${numberkilledvar}
	
		/varcalc aaexpperkillvar ${aaexpvar}/${numberkilledvar}
	

		|Calc exp/minute and exp/hour
	
		/varcalc exppermin 1000000000-${exptimevar}
		
		/varcalc expperhour 1000000000-${exptimevar}
		
		/varcalc exppermin ${exppermin}/600
		
		/varcalc expperhour ${expperhour}/36000
		
		/varcalc exppermin ${expvar}/${exppermin}
		
		/if (${expperhour}>=.01) /varcalc expperhour ${expvar}/${expperhour}
	

		/varcalc aaexppermin 1000000000-${exptimevar}
		
		/varcalc aaexpperhour 1000000000-${exptimevar}
		
		/varcalc aaexppermin ${aaexppermin}/600
		
		/varcalc aaexpperhour ${aaexpperhour}/36000
		
		/varcalc aaexppermin ${aaexpvar}/${aaexppermin}
		
		/if (${aaexpperhour}>=.01) /varcalc aaexpperhour ${aaexpvar}/${aaexpperhour}
	
		|Calc zonetime
	
		/varcalc zonehourvar ${zonetimevar}/36000
	

		|Echo
	
		/echo ${numberkilledvar} kills.


		/if (${expvar}!=0) /echo ${expvar}% exp, ${expperkillvar}% exp per kill, ${exppermin}% exp per minute, ${expperhour}% exp per hour.
			
		/if (${aaexpvar}!=0) /echo ${aaexpvar}% AAexp, ${aaexpperkillvar}% AAexp per kill, ${aaexppermin}% AAexp per minute, ${aaexpperhour}% AAexp per hour.
			

		/if (${String[${oowinstance}].Equal[yes]}) /echo ${zonehourvar} hours left.

}

||||Reset variables

	/varset oldexpvar ${Me.PctExp}
	
	/varset oldaaexpvar ${Me.PctAAExp}

/return



Sub Event_slain

	/varcalc numberkilledvar ${numberkilledvar}+1

/return



Sub Event_popupexp

	/if (${numberkilledvar}!=0) {

		/echo ${numberkilledvar} kills.


		/if (${expvar}!=0) /echo ${expvar}% exp, ${expperkillvar}% exp per kill, ${exppermin}% exp per minute, ${expperhour}% exp per hour.
			
		/if (${aaexpvar}!=0) /echo ${aaexpvar}% AAexp, ${aaexpperkillvar}% AAexp per kill, ${aaexppermin}% AAexp per minute, ${aaexpperhour}% AAexp per hour.
			

		/if (${String[${oowinstance}].Equal[yes]}) /echo ${zonehourvar} hours left.


} else {

	/echo No exp yet!
	
}

/return


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 2:41 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:18 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:19 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:20 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:21 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:22 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:23 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:24 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 3:26 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 4:04 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 4:05 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 4:06 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 4:07 am


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: expv2.inc -- yaet

Post by xyilla » Wed May 07, 2025 4:08 am