Aylık Arşiv Şubat, 2008
11 Sayfa: « Ä°lk Sayfa ... « 4 5 6 [7] 8 9 10 » ... Son Sayfa »Port Engelleme Kodu
Cumartesi, Åžubat 9th, 2008
Belirtilen Port’tan sunucuya baÄŸlananlara otomatik olarak gline atmanızı saÄŸlar.
Aşağıdaki kodda bu port 6667 olarak düzenlenmiştir.
on *:snotice:*Client connecting*: if 6667* iswm $8 { gline $9 sebebin | halt }
Join Flood Koruması
Cumartesi, Şubat 9th, 2008Yetkilisi olduğunuz kanala 5 saniye içerisinde 4 giriş olduğunda kanalı otomatik olarak
+mR modlarına almanızı 20 saniye sonra -mR yaparak korumayı devredışı bırakmanızı sağlar.
on *:join:#:{ inc -u5 $+(%,$chan) | if ($($+(%,$chan),2) > 4) { mode $chan +mR | .timer 1 20 mode $chan -mR } }
Deop Durumda Çalışan BadNick Koruması
Cumartesi, Şubat 9th, 2008Bu kod meşgul durumdayken deop konumuna geçenlerin badnick korumasını kullanabilmesini sağlamaktadır. badnick.txt ismiyle bir dosya oluşutup atılmasını istediğiniz nickleri bu dosyaya yazın. Dosyayı mIRC klasörünün ana dizinine yerleştirin. Siz deop durumdayken kanala bu listede yer alan bir nick girdiğinde otomatik olarak operator konumuna geçip nicki kanaldan atmanızı akabinde tekrar deop olmanızı sağlar.
on *:join:#: {
var %bdn […]
AutoMSG Koruması
Cumartesi, Şubat 9th, 2008Yetkilisi olduğunuz kanala giriş yaptığınızda o kanalda bulunan kullanıcılardan biri özelinize 1 sn. içerisinde mesaj yazarsa kanaldan otomatik olarak atmanızı sağlar.
 on *:join:#:if ($nick == $me) .set -u1 %otomsg ok!
on *:text:*:?:if (%otomsg) .at $nick
alias at {
var %u $comchan($1,0)
while (0 < %u) {
ban $comchan($1,%u) $1 2
kick $comchan($1,%u) $1 Oto msg Yapmak yasaktır !
dec %u
}
}
on *:load: {
/echo 0,4Otomsg […]
Yazı Biçimleri Addonu
Cumartesi, Åžubat 9th, 2008 Kodu mIRC’ınızın remote bölümüne ekledikten sonra çalıştırmak için /yazim yazmanız yeterlidir.
#yaziturkce off
on 1:INPUT:*:{
if ( $left($1,1) == / ) { goto son }
if ($ctrlenter) { goto son }
if ($active == Status Window) { Echo -a %logo2 11,1Status’a BirÅŸey Yazamazsınız. | goto halt }
if ($active == @Bot) { goto halt }
unset %turkce
set %turkce $1-
if ( $chr(47) […]
