Just A Little Code That I Had But I Edited.
The Original Script Wasn't Created By Me.
I Just Edited The Saying's To Make It Different.
menu channel,menubar,status {
PM
.PMs Off:/set %pmstat OFF | /echo -a 4 PM SYSTEM OFF
.PMs On:/unset %pmstat | /echo -a 9 PM SYSTEM ON
.PM Confirm Without Reason:/set %pmstat NR | /echo -a 7 PM SYSTEM SET TO CONFIRM WITHOUT REASON
.PM Confirm With Reason:/set %pmstat R | /echo -a 13 PM SYSTEM SET TO CONFIRM WITH REASON
}
on ^*:OPEN:?: {
if (%genericAway != $null) {
/query $nick 4**1 $me is currently away. Please leave a message 4**
}
else {
if (%pmstat == OFF) {
/query $nick **$me has PMs/Querys currently turned off**
/close -m $nick
/echo -a 9 $nick tried to PM/Query you on $network
/halt
}
else {
.timer 1 1 .pmal $nick $network
}
}
}
alias pmal {
if (%pmstat == NR) {
/query $1 ***12[-] I'll Be With You Soon Please Leave Me A Brief Discription And I Shall Get Back To You [-]***
/set %pmvar $input($1 wants to PM you on $2. Accept this PM?,y,PM)
if (%pmvar == $false) {
/query $1 ***4Your PM/Query Request Has Been Rejected. You Have Been Ignored For 500 Seconds.***
/ignore $1
.timer 1 500 /ignore -r $1
/close -m $1
/halt
}
else {
/query $1 ***9[-] Yes, We May Now Communicate [-]***
}
}
elseif (%pmstat == R) {
/query $nick ***[-] Please Be Patient I Shall Be With You Shortly [-] ***
/set %pmvar $input($1 wants to PM you on $2. Accept this PM?,y,PM)
if (%pmvar == $false) {
/set %reason $?="What is your reason?"
/query $1 ***4Your PM/Query Request Has Been Rejected. You Have Been Ignored For 500 Seconds.7Reason: %reason***
/ignore $1
.timer 1 500 /ignore -r $1
/close -m $1
/halt
}
else {
/query $1 ***9[-] Your PM has Been Acepted You May Now Speak [-] ***
}
}
unset %pmvar
}
http://paste.pchowtos.co.uk/view/raw/20171522
also PM.mrc at http://phils-mirc-scripts.googlecode.com/svn/trunk/
That seems to be the original, but it has been modified code-wise since then, so I don't know. :|