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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 01 Temmuz 2007, 13:30   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Giriş Yasaklama Site Yasaklama




Arkadaşlar Benim Sitem Üzerinden Gelmeyenleri Mesela Mynet Gibi Apletten Gelenleri Yasaklamak İstiyorum Bunu Serevere Giren Kişileri Taratarak Nasıl Yaparım Ben Bir Code Yazdım Ama Loadlar Loadlamaz Tüm Herkesi Tarıyor Ben Böyle İstemiyorum Girdikçe Servere Girenleri Tarayacak Eğer Benim Sitemden Girmiyorsa Kline Atacak Mynet Usulu Bişey Mynetten Bir Arkadaştan Aldım ama Olmadı :S

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:SNOTICE:*:{ if $numeric == 327 { if $hget(codem,javacont) { if $query(%_:nick) { halt } if [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] !isin $8 { if [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]* iswm $8 { _linedance _okline %_:nick Asimavi } else { _linedance _okline %_:nick java } } } } if $numeric == 311 { .set %_:nick $2 } if $numeric == 302 { if (*m* iswm $gettok($2-,2,64)) || (*e* iswm $gettok($2-,2,64)) || (*o* iswm $gettok($2-,2,64)) { halt } if ($2- == $null) { echo -a 12 Nick Online Olmadığı İçin Kline Atılamadı | halt } if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 1) { if (*195.87* iswm $gettok($2-,2,64)) { echo -a %logo 4Mynet Erişim 2Kullandığı İçin 4 Script 2Sebebi İle Kline Atılmadı! | halt } | else { kline *@ $+ $gettok($2-,2,64) http:sohbet.mynet.com üzerinden geliniz 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } } if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 10) { kline *@ $+ $gettok($2-,2,64) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 5Üzerinden Giriş Yapınız.! 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 11) { kline *@ $+ $gettok($2-,2,64) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 5Üzerinden Giriş Yapınız.! 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } halt :son echo -a 4Kline Atıldı 2Nick: 7 $gettok($2-,1,61) 2İp: 7 $gettok($2-,2,64) $chan halt } alias checkjava { if $active ischan { var %i = 1,%chan,%chan2,%chan3,%chan4,%chan5,%chan6,%chan7 while %i <= $nick($active,0) { if $numtok(%chan,44) <= 45 { %chan = $addtok(%chan,$nick($active,%i),44) } elseif $numtok(%chan2,44) <= 45 { %chan2 = $addtok(%chan2,$nick($active,%i),44) } elseif $numtok(%chan3,44) <= 45 { %chan3 = $addtok(%chan3,$nick($active,%i),44) } elseif $numtok(%chan4,44) <= 45 { %chan4 = $addtok(%chan4,$nick($active,%i),44) } elseif $numtok(%chan5,44) <= 45 { %chan5 = $addtok(%chan5,$nick($active,%i),44) } elseif $numtok(%chan6,44) <= 45 { %chan6 = $addtok(%chan6,$nick($active,%i),44) } elseif $numtok(%chan7,44) <= 45 { %chan7 = $addtok(%chan7,$nick($active,%i),44) } inc %i } hadd -mu20 codem javacont on whois %chan if (%chan2) _linedance whois %chan2 if (%chan3) _linedance whois %chan3 if (%chan4) _linedance whois %chan4 if (%chan5) _linedance whois %chan5 if (%chan6) _linedance whois %chan6 if (%chan7) _linedance whois %chan7 } else { echo -ta Lütfen Aktif Kanalda Yazan... } } alias _okline { if (java == $2) { %userkl. [ $+ [ $1 ] ] = 10 | userhost $1 } if (mysev == $2) { %userkl. [ $+ [ $1 ] ] = 11 | userhost $1 } if ($2 == $null) { echo -a ******2Lütfen Sebep Belirtiniz (4reklam2/4script2/4nick2/4dost2) } } alias _linedance { if ($timer(.line.dance. $+ $cid) == $null) { hadd -m mynet.qcommand count. $+ $cid 1 hadd -m mynet.qcommand 1. $+ $cid $1- _dolinedance 1 } else { hinc -m mynet.qcommand count. $+ $cid hadd -m mynet.qcommand $hget(mynet.qcommand,count. $+ $cid) $+ . $+ $cid $1- } } alias _dolinedance { if ($hget(mynet.qcommand,$1 $+ . $+ $cid) != $null) { var %data = $ifmatch .timer.line.dance. $+ $cid -m 1 $calc(1500 - $gettok(1250 1000 750 500 250,$1,32)) _dolinedance $calc($1 + 1) %data } else hdel -w mynet.qcommand *. $+ $cid } menu channel { - ApleTciler:checkjava - }

