on *:text:!*:#rshelp: {
  if ($isalias($right($1,-1)) == $true)  && ($nick !isreg $chan) && ($right($1,-1) !isin $read(pna,txt)) {
    $right($1-,-1)
  }
}