mIRC Scripting  


Geri dön   mIRC Scripting > mIRC Scripting > Showcase - Hazır kodlar

Showcase - Hazır kodlar mIRC Scripting hakkında hazır kodları bulup, paylaşabileceğiniz bölüm.

Cevapla
 
LinkBack Seçenekler
  #1  
Alt 16 Temmuz 2017, 12:18
Che - ait Kullanıcı Resmi (Avatar)
Che Che isimli Üye şimdilik offline konumundadır

mS Puan: 1
mS Derece: Che
 
Üyelik tarihi: 19 Ağustos 2015
Bulunduğu yer: Ankara
Mesajlar: 38
Konular: 38
Eklentiler: 1
Alınan Teşekkür: 4
Yapılan Teşekkür: 2
Standart Basit Bir Proxy Koruması

Remote'nin mIRC'e eklenmesi

Merhabalar Sayın arkadaşlar. Öncelikle mIRC scripting'inizde Alt+R kombinasyonuna basarak mIRC Remote kısmını acınız. Boş bir satıra aşağıdaki Kodları Ekleyiniz.

Eğer ayrı bir remote olarak eklemek istiyorsanız :

//run $mircdir

Komutu ile mIRC'inizin ana dizinini açınız ve orda yeni bir .txt oluşturunuz.
oluşturdunuğunuz txt içerisine aşağıdaki Code'i ekleyiniz

Kod:
#####Proxy Koruması ßy Proxy##########

on *:start:ipal | $+(.timer,ipal) 0 5000 /ipal
#proxy off
alias proxy_ { if ($1) { inc %_ | sockopen $+(proxy*,%_) www.simpleproxylist.com 80 | sockmark $+(proxy*,%_) $1 } }
on *:sockopen:proxy*:{ var %s sockwrite -n $sockname | %s GET /info.php?ip= $+ $sock($sockname).mark HTTP/1.1 | %s Host: www.simpleproxylist.com | %s $crlf }
on *:sockread:proxy*:{ var %v | sockread $htmlfree(%v) | .tokenize 32 $htmlfree(%v) | if (Proxy: <b> isin %v) { gzline $+(*@,$sock($sockname).mark) 1h 1IP adresinizde 4PROXY 1girişi tespit edilmiştir. 1mIRC7Turk7System4™ } }
on *:snotice:*on*port*: { .who +I $9 }
on *:snotice:*changed his/her nickname*:{ .who +I $11 }
raw 352:*:{
  if $read(proxy.txt,w,$+(*,$4,*)) { gzline $+(*@,$4) +1h 1IP adresinizde 4PROXY 1girişi tespit edilmiştir. | return }
  ptara $4
  proxy_ $4
}
alias htmlfree {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x), %x = $remove(%x,&nbsp;)
  return %x
}
alias ptara {
  var %f = $gettok($1-,1,46),%f2 = $gettok($1-,1-2,46),%ip = $1,%l = $gettok($1-,$numtok($1-,46),46),%n = $2
  if $regex(%ip,/(\d+\.\d+\.\d+\.\d+)) {
    if $regex(%f,/(78|88|85|95|81)) { goto end }
    if $regex(%f2,/(84\.(154|26|13)|190\.(184|43|131|208|166|80|207)|193\.3|216\.(6|152)|62\.(120|217|248|29)|194\.(208|27|154)|217\.(17|131|64)|195\.(87|42|17(4|5))|94\.(79|54|78|96|98|99|242|100)|195\.214|213\.(236|161|211|21|14|153|194|43|204|248|14|43|38|14|248|159|153|204)|212\.(62|38|77|29|213|58|12|33|45|48|50|58|64|98|133|2|33|253|64|2|238|146|17(4|5)|33)|62\.29|144\.122|217\.164|195\.(33|142|4|74|244|17(4|5))|217\.131|195\.214|82\.(223|209|71|115)|62\.248|193\.140|94\.12(2|0|3|1|4))) { goto end }
    if $regex(%f2,/(76\.14|149\.254|92\.45|78\.27|121\.210|90\.148|41\.(208|250|233|201|209)|201\.(244|210)|91\.(191|112|177|176|180|140)|89\.(241|5|148|252|146|211)|87\.(109|101)|79\.(141|85|123|172|114))) { goto end }
    if $regex(%f2,/(82\.(145|101|211)|94\.97|64\.55|62\.74|93\.(88|91|182)|86\.(121|91|99|108)|83\.(93|228|238|149|66)|62\.(29|85|108|113|248)|139\.179|80\.(120|241|210|69|86|63|71|78)|144\.122|155\.233|160\.75|161\.9|168\.139|193\.(140|192|243|255)|194\.(27|54)|195\.(33|46|64|74|87|112|142|155|174|214|244|254)|212\.(2|12|15|29|31|33|45|48|50|57|58|64|65|79|98|101|108|109|115|125|127|133|146|154|156|174|252)|213\.(14|43|74|138|139|148|153|159|161|186|194|202|204|232|238|243|248|254|31|131|169|174|195))) { goto end }
    gzline $+(*@,%ip) - 2Sunucumuza proxy/tor/socks/wingate ile girmek yasak!
  }
  :end
}
#proxy end 

