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
