Seslenme Remotesi
Size seslenenleri seslenme içeri?i 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) $+ . } }
Belirledi?iniz 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ü?ü 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 Oldu?um Tüm Kanallardan At?ld?n?z!)
}
inc %dark
}
}
-----------------------------------------------------------------------------------------------------------------
Bad Nick Kodu
Alt+R bas?p Remote ye eklencek Kod a?a??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 ba?da?m?yor.. Lütfen \\"/nick yeninickiniz\\" komutu ile nickiniz de?i?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 De?i?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 koduatt???n?z ban 30 snye sonra kendili?inden aç?l?cakt?r, zaman? kendinize göre de?i?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 }