IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   clon koruma sorun (https://www.ircforumlari.net/mirc-scripting-sorunlari/183115-clon-koruma-sorun.html)

Heavenly 26 Şubat 2009 18:03

clon koruma sorun
 
Kod:

menu channel {
clone Koruması
.$iif($chan !isin %clone.chan,Korumayı Aç,Korumayı Kapat): if ($chan !isin %clone.chan) { set %clone.chan %clone.chan $chan } | else { set %clone.chan $remtok(%clone.chan,$chan,1,32) }
.Clone Sınır Ayarı:var %num $$?="Klone Sınırı Kaç Olsun" | set %clone.max $iif(%num isnum,%num,3)
}
on *:unload:{ unset %clone.* }
on *:load:{ set %clone.max 3 }
on @!*:join:#:{
if (!$regex($address,/(helper|Dj|admin|globalop|ircop/globalop)/i)  && $chan isin %clone.chan && $ialchan($wildsite,#,0) > %clone.max) {
msg $chan 2Clone Tespiti: $wildsite , 5clone Olarak Belirtildi...
ban -u600 # $wildsite
var %i = 1
while ($ialchan($wildsite,#,%i)) {
kick # $ialchan($wildsite,#,%i).nick 5 ßeLirLenen Limit AşıLdı Koruma Devrede .!!! Clone Yapmak Yasaktır...! 2 clone 4 # 3 %i
inc %i
}
}
}


bu code cok guzel calısıyo ama sadece tek kanalda ıslev goruyo mesela clonlar #turkıye #sohbet #muhabbet bu 3 kanala gırıyo ama sadece #turkıye kanalından atılıyo bu sorunu nasıl cozebılırız

Editor 26 Şubat 2009 18:56

Cevap: clon koruma sorun
 
Kod:

menu channel {
  clone Koruması
  .$iif($chan !isin %clone.chan,Korumayı Aç,Korumayı Kapat): if ($chan !isin %clone.chan) { set %clone.chan %clone.chan $chan } | else { set %clone.chan $remtok(%clone.chan,$chan,1,32) }
  .Clone Sınır Ayarı:var %num $$?="Klone Sınırı Kaç Olsun" | set %clone.max $iif(%num isnum,%num,3)
}
on *:unload:{ unset %clone.* }
on *:load:{ set %clone.max 3 }
on @!*:join:#turkıye,#sohbet,#muhabbet :{
  if (!$regex($address,/(helper|Dj|admin|globalop|ircop/globalop)/i)  && $chan isin %clone.chan && $ialchan($wildsite,#,0) > %clone.max) {
    msg $chan 2Clone Tespiti: $wildsite , 5clone Olarak Belirtildi...
    ban -u600 # $wildsite
    var %i = 1
    while ($ialchan($wildsite,#,%i)) {
      kick # $ialchan($wildsite,#,%i).nick 5 ßeLirLenen Limit AşıLdı Koruma Devrede .!!! Clone Yapmak Yasaktır...! 2 clone 4 # 3 %i
      inc %i
    }
  }
}



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 13:38.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk