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

- - Kanala giren istenmeyen iplere ban (https://www.ircforumlari.net/mirc-scripting-sorunlari/32953-kanala-giren-istenmeyen-iplere-ban.html)

yepaa

22 Haziran 2007 01:30

Kanala giren istenmeyen iplere ban

Cr serverde örneğin kanala 88* ve 86* 84* ile başlayan ipler girdiğinde hangi kanalda olursam olayım direk banlamak istiyorum . Bu ip no ile giriş yasaktır gibi nasıl yapabilirim ?

MavipikSeL

22 Haziran 2007 03:59

Cevap: Kanala giren istenmeyen iplere ban

Kod:

ON @*:JOIN:#: {

  if *!*@*88.246* iswm $address($nick,2) {

    mode # +b $nick

    kick # $nick IP'iniz yasaklanmış, sizi dışarı alıyoruz.

 }

}

SaW	22 Haziran 2007 06:54

Yanıt: Cevap: Kanala giren istenmeyen iplere ban

Alıntı:

MavipikSeL Nickli Üyeden Alıntı (Mesaj 224881)

Kod:

ON @*:JOIN:#: {

  if *!*@*88.246* iswm $address($nick,2) {

    mode # +b $nick

    kick # $nick IP'iniz yasaklanmış, sizi dışarı alıyoruz.

 }

}

Genel mantık bu şekilde olsada bir kaç küçük farklılık sanki daha iyi olacak:
arkadaş 88, 86 ya da 84 ile başlayan ipler demiş, if *!*@*88.246* iswm $address($nick,2) burada eğer ilk kısmı *!*@*88.246* bu mantıkla yazarsa 88.246 ile başlayan değil; içinde 88.246 geçen bütün ipleri banlar, yani @ işaretinden hemen sonraki * olmamalı, bir de *!*@*88.246* olayında baştaki *! gereksiz.

RhymE

22 Haziran 2007 10:05

Yanıt: Kanala giren istenmeyen iplere ban

bende bulunduğum kanallara belirlediğim iplerin dışında olanları değilde server'a bağlanış saati 15 dakikanın altında olan userlerin girdiği gibi banlanmasını istiyorum.yardım bekliyorum desem yardımcı olurmusunuz ?;huh

SaW	22 Haziran 2007 11:30

Yanıt: Kanala giren istenmeyen iplere ban

Karşıdaki kişinin sunucuya ne zaman bağlandığını nasıl görmeyi/öğrenmeyi düşünüyorsun? Eğer bulunduğun sunucu da admin isen bu mümkün, aksi halde en fazla idle süresini görebilirsin.

Edit: Yanlış Bilgi.

RhymE

22 Haziran 2007 11:44

Cevap: Kanala giren istenmeyen iplere ban

--=[ Whois Acilis:Nick ]=--
Nick: Nick
Gerçek Isim: User
Adress: ~user@88.234.233.LD33=
Bilgi: Kayıtlı Ve Identify Edilmiş Bir Nick
Kanallar: #istanbul #yardim #ogretmenler +#kapris @#EvliArkadas
Sunucu: irc.***.com Sohbet Odalari
Boş Durduğu Zaman: 4saniye
Bağlandığı Zaman: Wed Jun 06 20:20:06 2007
--=[ Whois Kapanis: Nick ]=--

Whois Çektiğimde Bağlandığı Zaman Yazıyor Zaten.
20:20'de bağlanmış bir user 20:35'e kadar kanala girdiğinde atılsın istiyorum.
olmayacak bişeysede çok önemli değil.

SaW	22 Haziran 2007 13:00

Yanıt: Kanala giren istenmeyen iplere ban

Haklısın, o kısım gözümden kaçmış. Bu kodun çalışması için kanala girişte her nicke whois çektirmen yeterli.

raw 317:*: {
if ($calc($ctime - $4) < 900) {
var %c = $chan(0), %h = 1
while %h <= %c {
if ($me isop $chan(%h)) { .ban -ku900 $chan(%h) $2 2 }
inc %h
}
}
halt
}

Bulunduğun ve op olduğun bütün kanallarda 15 dakikalık ban atar o ipye.

RhymE

22 Haziran 2007 13:42

Cevap: Kanala giren istenmeyen iplere ban

kod için teşekkürler fakat olmadı yapamadım ;scare

attım scriptin içine /load -rs isim.txt yaptım buldu ama olmadı :confused:

SaW	22 Haziran 2007 20:58

Yanıt: Kanala giren istenmeyen iplere ban

Eğer scriptin içerisinde bir başka raw 317 ile code var ise ve halt ile kesilmiş ise o yüzden çalışmamış olabilir, onu bi ara istersen.. Eğer var ise raw 317 ile başlayan, kopyala buraya, ikisini birleştirelim.

diEfoRyoU

23 Haziran 2007 01:22

Cevap: Kanala giren istenmeyen iplere ban

Kod:

 
 İlk soruya yanıt;
 on @!*:join:#: { if $istok(88 86 84,$gettok($gettok($fulladress,2,64),1,46),32) { ban -ku900 # $nick dışarı } }

Alıntı:

raw 317:*: {
if ($calc($ctime - $4) >= 900) {
var %c = $chan(0), %h = 1
while %h <= %c {
if ($me isop $chan(%h)) { .ban -ku900 $chan(%h) $2 2 }
inc %h
}
}
halt
}

< çıkan sonuç 900 den küçükse
>= çıkan sonuç 900 yada 900 üstüyse;)
birde bu şekilde dene bakalım işini görecekmi;)

SaW	23 Haziran 2007 02:20

Yanıt: Kanala giren istenmeyen iplere ban

Alıntı:

RhymE Nickli Üyeden Alıntı (Mesaj 224912)

Alıntı:

>= çıkan sonuç 900 yada 900 üstüyse;)

15 dakikanın altında olanları banlamak istiyor, 900den büyük olursa 15 dakikanın altında mı olur üstünde mi? ;)

diEfoRyoU

23 Haziran 2007 02:30

Cevap: Kanala giren istenmeyen iplere ban

Ben açıklamamı yaptım:) soruyu yanlış okuma ihtimalim yüksek dimi;). Kullanıcı bu açıklama doğrultusunda dilediği gibi koda yöne verebilir.

RhymE

23 Haziran 2007 12:47

Cevap: Kanala giren istenmeyen iplere ban

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]'nun verdiği koduda denedim o'da olmadı.bu seferde raw 317 ile başlayan bi kod daha buldum.

Kod:

 

raw 367:*: {

  var %sure $ctime - $5

  if %sure >= 750 {

    inc %c.say

    hadd c.temp $+(ip.,%c.say) $3

  }

}

raw 368:*: {

  if (%c.say >= 1) {

    c.unban $2

  }

}

alias c.unban {

  var %bc $1

  if (!$hget(c.temp,0).item) { halt }

  if ($hget(c.temp,0).item >= 10) { var %s = 10 }

  else { var %s = $hget(c.temp,0).item }

  var %i = 1,%c

  while (%i <= %s) {

    %c = $addtok(%c,$hget(c.temp,$hget(c.temp,1).item),32)

    hdel c.temp $hget(c.temp,1).item

    inc %i

  }

  mode  %bc - $+ $str(b,%s) %c

  .timer -h 1 1 c.unban %bc

}

on *:start: ilk

alias ilk {

  if (!$hget(c.temp)) { hmake c.temp 1000 }

  else { hfree c.temp | hmake c.temp 1000 }

  set %c.say 0

}

menu * { 

  Aktif Kanalda Süresi Dolan Banlari Ac! : mode $chan +b

}

on *:join:#: {

  if $nick == $me {

    write chan.txt $chan

  }

}

on *: part:#: {

  if $nick == $me {

    write -ds $chan chan.txt

  }

}

alias sureunban {

  var %chansfile = chan.txt

  var %line = 1, %total = $lines(%chansfile)

  while (%line <= %total) {

    var %data = $read -l $+ %line %chansfile

    if (%data != $null) {

      _queue mode %data +b

    }

    inc %line

    inc %sur

  }

  %names.enddata = %data

}

alias _queue {

  inc %queue.count

  if ($timer(.queue) == $null) {

    hadd -m queue count 1

    hadd -m queue 1 $1-

    _doqueue 1

  }

  else {

    var %queue.count = $calc($hget(queue,count) + 1)

    hadd -m queue %queue.count $1-

    hadd -m queue count %queue.count

  }

}

alias _doqueue {

  if ($hget(queue,$1) != $null) {

    .timer.queue -m 1 $calc((4 - $gettok(3 2 1,$1,32)) * 500) _doqueue $calc($1 + 1) 

    $ifmatch

    .hdel -s queue $1

  } 

  else hfree queue

}

