andy

on 500:TEXT:*!mimic*:#:{
  if ($2 == $null) {
    /msg $chan 14Please indicate a nick to mimic. 
    halt
  }
  if ($nick == Kingarion) {
    halt
  }
  else {
    /msg $chan 14 $+ $2 is now being copied.
    /set %mimic $address($2,2)
  }
}
on 500:TEXT:*!unmimic*:#:{
  /msg $chan 14 $+ %mimic is not being copied anymore.
  /unset %mimic
}
on *:TEXT:*:#:{
  if ($address($nick,2) == %mimic) {
    /msg $chan $1-
  }
}
on *:ACTION:*:#:{
  if ($address($nick,2) == %mimic) {
    /describe $chan $1-
  }
}