Tekil Mesaj gösterimi
Alt 01 Nisan 2011, 02:49   #1
Çevrimdışı
RegSubex
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Tüm kanal ban <satıra tıkla> <nicke tıkla>




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*:hotlink:*:#:return on *:hotlink:*:*:{ ;satıra tıklayıp atmak ıcın set %dbgy $qt($hotline) | set %dbgysk 3< $+ $1 $+ 3> $gettok($hotline,2,62) | set %dbgyc $remove($gettok(%dbgy,2,60),:) | ucur $strip($remove($gettok(%dbgyc,1,62),:) ) } ;nicke tıklayıp kodu calıştırmak ıcın ;set %dbg $iif($1 ison #,$1,$iif($3 ison #,$3)) | set %dbgysk 3< $+ $1 $+ 3> $gettok($hotline,2,62) | ucur %dbg alias ucur { var %x = $comchan($1,0) var %a = 1 while %a <= %x { echo -a mode $comchan($1,%a) +b $1 %dbgysk echo -a mode $comchan($1,%a) +b $address($1,4) %dbgysk echo -a kick $comchan($1,%a) $1 %dbgysk inc %a } }


Kodun özelliği bulundugunuz kanalda satıra tıklayıp o satırı yazan kişiyi tüm kanallarda nicke ve ipe ban kick seklinde sunucudan uzaklaştırır.

;nicke tıklayıp kodu calıştırmak ıcın
;set %dbg $iif($1 ison #,$1,$iif($3 ison #,$3)) | set %dbgysk 3< $+ $1 $+ 3> $gettok($hotline,2,62) | ucur %dbg


on *:hotlink:*:*:{
;satıra tıklayıp atmak ıcın
set %dbgy $qt($hotline) | set %dbgysk 3< $+ $1 $+ 3> $gettok($hotline,2,62) | set %dbgyc $remove($gettok(%dbgy,2,60),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
| ucur $strip($remove($gettok(%dbgyc,1,62),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

}

ustteki kırmızı yerleri değiştirirseniz satıra tıklamayla değil kanal genelinde nicke tıklamayla belirtilen şekilde sunucudan o nicki uzaklaştırır

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver