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

Sayfa 2 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

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/)

- - 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)

Utku	28 Kasım 2005 22:55

Alıntı:

Deniz Nickli Üyeden Alıntı

Arkadaşlar Buna Biişi Daha Ekleyebilirmiyiz Gerçi Bu Mircturkte Default Tarafından Nomercy e Eklenmiş Bir Kod Vermek İsmesseniz Saygı Duyarım Kendi Adıma İsrediim Şu Yardım Edersiniz Etmessiniz Saygı Duyulur

Adam Özelime !ip ip Yazdıı Zaman Yazdıgı ip Banlıyla Açaım Deilse Yada Sallama Bişi Yazdıysa Verdiiniz İp Banlı deil Hata Hatali ip girdiniz desin Şimdiden Teşekkür Ederim Kolay Gelsin

Serverın tipine göre değişir bu.

Kablosuz NET

28 Kasım 2005 23:58

benimki CR

benim Server CR sen CR ve Unreal için biliyorsan yazarmısın ?

Deniz

29 Kasım 2005 00:01

Unreal3.2.3 Yani Utku Kusura Bakma Abi Gereksiz Bir Post Atmışın Sonra Alience Kızıp Konuyu kilitlio Bildiin Versiona Göre Yazsaydın Daha Makbule Geçerdi Ki Her Versionu Bildiinden Adım Gibi Eminim Abi Neyse Sağol Genede

Utku	29 Kasım 2005 01:41

CR için:

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 }

}

 

raw 216:*:{

  if ($2 === k) && (%kip. [ $+ [ $3 ] ] != $null) { .raw unkline $+(*@,$3) | msg %kip. [ $+ [ $3 ] ] Belirttiğiniz IP adresinin banı 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]))?$/) }

bu tarz birşey yapılabilir.

Alıntı:

[01:35:12] <Spiker> !ip 81.212.99.
[01:35:12] <Utuk> IP adresi 4 bloktan oluşur. Lütfen doğru şekilde yazınız. Örnek: 81.212.99.90
[01:35:21] <Spiker> !ip 81.212.99.*
[01:35:21] <Utuk> Lütfen tam IP adresini giriniz.
[01:35:53] <Spiker> !ip 85.100.11.x
[01:35:59] <Utuk> Verdiğiniz IP adresi değil. Lütfen kontrol edilmesini istediğiniz IP adresini veriniz.
[01:36:39] <Spiker> !ip 85.100.11.6
[01:36:39] <Utuk> Kontrol ediliyor, lütfen bekleyiniz...
[01:36:39] <Utuk> Belirttiğiniz IP adresinin banı açılmıştır. Keyifli sohbetler dileriz.

Fakat daha da geliştirilmesi gerekir. Hatırladığım kadarıyla NoMercy kendi attığı banları açıyordu. Ama CRde kline'ı kimin attığını göremezsin. Anca atıldığı sırada serverda olup kaydetmen gerekir.

FoCuS21

29 Kasım 2005 11:06

site adminleri bir iki koda sizverin bea :) ensonunda scripti buradan yayınlarızı durun adınıda koyim ircforumlari script olar :) direk baglancagı kanalda #ircforum olur fena fikir degil hani ..

Deniz

29 Kasım 2005 19:22

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

Ben Çokta Profssional Olmayan Bu Kodu Yaptım

Ama Kesinlikle Kabul Ediorum Çok Açığı Var Ve Amator Bişi Olduu Herhalinden Belli Oluo Zaten
Özele
!ip -*@ip Yazdıınıza İşler Umarım İşimize Yarar :))

Utku	29 Kasım 2005 19:35

Alıntı:

Deniz Nickli Üyeden Alıntı

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

Ben Çokta Profssional Olmayan Bu Kodu Yaptım

Ama Kesinlikle Kabul Ediorum Çok Açığı Var Ve Amator Bişi Olduu Herhalinden Belli Oluo Zaten
Özele
!ip -*@ip Yazdıınıza İşler Umarım İşimize Yarar :))

Yukarıdaki kodu kullandığında istediğim kişiye shun kline zline vs attırırım :)

