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
-
}
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.
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Giriş Yasaklama Site Yasaklama
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
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ı