Otomatik proxy ban atma hakkında yardım. - Sayfa 4 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

AsaF · 18 Mart 2018, 21:13

pckopat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Arkadaşın verdiği koddan yola çıkarak senin sisteme göre uyarladım denedim her türlü yani proxy.txt dosyasında olmayana atıyor mu diye denedim ve 3 farklı ip ekleyip denedim calıştı. Sende dener misin duruma göre bilgilendirirsin.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#giris: {
  if (connecting isin $2-) {
    if $read(proxy.txt,w,$remove($token($7,2,64),$chr(41))) {
      gzline *@ $+ $remove($token($7,2,64),$chr(41)) - Proxy Girişi Yasaktır.
    }
  }
}

Hocam Bu Koda Takıben Txt DeıLde GunLuk Proxy SiteLırınden Proxy Cekme EkLeme Imkanımız Varmı Acaba Yanı Oto Cekılen Proxy Ipler Txt Dosyasına Aktarılsın

Alper · 19 Mart 2018, 00:01

AsaF Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Hocam Bu Koda Takıben Txt DeıLde GunLuk Proxy SiteLırınden Proxy Cekme EkLeme Imkanımız Varmı Acaba Yanı Oto Cekılen Proxy Ipler Txt Dosyasına Aktarılsın

Öyle kod varsa sende yani siteden proxy çeken kod ona göre uyarlanabilir.

Daemon · 19 Mart 2018, 10:21

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:start:_al
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
alias _güncel {
  if $lines(proxy.txt) == 0 { _al | return } 
  echo -a Proxy list güncellendi toplam4 $lines(proxy.txt) 
  sockclose *proxy* 
  unset %* 
  .timercycle 1 5 kontrol 
}
alias _al {
  .remove proxy.txt
  .timercycle off
  var %::rand $md5($ticks)
  sockopen $+(_proxy6,%::rand) proxyserverlist24.blogspot.com.tr 80
  ipal
  $+(.timer,qproxy) 1 20 _güncel 
}
alias _ekle {
  if !$read(proxy.txt,w,$1) { 
    .write proxy.txt $1
  }
}

alias ipal { .remove proxy.txt | sockclose 12proxytext | sockopen 12proxytext 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:sockopen:12proxytext*:{
  var %s sockwrite -n $sockname
  %s GET / HTTP/1.1 
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf

}
on *:sockread:12proxytext*:{
  var %63 | sockread %63
  if (*timestamp-link*.html* iswm %63) {
    3ekproxyal $+(/,$token($token(%63,4,39),3-,47))
  }
}
alias 3ekproxyal {
  var %rand $rand(0,999999999)
  sockopen $+(3ekproxytext,%rand) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
  sockmark $+(3ekproxytext,%rand) $1
}

on *:sockopen:3ekproxytext*:{
  var %s sockwrite -n $sockname
  %s GET $+(/,$sock($sockname).mark) HTTP/1.1 
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf
}
on *:sockread:3ekproxytext*:{
  var %63 | sockread %63
  if (*.*:* iswm %63) && (*a* !iswm %63) {
    var %ip $token($htmlfree(%63),1,32)
    _ekle %ip
  }
}

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#giris: {
  if (connecting isin $2-) {
    if $read(proxy.txt,w,$remove($token($7,2,64),$chr(41))) {
      gline *@ $+ $remove($token($7,2,64),$chr(41)) - Proxy Girişi Yasaktır.
    }
  }
}

Buradan cekebilirsin. / 900 saniyede 1 yenileyecektir.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Proxy Hakkında Ufak Bir yardım Talabi	BaBuR	mIRC Scripting Sorunları	2	10 Nisan 2016 01:03
uyardıktan sonra otomatik bütün kanallardan atma	adigeragip	mIRC Scripting Sorunları	27	27 Kasım 2014 15:17
Kanala Otomatik Link Atma	bøCek	mIRC Scripting Sorunları	0	30 Nisan 2010 02:55
Proxy IP Leri proxy.data dosyasından okutarak servere girişte zline atma	ExrimCi	mIRC Scripting Sorunları	4	26 Şubat 2010 15:11
deop'ken otomatik atma	fener1907	mIRC Scripting Sorunları	8	10 Mart 2009 14:36

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.