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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Koda EkLemeLer (https://www.ircforumlari.net/mirc-scripting-sorunlari/182169-koda-eklemeler.html)

Elimde BöyLe RekLam ve Küfür Koruması var. BunLar için Mircte Küfür ve RekLam dosyalarıda var

Ancak Ben Bu korumaLar için muaf KanaLLar ekLemeyi ve admin kanaLında küfür ve rekLam ekLemesi ve çıkartması Yapmak istiyorum. Bu mümkün mü ArkadaŞLar?

Kod ŞöyLe

PHP- Kodu:

   
alias kanal_koru {

  if $ircop || $me isop %::chan || $me ishop %::chan {

    if $hfind(kufur,%::text,1,W).data {
      banla %::chan %::nick
      kick %::chan %::nick $kmesaj(bul,24)
      rapor Küfür koruması ihlal edildi: kanal: %::chan - nick %::nick - text: %::text
    }

    if $rayar(genel,kanal_reklam) == acik {
      if $sreklam(%::text) {
        if $rayar(genel,kanal_reklamircop) == acik && $ircop {
          _kline %::nick $kmesaj(bul,16)
          rapor Kanalda reklam yapıldı, (kline): kanal: %::chan - nick: %::nick - text: %::text
        }
        else {
          banla %::chan %::nick
          kick %::chan %::nick $kmesaj(bul,16)
          rapor Kanalda reklam yapıldı, (kickban): kanal: %::chan - nick: %::nick - text: %::text
        }
      }
    }

Umarım Uzunca kodLarın arasından KopyaLadığım yerLerde Bir eksikLik Yoktur.

Ve Ayrıca Yeni Bir Konu aÇmadan SizLerden Bir Ricam Daha Var

Ben Örneğin A kanalına giren herkesin Nickini ve Tam ip adresini B kanalında göstermek istiyorum Bu Mümkün mü ArkadaŞLar?

Server Cr dir.

Cevap: Koda EkLemeLer

İlk sorununda kodların sanıyorum ki eksik ? on *text: eventlerini filan göremedim. ayrıca kendi mircime eklediğimde brackets hatası veriyor, kodları tam paylaşırsan daha iyi yardımcı olabiliriz.

2. sorunun için;
Unrealde çalışıyorum bu yüzden Cr ile uyuşmazlıklar olabiliyor. Senden ricam

/userip nick
/who nick

yapıp cevaplarını buraya kopyalayabilir misin ?
Bu cevaplara göre hem daha kısa bir kod ortaya çıkar hem de uyuşmazlıklar engellenmiş olur.

Cevap: Koda EkLemeLer

"/who nick" komutunda aşağıdaki Örnekteki gibi çıkıyor
* ident 88.251.172.gm861= irc.abcd.net sss H% 1 esChat

Ancak Ben Böyle Çıkmasını İstemiyorum mesela

"Nick ident tam ip adresi" biçiminde olması güzeL olur MeseLa şöyLe oLabiLir

[00:00:56] -irc.abcd.net- *** Notice -- Client connecting on port 7000: abcd (ident@78.161.151.207)

Yani Bu Çıkıyor Ama bunu İstediğim Kanala YönLendirmem Gerekiyor. Ve Notice ŞekiLinde OLmadan oLabiLir mi?

Diğer Komut Cr'de İŞlemiyor

Kodu İse Tekrar Bakıyorum Şimdi

Cevap: Koda EkLemeLer

Kod İse Ekteki Dosyada

yani on *text: eventlerinin olduğu yerden kopyaladım. Umarım Doğrudur

Cevap: Koda EkLemeLer

Kod:

on *:join:#A: { set %dfg $nick whois %dfg } raw *:*: { if $numeric == 311 { set %asd $3 $+ @ $+ $4 set %sdf $6 } if $numeric == 378 { set %fgh $6 msg $chan(#B) #A Kanal Bilgisi: Nick: %dfg Adres: %asd Fullname: %sdf İpAdresi: %fgh } }

userip çalışsaydı whois çekmeye gerek kalmayacaktı, who 'da ise gerçek ip adresi görünmediği için istediğimizi vermeyecekti. ya da sadece ip adresini gösterebilen bir komut varsa Cr'de onu da paylaşırsan hiç whois çekmeye bile gerek kalmayabilir.

Kod bu haliyle denedim çalışıyor, whois çektirerek bilgileri aldım.

#A kanalına girenlerin bilgilerini #B kanalına yansıtacak.

Deneme logu:

Alıntı:

[00:16:09] <~AzuLa> #AzuLon: Nick: AzuLa Adres: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Fullname: turkcemirc632 İpAdresi: *@88.243.177.49

Cr'de whois rawları farklı mı olur bilmiyorum ama eer aynı ise kod çalışacaktır.

Cevap: Koda EkLemeLer

MaaLesef Verdiğin Kod ÇaLışmıyor

oLmadı Server'a Giriş YapanLarı Bu ŞekiLde

[00:00:56] -irc.abcd.net- *** Notice -- Client connecting on port 7000: abcd (ident@78.161.151.207)

Bir A KanaLınada YönLendirebiliriz Bu İkinci Seçenek Tabi Artık Hangisi oLursa

Cevap: Koda EkLemeLer

ArkadaŞLar Yok mu Yardım Edecek ya :(

Cevap: Koda EkLemeLer

ArkadaŞLar aŞağıdaki Örnek Gibi Server'a Giriş YapanLarın Bu şekiLde NickLerini ident ve Tam ip'Lerini beLirLediğimiz Bir KanaLda Gösteremezmiyiz

Cr Server'dır

Örnek
[00:00:56] -irc.abcd.net- *** Notice -- Client connecting on port 7000: abcd (ident@78.161.151.207)

Cevap: Koda EkLemeLer

Kod:

on *:snotice:*client*connecting*:msg #kanal $1-

Belirtilen #kanal 'a mesajı gönderir.

Cevap: Koda EkLemeLer

Alıntı:

Difuzyon Nickli Üyeden Alıntı (Mesaj 647044)

Kod:

on *:snotice:*client*connecting*:msg #kanal $1-

Belirtilen #kanal 'a mesajı gönderir.

Allah Razı oLsun OLdu Gerçekten Çok MutLu oLdum İyiki Varsınız :)

Cevap: Koda EkLemeLer

Açtığım konu başLığının da uyuşması NedeniyLe yeni bir konu açmak istemedim

ArkadaŞLar eLimde bir kaç kod var

PHP- Kodu:

   alias massmsg {
  echo 4 -a *** 10Hazırlanıyor4....10Lütfen Bekleyiniz
  set %top.kullanıcı $nick($1,0)
  :basa
  inc %satir
  inc %msggon.nick
  if ($nick($1, $+ %msggon.nick $+ ) isop $1 ) { goto basa }  
  if ($nick($1, $+ %msggon.nick $+ ) == $me ) { goto basa }  
  if ($nick($1, $+ %msggon.nick $+ ) ison #yardim ) { goto basa }
  if ($nick($1, $+ %msggon.nick $+ ) isvoice $1 ) { goto basa }
  if ($nick($1, $+ %msggon.nick $+ ) ison #help ) { goto basa }
  .timer 1 %satir .msg $nick($1, $+ %msggon.nick $+ ) $2-
  if ( %top.kullanıcı == %msggon.nick ) { echo 4 -a ***10MassMsg Hazırlık Tamamlandı Kanaldaki Herkese Mesaj Gönderiliyor.( Op'Lar Hariç :}  Tahmini Olarak:4 %satir 10Sn Sürecek 10) | unset %top.kullanıcı | unset %satir | unset %msggon.nick | goto son }
  else { goto basa }
  :son
}

PHP- Kodu:

   if (!toplumesaj isin $1) { mode nick -R | msg #kanalismi Güvenlik Taraması BaşLadı. | .msg $ $+ $server Selam | .msg $ $+ $server Bu mesaj sunucumuzda izinsiz reklam yapanlari kontrol etmek icin herkese atilmistir. Lutfen cevap yazmayiniz, karsilik alamazsiniz. | timer 1 30 /mode nick +R }

İkincisini Denememe Rağmen MaaLesef oLmadı Yani Server'daki kuLLanıcıLara herhangi bir mesaj göndermedi İLkini de BeLki İşe Yara Diye Koydum.

Benim İstediğim İse MeseLa #A KanaLında !Toplumesaj Yazdıklarında Server'daki Tüm KuLLanıcıLara veya Bir KanaLdaki KuLLanıcıLara Mesaj Atması. Ancak Atılan mesaj KuLLandığım Mircte #A KanaLının GeneLinde de GörünmemeLi. Bu Mümkün mü ArkadaŞLar?

Cr Server'dır

Cevap: Koda EkLemeLer

Kod:

on *:text:*:#:{

  if $1 == !toplumesaj { msg $chan Sunucudaki tüm kullanıcılara $qt($2-) mesajı gönderildi. | privmsg $+($,$server) $2- }

  if $1 == !kanalmesaj { msg $chan $2 kanalına $qt($3-) mesajı gönderildi. | var %-_ 1 | while %-_ <= $nick($2,0) { privmsg $nick($2,%-_) $3- | inc %-_ } }

}

Kullanımları:
!kanalmesaj #kanal mesaj... (Kanala mesaj göndermek için)
!toplumesaj mesaj... (Sunucudaki tüm kullanıcılara mesaj göndermek için)

Yukardaki kodlar Unreal tabanda geçerlidir.CR sunucudaki komut (privmsg) karşılıklarını senin bulup ona göre kod içerisinde düzenlemelisin...

Ayrıca genelde Unreal tabanlı komutlar üzerinde paylaşım yaptığımız için; açmış olduğun konularda sunucunun CR olduğunu ifade etmişsin ama bundan sonraki konularda (mümkünse) istemiş olduğun kod dizinlerinde CR sunucusundaki komut karşılıklarınıda yazarsan , arkadaşlarımız daha çok ilgi göstereceklerdir ve çözümü kolaylaştıracaktır.

İyi forumlar...