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/)
-   -   Çözüldü Bad nick karantina kanalı (https://www.ircforumlari.net/mirc-scripting-sorunlari/808137-bad-nick-karantina-kanali.html)

CyBeR 11 Aralık 2018 17:42

Bad nick karantina kanalı
 
on *:join:#:{
if (yara isin $nick || mariju isin $nick || anne isin $nick || ucr isin $nick || metres isin $nick || nakit isin $nick || rnt isin $nick || ucrt isin $nick || zeng isin $nick || orl isin $nick || pns isin $nick || esin isin $nick || orll isin $nick || jg isin $nick || para isin $nick || skrm isin $nick || jig isin $nick || sxo isin $nick ) {
if (prens !isin $nick) { echo -a 0,1 4 >>> $nick <<< 0Nick'ine 4dikkat ! $chan 0odasında..
}
}
}
selam arkadaşlar iyi ifler herkese sorunum şu bu ve bu traz nickleri ayrı bir pencerede toplamak istiyorum mümkünmüdür. mesela (window@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ) kanalına gelecek bu nickler mümkünmüdür?

diEfoRyoU 11 Aralık 2018 21:24

Cevap: Bad nick karantina kanalı
 
Kod:

on *:start:{ $iif(!$isfile(bnick.die),write bnick.die) | hmake bnick 100 | hload bnick bnick.die }
on *:join:#:{ if $hmatch(bnick,$nick) { if %bnick == on { if o isin $usermode || $me isop # { mode # +b $+($nick,!*@*) | kick # $nick Badnick(Changes your nickname and came back to channel) | return } }
$iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | echo -tm $+($chr(3),$color(notice)) @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] *** UYARI! $nick badnicki # kanalına giriş yaptı! } }
alias bnick { if !$istok(list add on off del alldel bscan,$1,32) { echo -a $+($chr(3),$color(notice))  *** Tanımsız parametre: $1 | return }
  if $regex($1,/(on|off)/i) { echo -a $+($chr(3),$color(notice))  *** Badnick koruması $iif($regml(1) == on,AÇIK,KAPALI) | set %bnick $regml(1) | return }
  if $regex($1-,/add\x20) { if $hmatch(bnick,$2) {  echo -a $+($chr(3),$color(notice))  *** $2 $+ :nicki badnick listesinde mevcut |  return }
    if !$2 { echo -a $+($chr(3),$color(notice))  *** Nick eklemeyi unuttun sanırım:) | return } 
    hadd -m bnick $2 |  hsave bnick bnick.die
  echo -a $+($chr(3),$color(notice))  *** $2 $+ : nicki badnick listesine eklendi  }
  if $regex($1-,/del\x20) { if  $hget(bnick,0).item == 0 { echo -a $+($chr(3),$color(notice))  *** Oluşturulmuş badnick listesi bulunamadı. | return }
    if !$hmatch(bnick,$2) { echo -a $+($chr(3),$color(notice))  *** $2 $+ : nicki badnick listesinde bulunamadı | return }
    if !$2 { echo -a $+($chr(3),$color(notice))  *** Silinecek nicki yazmayı unuttun sanırım:) | return } 
    hdel -w bnick $2 |  echo -a $+($chr(3),$color(notice))  *** $2 $+ : nicki badnick listesinden silindi
  hsave bnick bnick.die  }
  if $regex($1,/list/i) { if  $hget(bnick,0).item == 0 { echo -a $+($chr(3),$color(notice))  *** Oluşturulmuş badnick listesi bulunamadı. | return }
    var %^ = 1 | echo -a $+($chr(3),$color(notice))  *** Badnick kayıtları listeteleniyor,
    while ($hget(bnick, %^).item) { echo -a $+($chr(3),$color(notice))  *** %^ $+ ) $v1 | inc %^ }
  echo -a $+($chr(3),$color(notice))  *** Badnick kayıtları listelendi.  }
  if $regex($1,/alldel/i) {  if !$hget(bnick) { echo -a $+($chr(3),$color(notice))  *** Oluşturulmuş badnick listesi bulunamadı. | return }
  hfree bnick | echo -a $+($chr(3),$color(notice))  *** Badnick listesi sıfırlandı. }
  if $regex($1-,/bscan\x20) { who $iif($left($2,1) == $chr(35),$2,$+($chr(35),$2)) | %bscan = on }
}
raw *:*: { if $numeric == 352 && %bscan == on && $hmatch(bnick,$6) {  $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | echo -tm $+($chr(3),$color(notice)) @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] *** $2 kanalındaki $6 Badnick listesinde bulunuyor }
if $numeric == 315 { %bscan = off } }

