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

43Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 28 Mayıs 2020, 01:24   #51
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




Öncelikle selam arkadaşlar Alper arkadaşımız gerçekten güzel bir kod yapmış eline sağlık
6.21 mirc kullanan ve bu kodu kullanan arkadaşlarımız varsa ve /sockwrite: 'pro693740904332' bağlı değil (satır 47, script 25.ini) gibi hata gören varsa kodu aşağıdaki gibi eklerseler sorun çözülecektir herkese hayırlı ifler..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start:{ ykle | ykle1 | ykle2 | .connect_ aç | korumaontheircd | .proal_ | .timeral 0 18000 .proal_ } alias ykle { $iif(!$isfile(proxip.hs),.write proxip.hs) | .hmake proxip 100 | .hload proxip proxip.hs } alias ykle1 { $iif(!$isfile(krlst.hs),.write krlst.hs) | .hmake krlst 100 | .hload krlst krlst.hs } alias ykle2 { $iif(!$isfile(prox.hs),.write prox.hs) | .hmake prox 100 | .hload prox prox.hs } alias korumaontheircd { .set %prox on | .set %aynidnt off | .set %:yon off | .set %:vpn off } alias korumaontheircdfull { .set %prox on | .set %aynidnt on | .set %:vpn on } alias korumaoff { .set %prox off | .set %aynidnt off | .set %:vpn off } alias proal_ { if $hget(Proxy) { .hfree -sw Proxy } var %::rand $r(1,999999) sockopen $+(alpro,%::rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 $+(.timer,otoproxy) 1 40 guncelpro } alias guncelpro { echo -sat Proxy list güncellendi toplam4 $hget(Proxy,0).data } alias connect_ { if ($1 = aç) debug -i on connect_ if ($1 = kapat) debug off tokenize 32 $1- if $1 = <- && $3 = NOTICE { if ($9 == connecting) && ($level($13) != muafnick) && ($level($remove($token($14,2,64),$chr(41))) != muafips) { var %:r = $r(1,999999999999), %ip2 = $remove($token($14,2,64),$chr(41)) .sockopen $+(pro,%:r) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 | sockmark $+(pro,%:r) $+($remove($token($14,2,64),$chr(41)),¿,$13) if (%aynidnt = on) && ($13 === $right($gettok($14,1,64),-1)) { kill $13 7Nickiniz13&4Identiniz 8Aynıdır 9Değişiriniz %ver1 } if (%prox == on) { if $hget(proxy,%ip2) { kline $+(*@,%ip2) +0 2Sunucumuza 4Proxy/Tor/Socks/Wingate 2ile girmek yasak!! %ver1 } elseif $hfind(prox,$13,1,W).data { kline $13 +0 8Yasaklı 7Nick 4Olarak 9Algılandınız. %ver1 } elseif $hfind(proxip,%ip2,1,W).data { kline $+(*@,%ip2) +0 7Proxy 4Olarak 9Algılandınız. %ver1 } elseif $hfind(krlst,$+($13,!,$remove($14,$chr(40),$chr(41))),1,W).data { kline $13 +0 7Sunucuya 4Girişiniz 9Yasaklanmıştır. 6! %ver1 } } } } } on *:sockopen:pro*:{ if ($sockerr) { .sockclose $sockname | return } sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro | tokenize 32 $left(%:pro,800) if (IP Country: isin %:pro) && (*Turkey* iswm $token($htmlfree(%:pro),2,58) ) && (%:yon == on) { .inc %:yici if (%:yici >= 2) { .set %:yon off | .unset %:yici } } if (IP Country: isin %:pro) && (*Turkey* !iswm $token($htmlfree(%:pro),2,58) ) { if ($token($sock($sockname).mark,2,191) != $read(nickmuaf.txt)) { .inc -u3 %:yd?s? if (%:yon == on) { kline $+(*@,$token($sock($sockname).mark,1,191)) +0 7Yurtdışı 4Girişi 9Yasaktır. 6! %ver1  } elseif (%:yd?s? >= 7) { .set %:yon on | echo -at [ Yurt Dışı Girişi ] - Yurt Dışı Girişleri Kapatıldı. } } } if (ISP Provider: isin %:pro) { var %sglyc = $token($htmlfree(%:pro),2,58) if (Virtua isin %sglyc) { kline $+(*@,$token($sock($sockname).mark,1,191)) +0 7Proxy 4Girişi 9Yasaktır. 6! %ver1  } elseif (%:vpn == on) { if (Services isin %sglyc) || (Ocean isin %sglyc) || (SG.GS isin %sglyc) || (SurfEasy isin %sglyc) || (ISPPro isin %sglyc) || (WorldStream isin %sglyc) || (SoftLayer isin %sglyc) || (OVH isin %sglyc) || (Liteserver isin %sglyc) { kline $+(*@,$token($sock($sockname).mark,1,191)) +0 7Vpn 4Kullanımı 9Yasaktır. 6! %ver1  } } } if (%:yon == off) { if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) window -e $+ @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],-,$token($server,2,46)) echo -t $+ @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],-,$token($server,2,46)) 2[ 4Giriş 2] *** Nick:4 %:n 3- IP:4 %ip 3- Ulke:4 %ülke 3- Sehir:4 %sehir 3- ISP:4 %:isp 3- Saat:4 $timestamp .hfree -sw %:n sockclose $sockname } } } on *:sockopen:alpro*:{ var %:proal sockwrite -n $sockname | %:proal GET / HTTP/1.1 | %:proal Host: Socks 24 | %:proal User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:48.0) Gecko/20100101 Firefox/48.0 | %:proal Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 | %:proal Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 | %:proal Connection: keep-alive | %:proal $crlf + $crlf } on *:sockread:alpro*:{ var %proal | sockread %proal | if (*timestamp-link*.html* iswm %proal) { var %rand $rand(10,999999) | .sockopen $+(hpsproal,%rand) Socks 24 80 | .sockmark $+(hpsproal,%rand) $token($token(%proal,3-,47),1,39) } } on *:sockopen:hpsproal*:{ var %:proalhps sockwrite -n $sockname | %:proalhps GET / $+ $sock($sockname).mark HTTP/1.1 | %:proalhps Host: Socks 24 | %:proalhps $crlf + $crlf } on *:sockread:hpsproal*:{ var %proalhps | sockread %proalhps | if $regex(%proalhps,(\d+\.\d+\.\d+\.\d+)) { .hadd -m Proxy $regml(1) IP } } on *:input:*:{ if $regex($1,/^[!\.]korumaon$/Si) { .korumaontheircd | echo -sat Koruma Açık } if $regex($1,/^[!\.]korumaoff$/Si) { .korumaoff | echo -sat Koruma Kapalı } if $regex($1,/^[!\.]korumafullon$/Si) { .korumaontheircdfull | echo -sat Koruma Full Açık } if $regex($1,/^[!\.]pr[oO]xyn[ıiİ][cçÇ]k$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen nick belirtiniz | return } if $hfind(prox,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz Nick Zaten Listede mevcut $+([,$chr(32),$hget(prox,$hfind(prox,$strip($3),1,W).data),$chr(32),]) Eslesen Veri. | return } var %n = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m prox %n $strip($3) .hsave -o prox prox.hs .timer -h 1 500 msg # Proxy Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # $qt($nick) Lütfen Nick belirtin | return } if !$hfind(prox,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) Proxy Nick Listesinde Bulunmamaktadır. | return } .hdel -m prox $hfind(prox,$strip($3),1,W).data .hsave -o prox prox.hs .timer -h 1 500 msg # Proxy Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(prox,0).data == 0) { .timer -h 1 500 msg # Proxy Nick Listesi bos. | return } .timer -h 1 500 msg # - var %:ya = 1 | while (%:ya <= $hget(prox,0).data) { .timer -h 1 500 msg # %:ya $+ ) [ $hget(prox,%:ya).data ] | inc %:ya } .timer -h 1 500 msg # - } } if $regex($1,/^[!\.]pr[oO]xy[ıiİ]p$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen IP belirtin | return } if $hfind(proxip,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz IP Zaten Listede mevcut $+([,$chr(32),$hget(proxip,$hfind(proxip,$strip($3),1,W).data),$chr(32),]) Eslesen Veri.. | return } var %:r = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m proxip %:r $strip($3) .hsave -o proxip proxip.hs .timer -h 1 500 msg # Proxy IP Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen IP belirtin | return } if !$hfind(proxip,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) Proxy IP Listesinde Bulunmamaktadır. | return } .hdel -m proxip $hfind(proxip,$strip($3),1,W).data .hsave -o proxip proxip.hs .timer -h 1 500 msg # Proxy IP Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(proxip,0).data == 0) { .timer -h 1 500 msg # Proxy IP Listesi bos. | return } .timer -h 1 500 msg # - var %:g = 1 | while (%:g <= $hget(proxip,0).data) { .timer -h 1 500 msg # %:g $+ ) [ $hget(proxip,%:g).data ] | inc %:g } .timer -h 1 500 msg # - } } if $regex($1,/^[!\.]m[uU]afn[ıiİ][cçÇ]k$/Si) { if $2 == list { .timer -h 1 500 msg $chan listeleniyor. var %:mnck = 1, %mnc = $ulist(*,muafnick,0) .timer -h 1 500 msg $chan - Toplam Muaf Nick Sayısı:4 %mnc while %:mnck <= %mnc { .timer -h 1 500 msg $chan $+(%:mnck,$chr(41)) $iif($ulist(*,muafnick,%:mnck) == $nick,$+(,$v1,),$v1) inc %:mnck 1 } } if $2 == ekle { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen eklenecek nicki yazınız | return } if $ulist($3,muafnick,1) { .timer -h 1 500 msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafnick $3- .timer -h 1 500 msg $chan $+(",,$3,,") Muaf Nick Listesine Eklendi } if $2 == sil { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen silinecek Nicki Yazınız | return } .ruser muafnick $3- | .timer -h 1 500 msg $chan $+(",,$3,,") Muaf nick Listesinden Silindi } } if $regex($1,/^[!\.]m[uU]af[ıiİ]p$/Si) { if $2 == list { .timer -h 1 500 msg $chan listeleniyor. var %:mips = 1, %mip = $ulist(*,muafips,0) .timer -h 1 500 msg $chan - Toplam Muaf IP Sayısı:4 %mip while %:mips <= %mip { .timer -h 1 500 msg $chan $+(%:mips,$chr(41)) $iif($ulist(*,muafips,%:mips) == $nick,$+(,$v1,),$v1) inc %:mips 1 } } if $2 == ekle { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen eklenecek IP - HOST yazınız | return } if $ulist($3,muafips,1) { .timer -h 1 500 msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafips $3- .timer -h 1 500 msg $chan $+(",,$3,,") Muaf IP Listesine Eklendi } if $2 == sil { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen silinecek IP - HOST Yazınız | return } .ruser muafips $3- | .timer -h 1 500 msg $chan $+(",,$3,,") Muaf IP Listesinden Silindi } } if $regex($1,/^[!\.]karal[ıiİ]ste$/Si) { if (!2) { .timer -h 1 500 msg # Kullanımı: !karaliste ekle/sil/list | return } if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen FullAdres belirtiniz | return } if $hfind(krlst,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz Zaten KaraListede mevcut $+([,$chr(32),$hget(krlst,$hfind(krlst,$strip($3),1,W).data),$chr(32),]) Eslesen Veri. | return } var %n1 = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m krlst %n1 $strip($3) .hsave -o krlst krlst.hs .timer -h 1 500 msg # KaraListeye Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # $qt($nick) Lütfen Nick belirtin | return } if !$hfind(krlst,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) KaraListede Bulunmamaktadır. | return } .hdel -m krlst $hfind(krlst,$strip($3),1,W).data .hsave -o krlst krlst.hs .timer -h 1 500 msg # KaraListeden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(krlst,0).data == 0) { .timer -h 1 500 msg # KaraListe bos. | return } .timer -h 1 500 msg # - var %:ya = 1 | while (%:ya <= $hget(krlst,0).data) { .timer -h 1 500 msg # %:ya $+ ) [ $hget(krlst,%:ya).data ] | inc %:ya } .timer -h 1 500 msg # - } } }



Konu Che tarafından (28 Mayıs 2020 Saat 19:49 ) değiştirilmiştir. Sebep: Code tag içine alındı
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 12 Haziran 2020, 01:26   #52
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




Merhaba Alper

bir ricam olacaktı, karaliste.txt de bulunan ip leri sunucu girşinde gline atılmasını istiyorum

bu konuda remote olarak yardım edebilirmisin.

teşekkürler

 
Alıntı ile Cevapla

Alt 12 Haziran 2020, 11:31   #53
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




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

bir ricam olacaktı, karaliste.txt de bulunan ip leri sunucu girşinde gline atılmasını istiyorum

bu konuda remote olarak yardım edebilirmisin.

teşekkürler

Kaç tane ip mevcut txt dosyasında az ise bu kodda bulunan karaliste özelliğini kullanabilirsin.

__________________
Davut Alper BALCI - pC`kOpAt
 
Alıntı ile Cevapla

Alt 20 Haziran 2020, 00:36   #54
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




SenatoR-SuVaRi Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Öncelikle selam arkadaşlar Alper arkadaşımız gerçekten güzel bir kod yapmış eline sağlık
6.21 mirc kullanan ve bu kodu kullanan arkadaşlarımız varsa ve /sockwrite: 'pro693740904332' bağlı değil (satır 47, script 25.ini) gibi hata gören varsa kodu aşağıdaki gibi eklerseler sorun çözülecektir herkese hayırlı ifler..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start:{ ykle | ykle1 | ykle2 | .connect_ aç | korumaontheircd | .proal_ | .timeral 0 18000 .proal_ } alias ykle { $iif(!$isfile(proxip.hs),.write proxip.hs) | .hmake proxip 100 | .hload proxip proxip.hs } alias ykle1 { $iif(!$isfile(krlst.hs),.write krlst.hs) | .hmake krlst 100 | .hload krlst krlst.hs } alias ykle2 { $iif(!$isfile(prox.hs),.write prox.hs) | .hmake prox 100 | .hload prox prox.hs } alias korumaontheircd { .set %prox on | .set %aynidnt off | .set %:yon off | .set %:vpn off } alias korumaontheircdfull { .set %prox on | .set %aynidnt on | .set %:vpn on } alias korumaoff { .set %prox off | .set %aynidnt off | .set %:vpn off } alias proal_ { if $hget(Proxy) { .hfree -sw Proxy } var %::rand $r(1,999999) sockopen $+(alpro,%::rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 $+(.timer,otoproxy) 1 40 guncelpro } alias guncelpro { echo -sat Proxy list güncellendi toplam4 $hget(Proxy,0).data } alias connect_ { if ($1 = aç) debug -i on connect_ if ($1 = kapat) debug off tokenize 32 $1- if $1 = <- && $3 = NOTICE { if ($9 == connecting) && ($level($13) != muafnick) && ($level($remove($token($14,2,64),$chr(41))) != muafips) { var %:r = $r(1,999999999999), %ip2 = $remove($token($14,2,64),$chr(41)) .sockopen $+(pro,%:r) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 | sockmark $+(pro,%:r) $+($remove($token($14,2,64),$chr(41)),¿,$13) if (%aynidnt = on) && ($13 === $right($gettok($14,1,64),-1)) { kill $13 7Nickiniz13&4Identiniz 8Aynıdır 9Değişiriniz %ver1 } if (%prox == on) { if $hget(proxy,%ip2) { kline $+(*@,%ip2) +0 2Sunucumuza 4Proxy/Tor/Socks/Wingate 2ile girmek yasak!! %ver1 } elseif $hfind(prox,$13,1,W).data { kline $13 +0 8Yasaklı 7Nick 4Olarak 9Algılandınız. %ver1 } elseif $hfind(proxip,%ip2,1,W).data { kline $+(*@,%ip2) +0 7Proxy 4Olarak 9Algılandınız. %ver1 } elseif $hfind(krlst,$+($13,!,$remove($14,$chr(40),$chr(41))),1,W).data { kline $13 +0 7Sunucuya 4Girişiniz 9Yasaklanmıştır. 6! %ver1 } } } } } on *:sockopen:pro*:{ if ($sockerr) { .sockclose $sockname | return } sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro | tokenize 32 $left(%:pro,800) if (IP Country: isin %:pro) && (*Turkey* iswm $token($htmlfree(%:pro),2,58) ) && (%:yon == on) { .inc %:yici if (%:yici >= 2) { .set %:yon off | .unset %:yici } } if (IP Country: isin %:pro) && (*Turkey* !iswm $token($htmlfree(%:pro),2,58) ) { if ($token($sock($sockname).mark,2,191) != $read(nickmuaf.txt)) { .inc -u3 %:yd?s? if (%:yon == on) { kline $+(*@,$token($sock($sockname).mark,1,191)) +0 7Yurtdışı 4Girişi 9Yasaktır. 6! %ver1  } elseif (%:yd?s? >= 7) { .set %:yon on | echo -at [ Yurt Dışı Girişi ] - Yurt Dışı Girişleri Kapatıldı. } } } if (ISP Provider: isin %:pro) { var %sglyc = $token($htmlfree(%:pro),2,58) if (Virtua isin %sglyc) { kline $+(*@,$token($sock($sockname).mark,1,191)) +0 7Proxy 4Girişi 9Yasaktır. 6! %ver1  } elseif (%:vpn == on) { if (Services isin %sglyc) || (Ocean isin %sglyc) || (SG.GS isin %sglyc) || (SurfEasy isin %sglyc) || (ISPPro isin %sglyc) || (WorldStream isin %sglyc) || (SoftLayer isin %sglyc) || (OVH isin %sglyc) || (Liteserver isin %sglyc) { kline $+(*@,$token($sock($sockname).mark,1,191)) +0 7Vpn 4Kullanımı 9Yasaktır. 6! %ver1  } } } if (%:yon == off) { if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) window -e $+ @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],-,$token($server,2,46)) echo -t $+ @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],-,$token($server,2,46)) 2[ 4Giriş 2] *** Nick:4 %:n 3- IP:4 %ip 3- Ulke:4 %ülke 3- Sehir:4 %sehir 3- ISP:4 %:isp 3- Saat:4 $timestamp .hfree -sw %:n sockclose $sockname } } } on *:sockopen:alpro*:{ var %:proal sockwrite -n $sockname | %:proal GET / HTTP/1.1 | %:proal Host: Socks 24 | %:proal User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:48.0) Gecko/20100101 Firefox/48.0 | %:proal Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 | %:proal Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 | %:proal Connection: keep-alive | %:proal $crlf + $crlf } on *:sockread:alpro*:{ var %proal | sockread %proal | if (*timestamp-link*.html* iswm %proal) { var %rand $rand(10,999999) | .sockopen $+(hpsproal,%rand) Socks 24 80 | .sockmark $+(hpsproal,%rand) $token($token(%proal,3-,47),1,39) } } on *:sockopen:hpsproal*:{ var %:proalhps sockwrite -n $sockname | %:proalhps GET / $+ $sock($sockname).mark HTTP/1.1 | %:proalhps Host: Socks 24 | %:proalhps $crlf + $crlf } on *:sockread:hpsproal*:{ var %proalhps | sockread %proalhps | if $regex(%proalhps,(\d+\.\d+\.\d+\.\d+)) { .hadd -m Proxy $regml(1) IP } } on *:input:*:{ if $regex($1,/^[!\.]korumaon$/Si) { .korumaontheircd | echo -sat Koruma Açık } if $regex($1,/^[!\.]korumaoff$/Si) { .korumaoff | echo -sat Koruma Kapalı } if $regex($1,/^[!\.]korumafullon$/Si) { .korumaontheircdfull | echo -sat Koruma Full Açık } if $regex($1,/^[!\.]pr[oO]xyn[ıiİ][cçÇ]k$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen nick belirtiniz | return } if $hfind(prox,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz Nick Zaten Listede mevcut $+([,$chr(32),$hget(prox,$hfind(prox,$strip($3),1,W).data),$chr(32),]) Eslesen Veri. | return } var %n = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m prox %n $strip($3) .hsave -o prox prox.hs .timer -h 1 500 msg # Proxy Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # $qt($nick) Lütfen Nick belirtin | return } if !$hfind(prox,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) Proxy Nick Listesinde Bulunmamaktadır. | return } .hdel -m prox $hfind(prox,$strip($3),1,W).data .hsave -o prox prox.hs .timer -h 1 500 msg # Proxy Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(prox,0).data == 0) { .timer -h 1 500 msg # Proxy Nick Listesi bos. | return } .timer -h 1 500 msg # - var %:ya = 1 | while (%:ya <= $hget(prox,0).data) { .timer -h 1 500 msg # %:ya $+ ) [ $hget(prox,%:ya).data ] | inc %:ya } .timer -h 1 500 msg # - } } if $regex($1,/^[!\.]pr[oO]xy[ıiİ]p$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen IP belirtin | return } if $hfind(proxip,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz IP Zaten Listede mevcut $+([,$chr(32),$hget(proxip,$hfind(proxip,$strip($3),1,W).data),$chr(32),]) Eslesen Veri.. | return } var %:r = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m proxip %:r $strip($3) .hsave -o proxip proxip.hs .timer -h 1 500 msg # Proxy IP Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen IP belirtin | return } if !$hfind(proxip,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) Proxy IP Listesinde Bulunmamaktadır. | return } .hdel -m proxip $hfind(proxip,$strip($3),1,W).data .hsave -o proxip proxip.hs .timer -h 1 500 msg # Proxy IP Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(proxip,0).data == 0) { .timer -h 1 500 msg # Proxy IP Listesi bos. | return } .timer -h 1 500 msg # - var %:g = 1 | while (%:g <= $hget(proxip,0).data) { .timer -h 1 500 msg # %:g $+ ) [ $hget(proxip,%:g).data ] | inc %:g } .timer -h 1 500 msg # - } } if $regex($1,/^[!\.]m[uU]afn[ıiİ][cçÇ]k$/Si) { if $2 == list { .timer -h 1 500 msg $chan listeleniyor. var %:mnck = 1, %mnc = $ulist(*,muafnick,0) .timer -h 1 500 msg $chan - Toplam Muaf Nick Sayısı:4 %mnc while %:mnck <= %mnc { .timer -h 1 500 msg $chan $+(%:mnck,$chr(41)) $iif($ulist(*,muafnick,%:mnck) == $nick,$+(,$v1,),$v1) inc %:mnck 1 } } if $2 == ekle { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen eklenecek nicki yazınız | return } if $ulist($3,muafnick,1) { .timer -h 1 500 msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafnick $3- .timer -h 1 500 msg $chan $+(",,$3,,") Muaf Nick Listesine Eklendi } if $2 == sil { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen silinecek Nicki Yazınız | return } .ruser muafnick $3- | .timer -h 1 500 msg $chan $+(",,$3,,") Muaf nick Listesinden Silindi } } if $regex($1,/^[!\.]m[uU]af[ıiİ]p$/Si) { if $2 == list { .timer -h 1 500 msg $chan listeleniyor. var %:mips = 1, %mip = $ulist(*,muafips,0) .timer -h 1 500 msg $chan - Toplam Muaf IP Sayısı:4 %mip while %:mips <= %mip { .timer -h 1 500 msg $chan $+(%:mips,$chr(41)) $iif($ulist(*,muafips,%:mips) == $nick,$+(,$v1,),$v1) inc %:mips 1 } } if $2 == ekle { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen eklenecek IP - HOST yazınız | return } if $ulist($3,muafips,1) { .timer -h 1 500 msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafips $3- .timer -h 1 500 msg $chan $+(",,$3,,") Muaf IP Listesine Eklendi } if $2 == sil { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen silinecek IP - HOST Yazınız | return } .ruser muafips $3- | .timer -h 1 500 msg $chan $+(",,$3,,") Muaf IP Listesinden Silindi } } if $regex($1,/^[!\.]karal[ıiİ]ste$/Si) { if (!2) { .timer -h 1 500 msg # Kullanımı: !karaliste ekle/sil/list | return } if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen FullAdres belirtiniz | return } if $hfind(krlst,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz Zaten KaraListede mevcut $+([,$chr(32),$hget(krlst,$hfind(krlst,$strip($3),1,W).data),$chr(32),]) Eslesen Veri. | return } var %n1 = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m krlst %n1 $strip($3) .hsave -o krlst krlst.hs .timer -h 1 500 msg # KaraListeye Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # $qt($nick) Lütfen Nick belirtin | return } if !$hfind(krlst,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) KaraListede Bulunmamaktadır. | return } .hdel -m krlst $hfind(krlst,$strip($3),1,W).data .hsave -o krlst krlst.hs .timer -h 1 500 msg # KaraListeden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(krlst,0).data == 0) { .timer -h 1 500 msg # KaraListe bos. | return } .timer -h 1 500 msg # - var %:ya = 1 | while (%:ya <= $hget(krlst,0).data) { .timer -h 1 500 msg # %:ya $+ ) [ $hget(krlst,%:ya).data ] | inc %:ya } .timer -h 1 500 msg # - } } }


Merhabalar


belirtilen koddaki sitede ip kayıt şekli değiştiğinden dolayı kod çalışmamaktadır eski sistem;

104.248.63.17:30588

yeni sistem ;

104.248.63.17:30588@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]4 $0sec#United States

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] arkadaşımız bu konuda size yardımcı olacabileceğini sanıyorum.

Saygılarımla


Konu KTeknoloji tarafından (20 Haziran 2020 Saat 00:37 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 20 Haziran 2020, 01:40   #55
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




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


belirtilen koddaki sitede ip kayıt şekli değiştiğinden dolayı kod çalışmamaktadır eski sistem;

104.248.63.17:30588

yeni sistem ;

104.248.63.17:30588@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]4 $0sec#United States

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] arkadaşımız bu konuda size yardımcı olacabileceğini sanıyorum.

Saygılarımla


Bununla ilgisi yok yer bulma koduyla alakalı bir sorun. Şuan çalışıyor olması lazım site aktif gözüküyor.

__________________
Davut Alper BALCI - pC`kOpAt
 
Alıntı ile Cevapla

Alt 14 Ocak 2021, 22:46   #56
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], Başkan böyle güzel, işlevsel bi kod yazmışsın söylemiyorsun da elimdekiyle uğraştırıyorsun beni. (; Eline, emeğine sağlık gerçekten faydalı olabilecek kullanışlı bir KOD girişte çok az Proxy çekse de diğer işlevleri de iş görür. Peki bu koda bana vermiş olduğun proxylist de ki proxyleri toplu şekilde ekletsek? !proxyekle *@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].24.* gibi

