alias colorea { var %a = 1 | while (%a <= $nick($chan,0)) { if ($left($nick($chan,%a).pnick,1) == :) { cline 4 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == .) { cline 4 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == ~) { cline 4 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == =) { cline 3 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == &) { cline 3 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == @) { cline 12 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == %) { cline 14 $chan $nick($chan,%a) } | if ($left($nick($chan,%a).pnick,1) == +) { cline 13 $chan $nick($chan,%a) } | if ($nick($chan,%a) == $me) { cline 7 $chan $nick($chan,%a) } | inc %a | else { halt } } }