you could try this:

Code

on *:text:*:#:{
  if ($istok(#poseidon,$chan,32) && $regex($1-,/^(\s*hi\s*|high\s*5)$/iS) && !$regex($nick,/^(nick|nick1|nick2|nick3|nick4)$/i) ) {  
    if (!$window(@words)) window -enk1z @words
    aline -hp @words $nick say: $+( $1-, )
  }
}