All pastes #934862 Raw Edit

Pm blocker :: Idk if its work

public text v1 · immutable
·published 2008-03-09 03:44 UTC
rendered paste body
on *:TEXT:*:?:{
if (%query [ $+ [ $nick ] ] != $null) { halt }
else {
set %query [ $+ [ $nick ] ]
.msg $nick Testing :: Query :: Blocker
echo -a $nick wants to send you a private message 
}
}

alias accept {
if (%query [ $+ [ $1 ] ] != $null) { halt }
elseif (%accept [ $+ [ $1 ]] == Yes) { halt }
else {
set %accept [ $+ [ $1 ] ] Yes
unset %query [ $+ [ $1 ] ]
.msg $1 Query :: Accepted
}
}

alias decline {
if (%query [ $+ [ $1 ] ] != $null) { halt }
elseif (%accept [ $+ [ $1 ] ] == Yes) { set %accept [ $+ [ $1 ] ] No | halt }
elseif (%accept [ $+ [ $1 ] ] == $null) {
set %accept [ $+ [ $1 ] ] No
msg $1 Query :: Declined
}
}