Deniz

29 Kasım 2005 20:56

Utku Başında - işareti Vr O Olmadan Kod İşlermi Acaba Onu Hiç Düşünmedim Valla

Deniz

29 Kasım 2005 21:10

Peki Utku Verdiin Cr İçin Bunu Unreal3.2. Ye Çevirmek İçin Ne Yapmamız Lazım
s [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0 332 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] no reason

Böyle Bir Cvp Aldıımızı göz Onunde Bulundurursak

Ne Yapabiliriz

Deniz

29 Kasım 2005 21:25

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

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

Utku	29 Kasım 2005 21:45

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ş :)

Deniz

29 Kasım 2005 22:32

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 :)

Utku	29 Kasım 2005 22:59

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.

Deniz

29 Kasım 2005 23:19

-> 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

Utku	29 Kasım 2005 23:38

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.

Deniz

29 Kasım 2005 23:49

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

Utku	30 Kasım 2005 00:13

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 :)

Deniz

30 Kasım 2005 00:15

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

Deniz

30 Kasım 2005 00:19

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

Utku	30 Kasım 2005 00:32

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.

Deniz

30 Kasım 2005 00:35

[00:34:23] <dddd> !ip 85.100.185.113
[00:34:24] <dddd> Verdiğiniz IP adresi değil. Lütfen kontrol edilmesini istediğiniz IP adresini veriniz.

Utku	30 Kasım 2005 00:37

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]))?$/) }

Bunu silmedin umarım? Bununla birlikte çalıştıracaksın :)

Deniz

30 Kasım 2005 00:39

alias $_ipmi Eksik Sanki :)) İşte Dayanışma Budur TeşekkürLer Ederim Utku Çok Makbule Geçti Herkes Faydalanır umarım Çok SağoL

Utku	30 Kasım 2005 00:48

Önemli değil de, eklemek istediğim birşey var. Bunu kullanacaksanız bu botun özeline yazılan her IP açılır. Eğer sadece belirli kişilerin attığı shun vs açılmasını istiyorsanız unreal için daha değişik şeyler de yapılabilir. Cr için ise ancak kline zline gibi şeyleri atıldığı an kaydedip daha sonra kaydettiği yerden okuyup ona göre karar veren bir kod yazılabilir.

Deniz

30 Kasım 2005 01:15

on *:text: Deilde on 100:text: Yapılır Ve /auser 100 nick!*@* la 100 seviyeden eklenir olar biter yada
on *:text:#kanal: Yaparak Belirtilen Kanalda kod u Kullanılabilir buda dipnot olsun arkadaşlar

Kablosuz NET

30 Kasım 2005 01:19

Buda güzel oldu...

Evet arkadaşlar bu kodda çok işimize yarıcak..En azından millet kendi klinesini kendi açtırabilcek..Şimdi başka bi konuya zıplıcam ama botumuz 15 dk süresi dolan banları samode ile açsın..

Psikopat

04 Aralık 2005 15:38

Uzun yazı Koruması.

;
Uzun Yazı Koruması!!
#msgpro off
on @*:text:*:#: {
if ($nick !isop # && $len($1-) > 200) {
mode # +b $nick
kick # $nick $+ # Kanalından Uzaklaştırıldınız!.. Sebep: "Cok Uzun Yazı Yazdınız" ( $+ $date $+ / $+ $time $+ $me $+ )

Olay ßundan İßaret ;oki ßiraz Gç oLdu ama İdare edin işde :D

CoCoRiCo

04 Aralık 2005 17:27

Büyük harf

Kod:

 

on *:text:*:#: { 

if ($nick !isop $chan) && ($nick !ishop $chan) && ($chan != #opers) {

if ($len($1-) >= 30 ) { 

if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) { 

if (o isin $usermode) && ($me !isop $chan) { 

samode $chan +b $address($nick,2)

}

if ($me isop $chan) && (o !isin $usermode) {

mode $chan +b $address($nick,2) 

kick $chan $nick CAPS ABUSE!

}

}

}

}

}

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

Sayfa 2 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster