IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

Kod:
#heLp Botu by Che

 

 

bind join - * join_selam 

 

bind pub - yardim pub_help 

 

bind msgm - help pub_help 

 

bind msgm - yardim msg_help 

 

bind msgm - nshelp msg_nshelp 

 

bind msgm - cshelp msg_cshelp 

 

bind msgm - memohelp msg_memohelp 

 

bind msgm - nsregister msg_nsregister 

 

bind msgm - nsidentify msg_nsidentify 

 

bind msgm - nsset msg_nsset 

 

bind msgm - nsghost msg_nsghost 

 

bind msgm - nspassword msg_nspassword 

 

bind msgm - nslanguage msg_nslanguage 

 

bind msgm - nsurl msg_nsurl 

 

bind msgm - nsemail msg_nsemail 

 

bind msgm - nsicqnumber msg_nsicqnumber 

 

bind msgm - nslocation msg_nslocation 

 

bind msgm - nskill msg_nskill 

 

bind msgm - nsprivate msg_nsprivate 

 

bind msgm - nshide msg_nshide 

 

bind msgm - csregister msg_csregister 

 

bind msgm - csidentify msg_csidentify 

 

bind msgm - csset msg_csset 

 

bind msgm - csaccess msg_csaccess 

 

bind msgm - cslevel msg_cslevel 

 

bind pub - selam msg_selam 

 

　

 

　

 

　

 

　

 