Arkadaşlar Benim Sitem Üzerinden Gelmeyenleri Mesela Mynet Gibi Apletten Gelenleri Yasaklamak İstiyorum Bunu Serevere Giren Kişileri Taratarak Nasıl Yaparım Ben Bir Code Yazdım Ama Loadlar Loadlamaz Tüm Herkesi Tarıyor Ben Böyle İstemiyorum Girdikçe Servere Girenleri Tarayacak Eğer Benim Sitemden Girmiyorsa Kline Atacak Mynet Usulu Bişey Mynetten Bir Arkadaştan Aldım ama Olmadı :S

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:SNOTICE:*:{ if $numeric == 327 { if $hget(codem,javacont) { if $query(%_:nick) { halt } if [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] !isin $8 { if [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]* iswm $8 { _linedance _okline %_:nick Asimavi } else { _linedance _okline %_:nick java } } } } if $numeric == 311 { .set %_:nick $2 } if $numeric == 302 { if (*m* iswm $gettok($2-,2,64)) || (*e* iswm $gettok($2-,2,64)) || (*o* iswm $gettok($2-,2,64)) { halt } if ($2- == $null) { echo -a 12 Nick Online Olmadığı İçin Kline Atılamadı | halt } if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 1) { if (*195.87* iswm $gettok($2-,2,64)) { echo -a %logo 4Mynet Erişim 2Kullandığı İçin 4 Script 2Sebebi İle Kline Atılmadı! | halt } | else { kline *@ $+ $gettok($2-,2,64) http:sohbet.mynet.com üzerinden geliniz 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } } if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 10) { kline *@ $+ $gettok($2-,2,64) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 5Üzerinden Giriş Yapınız.! 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 11) { kline *@ $+ $gettok($2-,2,64) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 5Üzerinden Giriş Yapınız.! 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } halt :son echo -a 4Kline Atıldı 2Nick: 7 $gettok($2-,1,61) 2İp: 7 $gettok($2-,2,64) $chan halt } alias checkjava { if $active ischan { var %i = 1,%chan,%chan2,%chan3,%chan4,%chan5,%chan6,%chan7 while %i <= $nick($active,0) { if $numtok(%chan,44) <= 45 { %chan = $addtok(%chan,$nick($active,%i),44) } elseif $numtok(%chan2,44) <= 45 { %chan2 = $addtok(%chan2,$nick($active,%i),44) } elseif $numtok(%chan3,44) <= 45 { %chan3 = $addtok(%chan3,$nick($active,%i),44) } elseif $numtok(%chan4,44) <= 45 { %chan4 = $addtok(%chan4,$nick($active,%i),44) } elseif $numtok(%chan5,44) <= 45 { %chan5 = $addtok(%chan5,$nick($active,%i),44) } elseif $numtok(%chan6,44) <= 45 { %chan6 = $addtok(%chan6,$nick($active,%i),44) } elseif $numtok(%chan7,44) <= 45 { %chan7 = $addtok(%chan7,$nick($active,%i),44) } inc %i } hadd -mu20 codem javacont on whois %chan if (%chan2) _linedance whois %chan2 if (%chan3) _linedance whois %chan3 if (%chan4) _linedance whois %chan4 if (%chan5) _linedance whois %chan5 if (%chan6) _linedance whois %chan6 if (%chan7) _linedance whois %chan7 } else { echo -ta Lütfen Aktif Kanalda Yazan... } } alias _okline { if (java == $2) { %userkl. [ $+ [ $1 ] ] = 10 | userhost $1 } if (mysev == $2) { %userkl. [ $+ [ $1 ] ] = 11 | userhost $1 } if ($2 == $null) { echo -a ******2Lütfen Sebep Belirtiniz (4reklam2/4script2/4nick2/4dost2) } } alias _linedance { if ($timer(.line.dance. $+ $cid) == $null) { hadd -m mynet.qcommand count. $+ $cid 1 hadd -m mynet.qcommand 1. $+ $cid $1- _dolinedance 1 } else { hinc -m mynet.qcommand count. $+ $cid hadd -m mynet.qcommand $hget(mynet.qcommand,count. $+ $cid) $+ . $+ $cid $1- } } alias _dolinedance { if ($hget(mynet.qcommand,$1 $+ . $+ $cid) != $null) { var %data = $ifmatch .timer.line.dance. $+ $cid -m 1 $calc(1500 - $gettok(1250 1000 750 500 250,$1,32)) _dolinedance $calc($1 + 1) %data } else hdel -w mynet.qcommand *. $+ $cid } menu channel { - ApleTciler:checkjava - }

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Sohbet
Alt 05 Temmuz 2007, 13:09   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Giriş Yasaklama Site Yasaklama




