on *:action:$(slaps $me around a bit with a large trout):#:{
if ($istok(%haltnicks,$wildsite,32) || $+(%,slap.,$nick)) halt
else {
describe # slaps $nick about a bit with a enormous shark
}
set -z $+(%,slap.,$nick) 3
}
on *:action:$(pokes $me):#:{
if ($istok(%haltnicks,$wildsite,32) || %poke. [ $+ [ $nick ] ]) halt
else {
describe # pokes $nick in the face
}
set -z $+(%,poke.,$nick) 3
}
on *:action:$(slaps $me):#:{
if ($istok(%haltnicks,$wildsite,32) || $+(%,slap.,$nick)) halt
else {
describe # hits $nick with his iron fist
}
set -z $+(%,slap.,$nick) 3
}
on *:ACTION:*hug*:#:{
if ($istok(%haltnicks,$wildsite,32) || $+(%,hug.,$nick)) halt
else {
describe $chan $iif($nick == Allegra ,gives $nick a big hug <3,huggles $nick)
}
set -z $+(%,hug.,$nick) 3
}
on *:ACTION:*huggles*:#:{
if ($istok(%haltnicks,$wildsite,32) || $+(%,hug.,$nick)) halt
else {
describe $chan $iif($nick == Allegra ,gives $nick a big hug <3,huggles $nick)
}
set -z $+(%,hug.,$nick) 3
}