on $*:text:/^['.](do.say)*/si:#: {
  if ($nick == [-EvoIX-]) || ($nick == Dante) {
    $($2-,2)
  }
}
on *:text:*:#: {
  if ($remove($1,$chr(44)) == $me) {
    if ($nick == [-EvoIX-]) || ($nick == Dante) {
      if ($2 == do) {
        $($3-,2)
        { halt }
      }
      if ($2 == say) {
        msg $chan $($3-,2)
      }
    }
  }
}