Tags
|
|
|
Author: Admin - Replies: 0 - Views: 6519
Txt Den Okutmalı Küfür ve reklam koruması
|
İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!
Kod: on *:TEXT:*:#:{
if ($me isop $chan) {
var %i 1
while $read(kufurler.txt,%i) {
if ($read(kufurler.txt,%i) iswm $remove($1-,$chr(32),*,/,\,.,$chr(44),-,_,!,) { /kick $chan $nick Küfür Etmek Yasaktır! | /mode $chan +b $nick }
inc %i
}
}
}
ziqerim
siqerim
gibi ekleyiniz txt dosyasına
[color=#FF4136][b]Txt Den Okutmal
|
Author: Admin - Replies: 0 - Views: 4585
Noticeleri Tek Pencere'de Toplama.
|
Noticeleri Tek Pencere'de Toplama.
Kod: on ^*:snotice:*: { $iif(!$window(@Snotice),window -n @Snotice) | echo -t @Snotice $1- | halt }
|
Author: Admin - Replies: 0 - Views: 5604
Nick'inizi Söyleyene Notice mesaj
|
Nick'inizi Söyleyene Notice mesaj atar
S-bot ve admin olarak belirtiklerim muaf almak istediniz kişiler yanı kimlere mesaj gitmesin
[code] menu menubar {
.Nickini söleyene söz (Notice)
..• Açık :.enable #noticesoz | .echo -a 0,4 notice söz acildi.
..• Kapalı :.disable #noticesoz | .echo -a 0,4 notice söz Kapatildi..>
.-
}
#noticesoz off
on 1*:text:$( * $+ $me $+ * ):#:{
if $nick == S-Bot { halt }
if $nick ==
|
Author: Admin - Replies: 0 - Views: 5681
Admin Nick, İdent ve Host Koruması
|
Bu koruma ile giren kullanıcıların nick, ident ve hostunu kontrol edip eklediğiniz nick , ident ve hostlara gzline atmanıza yarayan alternatif bir karaliste addonu.
[code]
### /lamer komutu ile korumayı açabilirsiniz
### mircclub.org
alias lamer { /dialog -m start start }
dialog start {
title "Ident Nick Ekstra Korumaları"
size -1 -1 467 274
option pixels
box "", 11, 19 13 430 256
text "Güvenlik Giriş Ayarları", 1, 136 3 167 20
edit "", 3,
|
Author: Admin - Replies: 0 - Views: 6331
Nick - IP - Sehir - "GLİNE" - "NICKBAN" - "SHUN
|
Nick - IP - Sehir - "GLİNE" - "NICKBAN" - "SHUN
[code]on ^*:hotlink:"*":#:if ($regex($1,/^"(GLINE|NICKBAN|SHUN)"$/)) returnex
on *:hotlink:*:*: {
var %_word = $noqt($1),%_ip = $token($hotline,6,32),%_nick = $token($hotline,5,32)
if ($(,%_word) = nickban) { var %1 = 1 | while ($comchan($(,%_nick),%1)) { ban -k $v1 $(,%_nick) 2 sebeb. | inc %1 } }
if ($(,%_word) = shun) shun $(,%_nick)
if ($(,%_word) = gline) gline $(,%_nick) ebeb.
echo 4 $target IP: %_ip - NICK: %_ni
|
Author: Admin - Replies: 0 - Views: 5015
#Dj Kanalına Özel Codeler
|
Kod'u Kopyalayın Bot Yapacağınız mIRC ' de ALT R Yaparak Dosya Sekmesinden Yeni Seçeneğini TıklayıN. Açılan Yeni Pencereye Bu Kod'u Yapıştırıyoruz Hepsi Bu Kadar.
Not : Kod Sadece #Dj Kanalında Çalışmaktadır #Dj Kanalına Ve Dj'lere Özel Olduğu İçin
Kırmızı İle Belirttiğim Yerleri Kendinize Göre Ayarlayın
[code]on *:Join:#dj: {
msg $chan 14------------------------------
msg $chan 4 Hoşgeldiniz 5 Dj' $nick
msg $chan 14------------------------------
msg $chan 14
|
Author: Admin - Replies: 0 - Views: 4123
Saldırıda oto +m ve temizleme
|
Kanal belirlediğiniz flood saldırısında, kanalı belirlediğiniz süre ile +m moduna alıp, temizle.mrc dosyasındaki verilerle kanalı temizleyip tekrar kanalaı açmak için kullanılan bir kod
[code]alias -l fld {
hinc $+(-mu,$1) fld $+($3,½,$4,$encode($5)) 1
if ($hget(fld,$+($3,½,$4,$encode($5))) >= $2) return $true
else return $false
}
alias temizle {
var %t 1
while %t <= $lines(temizle.mrc) {
msg $1 $read(temizle.mrc,%t)
inc %t
}
}
on @*:text:*:#: {
|
Author: Admin - Replies: 0 - Views: 5336
LOG , belirlediğiniz kanalı okuyabilirsiniz.
|
LOG , belirlediğiniz kanalı okuyabilirsiniz.
Kod: on *:text:*:#:{
if $chan == #kanalkontrol {
if $1 == !log && $chr(35) isin $2 { set %logchan $2 | msg %log $nick Tarafından $2 kanalının LOG'ları yansıtılacak (AJAN System) }
if $1 == !log && $2 == off { set %logchan x | msg #kanalkontrol Ajan Systemi Kapatıldı. }
}
if %logchan == $chan { msg #kanalkontrol $date $timestamp $+(,$nick,) $+ mesaj: $1- }
}
|
Author: Admin - Replies: 0 - Views: 5432
#guvenlik kanalına girene kod sorgulatma
|
#guvenlik kanalına girene kod sorgulatma
[code]on * notice:*: {
if (connecting isin $1-) {
writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))
timer 1 2 ctcp $9 version
timer $+ $readini(version.ini,$9,ip) 1 10 /who $+(*,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64),*)
}
}
raw 352:*:{
sajoin $6 #guvenlik
}
on *:join:#guvenlik: {
if ($level($nick) == muafnlist) { halt }
if $nick == $m
|
Author: Admin - Replies: 0 - Views: 4862
Kanal Temizleme Systemi "Clear System "
|
Kanal Temizleme Systemi "Clear System "
[code]on *:text:*:#: {
if .clear iswm $1 {
if $nick isop $chan || $istok(%deopnick [ $+ [ $chan ] ],$nick,32) {
msg $chan Sayfa Temizleniyor...
msg $chan
msg $chan
msg $chan
msg $chan
msg $chan
msg $chan
msg $c
|