#("=====> MARK GROUP MEMEBERS ")
#al mg={#ac +mg;#var $grp= ;group;#in markgrp (1000) #ac -mg}
#ac >-mg ^     $1={#print;#if (("$1"?" "==0) && ("$1"!="A") && ("$1"!=($chnam))) {#mar $1=bold cyan;#var $grp=("$1"+" "+$grp)}}


#("=====> GROUP TELL")
#al gt={#var $txt=$0;#for (\@1=1; $grp:\@1!=""; \@1++) #send ("tell "+($grp:\@1)+" GROUPTELL: "+($txt))}
#al tg={#var $txt=$0;#for (\@1=1; $grp:\@1!=""; \@1++) #send ("tell "+($grp:\@1)+" GROUPTELL: "+($txt))}

#var $swmg=ON
#ac >+grp1 &1 has been kicked out of the group!={#print;mg}
#ac >+grp2 &1 has left the group!={#print;mg}
#ac >+grp3 &1 is now a group member.={#print;mg}
#ac >+grp4 Group disbanded.={#print;mg}
#al mg-={#print ("%% group-marking set to: off");#var $swmg=off;#ac -grp1;#ac -grp2;#ac -grp3;#ac -grp4}
#al mg+={#print ("%% group-marking set to: ON");#var $swmg=ON;#ac +grp1;#ac +grp2;#ac +grp3;#ac +grp4;mg}

#al aa={at;#for (\@1=1; $grp:\@1!=""; \@1++) #if ($grp:\@1!=$tank) #send ("assist "+($grp:\@1))}



$chnam	: the name of the char you play atm