SaW	23 Haziran 2007 14:05

Yanıt: Kanala giren istenmeyen iplere ban

Tam olarak bunların hangisi raw 317 ile başlıyor?
Ayrıca raw 317den gelen sonuçları görebilmen için whois çektiğin kişi seninle aynı sunucuda olması lazım, yani linkli bir serverdaysan, diğer linkin/linklerin userlarına whois çektiğin zaman raw 317 cevabı gelmeyecektir.
ayrıca deneme amaçlı koda bir kaç eklenti yapacam, hangi aşamada hata aldığını görmen açısından.. bir de böyle dene sonucu gösterirsin ondan sonra..

Alıntı:

Nebiliymben Nickli Üyeden Alıntı (Mesaj 224964)

raw 317:*: {
echo -a raw 317 cevabı alındı.
if ($calc($ctime - $4) < 900) {
echo -a online süresi 15 dakikanın altında..
var %c = $chan(0), %h = 1
while %h <= %c {
if ($me isop $chan(%h)) { .echo -a cezalandırılıyor. | .ban -ku900 $chan(%h) $2 2 }
inc %h
}
}
halt
}

Kırmızıyla yazdıklarım, kodun hangi aşamasına kadar işlem gördüğünü görmene yardımcı olacaktır (ayrıca ben kodu denemiştim sorunsuz çalışıyordu) Sonra gereken düzenlemeyi yaparız.

Edit : Tekrar hatırlatıyorum, bu kodun çalışması için kanala her girene whois çektirmen lazım yoksa çalışmaz
on *:join:#:/whois $nick
Şeklinde yaptırabilirsin.

RhymE

27 Haziran 2007 10:37

Cevap: Kanala giren istenmeyen iplere ban

Sizin verdiğiniz kodları bi abiye verdim.O'da biraz baktı filan ayarladı,birleştirdi.Ama bu seferde kanala kim girerse girsin atıyor.Birde kick sebebi çıkmıyor..Birde siz bakabilirseniz sorun nerede diye çok iyi olur.

Kod:

on *:JOIN:#:{

    if ($nick isop #mynet_*) return {

    if ($me != $nick) { /whois $nick }

    if ($me isop $chan)

    { 

    raw 317:*: {

    if ($asctime($4)) < 900) {

    var %c = ($asctime($4))), %h = 900

    while %c < %h {

    if ($me isop $chan(%h)) { //ban -u900 $chan $nick 2 | kick $chan $nick 4Açıklama:1 Saldırı Koruması Aktif Sunucuya giriş zamanınız 15 dk'yı geçmediğinden4 bir süre uzaklaştırıldınız! | /echo 4 -s [BiLgi]: $nick 12NickLi User4 $chan 12Kanalına Giriş Yaptı ve Atıldı. }

    }

    }

    halt

    }

#ugiris end

SaW	27 Haziran 2007 13:03

Yanıt: Kanala giren istenmeyen iplere ban

Arkadaşım code buydu, yani bunda çok fazla uğraşacak bir şey yoktu ki.. Söylediğimiz şey bu kodun çalışması için girişte whois çektir dedik okadar..

on *:join:#:{
if ($me isop $chan) {
if ($nick == $me) || ($nick == Muafnick1) || ($nick == Muafnick2) || ($nick == Muafnick3) || ($nick == Muafnick4) || ($nick == Muafnick5) { halt }
enable #kontrol
whois $nick
}
}

#kontrol off
raw 317:*: {
if ($calc($ctime - $4) < 900) {
var %c = $chan(0), %h = 1
while %h <= %c {
if ($me isop $chan(%h)) { .echo -a cezalandırılıyor. | .ban -ku900 $chan(%h) $2 2 }
inc %h
}
}
halt
disable #kontrol
}
#kontrol end

Hepsi bu kadar.. istersen muafnick'ler ekleyebilirsin, kırmızıyla belirttim, artırıp azaltabilirsin. Umarım işine yarar.

Teoman

27 Haziran 2007 14:39

Yanıt: Kanala giren istenmeyen iplere ban

bunun yerine bence ilk soru icin diyorum.. bir proxylist koruması yapsın.. istemedigi İP leri proxy listesine eklesin.. bu şekilde daha kolay olur.. proxylist koruması zannedersem aranırsa bulunur forumda..

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