IP'ye tıklama ile Kline atmak. - Sayfa 4 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Alience · 01 Ocak 2006, 13:12

/echo yerine /msg kullan o nun için

MeGaBytE · 14 Ağustos 2006, 11:14

©º©º®î©º 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 ?

CoCoRiCo · 15 Ağustos 2006, 22:54

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.

ASA · 16 Ağustos 2006, 05:01

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

aLoSs · 18 Ağustos 2006, 11:54

SONRA Unknown command
SPAM Unknown command

şu kodu tam olarak verebilecek biri yokmu , hala çalıştıramadım denildiği gibi

ASA · 18 Ağustos 2006, 19:31

İkisindede hata yok

TrusTy · 19 Ağustos 2006, 15:40

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

ASA · 19 Ağustos 2006, 18:19

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ı:

MeGaBytE · 20 Ağustos 2006, 13:47

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 ?

MeGaBytE · 20 Ağustos 2006, 13:53

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.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Franz Kline Biyografisi - Franz Kline Kimdir - Franz Kline Hayatı	AftieL	Ressamlar	1	09 Ocak 2024 13:05
Şaka Sevmiyorsan Tıklama	Ay	Komedi ve Mizah	2	06 Mart 2012 13:30
resime tıklama	fener1907	mIRC Scripting Sorunları	7	14 Ekim 2010 01:25
mause çift tıklama sorunu	kurugaddere	mIRC Scripting Sorunları	1	11 Temmuz 2008 01:21

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.