on *:text:*:#:{
  if ($fprot) { return }

  if ($1 == hi) { msg $chan hello $nick | fprot 100 }
  elseif ($1 == bye) { msg $chan goodbye $nick | fprot 100 }

}
alias -l fprot {
  if ($isid) { return $hget(fprot,$site) }
  elseif ($1 isnum) { hadd -mz fprot $site $1 }