__________________
Dünya Tanrı'nın bir görünümü değil, Şeytan'ın bir yalanı'dır
 
Alıntı ile Cevapla

Alt 15 Ocak 2021, 09:13   #57
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




High 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...], Başkan böyle güzel, işlevsel bi kod yazmışsın söylemiyorsun da elimdekiyle uğraştırıyorsun beni. (; Eline, emeğine sağlık gerçekten faydalı olabilecek kullanışlı bir KOD girişte çok az Proxy çekse de diğer işlevleri de iş görür. Peki bu koda bana vermiş olduğun proxylist de ki proxyleri toplu şekilde ekletsek? !proxyekle *@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].24.* gibi


Proxynin neden az çekildiğini üst postlarda belirtmiştim. Söylediğin şekilde çalışmıyor korumalar *@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].24.* değil de 154.24.* olarak eklenebilir.

__________________
Davut Alper BALCI - pC`kOpAt
 
Alıntı ile Cevapla

Alt 15 Ocak 2021, 11:33   #58
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], Başkan senin o toplu proxy ekleme kodunu buna göre uyarlasan daha güzel olmaz mı? Proxy Siteleriyle alakalı da istersen yardımcı olabilirim. Güncel elimde bayağı bi site mevcut.
154.24.* gibi eklense de işlev aynı iş görür(;

__________________
Dünya Tanrı'nın bir görünümü değil, Şeytan'ın bir yalanı'dır
 
Alıntı ile Cevapla

Alt 15 Ocak 2021, 19:15   #59
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




High Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
154.24.* gibi eklense de işlev aynı iş görür


Bende onu demek istemiştim aslında
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.




Bu arada şuan için yapamam şehir dışındayım ve çalışıyorum. Gerçi aksilik çıkmazsa yarın memlekete gideceğim. Boş vaktim olunca neden olmasın.

__________________
Davut Alper BALCI - pC`kOpAt
 
Alıntı ile Cevapla

Alt 30 Ocak 2021, 10:50   #60
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Proxy Koruması Güncel(Debug/Socket)




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Başkan sende ki şu toplu Proxy ekleme kodunu bu güzel KOD'a ek yapacaktın vaktin olursa bekliyoruz bilgine. (;

__________________
Dünya Tanrı'nın bir görünümü değil, Şeytan'ın bir yalanı'dır
 
Alıntı ile Cevapla

Cevapla

Etiketler
debug, karaliste, korumasi, proxy


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

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 Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Clone Koruması Proxy Koruması ve SaldırıProgramına OnLem KOdu Lazım neobre mIRC Scripting Sorunları 13 09 Ekim 2009 00:07
Proxy Koruması ( Koruma Icın Proxy Lıstesı Lazım) Heavenly mIRC Scripting Sorunları 2 05 Temmuz 2009 20:09