proc join_selam {nick uhost handle chan} { 

 

    putserv "NOTICE $nick :$nick 12HeLp Kanali Yardim Botuyum" 

 

    putserv "NOTICE $nick :12Ben Size, Yardima İhtiyaciniz Olan Konularda Yardim Edecek Sekilde Programlanmis Bir Help Botum." 

 

 
 

    putserv "NOTICE $nick :12Eger Benim Yardimlarim Sizlere Yeterli Olmazsa. 4 Http://www.DOMAIN.com 12Adresinden Gerekli Bilgileri Alabilirsiniz." 

 

 

    putserv "NOTICE $nick :12Simdi Yardim Almak İcin Lutfen Özelime 4Yardim 12Yaziniz." 

 

 

    putserv "NOTICE $nick :12Lutfen 4/Remote Off 12Yapmayi Unutmayiniz." 

 

} 

 

　

 

　

 

  proc msg_help { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :$nick , size asagidaki konularda yardimci olabilirim:" 

 

        putserv "PRIVMSG $nick :1.) Nickserv Komutlari konusunda yardim almak icin: ( nshelp )" 

 

        putserv "PRIVMSG $nick :2.) Chanserv Komutlari konusunda yardim almak icin: ( cshelp )" 

 

        putserv "PRIVMSG $nick :3.) Memoserv Komutlari konusunda yardim almak icin: ( memohelp )" } 

 

　

 

 

 

  proc msg_nshelp { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizin sifrelenme Komutunu Orenmek icin Sifreleme ( nsregister ) Yaziniz." 

 

        putserv "PRIVMSG $nick :Nickinizi  Identify etme komutunu orenmek icin  ( nsidentify ) Yaziniz." 

 

        putserv "PRIVMSG $nick :Nick Droplama  komutunu orenmek icin( nsdrop )Yaziniz." 

 

        putserv "PRIVMSG $nick :Nick Set Ayarlari  orenmek icin ( nsset ) Yaziniz." 

 

        putserv "PRIVMSG $nick :Nickiniz Kullanimda ise dusurme komutunu orenmek icin( nsghost ) Yaziniz." } 

 

  proc msg_nsregister { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizi Sifrelemek icin lutfen asagidaki komutu yaziniz." 

 

        putserv "PRIVMSG $nick :/ns register sifreniz email_adresiniz   )" 

 

        putserv "PRIVMSG $nick :Mail Adresinizi Kesinlikle Dogru vermelisniz Aksi Taktirde Kaybedilen Nick Sifreleri uzerinde hak iddia edemezsiniz." } 

 

 

 

  proc msg_nsidentify { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizi ident ederken kullanmaniz gereken komut asagidaki gibidir." 

 

        putserv "PRIVMSG $nick :/ns identify sifreniz  " } 

 

  proc msg_nsdrop { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizi droplarken kullanmaniz gereken komut asagidaki gibidir." 

 

        putserv "PRIVMSG $nick : /ns drop  " } 

 

  proc msg_nsset { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizin ayarlari." 

 

        putserv "PRIVMSG $nick 1)nspassword  " 

 

        putserv "PRIVMSG $nick 2)nslanguage  " 

 

        putserv "PRIVMSG $nick 3)nsurl  " 

 

        putserv "PRIVMSG $nick 4)nsemail  " 

 

        putserv "PRIVMSG $nick 5)nsicqnumber  " 

 

        putserv "PRIVMSG $nick 6)nslocation  " 

 

        putserv "PRIVMSG $nick 7)nskill  " 

 

        putserv "PRIVMSG $nick 8)nsprivate  " 

 

        putserv "PRIVMSG $nick 9)nshide  " 

 

}        

 

 

 

  proc msg_nsghost { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Servere girdiginizde nickiniz kullanimda uyarisi verirse" 

 

        putserv "PRIVMSG $nick :Asagidaki komutla Nickinizi kullanabilirsiniz." 

 

        putserv "PRIVMSG $nick :/ns ghost nickiniz sifreniz  " } 

 

  proc msg_nspassword { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nick sifresini degistirmek icin kullanilir." 

 

        putserv "PRIVMSG $nick :/ns set password yenisifre  " } 

 

  proc msg_nslanguage { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickservin dilini degistirmeye yarar." 

 

        putserv "PRIVMSG $nick :/ns set language dilno  " 

 

        putserv "PRIVMSG $nick :Dil No: 1  ingilizce " 

 

        putserv "PRIVMSG $nick :Dil No: 2  Portekizce " 

 

        putserv "PRIVMSG $nick :Dil No: 3  Turkce   " 

 

        putserv "PRIVMSG $nick :Dil No: 4  Almanca " 

 

        putserv "PRIVMSG $nick : Fakat bu özellik Serveremizin Services Sisteminde Bulunmamaktadır " 

 

 
 

      } 

 

　

 

   proc msg_nsurl { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizin bagli oldugu url yi belirtmenizi saglar." 

 

        putserv "PRIVMSG $nick :/ns set url Adres  " } 

 

   proc msg_nsemail { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizin sifresinin size gonderilecegi mail adresini yazmanizi saglar." 

 

        putserv "PRIVMSG $nick :/ns set email mail@adresiniz.com  " } 

 

   proc msg_nsicqnumber { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Kullanmakta oldugunuz icq numarasinin info da gozukmesini saglar." 

 

        putserv "PRIVMSG $nick :/ns set icqnumber #icq_no  " } 

 

   proc msg_nslocation { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Bulundugunuz bolgeyi belirtmenizi saglar." 

 

        putserv "PRIVMSG $nick :/ns set location bulundugunuz_yer  " 

 

} 

 

　

 

   proc msg_nskill { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizin sifre sormasi icin gereken komut. " 

 

        putserv "PRIVMSG $nick :/ns set kill On/OFF  " 

 

        putserv "PRIVMSG $nick :On: sifrenin girilmesi icin 60 sn sure 

 

tanir." 

 

        putserv "PRIVMSG $nick :Off: Sifre korumasini kapatir." 

 

} 

 

   proc msg_nsprivate { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nickinizin Listede gozukmesini onler." 

 

        putserv "PRIVMSG $nick :/ns set private On/Off  " 

 

        putserv "PRIVMSG $nick :On: Gorunmez." 

 

        putserv "PRIVMSG $nick :Off: Gorunur." 

 

} 

 

   proc msg_nshide { nick uhost handle text } { 

 

        putserv "PRIVMSG $nick :Nick bilgilerinizin bir kisminin INFO da gozukmesini engeller" 

 

        putserv "PRIVMSG $nick :/ns set hide On/Off  " 

 

        putserv "PRIVMSG $nick :On: Gorunmez." 

 

        putserv "PRIVMSG $nick :Off: Gorunur." 

 

} 

 

　

 

　

 

