on ^*:open:?:*:{
if ($me == clay|SLeep) {
/msg $Nick sry im not accepting pm's
//close -m $nick
//echo -s $nick just pmd me saying $1-
/write pms.txt $nick just pmd me: $1- at $time on $server
halt
}
else {
//echo -a uve been pmd by $nick
//set %msg $+ $Nick $1-
/msg $nick sry $me is using query blocker atm
/set %beenpmd yes
/set %pmdby $nick
//close -m $nick
}
}
on *:nick: if ($newnick == clay|sleep) /amsg pm blocker is up, have a good night
on *:input:#:{
if (accept isin $1 & %beenpmd == yes) {
/msg %pmdby ur query was accepted
/notice $me ur last pm was $eval($+(%,pm,$nick),2)
/unset %pmdby
/unset %beenpmd
HALT
}
if (decline isin $1 & %beenpmd == yes) {
/msg $nick sry ur query was declined
/unset %pmdby
/unset pmdby
/unset %beenpmd
HALT
}
}