on *:input:*: if ($left($1,1) = /) { goto end } | say $1- $rphrase | halt | :end
on *:input:*: if ($left($1,1) = /me) { msg $chan $1- $rphrase } | halt | :end
alias rphrase {
  goto $r(1,3)
  :1
  return desu
  halt
  :2
  return ne
  halt
  :3
  return kupo?
  halt
}