Whois Çekene Notice / Mesaj Yollamak

Notice Yollamak İçin ;

On *:SNOTICE:*did a /whois on you*:{ /notice $2MESAJINIZ }

Mesaj Yollamak İçin ;

On *:SNOTICE:*did a /whois on you*:{ /msg $2MESAJINIZ }


Whois Çekeni Sajoinlemek

On *:SNOTICE:*did a /whois on you*:{ /sajoin $2 #KANAL }


Yazılan Yazıyı Şekilli Yollamak

Örneğin Slm Yazınca Karşıya SeLaM Olarak Yollayalım ;

On 1:input:*:{
if ($1- == slm) { say SeLaM | halt }
}

:P Gülme Biçimini Karşıya :PpPpPpPp Olarak Yollayalım

On 1:input:*:{
if ($1- == :P) { say :PpPpPpPp | halt }
}

Bu Şekilde Çoğaltabilirsiniz..


Bir Kanalda Yazılanları Başka Kanala Mesaj Olarak Yollamak

Örneğin #X Kanalında Yazılanları #Y Kanalına Yollayalım.

On *:text:*:#X:{ /msg #y < $+ $nick $+ > $1- }

Bunu yapınca #X Kanalında Biri Bir şey Yazarsa #Y Kanalına Yollayacaktır. Örneğin Ahmet Nicki #X Kanalında Selam Yazdı. Y Kanalına Şu Şekilde Mesaj Yollayacaktır Botumuz ;

<Ahmet> Selam


Txt Den Okutmalı Reklam Koruması

on *:TEXT:*:#:{
if ($me isop $chan) {
var %i 1
while $read(reklam.txt,%i) {
if ($read(reklam.txt,%i) iswm $remove($1-,$chr(32),*,/,\,.,$chr(44),-,_,!,) { /kick $chan $nick Reklam Yapmak Yasaktır..! | /mode $chan +b $nick }
inc %i
}
}
}

Script Klasörünüzde Reklam.Txt Ye Reklam Sözcüklerini Alt Alta Yazın. Örnek ;

050
054
www
hotm

Gibi..


Txt Den Okutmalı Küfür Koruması

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
}
}
}

Script Klasörünüzde Kufurler.txt Ye Küfür Sözcüklerini Alt Alta Yazın. Örnel ;

Sike
Anan
Sokar
Siki

Gibi..


Away Olanı Deop Etme

on *:NICK:{
if (away isin $newnick) || (yok isin $newnick) || (gelcek isin $newnick) || (awy isin $newnick) || (afk isin $newnick) || (yemek isin $newnick) {
deopall
}
}
alias deopall {
var %wy $chan(0)
while %wy {
if $me isop $chan(%wy) && $newnick isop $chan(%wy) {
mode $chan(%wy) -o $newnick
}
dec %wy
}
}

Hoş Geldin Patron

On *:join:#KANAL:{
if $nick == PATRONNİCKİ { /msg $chan Hoş geldin patron }
}


+i , +R Gibi Modeleri Oto Olarak Deaktif Etme

ON *:rawmode:#: {
if ($1 == +R) { mode # -R | msg $chan Oto Mode Koruması : Değişen mod : -R }
if ($1 == +s) { mode # -s | msg $chan Oto Mode Koruması : Değişen mod : -s }
if ($1 == +p) { mode # -p | msg $chan Oto Mode Koruması : Değişen mod : -p }
if ($1 == +i) { mode # -i | msg $chan Oto Mode Koruması : Değişen mod : -i }
if ($1 == +l) { mode # -l | msg $chan Oto Mode Koruması : Değişen mod : -l }
if ($1 == +k) { mode # -k | msg $chan Oto Mode Koruması : Değişen mod : -k }
}


! Komutları

!gir #kanal , !çık #kanal ;

Bu kodu botunuza eklerseniz , Botun bulunduğu kanalda !gir #kanaladı Yazdığınızda Bot oto olarak o kanala Girecektir ;

On *:text:*:#:{
if $nick == PATRON {
if $1 == !gir { /join $2 }
}
}

Bu şekilde sadece botu siz kullanabilirsiniz. Herkesin kullanmasını istiyorsanız , if $nick == PATRON satırını ve en alttaki } işaretini silmeniz yeterli olacaktır.

!çık #kanal içinse ;

On *:text:*:#:{
if $nick == PATRON {
if $1 == !çık { /part $2 }
}
}

!konuş #kanal/nick Mesajınız

Bu kodu eklerseniz , Botunuzun bulundugu bir kanalda !konuş #kanal mesaj veya !konuş nick mesaj yazarsanız Botunuz o Nicke Veya Kanala Mesaj Yollayacaktır.

!konuş komutundan sonra # kullanırsanız bunu kanal olarak , kullanmazsanız nick olarak algılayacaktır ;

On *:text:*:#:{
if $nick == PATRON {
if $1 == !konuş { /msg $2 $3- }
}
}

Örneğin ;

!konuş Ahmet selam naber kanka ?

Gibi..

Bu şekilde sadece botu siz kullanabilirsiniz. Herkesin kullanmasını istiyorsanız , if $nick == PATRON satırını ve en alttaki } işaretini silmeniz yeterli olacaktır.


!quit

Botunuzu IRC den Çıkartmak için botun bulunduğu bir kanalda !quit yazmanız yeterli ;

On *:text:*:#:{
if $nick == PATRON {
if $1 == !quit { /msg $chan Tamam Patron | /exit –n }
}
}

Örneğin ;

<Burak_35> !quit
<Bot> Tamam Patron
*** Ircden Çıktı : Bot

Bu şekilde sadece botu siz kullanabilirsiniz. Herkesin kullanmasını istiyorsanız , if $nick == PATRON satırını ve en alttaki } işaretini silmeniz yeterli olacaktır.


!ekle ile Txt ye Yazı Ekletme

On *:text:*:#:{
if $nick == PATRON {
if $1 == !ekle { /write YAZI.TXT $2- | /msg $chan $2- Cümlesi / Kelimesi Başarıyla Eklendi. }
}
}


Bunu nerelerde kullanabilirsiniz ?

Örneğin Reklam.txt ye spam ekletmek için..
Küfür.Txt ye Küfür ekletmek için..

Örnek ;

<Burak_35> !ekle deneme
<Bot> deneme Cümlesi / Kelimesi Başarıyla Eklendi..

_______________________

Burak. Bu kodları bi yerden hatırlıyorum gibi ?

_______________________