Kod: Kodu kopyalamak için üzerine çift tıklayın!
package require http
bind raw * notice tor_join
proc tor_join {from keyword text} {
if {![string match -nocase "*client connecting*" $text] || [string match -nocase "*!*@*" $from]} { return 0;}
set uhost [lindex [split $text] 9]
set q [lindex [split $uhost @] 1]
::http::config -useragent "UserAgent"
set url [::http::geturl "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.15000]
set data [::http::data $url]
::http::cleanup $url
regexp -- {<div class="ueberschrift">(.*?)</div>} $data "" listed
regsub -all {\n} $data {} data
if {[string match -nocase "*blacklist for*" $listed] && [string match -nocase "*Schwarze Liste*" $listed]} {
putquick "gzline *@$q :bizi tercih ettiğiniz için teşekkür ederiz...Selametle güzel insan evladı..."
} else {
return 0
}
}
putlog "ok..."
şurda tarama / kontrol yapan sitelerin bir listesi var
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]tamamına olmasada çoğuna baktım..
baktıklarımın büyük bölümüde ölmüştü.. hala aktif olanlarsa büyük ölçüde böyle bir iş için sorunluydu.. ya captcha / onay kodu isteniyor sorgulama için yada site
son derece yavaş/geç cevap veriyordu..
içlerinde bana göre en sağlıklı/hızlı çalışanı bu...
(ayrıca sadece Ip'leri değil tor hostlarınıda tarayabiliyor ayrıca dnslookup yaptırmak gerekmiyor.onlar kendi hallediyor ..böylede bi güzelliği var)
ayrıca benim bildiğim kadarıyla burası bir datacenter almanya'da yanlışım yoksa ya hamburg ya bremen'de olmalı...
(bir alman arkadaşla vakti zamanında sohbet ederken konusu geçmişti..)
eğerki bir sorgu sınırlaması vs gibi bi korumaları yoksa site üzerinde,
yani yoğun girişlerde arka arkaya sorgu yapmak durumda kalacaktır bot.böyle bir flood koruması varsa sitelerinde problem olacaktır.
ancak onun dışında sanırım bulunabilecek en sağlam yerlerden biri olmalı bu iş için...
sorgu için sağlam bir site bulmak çokda kolay değil gibi görünüyor...