on *:join:#Love: {
 set %girennick $nick
 }
 on *:rawmode:#Love: {
if ( *h* iswm $1 || *oa* iswm $1 || *o* iswm $1 || *oq* iswm $1 ) && $2 == %girennick && !$read(Love.txt,w,* $+ $2 $+ ) {
inc %nickid
 .write Love.txt $+(%nickid,$chr(41),$chr(32),*,$chr(32),$2)
 }
 }