menu channel,menubar {
  » Proxy Koruması
  .» Proxy Koruması Aç:.enable #proxy | echo -a « 2.Seviye Proxy Koruması Acılmışdır. »
  .-
  .» Proxy Koruması Kapat:.disable #proxy | echo -a « 2.Seviye Proxy Koruması Kapatıldı. »
}
alias ipal { .remove proxy.txt | sockclose links | sockopen links anonymouse.org 80 }
on *:sockopen:links:{ var %:links sockwrite -n $sockname | %:links GET /cgi-bin/anon-www.cgi/http://proxies24.blogspot.com/ HTTP/1.1 | %:links Host: anonymouse.org | %:links $crlf }
on *:sockread:links:{ 
  var %links | sockread %links | .tokenize 32 %links
  if (*#more* iswm %links) { return }
  if (*<a href='http://anonymouse.org/cgi-bin/anon-www.cgi/http://proxies24.blogspot.com/201*</a> iswm %links) {
    var %rand $rand(10,999999) | sockopen $+(ipal,%rand) anonymouse.org 80 | sockmark $+(ipal,%rand) $gettok($gettok(%links,7-,47),1,39)
  }
}
on *:sockopen:ipal*:{ var %:ipal sockwrite -n $sockname | %:ipal GET /cgi-bin/anon-www.cgi/http://proxies24.blogspot.com/ $+ $sock($sockname).mark  HTTP/1.1 | %:ipal Host: anonymouse.org | %:ipal $crlf }
on *:sockread:ipal*:{ var %ipal | sockread %ipal | .tokenize 32 %ipal | if (*.*.*:* iswm %ipal) && (*a* !iswm %ipal) { write proxy.txt %ipal } }
on *:sockclose:ipal*:{ $+(.timer,ipcek1) 1 5 sockopen ipcek1 multiproxy.org 80 }
on *:sockopen:ipcek1:{ var %:ipcek1 sockwrite -n $sockname | %:ipcek1 GET /txt_all/proxy.txt HTTP/1.1 | %:ipcek1 Host: multiproxy.org | %:ipcek1 $crlf }
on *:sockread:ipcek1:{ var %:ipcek1 | sockread %:ipcek1 | .tokenize 32 %:ipcek1 | if (*.*.*:* iswm %:ipcek1) && (*a* !iswm %:ipcek1) { write proxy.txt %:ipcek1 } }
on *:sockclose:ipcek1:{ sockopen ipcek2 ircproxy.net 80 }
on *:sockopen:ipcek2:{ var %:ipcek2 sockwrite -n $sockname | %:ipcek2 GET /proxy.txt HTTP/1.1 | %:ipcek2 Host: ircproxy.net | %:ipcek2 $crlf }
on *:sockread:ipcek2:{ var %:ipcek2 | sockread %:ipcek2 | .tokenize 32 %:ipcek2 | if (*.*.* iswm %:ipcek2) && (*a* !iswm %:ipcek2) { write proxy.txt %:ipcek2 } }
on *:sockclose:ipcek2:{ sockopen ipcek3 tubeincreaser.com 80 }
on *:sockopen:ipcek3:{ var %:ipcek3 sockwrite -n $sockname | %:ipcek3 GET /proxylist.txt HTTP/1.1 | %:ipcek3 Host: tubeincreaser.com | %:ipcek3 $crlf }
on *:sockread:ipcek3:{ var %:ipcek3 | sockread %:ipcek3 | .tokenize 32 %:ipcek3 | if (*.*.*:* iswm %:ipcek3) && (*a* !iswm %:ipcek3) { write proxy.txt %:ipcek3 } }
on *:sockclose:ipcek3:{ sockopen ipcek4 proxylists.net 80 }
on *:sockopen:ipcek4:{ var %:ipcek4 sockwrite -n $sockname | %:ipcek4 GET /socks4.txt HTTP/1.1 | %:ipcek4 Host: proxylists.net | %:ipcek4 $crlf }
on *:sockread:ipcek4:{ var %:ipcek4 | sockread %:ipcek4 | .tokenize 32 %:ipcek4 | if (*.*.*:* iswm %:ipcek4) && (*a* !iswm %:ipcek4) { write proxy.txt %:ipcek4 } }
on *:sockclose:ipcek4:{ echo -a Proxy list güncellendi4 $lines(proxy.txt) ip mevcut. }
on *:text:*:#opers:{ if $1 == !ac { .enable #proxy | msg # 2.Seviye Proxy Koruması Açıldı } | if $1 == !kapat { .disable #proxy | msg # 2.Seviye Proxy Koruması Kapatıldı. } }

Not: #Opers kanalında !ac & !kapat komutu ile korumayı açık kapatabilirsiniz.
Alıntı ile Cevapla
Sponsored Links
Cevapla

Etiketler
basit, bir, koruması, proxy

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
badnick koruması nikotinx Snippets - Parça kodlar 0 05 Ocak 2017 13:35
proxy koruması yardım Sandalci Help - Yardım 5 18 Ekim 2016 23:59
repeat koruması comanche Help - Yardım 1 14 Eylül 2016 13:49
Clone Koruması Freez0ne Help - Yardım 1 10 Aralık 2013 16:57
Basit TOR/Proxy/Hızlıgiriş Koruma Botu (Sock) Mudin Snippets - Parça kodlar 1 08 Ocak 2012 17:08


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting©
Powered by vBulletin®
Copyright © 2000-2015, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76