Çevrimdışı

/echo yerine /msg kullan o nun için

 

Çevrimdışı

©º©º®î©º Nickli Üyeden Alıntı

;;@Giris/Cikis Penceresinde veya menual pencerede görünen ;[23:36] *** Notice -- Client connecting on port 6669: Auth ( Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. ) [clients] ;[23:36] *** Notice -- Client exiting: Auth ( Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. ) [Quit] ; giriş ve cıkışlar gibi ip lere tek tık ile K:line atar.. on ^1:SNOTICE:*:{ if (exiting isin $1-) { if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis } echo 4 -t @Giris/Cikis Çıkış : $1- | halt } if (Connecting isin $1-) { if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis } echo 3 -t @Giris/Cikis Giriş : $1- | halt } halt } on ^1:HOTLINK:*.*.*:*:{ if ( $active = #) { halt } else { if (@ isin $1) { $x:CoCoRiCo($1,2) return $1 } } halt } on *:HOTLINK:*.*.*:*:{ if ($active = #) { halt } else { if (@ isin $1) { $x:CoCoRiCo($1,1) } } } alias -l X:CoCoRiCo { if ($2 = 1 ) { var %q $mid($1,$pos($1,@),$len($1)) var %x $calc($len(%q) - 1 ) Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. :ban secenegi (Kline) .Kline $+(*,$left(%q,%x)) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] echo 4:lined ip $+(*,$left(%q,%x)) } if ($2 = 2 ) { var %q $mid($1,$pos($1,@),$len($1)) var %x $calc($len(%q) - 1 ) Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x)) } }

Arkadaşım verdiğin Komutu Remote'a atıp Statuste IP'ye tıkladiğim Zaman Direk Şu hayati veriyor
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!

Sebebi Nedir Acaba ?

 

Çevrimdışı

MeGaBytE Nickli Üyeden Alıntı

Arkadaşım verdiğin Komutu Remote'a atıp Statuste IP'ye tıkladiğim Zaman Direk Şu hayati veriyor [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! [AyOpS] TITLEBAR: Geçersiz Bir Komut! Sebebi Nedir Acaba ?

Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x))
bu kısmı
Titlebar : K:LINED EDILECEK! $+(*,$left(%q,%x))
bu sekilde degiştir. : noktayı ayırırsan sorun cıkmaz.

__________________
2b|!2b=?

 

Çevrimdışı

Arkadaşımızın verdiği kodları çalıştıramayanlar bide bunu denesin

alt+R yapında mirc dosyası çıkar oraya altda yazanı kopyala

On ^1:SNOTICE:*connecting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c7 @ConnExit $4-
if ($len($9) >= 9) {
%a = $left($9,4)
%i = 0
%bukadar = 0
while (%i < 4) {
inc %i
%b = $mid(%a, %i,1)
if (%b isin qwrtypsdfghjklzxcvbnm) {
inc %bukadar
}
}
if (%bukadar == 4) {
%glineho = $pos($10,@,1) + 1
%glinehos = $mid($10, %glineho, $len($10) - 1)
%uzun = $len(%glinehos) - 1
%glinehost = $left(%glinehos, %uzun)
aline -c4 @ConnExit G-line $9 %glinehost
gline *@ $+ %glinehost +365d : trojan
unset %glineho
unset %glinehos
unset %uzun
unset %glinehost
inc %glinecount
}
unset %bukadar
}
}
haltdef
}
On ^1:SNOTICE:*exiting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c12 @ConnExit $4-
haltdef
}

Sonra alieas a gel ve altda olan $eyide oraya kopyala

spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline sayısı: %klinecount
unset %klinecount
window -c @ConnExit
}
}

/spam yaptığında bi pencere çıkacak. Bu çıkan pencerede giriş çıkışları gösterir. Tek tıkla at gitsin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kolay gelsin

 

Çevrimdışı

SONRA Unknown command
SPAM Unknown command

şu kodu tam olarak verebilecek biri yokmu , hala &#231;alıştıramadım denildiği gibi

 

Çevrimdışı

İkisindede hata yok

 

Çevrimdışı

Anti Spam offLine
Toplam Kline sayısı:
-
SONRA Unknown command
-
SPAM Unknown command
-
Anti Spam OnLine.
-
SONRA Unknown command
-
SPAM Unknown command
-
Anti Spam offLine
Toplam Kline sayısı:
-
SONRA Unknown command
-
SPAM Unknown command
-

