עמוד ראשי מירק סקריפטינג סניפטים Channel advertising Checker

Channel advertising Checker

mIRC Snippets - בפורום זה יפורסמו קודים שימושיים למירק. לפרסום קודים יש לפרסמם תחילה בפורום "פרסום קודים ומדריכים" ולאחר מכאן הם יועברו לפורום זה.

ZxoR
מנהל גלובאלי
Channel advertising Checker
הצטרף: 01 יולי 2010, 07:43
הודעות: 368
פורסם: 04 יולי 2010, 14:16
שם הקוד: Channel advertising Checker
יוצר: ZxoR
תיאור: הקוד בודק ערוצים (שאתם המנהלים בלבד בהם) אם יש בהם מפרסמים, לדוגמא: כאלה שמזמינים בעת כניסה, שולחים הודעות פרטיות שמכילות תוכן פרסומי וכו'. הקוד נבנה על ידי בשנת 2007, ואני לא הולך אפילו לקרוא אותו אני פשוט זוכר שהוא עובד. אני לא מתלהב מהתכנות פה, אבל כמו שאמרתי אני לא מתכוון לעשות פה כלום כל עוד זה עובד.
הפעלה: יש להשתמש בפקודה
/chck



הקוד:
alias chck {
  if ($1 == 1) { .timer 1 21 .closemsg | set -u5 %sdas 1 }
.set %as $active | msg %as 15,1[ 7Starting checking of advertising on %as 15] 14[ZxoR Script] 15[ 7End In more 20sec(s) ^Mod: $+ $chr(32)  $+ $iif(%sdas, 1, 0) $+ ^ 15] | .set %ff 0 | unset %uni | unset %unic | set %ff2 0 | set %ff3 0 | .enable #z | .timer 1 2 hop %as $(|) setts  }

#z off
on *:open:?: {
  if ($nick isreg %as) && ($nick ison %as) && (*#* iswm $1-) || (*www* iswm $1-) || (*http://* iswm $1-) || (*חייגו* iswm $1-) || (*התקשרו* iswm $1-) || (*שרתי משחק* iswm $1-) || (*Is ON* iswm $1-) || (*כסף*חינם* iswm $1-) { inc %ff | ban -k %as $nick 7,1Advesite was found [PM] - Num( $+ %ff $+ ) Channel:  $+ %as [ $+ $nick $+ ] | set %uni $addtok(%uni,$nick,44) }
  if ($nick !ison %as) { inc %ff2 | set %unic $addtok(%unic,$nick,44) }
  if ($nick isvoice %as) || ($nick isop %as) { msg $nick 15,1[ 7System found on your mIRC: Join advertising in %as $+ . Because you are not regular user, the system dont ban you, PLEASE REMOVE THE SCRIPT FROM YOUR MIRC!15 ] | inc %ff3 }
}
on *:invite:*: {
  if ($nick isreg %as) && ($nick ison %as) { inc %ff | ban -k %as $nick 7,1Advesite was found (Auto Invite) - Num( $+ %ff $+ ) Channel:  $+ %as [ $+ $nick $+ ] | set %uni $addtok(%uni,$nick,44) }
  if ($nick !ison %as) { inc %ff2 | set %unic $addtok(%unic,$nick,44) }
  if ($nick !isreg %as) { msg $nick 15,1[ 7System found on your mIRC: Join advertising in %as $+  (Using AUTO-Invite). Because you are not regular user, the system dont ban you, PLEASE REMOVE THE SCRIPT FROM YOUR MIRC!15 ] | inc %ff3 }
}
#z end

alias endsx { msg %as 15,1[ 7Done, Check Result: 15[7 $+ %ff $+  Banned(Advertising) $+ $iif(%uni,: %uni $+ . ) $+ 15] [7 $+ %ff2 $+  NOT Banned(Rabies) $+ $iif(%unic,: %unic $+ . ) $+ 15] [7 $+ %ff3 $+  NOT Banned(Unique) $+ 15] 9| 7Target: %as 9| 7Time: $time 15] 14[ZxoR Script] | .unset %ff | .unset %as | .unset %uni | .unset %unic | beep 10  }
alias SETTS { .timer 1 20 .disable #z $(|) endsx }
שימו לב: בוטי המשחק שאני בונה לא מתאימים לQuakenet אלא אם כן צויין אחרת.
<+vendetta-> סיאג לחוכמה שתיקה
<+vendetta--> בא לי מוח
<Ninja`> דפקתי נקנקיה

הצטרף: 01 יולי 2010, 14:38
הודעות: 77
פורסם: 05 יולי 2010, 13:55
קוד שיכול לעזור להרבה קהילות מתחילות

uns
משתמש רשום
Re: Channel advertising Checker
הצטרף: 01 יולי 2010, 07:18
הודעות: 95
פורסם: 09 יולי 2010, 12:40
יעיל בשביל קהילות.
תמונה

הצטרף: 29 יוני 2010, 16:19
הודעות: 113
פורסם: 13 יולי 2010, 17:39
חחחח אני זוכר את זה מפעם כשרק בנית את זה P:

הצטרף: 13 יולי 2010, 16:40
הודעות: 37
פורסם: 13 יולי 2010, 18:15
תודה

הצטרף: 13 יולי 2010, 18:38
הודעות: 20
פורסם: 13 יולי 2010, 18:41
תודה
תמונה


חזור אל סניפטים

cron