mIRC Scripting - Proxy Killer 2.0b

mIRC Scripting (https://www.mircscripting.net/)

- Snippets - Parça kodlar (https://www.mircscripting.net/snippets-parca-kodlar/)

- - Proxy Killer 2.0b (https://www.mircscripting.net/snippets-parca-kodlar/239-proxy-killer-2-0b.html)

evet v1.X senin için daha uygun

Çok sıkı bir iş.

Kod:

alias deb {

  debug -i db debg debg

}

alias debg {

  tokenize 32 $1-

  echo -s : $1- 

}

on ^*:snotice:*: {

  if (*client*connect*on*port* iswm $1-) {

    tr $remove($gettok($10,2,64),$chr(40),$chr(41),$chr(6 4))

    $iif(!$window(@giris-cıkıs), window -fen @giris-cıkıs verdana 9)

    echo 5 @giris-cıkıs $1-

  }

  halt

}

alias po {

  return  21 22 23 33 47 56 54 81 70 1046 1080 1182 1183 1184 1188 1214 1278 1279 1745 1795 2124 2172 2173 2174 2175 2301 3128 3124 3127 4480 5463 6667 6588 8080 8000 8001 8118 8888 8922 10102 26260 31337 44322

}

alias tr {

  set %prx $ticks 

  .dns $1 

  set %ip  $1 | var %pi = 1

  while (%pi <= $gettok($po,0,32)) {

    var %ki = $gettok($po,%pi,32) 

    sockopen $+(prx-,$1,-,$md5($+($r(a,z),$r(1,999),$ticks,$r(A,Z)))) %ip %ki  

    inc %pi

  }

  ;echo 4 Taranan portlar:3 $gettok($po,0,32) (Ad.) :2 $po

}

on *:sockopen:*prx-*: {

  if ($sockerr) { sockclose $sockname | return }

  ;echo 2 IP: $sock($sockname).ip $chr(32)4PORT: $sock($sockname).port 4TIP: $sock($sockname).type 4AÇIK\KAPALI: $portfree($sockerr) 4HATA\WS_Err: $sock($sockname).wserr 4MESAJ\WS_Msg: $sock($sockname).wsmsg 

  if ($portfree($sockerr))  {

    var %ipsikim $sock($sockname).ip

    gzline $+(*@,$sock($sockname).ip) 1D 1Proxy yasaktır. Lütfen 4irc.mynet.com 1sohbet kurallarına uyunuz!

    sockclose $+(*,$sock($sockname).ip,*)

    $iif(!$window(@Proxy-sik),window -fen @Proxy-sik verdana 9,echo @Proxy-sik GzlineD %ipsikim Proxy taramasından geçemeyen ip pasif edildi. )

    return 

  }

  .sockclose $sockname

}

on *:sockread:prx-*:{ 

  if ($sockerr > 0) { echo :HATA: $sock($sockname).wserr | return }

  ; echo 4 -s :---> $sock($sockname).ip $sock($sockname).port 

  sockclose  $sockname

}

on *:dns:{

  if (%prx) {

    var %di = $dns(0)

    while (%di > 0) {

      echo 2 $chr(32) 4DNS: $dns(%di) 4ADRES: $dns(%di).addr \ $dns(%di).ip

      dec %di

    }

    unset %prx | unset %ip

    halt

  }

  unset %prx | unset %ip

}

Ümit abi yine senin düzenlemiş olduğun bi kod buldum. Bu bana göre daha kullanışlı gibi ancak şöyle birşey var. Çok sık olmasa da proxy olmayan iplere de işlem yapıyo örneğin 78.165.... gibi port 6667 bunun için portları mı düzenlemeliyim. Yani 6667 portunu silmemmi gerekli cod orjinal kalsın diye uğraşıyorum o bakımdan..

alias po {
return 21 22 23 33 47 56 54 81 70 1046 1080 1182 1183 1184 1188 1214 1278 1279 1745 1795 2124 2172 2173 2174 2175 2301 3128 3124 3127 4480 5463 6667 6588 8080 8000 8001 8118 8888 8922 10102 26260 31337 44322
}

Genelde modemlerin 80-81 portu kullanmasından kaynaklanıyor, bu
yüzden 2.0 da modem ayrıstırma yetenegi eklemiştim..
Tabi bu ilk yazdıgımda yoktu bu yüzden en pratik cözüm port
listesinden 80-81i silmek olur ki zaten 80-81 web proxy olur irc ye
pek baglantı veren olmaz.

code da bir cok hata vardı bunları düzelttim şimdilik sorun görünmüyor göresel ara yüz ve kullanıcı arayüzü hazırlamam için kodun sorunsuz oldugundan emin olmak istiyorum deneyen arkadasların
hataları bildirmesini rica ediyorum.

Ümit abi güncel versiyonu deneme fırsatım olmadı.. Ama 1 ncisi çok sağlam olmuş.. heLaL oLsun

Alıntı:

WeiLSiDe Nickli Üyeden Alıntı (Mesaj 904)

Ümit abi güncel versiyonu deneme fırsatım olmadı.. Ama 1 ncisi çok sağlam olmuş.. heLaL oLsun

güncel olan cok daha iyi farklı sunucularda kullanılabilir
yada networklerde her linkten bir bot girip denetim yapar
hassaslıgı cok daha etkili
ve gercek kullanıcılar ile botların baglantıları ayırabiliyor
geliştirmeye devam ediyoum vakit buldukca..

2.0 Networkler için ideal

Sunucu sahipleri için 2.0 gercekten güzel bi çalışma. Atarsın sunucuya proxy felan giremez. Ancak ben kişisel, kendi scriptimde kullandığım için 2.0 versiyonu pek bana gelmiyo. Fakat son sürümde şahsi kullanıcılar için düzenlemeler yapılırsa hiç fena olmaz diye düşünüyorum. 2 şekilde de gayet güzel olmuş abi. Eline sağlık

CoCoRiCo eline emegine saglık.yalnız bi türlü kuramadım bi yardımcı olabilirmisin

şöyle bir durum var, proxykiller girdiginde kodun ekli oldugu bota gzline atiyor sebebi nedir bulamadim ?

++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz. Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.

FLINK: mIRC Offical - Hasan AYDENİZ - Koli - KARMA - Karma Aydınlatma

mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials