on *:TEXT:*:#:{ 
  set %tekst $1-
  if ($chan = #hugo) halt
  if ($chan == #[barrow]) halt
  hugotekst
}
alias hugotekst {
  msg #hugo 2[ $+ $chan $+ ]( $+ $time $+ ) < $+ $kleur($nick,$chan) $+ > %tekst
}
alias kleur {
  if ($1 isop $2) return 4 $+ $1 $+ 
  if ($1 ishop $2) return 7 $+ $1 $+ 
  if ($1 isvoice $2) return 12 $+ $1 $+ 
  if ($1 isreg $2) return 14 $+ $1 $+ 
  else return $1
}
on *:Join:#:{ 
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]( $+ $time $+ ) 3 $+ $nick has joined $chan }
on *:PART:#:{ 
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]( $+ $time $+ ) 3 $+ $nick has parted $chan ( $+ $iif(!$1,( $+ $1- $+ ),$1-) $+ ) }
on *:action:*:#:{ 
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]6( $+ $time $+ ) $nick $1- } 
on *:KICK:#:{ 
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]( $+ $time $+ )3 $knick was kicked by $nick ( $+ $iif(!$2,$nick,$2-) $+ ) }
on *:mode:#:{ 
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]( $+ $time $+ )3 $+ $nick sets mode: $1- }
on *:ban:#:{
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]( $+ $time $+ )3 $nick sets mode $1- }
on *:unban:#:{
  if ($chan = #hugo) { halt }
/msg #hugo [ $+ $chan $+ ]( $+ $time $+ )3 $nick sets mode $1- }