IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Tek Başlıkta Güvenlik Scripti Yapalım mı?

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

- - Tek Başlıkta Güvenlik Scripti Yapalım mı? (https://www.ircforumlari.net/mirc-scripting-sorunlari/8158-tek-baslikta-guvenlik-scripti-yapalim-mi.html)

Alıntı:

Deniz Nickli Üyeden Alıntı

on *:text:!ip -*@*:?:{ shun $2- | kline $2- | zline $2- | gline $2- }

Denedim zline Açıo Ama Atmıo Shun gline vs. :))

Bak şimdi daha iyi olmuş :)

Utku Verecekmisin Şu unreal3.2 Versionunu Acaba Çok Merak Ettim :D Benim Kodda Çok Açık Var Millet Beni Soora Alaya Alır Daha Profesyonel Bir Kod Lazım Arkadaşlar Lütfen Yardim Bot İçin Kendim İçin İstiorsam Namerdim :P :)

Alıntı:

Deniz Nickli Üyeden Alıntı

Ya dikkat ettim de, senin kod gayet uygun olmuş. $2- yerine $2 kullanırsan daha iyi olur.

Unreal'e göre kod yazmam için önce unreal bir sunucuda deneme yapmam lazım. Çünkü unreal ile cr arasında kline zline vs rawlarında farklılıklar var. Ayrıca bot girdiği sunucunun unreal mi cr mi olduğunu girerken belirlemek zorundadır. Girdikten sonra belirlemesi çok zor. Onun için de ekstradan kod yazılması gerek.

/debug @x

yazdıktan sonra kline listesini aç. Daha sonra @x penceresinde yazanları buraya paste et, ona göre bir tane yazmayı denerim.

