MacroQuest64

Code: Select all

| Lang.mac
|
| Cycles through all your availible languages
|
| Usage:  /mac Lang
| You must be grouped with someone for it to work.
| This is meant to level the OTHER people in your group, not you. If YOU 
| want to level using this, crete a new trial account, open multiple clients
| using EQWindows, group them, then run the macro on both characters.


Sub Main

	/declare LangNum outer

	/varset Langnum 2

	:MainLoop

	/lang ${LangNum}


	{
		/gsay "Agent Smith: Never send a human to do a machine's job"
		/gsay "Agent Smith: Tell me, Mr. Anderson, what good is a phone call when you are unable to speak?"
		/gsay "Neo: Hello?"
		/gsay "Morpheus: Hello, Neo. Do you know who this is?"
		/gsay "Neo: Morpheus?"
	}


	/delay 1s


	/varcalc LangNum ${LangNum}+1

	/if (${LangNum}>25) /varset LangNum 2

	/goto :MainLoop

/return