on $*:ACTION:$($+(/^hug(g?les)?,$chr(32),$me)):#: {
  if ($istok(%haltnicks,$wildsite,32) || (%hug. [ $+ [ $nick ] ])) halt
  else { 
    describe $chan $iif($nick == Allegra ,gives $nick a big hug <3,huggles $nick)
    set -u3 $+(%,hug.,$nick) 1
  }
}