pencere açılıyor kapanıyor kafasına gore anlamadım:S

 

Çevrimdışı

ALT+R ye basarak mIRC editoru acin
ve asagidaki kodu remote kismina ekleyin...



menu @ConnExit {
dclick: {
%satir = $line(@ConnExit, $1)
%glineho = $pos(%satir,@,1) + 1
%hede = $pos(%satir,[,1) - 2
%bukadar = %hede - %glineho
%glinehoo = $mid(%satir, %glineho, %bukadar)
aline -c4 @ConnExit G-Line %glinehoo
dline @ConnExit $1
gline *@ $+ %glinehoo +90d : 1S14pam12/1T14rojan 1N14edeniyle 1B14anlandınız. [Nick]
unset %satir
unset %hede
unset %bukadar
unset %glineho*
}
}
On ^1:SNOTICE:*connecting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c7 @ConnExit $4-
if ($len($9) >= 9) {
%a = $left($9,4)
%i = 0
%bukadar = 0
while (%i < 4) {
inc %i
%b = $mid(%a, %i,1)
if (%b isin qwrtypsdfghjklzxcvbnm) {
inc %bukadar
}
}
if (%bukadar == 4) {
%glineho = $pos($10,@,1) + 1
%glinehos = $mid($10, %glineho, $len($10) - 1)
%uzun = $len(%glinehos) - 1
%glinehost = $left(%glinehos, %uzun)
aline -c4 @ConnExit G-line $9 %glinehost
gline *@ $+ %glinehost +365d : 1S14pam12/1T14rojan 1N14edeniyle 1B14anlandınız. [Nick]
unset %glineho
unset %glinehos
unset %uzun
unset %glinehost
inc %glinecount
}
unset %bukadar
}
}
haltdef
}
On ^1:SNOTICE:*exiting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c12 @ConnExit $4-
haltdef
}
}
daha sonra aliases sekmesine geliyor ve asagidaki kodu ekliyoruz
-------------------------------------------------------»
spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline sayısı: %klinecount
unset %klinecount
window -c @ConnExit
}
}

-----------------------------------------------------------------------


Bu iki kismi ekledikten sonra OK tusuna basip Editorumuzu kapatiyoruz. İşlem bu kadar Şimdi geldik kullanmaya

/spam yazdiginiz vakit
Anti Spam OnLine.
der ve ayri bir pencere acilir.


Mause ile giris cikislara tiklayarak gline atabilirsiniz. Trojanlar girer girmez cikarlar ciktiklari
zaman mause ile tiklayip gline atabilirsiniz.
Kapatmak icin yine komut
/spam

Anti Spam offLine
Toplam Kline sayısı:

 

Çevrimdışı

©º©º®î©º Nickli Üyeden Alıntı

Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x)) bu kısmı Titlebar : K:LINED EDILECEK! $+(*,$left(%q,%x)) bu sekilde degiştir. : noktayı ayırırsan sorun cıkmaz.

usta dediğini yaptım gerçekten sorun vermedi ama bu seferde
[13:53:08] -Irc.Haydi.NET- *** Global -- from webchat.haydi.net: Clone Alert: 5 clients from 88.226.169.233

şekiLde olan IP'leri tıkLamıyor

İdent ve IP'yi yanyana bulunduranları tıklıyor;

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
gibi acaba ba$ında @ işareti bulunmadiğindan mi kaynaklanıyor diğerinin tıklanmamasi,yoksa dediğim gibi identle IP'in yanyana oldugu durumlarda mi tıklıyor sadece ?

 

Çevrimdışı

Alience Nickli Üyeden Alıntı

on *:HOTLINK:*.*.*:*:{ if ($active = #) { halt } else { if (@ isin $1) { $x:CoCoRiCo($1,1) } } } yerine ctrl tusuna basıp ta hotlinki kullanmak daha mantıklı olur gibime geliyor böylece yanlış tıklama olayını egale etmiş oluruz. on ^*:HOTLINK:*.*.*:*:{ } on *:HOTLINK:*.*.*:*:{ if ( $mouse.key & 2 ) { if ($active = #) { halt } else { if (@ isin $1) { $x:CoCoRiCo($1,1) } } } }

usta yapsanda bunu bir şey deişmiyor yine tıklama ile Oluyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.