14 Haziran 2016, 23:10
|
#1 |
Çevrimiçi | Helper Bot TCL Kod: Kodu kopyalamak için üzerine çift tıklayın! #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 " Kod: Kodu kopyalamak için üzerine çift tıklayın! #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 " |
| |
IRCForumu.Net - Reklam Alanı |
|