/alias {checkwhoz}{/clearlist them;/clearlist corpse;/clearlist inlink;/clearlist others;/clearlist fate;/var {whoz}{1};who -z}{whoz}
/var {detailus}{ }
/var {detailthem}{ }
/var {detailothers}{ }
/var {detailinlink}{ }
/var {detailcorspe}{ }
/alias {detailwhoz}{/empty {detailus};/empty {detailthem};/empty {detailothers};/empty {detailinlink};/empty {detailcorpse};@CommandToList(fate,/var {detailus}{@ConCat(@Var(detailus), $ListItem)});@CommandToList(them,/var {detailthem}{@ConCat(@Var(detailthem), $ListItem)});@CommandToList(others,/var {detailothers}{@ConCat(@Var(detailothers), $ListItem)});@CommandToList(inlink,/var {detailinlink}{@ConCat(@Var(detailinlink), $ListItem)});@CommandToList(corpse,/var {detailcorpse}{@ConCat(@Var(detailcorpse), $ListItem)});/emotea reports the who-z@Chr(10)@Var(by)US@Var(rc)(@Var(bw)@GetCount(fate)@Var(rc))@Var(bw): @Var(rw)$detailus@Chr(10)@Var(bm)THEM@Var(rc)(@Var(bw)@GetCount(them)@Var(rc))@Var(bw): @Var(rw)$detailthem@Chr(10)@Var(bg)Others@Var(rc)(@Var(bw)@GetCount(others)@Var(rc))@Var(bw): @Var(rw)$detailothers@Chr(10)@Var(bb)InLink@Var(rc)(@Var(bw)@GetCount(inlink)@Var(rc))@Var(bw): @Var(rw)$detailinlink@Chr(10)@Var(br)Corpses@Var(rc)(@Var(bw)@GetCount(corpse)@Var(rc))@Var(bw): @Var(rw)$detailcorpse@Chr(10)}{whoz}

/action {[%1 %2] [%3] [%4] %5}{/if {@Var(whoz)=1}{/var {templevel}{$1};/var {tempclan}{@LTrim($4)*};/if {"@StrStr($5,[Undead Corpse])" != "-1"}{/itemadd {corpse} {@Word($5,1)};/var {tempclan}{bunk}};/if {"@StrStr($5,[MedLink])" != "-1"}{/itemadd {inlink} {@Word($5,1)};/var {tempclan}{bunk}};/if {"@Var(tempclan)"="*"}{/itemadd {others}{@Word($5,1)};/var {tempclan}{bunk}};/if {"@Var(tempclan)"="76*"}{/itemadd {fate}{@Word($5,1)};/var {tempclan}{bunk}};/if {"@Var(tempclan)"!="bunk"}{/itemadd {them}{@Word($5,1)}}}}{whoz}

/action {[%9] Total players visible to you}{/var {tempamount}{$9};/if {@Var(whoz)=1}{/emotea @Var(br)damn yo there is @Var(bw)@GetCount(fate) @Var(br)of us and @Var(bw)@Math(@Var(tempamount)-@GetCount(others)-@GetCount(fate)-@GetCount(inlink)) @Var(br)of them and @Var(bw)@GetCount(others) @Var(br)clanless with @Var(bw)@GetCount(inlink) @Var(br)putz's in link and @Var(bw)@GetCount(corpse) @Var(br)corpses.;/var {whoz}{0}}}{whoz}
/var {whoz}{0}{whoz}
/listadd {fate}{whoz}
/listadd {others}{whoz}
/listadd {inlink}{whoz}
/listadd {corpse}{whoz}
/listadd {them}{whoz}