יוצר: ZxoR
תיאור: המערכת הבאה תחסום הודעות פרטיות אליכם מלבד לאנשים מאושרים. במידה ומישהו לא מאושר שולח הודעה הוא יקבל הודעה חזרה וינתנו לו אפשרות ל3 הודעות חשובות בלבד שיוצגו לכם בחלון חדש, ולאחר 3 ההודעות הפרטיות שמאופשרות לו, לא יוכל לשלוח יותר הודעות פרטיות אלא אם כן תאשרו לו.
הפעלה: הסבר השימוש בסקריפט זה יוצג בזמן הטעינה הראשונה, לכן יש לפתוח דף רימוט חדש עבור הPMp.
קוד: בחר הכל
;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;; PMp ;;;;;;;;;;
;;;;; PM Protection ;;;;;
;;;;; Made By ZxoR ;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;
on *:open:?: {
if (%pmp == on) {
if ($nick !isin %allowed) && ($1 != חשוב) && (%f. [ $+ [ $nick ] ] != 3) {
inc -u30 %f. [ $+ [ $nick ] ]
if (!%floodattack) { msg $nick 2~ 12PMp:4 משתמש יקר שלום, הפרטי שלי כרגע חסום ולכן אינך יכול לשלוח לי הודעות. במידה ובידיך משהו חשוב, שלח את המילה 'חשוב' ולאחר מכן את ההודעה החשובה שלך (דוגמא: חשוב דבר איתי מהר!) ואני אקבל את ההודעה. הנך מוגבל ב3 הודעות בלבד, נצל אותן היטב! }
close -m $nick
echo -s ( $+ $nick $+ ) $1-
set -u3 %floodattack Foas
}
if ($1 == חשוב) && ($2) && (%can. [ $+ [ $nick ] ] != 3) && ($nick !isin %allowed) { var %canbe = $calc( 2 - %can. [ $+ [ $nick ] ] ) | window @messages | aline @messages 7[ $+ $nick $+ ]12 $2- | inc %can. [ $+ [ $nick ] ] | msg $nick ההודעה התקבלה, נשארו לך עוד %canbe הודעות חשובות לשלוח לי. | close -m $nick | beep }
elseif (%can. [ $+ [ $nick ] ] == 3) && ($nick !isin %allowed) || (!$2) { close -m $nick }
}
}
alias pmpadd {
if ($1) {
if ($1 !isin %allowed) {
set %allowed %allowed $1
echo -as 5* 12 $+ $1 was successfully added to PM allowed list.
.msg $1 2~ 12You were added to PM allowed list. You can tallk with me now.
}
else { echo -as 5* 12Error: $1 is already in the list. }
}
else { echo -as 5* 12Error: Please specific nick. }
}
alias pmpdel {
if ($1) {
if ($1 isin %allowed) {
set %allowed %remtok(%allowed,$1,32)
echo -as 5* 12 $+ $1 was successfully removed from my PM allowed list.
.msg $1 2~ 12You are deleted from my PM Allowed Script. You cant tallk with me now.
close -m $1
unset %can. [ $+ [ $1 ] ]
unset %f. [ $+ [ $1 ] ]
}
else { echo -as 5* 12Error: $1 isnt in the list. }
}
else { echo -as 5* 12Error: Please specific nick. }
}
alias pmplist {
var %number = 1
echo -as 5* 12PM Allowed list ( $+ $calc( $numtok(%allowed,32) + 0 ) $+ ):
while (%number <= $numtok(%allowed,32)) {
echo -as 5* 2(04 $+ %number $+ 2)3 $gettok(%allowed,%number,32)
inc %number
}
}
alias pmp {
if (%pmp == off) {
set %pmp on
echo -as 5* 12PM Protection is now: 3ON
}
else {
set %pmp off
echo -as 5* 12PM Protection is now: 4OFF
}
}
alias pmpmsg {
if ($1) {
.msg $1 2~ 12PMp:4 משתמש יקר שלום, הפרטי שלי כרגע חסום ולכן אינך יכול לשלוח לי הודעות. במידה ובידיך משהו חשוב, שלח את המילה 'חשוב' ולאחר מכן את ההודעה החשובה שלך (דוגמא: חשוב דבר איתי מהר!) ואני אקבל את ההודעה. הנך מוגבל ב3 הודעות בלבד, נצל אותן היטב!
var %canbe = $calc( 2 - %can. [ $+ [ $1 ] ] )
.msg $1 2~ 12PMp:4 נשארו לך עוד %canbe הודעות לשלוח לי.
echo -as 5* 12Message has been sent to $1 $+ .
}
else { echo -as 5* 12Specific nick. e.x: /pmpmsg ZxoR }
}
alias pmpclear {
unset %allowed
echo -as 5* 12PMP allowed list has been cleared.
}
alias pmphelp {
echo -as 5*12 PMp (PM Protection) was loaded and turned on.
echo -as 5*12 PMp Commands:
echo -as 5*12 /pmp - Set PMp On/off. (e.x: /pmp)
echo -as 5*12 /pmpadd - Add user to allowed list. (e.x: /pmpadd ZxoR)
echo -as 5*12 /pmpdel - Delete user from allowed list. (e.x: /pmpdel ZxoR)
echo -as 5*12 /pmplist - List of allowed list. (e.x: /pmplist)
echo -as 5*12 /pmpmsg - resend the message to nick. (e.x: /pmpmsg ZxoR)
echo -as 5*12 /pmpclear - Clear allowed list. (e.x: /pmpclear)
echo -as 5*12 End of PMp Commands.
}
on *:LOAD: {
set %pmp on
pmphelp
}