proc msg_cshelp { nick uhost handle text } { 

 

       putserv "PRIVMSG $nick :Kendi Kanalinizi Kaydetmek icin ( csregister )" 

 

       putserv "PRIVMSG $nick :Kanalinizin sifresini girmek icin ( csidentify )" 

 

       putserv "PRIVMSG $nick :Kanal Ayarlari icin ( csset )" 

 

       putserv "PRIVMSG $nick :Access islemleri icin ( csaccess )" 

 

       putserv "PRIVMSG $nick :Level ayarlari icin ( cslevel )" } 

 

 proc msg_csregister { nick uhost handle text } { 

 

       putserv "PRIVMSG $nick :Kanal kaydetmekte kullanilan komut asagidaki gibidir." 

 

       putserv "PRIVMSG $nick :Fakat bu kanal daha once kayit edilmemis olmasi gerekmektedir." 

 

       putserv "PRIVMSG $nick :/cs register #kanal sifre aciklama    " 

 

       putserv "PRIVMSG $nick :Aciklama yerine herhangi bir sey yazabilirsiniz." } 

 

 proc msg_csidentify { nick uhost handle text } { 

 

       putserv "PRIVMSG $nick :Kanal DeSifre Etmekte kullanilan komut asagidaki gibidir." 

 

       putserv "PRIVMSG $nick :Fakat bu kanalin daha once kayit edilmis olmasi gerekmektedir." 

 

       putserv "PRIVMSG $nick :/cs identify #kanal sifre     )" } 

 

 proc msg_csset { nick uhost handle text } { 

 

       putserv "PRIVMSG $nick :Chanserv Set komutlari Kanallarinizin Set ayarlarini yapmaniza yardimci olur." 

 

       putserv "PRIVMSG $nick :Set Komutlari icin ayrintili bilgiyi." 

 

       putserv "PRIVMSG $nick :/cs help set komutu ile alabilirsiniz.      

 

)" } 

 

 proc msg_csaccess { nick uhost handle text } { 

 

       putserv "PRIVMSG $nick :Access Komutu Bir kisiye sahib yada yetkili oldugunuz kanalda yetki vermeye yarar." 

 

       putserv "PRIVMSG $nick :Yetki seviyeleri 1 - 9999  a kadardir." 

 

       putserv "PRIVMSG $nick :/cs access #kanal add Nick Seviye     )" 

 

} 

 

 proc msg_cslevel { nick uhost handle text } { 

 

       putserv "PRIVMSG $nick :Level Komutu Kanal yetkililerinin yada sahibinin erisim duzeylerini ayarlamaya yarar." 

 

       putserv "PRIVMSG $nick :Daha Ayrintili bilgi icin." 

 

       putserv "PRIVMSG $nick :/cs help level yazarak alabilirsiniz.     )" 

 

 } 

 

　

 

　

 

 proc msg_selam { nick uhost handle chan text } { 

 

 

       putserv "PRIVMSG $nick :Selam $nick . Söz hakkı verilene kadar lütfen yetkilileri özelden rahatsız etmeyiniz." 

 

 
 

       putserv "PRIVMSG $nick :#help kanalinda Irc ile ilgili sorunlarinizi cozmek icin bulunmaktayim." 

 

       putserv "PRIVMSG $nick :Yardim almak icin ozelime ( 4yardim ) yazmaniz yeterlidir. Tesekkurler. Iyi Sohbetler." } 

 

 

#End putlog "HeLper Bot By Coder Che "