badnick listende bulunan badnick bulunduğun herhangi bir kanala girdiğinde Badnick penceresinde uyarı yollanır.

yukarıdaki kodun çalışması için

kullanman gereken komutlar,

badnick eklemek için;
/bnick add Nick

silmek için;
/bnick del Nick

listelemek için;
/bnick list

Hepsini silmek için;
/bnick alldel

Extra komut /bnick bscan
belirlediğin kanalda badnick taraması yapar /bnick bscan #kanal

Edit: kırmızı alanları ekledim dilersen /bnick on|off seçeneği ile badnick korumasını kapatıp açabilirsin.

Umarım işine yarar.

AfraN 12 Aralık 2018 00:07

Cevap: Bad nick karantina kanalı
 
diEfoRyoU kodu yazmış oraya ama ben senin verdiğin kod üzerinden örneği tamamlayayım

ordaki nicklerinden herhangi biri kanala girdiğinde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresi açılır ve pencere ekranına nickler yansıtılır
her nick girişinde pencere yeşil ışık yanar daha erken farketmen için faydalı olabilir.

Kod:

on *:join:#:{
  if (yara isin $nick || mariju isin $nick || anne isin $nick || ucr isin $nick || metres isin $nick || nakit isin $nick || rnt isin $nick || ucrt isin $nick || zeng isin $nick || orl isin $nick || pns isin $nick || esin isin $nick || orll isin $nick || jg isin $nick || para isin $nick || skrm isin $nick || jig isin $nick || sxo isin $nick ) {
    if (prens !isin $nick) { window -g2 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0,1 4 >>> $nick <<< 0Nick'ine 4dikkat ! $chan 0odasında.. }
  }
}


diEfoRyoU 12 Aralık 2018 00:32

Cevap: Bad nick karantina kanalı
 
Alıntı:

Az4d_S3rw4N Nickli Üyeden Alıntı (Mesaj 1042009385)
diEfoRyoU kodu yazmış oraya ama ben senin verdiğin kod üzerinden örneği tamamlayayım

ordaki nicklerinden herhangi biri kanala girdiğinde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresi açılır ve pencere ekranına nickler yansıtılır
her nick girişinde pencere yeşil ışık yanar daha erken farketmen için faydalı olabilir.

Kod:

on *:join:#:{
  if (yara isin $nick || mariju isin $nick || anne isin $nick || ucr isin $nick || metres isin $nick || nakit isin $nick || rnt isin $nick || ucrt isin $nick || zeng isin $nick || orl isin $nick || pns isin $nick || esin isin $nick || orll isin $nick || jg isin $nick || para isin $nick || skrm isin $nick || jig isin $nick || sxo isin $nick ) {
    if (prens !isin $nick) { window -g2 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0,1 4 >>> $nick <<< 0Nick'ine 4dikkat ! $chan 0odasında.. }
  }
}


Yardımı isteyen arkadaşın verdiği kod üzerinden bilinçli olarak ilerlemedim çünkü bu mantıkla kanala yaralı_kalp girerse badnick olur param_yok nicki badnick olur Orlando nicki badnick olur. Verdiği kodun mantığı nickin içinde geçerse yani $v1 is in $nick

benim verdiğim kodda tam eşleşme olursa Badnick olur.
yinede kullanıcı kendi bildiği kodu kullanmak isteyebilir saygı duymak lazım.

AfraN 12 Aralık 2018 11:34

Cevap: Bad nick karantina kanalı
 
Emek vermiş yazmışsın ellerine sağlık

ben sadece bildiği ona kolay gelir diye tamamladım

isin operatörünü zaten hiç bir zaman tercih etmem

isin yerine iswm operatörü daha mantıklı hem joker karakter kullanılabilir, hem de nick'i birebir ekleyebilir hiç bir sorun olmaz.

ayrıca kod'un 3. satırında muaf nickler çoğaltılabilir
birde kick ban kullanılmadığı için muaf olmasa bile bir şey olmaz sadece uyarı amaçlı bir koddur

CyBeR 12 Aralık 2018 14:13

Cevap: Bad nick karantina kanalı
 
Az4d_S3rw4N kardeşim çok teşekkür ederim emeğine sağlık her iki kodu da saklayacağım ama istediğim senin yazdığın koddu tekrar teşekkürler.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 14:13 -->-> Daha önceki mesaj 14:11 --

diEfoRyoU kardeşim sanada teşekkür ederim emeğine sağlık vakit ayırdığın için saol..


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

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