Hocam Yok mu Konuya Bir Cevap Yazacak Arkadaş Ya :S

 
Alıntı ile Cevapla

Alt 05 Temmuz 2007, 13:38   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Giriş Yasaklama Site Yasaklama




Taratıcaksın ama mesela mynetten girenle senin kullanıcın arasında ne farklar var? Ident farkı varsa, [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] adresine ident yazarak 987654321 tane kod bulabilirsin.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 05 Temmuz 2007, 13:44   #4
CipriX
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Giriş Yasaklama Site Yasaklama




hayır bize bir kod vermişsin &#231;alışma prensibini bilmediğimiz 200 tane tok'dan oluşan ve bizden yardım istiyorsun bunun yerine Bize "Benim sunucuma java girsin sadece.. Javanın &#246;zellikleri şu &#214;RN: version cevabı identd'i fullnamesi vs.." desen biz sana veririz o kodu zaten

 
Alıntı ile Cevapla

Alt 05 Temmuz 2007, 19:16   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Giriş Yasaklama Site Yasaklama




CipriX Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
hayır bize bir kod vermişsin çalışma prensibini bilmediğimiz 200 tane tok'dan oluşan ve bizden yardım istiyorsun bunun yerine Bize "Benim sunucuma java girsin sadece.. Javanın özellikleri şu ÖRN: version cevabı identd'i fullnamesi vs.." desen biz sana veririz o kodu zaten

Hocam Benim İstediğim Kod' Şu :
Benim Sitem Üzerinden GirmeyenLere Kline Atacak Siteye Giren Her Useri Tarayacak Yani ( on *:SNOTICE:*:{ ) Girdikten Sonra Taramıycak Serverde Olanları Yani Fakat İlk Girişte Tarama Yapacak İdent Java Java User Myneti Örnek Göstermemin Bir Sebebide Bu Oradaki Tüm Özellikleri Aynı Fakat Ben Mynetten Bir Arkadaştan Aldım Düzenleyemedim O Yüzden Vermiştim Kodu Bende Elimden Geldiği Kadar Yardım Etmek İsterim Elimdeyse Elinizden Geliyorsa Yardım Edin İstedim Gelmiyorsa Eyvallah Derim Ne Yapalım Hayırlısı

 
Alıntı ile Cevapla

Alt 05 Temmuz 2007, 20:33   #6
CipriX
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Giriş Yasaklama Site Yasaklama




ozaman identd'i Java olanları alman için kod verebilirim sana İstersen tabi ?

Bide bitane snotice verirsen giriş için..


Konu CipriX tarafından (05 Temmuz 2007 Saat 20:43 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
giris, giriş, mirc, mirc download, mirc indir, site, yasaklama


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
IP yasaklama . PyrO Unreal IRCd 2 02 Temmuz 2009 15:49
/L yasakLama KurtaLan mIRC Scripting Sorunları 20 28 Ağustos 2008 13:06
ip yasaklama hipokrat Unreal IRCd 3 06 Kasım 2007 23:18