gerekli Hazir Kodlar

diShy · 1 Mar 2013

Size seslenenleri seslenme içerigi sunucu ismi ve saati ile yansıtmak.
Statüs penceresine yansıtma.

Kod:
on *:text:*:#: { if ($me isin $1-) { .echo -s $nick size sesleniyor: \\\\" $+ $1- $+ \\\\" .echo -s Seslendi?i kanal: $chan Sunucu: $network .echo -s Saat: $asctime(hh:nn:ss) $+ . } }

Aktif oldunuz Pencereye yansıtma:

Kod:
on *:text:*:#: { if ($me isin $1-) { .echo -a $nick size sesleniyor: \\\\" $+ $1- $+ \\\\" .echo -a Seslendi?i kanal: $chan Sunucu: $network .echo -a Saat: $asctime(hh:nn:ss) $+ . } }
Belirlediginiz kanala yansıtma:
Kod:
on *:text:*:#: { if ($me isin $1-) { .msg #kanal $nick size sesleniyor: \\\\" $+ $1- $+ \\\\" .msg #kanal Seslendi?i kanal: $chan Sunucu: $network .msg #kanal Saat: $asctime(hh:nn:ss) $+ . } }

-------------------------------------------------------------------------------------------------Kick-Kline Sayacı

Kod:
alias kick { kick $1- %kicksayac | kicksayac }

alias kicksayac {
if (%kicksayac == $null) {
set %kicksayac 1

}
%kicksayac = %kicksayac + 1
halt
}

alias kline { kline $1- %klinesayac | klinesayac }

alias klinesayac {
if (%klinesayac == $null) {
set %klinesayac 1
}
%klinesayac = %klinesayac + 1
halt
}
--------------------------------------------------------------------------------------------------

Flood Koruması

Kod:
on @1:text:*:#:{
if $me !isop $chan { halt } | if $nick isop $chan { halt } var %bflood $strip($1-)
var %mflood $strip($$1)
if ($len(%bflood) >= 250 ) || ($len($1) >= 200 ) {
/mode $chan +b $address($2,2) | /kick $chan $nick 7¤ 13Flood Yasaktir2 [14!2] 7¤
}
}
----------------------------------------------------------------------------------------------------

Uyarılı Remote

Kod:
#uyarılı on
on *:text:*:#:{
if ($nick isreg $chan) { if $istok($1-,it,32) || $istok($1-,len,32) || $istok($1-,maymun,32) || $istok($1-,MAL,32) || $istok($1-,köpek,32) || $istok($1-,mal,32) || $istok($1-,salak,32) || $istok($1-,aptal,32) || $istok($1-,enayi,32) || $istok($1-,okuz,32) || $istok($1-,Len,32) || $istok($1-,oglum,32) || $istok($1-,gerizekali,32) || $istok($1-,sie,32) || $istok($1-,sia,32) || $istok($1-,h?yar,32) || $istok($1-,t?nn,32) || $istok($1-,si@,32) || $istok($1-,uza,32) || $istok($1-,olum,32) || $istok($1-,lanh,32) || $istok($1-,saxo,32) || $istok($1-,manyak,32) || $istok($1-,salak,32) || $istok($1-,Lan,32) || $istok($1-,kro,32) {
if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) | msg $chan 4[ U y a r ? ]1 : $nick : 4Lütfen Seviyeyi Dü?ürmeyiniz Aksi Taktirde Kanaldan Uzaklaştırılıcaksınız !. }
else { if (%say [ $+ [ $nick ] ] >= 1) { mode $chan +b $nick | kick $chan $nick 11,1Daha Onceden > $+ %kelime [ $+ [ $nick ] ] $+ $+ $strip($1-) $+ < Olan Yasak ve Kötü Unsur Içeren Sözcügü Kullandıgınız Için Kanaldan Uzaklaştırıld?nız.. | unset %say [ $+ [ $nick ] ] | unset %kelime [ $+ [ $nick ] ] }
}
}
}
}
#uyarılı end
---------------------------------------------------------------------------------------------------------------

Tüm Kanallardan Banlama

Kod:
alias AllKick {
var %dark = 1, %dark1 = $comchan($$1,0) while (%dark <= %dark1) {
if ($me isop $comchan($$1,%dark)) {
kick $comchan($$1,%dark) $$1 $iif($2-,$2-,Yetkili Oldugum Tüm Kanallardan Atıldınız!)
}
inc %dark
}
}
-----------------------------------------------------------------------------------------------------------------

Bad Nick Kodu

Alt+R basıp Remote ye eklencek Kod aşagıdadır

Kod:
on @nick:join:#:
{if ($chan == #str_cinsellik)
{ halt }if ($chan == #str_gay)
{ halt }if ($chan == #str_lezbiyen)
{ halt }.mode # +b $nick.kick # $nick Nickiniz şuan kanal seviyesi ile bagdaşmıyor.. Lütfen \\\\"/nick yeninickiniz\\\\" komutu ile nickiniz degiştirin. }
}

Userse eklencek kodlar:

Kod:
nick:*_lez*!*@*
nick:*seksi*!*@*
nick:gayy*!*@*
nick:*jigolo*!*@*
nick:*olgun*!*@*

************************************************** ***********

[ Oto Msg Komutu ]

Kod:
on 1:JOIN:#:{/msg $nick Mesaj?n?z }
Kanala girenlere Msg gönderir..

************************************************** ************

* Ame mesajının heLp kanalına gitmesini engelleme

Kod:
/alias /ame { if $1 { var %º = 1 while $chan(%º) { if !$istok(#help,$v1,32) { !describe $chan(%º) $1- } inc %º } } }

************************************************** *************

* Kanaldaki Nicklerin Renginin Durmadan Degişmesi

Kod:
/timerx-mas 0 0 /cline $rand(0,15) $chan $rand(1,$nick(#,0))\\\\\\\\

iptali :
/timers off
************************************************** *************

* OTO ban açımı

Kod:
on @*:ban:#:{ .timer 1 30 mode # -b $banmask }
Alt+R remoteye kopyalıyorsunuz kodu attıgınız ban 30 snye sonra kendiliginden açılıcaktır, zamanı kendinize göre degişebilirsiniz

************************************************** ***************

* OTO şifre tanıtımı

Kod:
on 1:connect:{/nickserv identify şifren
Alt+R basılıp Remoteye kopyalıyorsunuz kodu şifre yazan yere şifrenizi yazıp

************************************************** ****************

* Help kanalına giren oldumu size uyarı veren kod

Kod:
on *:JOIN:#kanaladı:{ echo -a $nick Nickli kişi #heLp Kanalına Girdi, Yardım Bekliyor }}
Alt+R basılıp remoteye kopyalanıyor kod

************************************************** *****************

* Oto seLamLama Kodu

kanaL geneLinde s.a diyenLerin seLamını aLmak için koLay anLaşılır bir kod. Alt+R basılıp Remote penceresine kopyaLıyorsunuz kodu..

Kod:
on *:text:*s.a.*:#:{ msg # Aleykum Selam $nick }

gerekli Hazir Kodlar

diShy