|
Paint Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
ya aslında çok zor bir iş değil giren kişiye hemen bot sorgulama yapacak ve senin istemediğin servis sağlayacı ile bağlanıyorsa zline atacak.
zaten servis sağlayıcı kesin gösteren kodum var dedin bot göstereceğine yani msg yapacağı yeri sil koddan onun yerine /var $+(%,servis,+,$nick) bot dsli hangi değişkenle yazdırıyorsa onu yaz bot kişinin servis sağlayıcısını bir değişken olarak kaydetsin sonra da girişi kontrol etcek bir kod yaz ve içine :
if $+(%,servis,+,$nick) == İstemediğin ISS { /zline $nick }
sanırım bu şekilde olur...
|
Ulke bulucu kod aşağıda hangi kısımlar tam olarak:
Kod: Kodu kopyalamak için üzerine çift tıklayın!
raw 340:*:{
if $2- == $null { msg $chan Ulkesine Baktığınız Nick - %ulkenick - Sunucumuzda Online Değil, Lütfen Başka Bir Nick Deneyiniz. | halt }
set %ulkenick $remove($gettok($2-,1,61),*)
set %ulkeip $gettok($2-,2,64)
ulkebul
halt
}
#ulke off
alias ulkebul {
sockclose ulke
sockopen ulke
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
}
#ulke end
on *:sockopen:ulke:{
if ($sockerr) { msg $chan İşlem Gerçekleştirilemedi Lütfen Daha Sonra Tekrar Deneyin | halt }
sockwrite -n $sockname GET /lookups/iplocation.asp?ipaddress= $+ %ulkeip HTTP/1.1
sockwrite -n $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $clrf
}
on *:sockread:ulke:{
var %ulkeoku
sockread %ulkeoku
if (%ulkeoku != $null) {
if (*>City<* iswm %ulkeoku) { msg %operkanali 2 $+ %ulkenick Sehir :4 $remove(%ulkeoku,<tr><td align="right">City</td><td><b>,</b></td></tr>, ) }
if (*State*or*Region* iswm %ulkeoku) { msg %operkanali 2 $+ %ulkenick Bolge :4 $remove(%ulkeoku,<tr><td align="right">State or Region</td><td><b>,</b></td></tr>, ) }
if (*>Country<* iswm %ulkeoku) { msg %operkanali 2 $+ %ulkenick Ulke :4 $remove(%ulkeoku,<tr><td align="right">Country</td><td><b>,</b></td></tr>, ) }
if (*>ISP<* iswm %ulkeoku) { msg %operkanali 2 $+ %ulkenick Baglandigi ADSL :4 $remove(%ulkeoku,<tr><td align="right">ISP</td><td><b>, </b></td></tr>, ) | sockclose $sockname }
}
}
on *:text:*:%operkanali:{
if ($1 == .ulke) {
if ($sock(ulke)) { msg $chan Suanda Baska Bir Nick'in Bilgilerine Bakılıyor Lütfen Daha Sonra Tekrar Deneyin | halt }
enable #ulke
timer 0 5 /disable #ulke
set %ulkenick $remove($2,*)
set %mesajnick $nick
userip $2
msg $chan Lütfen Bekleyiniz...
msg $chan $2 Nick'inin ISP Adresi Kontrol Ediliyor..
}
}
Sanırım buna gerek kalmaz sock kod ile olabilir diye düşünüyorum, mirc real name koruması eş zamanlı gibi bir kontrol söz konusu.
İlla kanala girmeyecek statuste iken atacak diye bir husus yok 1-2 sn. de kanalda kalmasinda herhangi bir sakınca yok, çünkü saldiriyi yaparken bi köeden izliyor.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.