on *^:join:#:{
  if ($me == $nick) { halt }
  else {
  echo -t $chan $chatprefix $+ 11 $nick 14 $chr(91) $+ 10 $+ $remove($address($nick,0),!,*) $+ 14 $+ $chr(93) 14has joined15 $chan | haltdef }
}

on *^:part:#:{
  if ($me == $nick) { halt }
  else {
  echo -t $chan $chatprefix $+ 10 $nick 14 $chr(91) $+ $remove($address($nick,0),!,*) $+ 14 $+ $chr(93) 14has left15 $chan $+ 14 $chr(91) $+ 15 $+ $1- $+ 14 $+ $chr(93) | haltdef }
}

on *:rawmode:#:{
  echo -at $chatprefix 14mode/10 $+ $chan $+ 14 $+ $chr(91) $+ 15 $+ $1- $+ 14 $+ $chr(93) by15 $nick | haltdef
}

on *^:notice:*:*:{
echo $active $chr(91) $+ $nick $+ $chr(93) $1- }

on ^*:text:*:#:{
  haltdef
  if ($left($nick($chan,$nick).pnick,1) isin $prefix) {
  echo -mt $chan 14< $+ $left($nick($chan,$nick).pnick,1) $+ $nick $+ 14) $1- }
  else {
  echo -mt $chan 14<15 $+ $nick $+ 14> $1- }
}

on *:INPUT:*:{
  if ($left($1,1) == /) return
  else {
    if ($left($nick(#,$me).pnick,1) isin $prefix) {
      haltdef
      .msg $active $1-
      echo -t $chan 14<15 $+ $left($nick($chan,$me).pnick,1) $+ $me $+ 14>15 $1-
    }
    else {
      echo -t $chan 14< $+ 15 $+ $me $+ 14> 15 $1-
      .msg $active $1-
      haltdef
    }
  }
}

alias chatprefix { return 12-14 $+ ! $+ 12- }

raw 332:*:{
  echo -at $chan $chatprefix 14Topic for10 # $+ $2 $+ 14: $4- | haltdef
}

raw 353:*:{
  echo -at $chan $chatprefix 14Stats: $chan $+ : Total of15 $nick($active, 0) $+ 14 nicks [15 $+ $nick($active, 0, o) 14ops,15 $nick($active, 0, h) 14halfops,15 $nick($active, 0, v) 14voiced,15 $nick($active,0,r) 14normal]
}