thanks for the corrections and suggestions Wims, i came up with this perhaps its usefull :

Code

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