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

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

- - Kod Çalışmıyor ? (https://www.ircforumlari.net/mirc-scripting-sorunlari/684727-kod-calismiyor.html)

Kod Çalışmıyor ?

Kod:

alias tersip { tokenize 46 $1 | return $+($4,.,$3,.,$2,.,$1) }

alias blacklist { return .tor.dan.me.uk .rbl.efnet.org }

alias pro { .dns $1 $+ $gettok($blacklist,1,32) | .dns $1 $+ $gettok($blacklist,2,32) }

on ^*:DNS:{

  var %ext = $chr(46) $+ $gettok($address,5-,46)

  if ($iaddress && $istok($blacklist,%ext,32)) { gzline *@ $+ $tersip($naddress) 300 :TOR/PROXY Girişi Yasaktır!  | halt }

}

raw 352:*:{ 

  pro $4

}

Kodda biraz eksıklık var gibi siteler ölüde olabilir tam anlıayamadım yardımcı bu koddan anlıyan var mı . Proxy leri atmıyor.

Cevap: Kod Çalışmıyor ?

Kod:

on *:snotice:*Client connecting*: {

  .pro $tersip($deltok($deltok($mid($10,$pos($10,@),$len($10)),2,64),2,41))

}

alias tersip { tokenize 46 $1 | return $+($4,.,$3,.,$2,.,$1) }

alias blacklist { return .tor.dan.me.uk .rbl.efnet.org }

alias pro { .dns $1 $+ $gettok($blacklist,1,32) | .dns $1 $+ $gettok($blacklist,2,32) }

on *:DNS:{

  var %ext = $chr(46) $+ $gettok($address,5-,46)

  if ($iaddress && $istok($blacklist,%ext,32)) { gzline *@ $+ $tersip($naddress) 300 :TOR/PROXY Girişi Yasaktır! | halt }

}

Cevap: Kod Çalışmıyor ?

Alıntı:

Laqinta Nickli Üyeden Alıntı (Mesaj 1041622888)

Kod:

alias tersip { tokenize 46 $1 | return $+($4,.,$3,.,$2,.,$1) }

alias blacklist { return .tor.dan.me.uk .rbl.efnet.org }

alias pro { .dns $1 $+ $gettok($blacklist,1,32) | .dns $1 $+ $gettok($blacklist,2,32) }

on ^*:DNS:{

  var %ext = $chr(46) $+ $gettok($address,5-,46)

  if ($iaddress && $istok($blacklist,%ext,32)) { gzline *@ $+ $tersip($naddress) 300 :TOR/PROXY Girişi Yasaktır!  | halt }

}

raw 352:*:{ 

  pro $4

}

Kodda biraz eksıklık var gibi siteler ölüde olabilir tam anlıayamadım yardımcı bu koddan anlıyan var mı . Proxy leri atmıyor.

Kodun başına bu satırı eklersen de pro aliası çalışır.

Kod:

on *:snotice:*nnecting on*:who +I $9

raw 352 event'ı who komutu ile tetiklenir.

Bunu net görebilmek için alttaki satırı remote sayfasına ekleyip //who +I $me yapmanız yeterli olur. Sonuç olarak 352 raw numarasını dönecektir.

Kod:

raw *:*:echo -a $numeric

IP adresini görebilmek için;

Kod:

raw *:*:echo -a $numeric - $4