#VAR getglancelist 0

#ALIAS ggl {
	#VAR getglancelist 1;
	wig;
}

#ACT {[%1 %2] %3 } {
#IF {$getglancelist == 1} {	
	#IF {"%2" == "War" || "%2" == "Pal" || "%2" == "A-P"} {gaddt %3;#tab %3};
	#IF {"%2" == "Rog" || "%2" == "Bar"} {gaddr %3;#tab %3};
	#IF {"%2" == "Enc" || "%2" == "Cle" || "%2" == "Sha" || "%2" == "Dru"} {
		#IF {"%3" != "$myname"} {gaddo %3;#tab %3}
	}
}
}

#ACT {Total players online:} {#VAR getglancelist 0}

#ALIAS gaddt {
    #tab @upfirst{%1};#list tankglanceList ins 1 @upfirst{%1};
    #show <100>...<090> Added <140>@upfirst{%1}<090> to Tank glance list.
}

#ALIAS gaddr {
    #tab @upfirst{%1};#list rogueglanceList ins 1 @upfirst{%1};
    #show <100>...<090> Added <110>@upfirst{%1}<090> to Rogue glance list.
}

#ALIAS gaddo {
    #tab @upfirst{%1};#list otherglanceList ins 1 @upfirst{%1};
    #show <100>...<090> Added <160>@upfirst{%1}<090> to Other glance list.
}

#ALIAS gcleart {
    #list tankglanceList clr;#var tgindex 0;
    #show <100>...<090> Tank glance list <130>cleared<090>.
}

#ALIAS gclearr {
    #list rogueglanceList clr;#var rgindex 0;
    #show <100>...<090> Rogue glance list <130>cleared<090>.
}

#ALIAS gclearo {
    #list otherglanceList clr;#var ogindex 0;
    #show <100>...<090> glance list <130>cleared<090>.
}

#ALIAS gcleara {
    #list tankglanceList clr;#var gindex 0;
    #list rogueglanceList clr;#var rgindex 0;    
	#list otherglanceList clr;#var ogindex 0;
    #show <100>...<090> glance list <130>cleared<090>.
}

#ALIAS gdelt {
    #list tankglanceList fnd {@upfirst{%1}} tgdelindex;#list tankglanceList del {$tgdelindex};
    #show <100>...<090> Removed <110>@upfirst{%1}<090> from Tank glance list.
}

#ALIAS gdelr {
    #list rogueglanceList fnd {@upfirst{%1}} rgdelindex;#list rogueglanceList del {$rgdelindex};
    #show <100>...<090> Removed <110>@upfirst{%1}<090> from Rogue glance list.
}

#ALIAS gdelo {
    #list otherglanceList fnd {@upfirst{%1}} ogdelindex;#list otherglanceList del {$ogdelindex};
    #show <100>...<090> Removed <110>@upfirst{%1}<090> from Other glance list.
}

#ALIAS gllist 
{
    #list tankglanceList len tgindex;
    #list rogueglanceList len rgindex;
    #list otherglanceList len ogindex;
    #if {$tgindex == 0 && $rgindex == 0 && $ogindex == 0} 
	{
		#echo {%c%p} {{red} {== NO Glance LIST ========}}
	}
	{
        #echo {%c%p} {{light black} {== Glance LIST ============}};
        #showme;
        #IF {$tgindex != 0} {#loop {1 $tgindex} {#echo {<040>..T -<090> $tankglanceList[&0]}}};
		#IF {$rgindex != 0} {#loop {1 $rgindex} {#echo {<010>..R -<090> $rogueglanceList[&0]}}};
		#IF {$ogindex != 0} {#loop {1 $ogindex} {#echo {<060>..O -<090> $otherglanceList[&0]}}}
    };
    #echo {%c%p} {{light black} {---------------------------}};
}

#ALIAS glt {
    #list tankglanceList len tgindex;
    #loop {1 $tgindex} {glance $tankglanceList[&0]};
}

#ALIAS glr {
    #list rogueglanceList len rgindex;
    #loop {1 $rgindex} {glance $rogueglanceList[&0]};
}

#ALIAS glo {
    #list otherglanceList len ogindex;
    #loop {1 $ogindex} {glance $otherglanceList[&0]};
}

#ALIAS gla {
	#list tankglanceList len tgindex;
	#loop {1 $tgindex} {glance $tankglanceList[&0]};
	#list tankglanceList len tgindex;
	#loop {1 $rgindex} {glance $rogueglanceList[&0]};
	#list otherglanceList len ogindex;
	#loop {1 $ogindex} {glance $otherglanceList[&0]};
}

#MACRO {\C-t} {glt}
#MACRO {\C-r} {glr}
#MACRO {\C-g} {gla}

#showme __ GLANCE.tt