-> irc.xx.net SHUN
<- :irc.xxx.net 223 XxxX s [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 2 XxxX[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 219 XXxX s :End of /STATS report

Shun Listesiyle kline zline gline ayni umarım İşine Yarar

Kod:

 

on *:text:!ip *:?:{

  if !$2 { msg $nick IP adresini vermeden nasıl açmamı bekliyorsun? | halt }

  if $chr(42) isin $2 { msg $nick Lütfen tam IP adresini giriniz. | halt }

  if $numtok($2,46) != 4 { msg $nick IP adresi 4 bloktan oluşur. Lütfen doğru şekilde yazınız. Örnek: 81.212.99.90 | halt }

  if $_ipmi($2) != 1 { msg $nick Verdiğiniz IP adresi değil. Lütfen kontrol edilmesini istediğiniz IP adresini veriniz. | halt }

  else { set %kip. [ $+ [ $2 ] ] $nick | msg $nick Kontrol ediliyor, lütfen bekleyiniz... | .raw kline }

}

 

raw 223:*:{

  if ($2 === k) && (%kip. [ $+ [ $3 ] ] != $null) { .raw kline $+(-,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin kline'ı açılmıştır. Keyifli sohbetler dileriz. | unset %kip. [ $+ [ $3 ] ] | halt }

  if ($2 === s) && (%kip. [ $+ [ $3 ] ] != $null) { .raw shun $+(-,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin shun'u açılmıştır. Keyifli sohbetler dileriz. | unset %kip. [ $+ [ $3 ] ] | halt }

}

 

alias _ipmi { return $regex($1,/^(?:(?:25[0-5]|2[0-4]\d|1?\d?\d)\.){3}(?:25[0-5]|2[0-4]\d|1?\d?\d)(?::(?:6[0-5]{2}[0-3][0-5]|6[0-5]{2}[0-2]\d|6[0-5][0-4]\d\d|6[0-4]\d{3}|[1-5]?\d{2,4}|[1-9]))?$/) }

Eğer kline ve shun listesine /kline komutu ile bakılıyorsa, yani tek komutla tüm listeye bakılıyorsa ve kline silme komutu /kline -*@IP ise büyük ihtimal çalışacaktır.

Buna ekstradan zline ve gline açma özellikleri eklenebilir. if ($2 === x) kısmındaki x yerine gline'ın harfini yazdığın zaman eğer rawlar aynıysa normal şekilde çalışır.

Harfe burdan bakabilirsin:

<- :irc.xxx.net 223 XxxX s [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 2 XxxX[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason

Burdaki s harfi cezanın ne olduğunu gösterir. Örneğin k yazıyorsa kline, z yazıyorsa zline, A yazıyorsa Cr'deki operserv akill gibi.

kotrol etmekten öte gitmedi maalesef
debug çıkışı
-> irc.xxxnet KLINE
<- :irc.xxnet 223 xxxx K [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 64 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 216 xxxx E 7012
<- :irc.xxxnet 219 xxxx k :End of /STATS report

Bak /kline kline list /zline zline list ve shun gline içinde ayni şeyler

şimdi diorum ki biz burda /stats k-z-g-s- komutunun parametlerinden faydalansak nasıl olur işimiz kolaylaşırmı acaba

raw 223:*:{
if ($2 === k)

burdaki k'yı büyük yaz. if ($2 === K) şeklinde. O zaman kline'ı açması lazım. Aslında sen en iyisi 2 3 zline kline shun vs atıp hepsinin listesini çıkart, ona göre yazalım :)

:D Serverde Adam kalmıcak :D Tamam Hemen Yapıom :))

debug çıkışları

-> irc.xx.net KLINE
<- :irc.xx.net 223 XxxX K [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 98 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 223 XxxX z [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 56 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 216 XxxX E 7012
<- :irc.xx.net 219 XxxX k :End of /STATS report
-> irc.xx.net GLINE
<- :irc.xx.net 223 XxxX G [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 43 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 223 XxxX G [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 58 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 219 XxxX g :End of /STATS report
-> irc.xx.net SHUN
<- :irc.xx.net 223 XxxX s [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 40 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 223 XxxX s [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 3640 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :no reason
<- :irc.xx.net 219 XxxX s :End of /STATS report

Kod:

 

on *:text:!ip *:?:{

  if !$2 { msg $nick IP adresini vermeden nasıl açmamı bekliyorsun? | halt }

  if $chr(42) isin $2 { msg $nick Lütfen tam IP adresini giriniz. | halt }

  if $numtok($2,46) != 4 { msg $nick IP adresi 4 bloktan oluşur. Lütfen doğru şekilde yazınız. Örnek: 81.212.99.90 | halt }

  if $_ipmi($2) != 1 { msg $nick Verdiğiniz IP adresi değil. Lütfen kontrol edilmesini istediğiniz IP adresini veriniz. | halt }

  else { set %kip. [ $+ [ $+(*@,$2) ] ] $nick | msg $nick Kontrol ediliyor, lütfen bekleyiniz... | .stats k | .timer 1 1 .stats s | .timer 1 2 .stats g }

}
 

 

raw 223:*:{

  if ($2 === K) && (%kip. [ $+ [ $3 ] ] != $null) { .raw kline $+(-,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin kline'ı açılmıştır. Keyifli sohbetler dileriz. | unset %kip. [ $+ [ $3 ] ] | halt }

  if ($2 === s) && (%kip. [ $+ [ $3 ] ] != $null) { .raw shun $+(-,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin shun'u açılmıştır. Keyifli sohbetler dileriz. | unset %kip. [ $+ [ $3 ] ] | halt }

  if ($2 === G) && (%kip. [ $+ [ $3 ] ] != $null) { .raw gline $+(-,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin gline'ı açılmıştır. Keyifli sohbetler dileriz. | unset %kip. [ $+ [ $3 ] ] | halt }

  if ($2 === z) && (%kip. [ $+ [ $3 ] ] != $null) { .raw zline $+(-,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin zline'ı açılmıştır. Keyifli sohbetler dileriz. | unset %kip. [ $+ [ $3 ] ] | halt }

}

Böyle dene bakalım.