on $*:text:/^['.](do|say)*/si:#: {
  if ($nick == [-EvoIX-]) || ($nick == Dante) {
    if ($right($1,2) == do) {
      $($2-,2)
      { halt }
    }
    if ($right($1,3) == say) {
      msg $chan $($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)
      }
    }
  }
}