Tekil Mesaj gösterimi
Alt 30 Ağustos 2016, 13:36   #3
Çevrimdışı
immortaL
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
Cevap: Proxy Koruması



Bende Böyle Yaptım;

-Proxy Koruması ac
-Proxy Koruması kapat
-Proxy Muaf Ekle
-Proxy Muaf Toplam
-Muaf liste
-Proxy Tara

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
menu * { .- .Proxy Koruması .- ..- ..Proxy ...Durum $+($chr(40),$iif($group(#Proxy) = On,Acik,Kapali),$chr(41)):echo 3 -a *** Proxy Koruması $iif($group(#Proxy) = On,Acik,Kapali) Durumda. ...- ...Ac:.enable #Proxy | Echo 3 -a *** Proxy Koruması acilmistir. ...Kapat:.disable #Proxy | echo 3 -a *** Proxy korumasi kapatilmistir. ...- .Proxy Muaf ..Proxy Muaf $+($chr(40),IP,$chr(32),$hget(pm,0).item,$chr(41)) :echo 3 -a *** Proxy muaf listesinde toplam $hget(pm,0).item IP adresi vardir. ..- ..Ekle:muaf ekle $$?" $+ $me Ip Adresi Giriniz. $str($crlf,2) $+ Wildcard kullanabilirsiniz. 78.21.* seklin de ekleme yapabilirsiniz." ..Sil:Muaf sil $$?"Silmek istediginiz IP adresini yaziniz." ..- ..Liste:Muaf liste .- .Proxy Tara:Who +I * } #Proxy off on *:snotice:*Client connecting*:.who +I $token($token($4-,2,58),1,32) raw 352:*:{ var %:r $+($left($md5($ticks),$r(5,20)),$6) sockopen $+(proxy,%:r) toprak.xyz 80 sockmark $+(proxy,%:r) $+($4,¿,$6) } on *:sockopen:proxy*:{ sockwrite -nt $sockname GET $+(/?ip=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host: $sock($sockname).addr sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */* sockwrite -nt $sockname Accept-Language: tr-TR sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729) sockwrite -nt $sockname Connection: Keep-Alive sockwrite -nt $sockname $crlf } on *:sockread:proxy*:{ if ($sockerr) { .sockclose $sockname | return } var %:proxy | sockread -f %:proxy | tokenize 32 %:proxy if $regex($1-,/numaral[ıiİ] [Iİi]P proxy\'dir/i) { gline $+(*@,$token($sock($sockname).mark,1,191)) +5h Proxy Yasak.. $+([,$token($1-,2,45),]) $iif($chan(#BotKontrol),msg #BotKontrol (4PROXY GİRİŞ) $regsubex($token($token($1-,2,62),1,60),/(\d+\.\d+\.\d+\.\d+)/,$+($chr(2),\1,$chr(2)))) sockclose $sockname return } } #Proxy end



Konu immortaL tarafından (30 Ağustos 2016 Saat 13:40 ) değiştirilmiştir.
  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı