IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 10 Temmuz 2015, 16:55   #1
Çevrimiçi
Che
~ Gevezeyiz.Net ~
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Helper TCL




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
set colornum 0 set reklamknum 1 set reklamunum 0 bind msg - !yardim helpme proc helpme {nick uhost hand stuff} { global colornum botnick if {!([matchattr $hand o] || [matchattr $hand m])} { set cchoice [lindex $stuff 0] } set cchoice [lindex $stuff 0] putserv "PRIVMSG $nick : 14Merhaba12 $nick" putserv "PRIVMSG $nick : 14Anamenu'ye hoşgeldiniz" putserv "PRIVMSG $nick : 14Ben size yardim etmek üzere özel olarak tasarlanmış Robotum!" putserv "PRIVMSG $nick : " putserv "PRIVMSG $nick : 14Servisler hakkında yardım almak için 12!menu14 yaziniz." putserv "PRIVMSG $nick : 14Helper alimlari hakkında bilgi edinmek için 12!helper14 yazınız." putserv "PRIVMSG $nick : " putserv "PRIVMSG $nick : 14Benim hakkımda bilgi almak için 12!version14 yazınız." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!yardim14 tamamlanmıştır.." } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # ChanServ Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !chanmenu chanM proc chanM {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 12ChanServ14 menüsüne hoş geldiniz;" putserv "PRIVMSG $nick : 4!register 4!identify 4!access 4!akick" putserv "PRIVMSG $nick : 4!info 4!mlock 4!op 4!mode" putserv "PRIVMSG $nick : 14Size gerekli yardım vermebilmem için lütfen seçiminizi yapınız." putserv "PRIVMSG $nick : 14Menüde yazanlar hakkında açıklama isterseniz 6!chanacikla yazmanız yeterlidir." putserv "PRIVMSG $nick : 12ChanServ14 ile ilgili yardımım yeterli gelmezse sorularınızı kanal @ larına sorunuz .." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!chanmenu14 tamamlanmıştır.." } bind msg - !chanacikla Cacik proc Cacik {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Kanal kayıt etmek istiyorsanız 4!register" putserv "PRIVMSG $nick : 14Kanalınız Chanserv e tanıtmak için 4!identify" putserv "PRIVMSG $nick : 14Kanalınızda bir kullanıcıya access (aop,sop) eklemek için 4!access" putserv "PRIVMSG $nick : 14Kanalınızda istemediginiz bir kullanıcıyı kanala alamamak için 4!akick" putserv "PRIVMSG $nick : 14Kanal hakkında bilgi almak için 4!info" putserv "PRIVMSG $nick : 14Kanal modelerini ChanServden değiştirmek için 4!mlock" putserv "PRIVMSG $nick : 14Kanal modları hakkında bilgi almak için 4!mode" putserv "PRIVMSG $nick : 14Aciklama menüsü bitti şimdi ilgilendiginiz bölümü seçiniz" } bind msg - !register Ckayit proc Ckayit {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : /msg chanserv register #kanal şifre açıklama " putserv "PRIVMSG $nick : Kanal ınızı kaydetmek için bu komutu kullanabilirsiniz." } bind msg - !identify Ciden proc Ciden {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : Ayni nickte oldugu gibi chanserv'in sizi tanimasi ve kanalda ilgili en yüksek Kisi olmaniz için bu yapmaniz gerekli" putserv "PRIVMSG $nick : /msg chanserv identify #kanal sifre" } bind msg - !access Cacc proc Cacc {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : /msg chanserv access #kanal add nick seviye" putserv "PRIVMSG $nick : Kanalda VOP Eklemek için Seviye: 30" putserv "PRIVMSG $nick : Kanalda HALFOP Eklemek için Seviye: 40" putserv "PRIVMSG $nick : Kanalda AOP Eklemek için Seviye: 50" putserv "PRIVMSG $nick : Kanalda SOP Eklemek için Seviye: 999" } bind msg - !akick Cakick proc Cakick {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : /msg chanserv akick #kanal add nick!ident@ip Sebeb" putserv "PRIVMSG $nick : Bu Sizin kanala girmesini istemediginiz kisileri kanala sokamazlar. Yani Bir Nevi yasak gibi.. Add (ekle), del (sil), List (Liste)." } bind msg - !info Cinfo proc Cinfo {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : Bir kanalin kimin ait oldugunu ve diger bilgilerinide gösterir." putserv "PRIVMSG $nick : /msg chanserv info #kanal" } bind msg - !mlock Cmlock proc Cmlock {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : Kanalin bir çok ayari bu komutla kilitlenir. Herhangi bir opun kanalin ayarlari ile oynayamamasi için kullanilir. En ideal sekli +ntr-ispklmR olmasidir." putserv "PRIVMSG $nick : /msg chanserv set #kanal mlock +ntr-ispklmR" } bind msg - !op Cop proc Cop {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : /msg chanserv aop #kanal add nick" putserv "PRIVMSG $nick : Kanalınıza aop eklemek için bu komutu kullanabilirsiniz. Silmek için add yerine del yazmalınız." putserv "PRIVMSG $nick :" putserv "PRIVMSG $nick : /msg chanserv sop #kanal add nick" putserv "PRIVMSG $nick : Kanalınıza sop eklemek için bu komutu kullanabilirsiniz. Unulmamalıdır ki her sop aop ekleyebilir." } bind msg - !mode Cmode proc Cmode {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : Kanal Modelari Bolumu" putserv "PRIVMSG $nick : +m: Kanalda sadece op ve voiceler konusabilir." putserv "PRIVMSG $nick : +M: Kanalda sadece nicki kayitli kullanicilar konusabilir." putserv "PRIVMSG $nick : +R: Kanala sadece nicki kayitli kullanicilar girebilir." putserv "PRIVMSG $nick : +i: Kanala sadece davet edilen kullanicilar girebilir." putserv "PRIVMSG $nick : +l: Kanala kullanici sayisi limit koyar." putserv "PRIVMSG $nick : +p: Kanalin whois ve list 'de cikmasini engeller." putserv "PRIVMSG $nick : +s: Kanalin sadece whois de cikmasini engeller." putserv "PRIVMSG $nick : +k: Kanala sifre koyar." putserv "PRIVMSG $nick : +G: Sunucu tarafindan yasaklanmis kelimelerin kullanilmasini engeller." putserv "PRIVMSG $nick : +t: Topici sadece oplarin degistirebilmesini saglar." putserv "PRIVMSG $nick : +n: Kanala disaridan mesaj yollanmasini engeller." } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # NickServ Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !nickmenu nickM proc nickM {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 12NickServ14 menüsüne hoş geldiniz;" putserv "PRIVMSG $nick : 4!regnick 4!idenick 4!password 4!kill" putserv "PRIVMSG $nick : 4!ghost 4!release 4!url-icq" putserv "PRIVMSG $nick : 14Size gerekli yardım vermebilmem için lütfen seçiminizi yapınız." putserv "PRIVMSG $nick : 14Menüde yazanlar hakkında açıklama isterseniz 6!nickacikla yazmanız yeterlidir." putserv "PRIVMSG $nick : 14NickServ ile ilgili yardımım yeterli gelmezse sorularınızı kanal @ larına sorunuz .." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!nickmenu14 tamamlanmıştır.." } bind msg - !nickacikla Nacik proc Nacik {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Kullandıgınız Nickinizi kayıt etmek istiyorsanız 4!regnick" putserv "PRIVMSG $nick : 14Nickinizi NickServ e tanıtmak için 4!idenick" putserv "PRIVMSG $nick : 14Nickinizin şifresini değiştirmek için 4!password" putserv "PRIVMSG $nick : 14Nickinize bir koruma eklemek için 4!kill" putserv "PRIVMSG $nick : 14Asılı kalan Nick inizi düşürmek için 4!ghost" putserv "PRIVMSG $nick : 14Nickiniz başkası tarafından kullanılıyor ise 4!release" putserv "PRIVMSG $nick : 14Nickinizin infosuna url veya icq no eklemek 4!url-icq" } bind msg - !regnick Nreg proc Nreg {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Nickinizi kayit edebilmenizi sağlar" putserv "PRIVMSG $nick : 12/msg nickserv register sifre e-mail" } bind msg - !idenick Niden proc Niden {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Kayıtlı nickinizi NickServ e her baglandıgınızda tanıtmanız gerekir." putserv "PRIVMSG $nick : 12/msg nickserv identify sifre" } bind msg - !password Npas proc Npas {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Nickinizin şifresini değistirmek için kullanılır. Komutu kullanmak için nickinizi identify edilmiş olması gerekir." putserv "PRIVMSG $nick : 12/nickserv set password yenisifre" } bind msg - !kill Nkill proc Nkill {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Bu komut siz yokken nickinizin kullanılmasını engeller." putserv "PRIVMSG $nick : 14Nickinizin sifresini 1 dakika içinde yazmassanız veya 3" putserv "PRIVMSG $nick : 14tane yanlış şifre girerseniz serverdan killeneceksiniz." putserv "PRIVMSG $nick : 12/msg nickserv set kill on" } bind msg - !ghost Ngho proc Ngho {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Serverdan düştünüz ama nickiniz aslı kaldı. Nickinizi kurtarmak için." putserv "PRIVMSG $nick : 12/msg nickserv ghost nick sifre" } bind msg - !release Nrel proc Nrel {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Nickiniz kullaniliyorsa onu serverdan düsürürsünüz." putserv "PRIVMSG $nick : 12/msg nickserv release nick şifre" } bind msg - !url-icq Nui proc Nui {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Nickinize info çeken kisinin sizin e-mail, icq veya web adresinize ulasmasini saglayan komut." putserv "PRIVMSG $nick : 14Komutu kullanmak için nickinizi identify etmis olmalisiniz." putserv "PRIVMSG $nick : 12/msg nickserv set url adres" putserv "PRIVMSG $nick : 12/msg nickserv set icq icqno" } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # Memoserv Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !memomenu memoM proc memoM {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 12MemoServ14 menüsüne hoş geldiniz;" putserv "PRIVMSG $nick : 4!memosend 4!memolist 4!memoread 4!memodel" putserv "PRIVMSG $nick : 14Size gerekli yardım vermebilmem için lütfen seçiminizi yapınız." putserv "PRIVMSG $nick : 14Menüde yazanlar hakkında açıklama isterseniz 6!memoacikla yazmanız yeterlidir." putserv "PRIVMSG $nick : 14MemoServ ile ilgili yardımım yeterli gelmezse sorularınızı kanal @ larına sorunuz .." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!memomenu 14tamamlanmıştır.." } bind msg - !memoacikla Macik proc Macik {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Bir memo göndermek için 4!memosend" putserv "PRIVMSG $nick : 14Memo listenizi görmek için 4!memolist" putserv "PRIVMSG $nick : 14Size gelen bir memo yu okumak için 4!memoread" putserv "PRIVMSG $nick : 14Memolarınız silmek için 4!memodel" } bind msg - !memosend Msend proc Msend {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Herhangi bir kişiye memo mesaj yollamanızı sağlayan komuttur." putserv "PRIVMSG $nick : 12/msg memoserv send nick" } bind msg - !memolist Mlist proc Mlist {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Size gelen memo mesajları listelemenizi sağlayan komuttur." putserv "PRIVMSG $nick : 12/msg memoserv list" } bind msg - !memoread Mread proc Mread {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Size gelen memo mesajları okumanızı sağlayan komuttur." putserv "PRIVMSG $nick : 12/msg memoserv read numara" } bind msg - !memodel Mdel proc Mdel {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Size gelen memo mesajlardan birini silmenizi sağlayan komuttur." putserv "PRIVMSG $nick : 12/msg memoserv del numara" putserv "PRIVMSG $nick : 14Size gelen memoların tamamını bir seferde silmenizi saglayan komut" putserv "PRIVMSG $nick : 12/msg memoserv del all" } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # Operserv Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # # # # # # # # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # Menu Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !menu Menu proc Menu {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Servisler menüsüne hoş geldiniz;" putserv "PRIVMSG $nick : 14Lütfen yardım istediginiz servis menusunu seçiniz." putserv "PRIVMSG $nick : " putserv "PRIVMSG $nick : 14NickServ için 12!nickmenu" putserv "PRIVMSG $nick : 14Chanserv için 12!chanmenu" putserv "PRIVMSG $nick : 14Memoserv için 12!memomenu" putserv "PRIVMSG $nick : 14Kanal Modelari için 12!mode" putserv "PRIVMSG $nick : " putserv "PRIVMSG $nick : 14Ana munuye dönmek için 12!anamenu14 yazınız." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!menu14 tamamlanmıştır.." } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # Anamenu Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !anamenu Amenu proc Amenu {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 14Servisler hakkında yardım almak için 12!menu14 yaziniz." putserv "PRIVMSG $nick : 14Helper olamak istiyorsanız 12!helper14 yazınız." putserv "PRIVMSG $nick : 14Lütfen seçiminizi yapınız." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!anamunu14 tamamlanmıştır.." } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # Bilgi Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !helper bil proc bil {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 12Irc.Server.Com Server'ında HELPER olabilmek için," putserv "PRIVMSG $nick : 14Yapılacak helper sınavlarına katılmalısınız. Sınav zamanları önceden belirtilecektir." putserv "PRIVMSG $nick : 14Tüm Userlere açık olan bu sınavda;" putserv "PRIVMSG $nick : 14Chanserv, Nickserv, Memoserv Servislerine ait Konulardan secilecek 3 Soru Sorulacak Olup," putserv "PRIVMSG $nick : 14Üç Sorununda bilinmesi mecburidir.." putserv "PRIVMSG $nick : 14Seçmiş oldugunuz 12!bilgi14 tamamlanmıştır.." } #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# # version Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind msg - !version ver proc ver {nick uhost hand stuff} { global colornum botnick putserv "PRIVMSG $nick : 12Guncelleme Tarihi 14: 10.07.2015" putserv "PRIVMSG $nick : 12Version Türü 14: mhhlp-v.2.0" putserv "PRIVMSG $nick : 12Yapımcı 14: Che" putserv "PRIVMSG $nick : 12Download 14:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Giriş Başlangıç # #+-+-+-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+# bind join - * helpchannel proc helpchannel {nick uhost hand chan} { global colornum botnick if {$nick == $botnick} {return 0} putserv "NOTICE $nick : 4#HELP12 Kanalına Hoşgeldiniz $nick. Kanalda bulunan oplar serverin resmi helperleridir. Size voice verilene kadar bekleyiniz. Voice aldıktan sonra sorunuzu kısa ve anlaşılır şekilde sorunuz." putserv "NOTICE $nick : 12Sorununuz Cözüldükten Sonra Kanaldan Ayrılınız. Kanalda Uzun Süre Bekelemeniz Banlanmanıza Neden Olacaktır!" putserv "NOTICE $nick : 12Eğer kanalda op yoksa, 4/msg MisisHelp !yardim12 yazarak benden yardim alabilirsiniz." if {$colornum == 0} {return 0} if {$colornum == 1} { if {[matchattr $hand o] || [matchattr $hand m]} { } return 0 } if {$colornum == 2} { if {[matchattr $hand o] || [matchattr $hand m]} { } return 0 } }


__________________
char *adres = [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] for(int i = 0; *(adres + i); i++) { putchar(toupper(adres[i])); }
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Cevapla

Etiketler
helper, tcl


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Helper Mirc indir - Helper Script Download | Unique | St_By_Romantiq_Serseri mIRC Scripting Tanıtımları 12 01 Aralık 2021 19:34