alias -l pad2 return $right(0 $+ $$1, 2)
on *:Text:$(* $+ $me $+ *):*: {
  set %thgilhgih $chr(3) $+ 7 $+ < $+ $iif($chan,$chan $chr(3) $+ $pad2($nick($chan, $nick).color) $+ $chr(31) $+ $nick $+ $chr(3),query $nick) $+ $chr(31) $+ $chr(3) $+ 7 $+ > $1- $+ $chr(3)
  if ($active == $chan) {
    echo 4 -ts %thgilhgih
    halt
  }
  else {
    echo 4 -tsa %thgilhgih
  }
}
on *:Action:$(* $+ $me $+ *):*: {
  set %thgilhgih $chr(3) $+ 7 $+ * $iif($chan,$chan $chr(3) $+ $chr(31) $+  $pad2($nick($chan, $nick).color) $+ $nick $+ $chr(3),query $nick) $+ $chr(31) $+ $chr(3) $+ 7 $+  $1- $+ $chr(3)
  if ($active == $chan) {
    echo 4 -ts %thgilhgih
    halt
  }
  else {
    echo 4 -tsa %thgilhgih
  }
}