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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)
-   -   Eggdrop bir soru yada deneme :) (https://www.ircforumlari.net/eggdrop-neostats-bnc/419517-eggdrop-bir-soru-yada-deneme.html)

Rhall 16 Ekim 2011 21:09
Eggdrop bir soru yada deneme :)
 
Şöyle birşey mümkün mü ? yazayım.

!Uyar #kanal
Bu komudu uyguladıgım zaman bot kanala girip belirlediğimiz topici atıcak.

!Yasakla #Kanal
Dediğimizde ise kanala girip kanalı suspendliyecek veya forbid ne oluyosa artık.

nasıl yapabiliriz

CLubber 16 Ekim 2011 21:51
Cevap: Eggdrop bir soru yada deneme :)
 
Kod:
bind pub - !uyar msg_warn
proc msg_warn {nick uhost handle chan text} {
  global botnick
  if {[string match -nocase "#Opers" $chan]} {
    set kanal [lindex $text 0]
    if {$kanal == ""} {putquick "PRIVMSG #Opers :Herhangi bir kanalı yönetim tarafından uyarmak için lütfen komutu doğru uygulayın. Kullanımı: <!uyar #kanal>";return}
    putquick "ChanServ CLEAR $kanal OPS"
    putquick "OperServ MODE $kanal +m"
    putquick "ChanServ SET $kanal TOPICLOCK off"
    putquick "TOPIC $kanal 4,1 \[0 UYARI 4\] 0Bu kanal sunucu görevlileri tarafından uyarı almıştır. Tekrarı halinde kanal kullanıma kapatılacaktır. Bilginize sunar, teşekkür ederiz. "
    putquick "MemoServ SEND $kanal 4,1 \[0 UYARI 4\] 0Sahibi olduğunuz $kanal isimli kanal sunucu yönetimi tarafından uyarı almıştır. Tekrarı halinde kullanıma kapatılacaktır. Detaylı bilgi için #OperHelp kanalını kullanabilirsiniz. "
    putquick "ChanServ SET $kanal TOPICLOCK on"
    putquick "PRIVMSG #Opers :Belirtilen $kanal kanalına uyarı gönderilmiştir."
  }
}
bind pub - !kapat msg_forbid
proc msg_forbid {nick uhost handle chan text} {
  global botnick
  if {[string match -nocase "#Opers" $chan]} {
    set kanal [lindex $text 0]
    if {$kanal == ""} {putquick "PRIVMSG #Opers :Herhangi bir kanalı kapatmak için lütfen komutu doğru uygulayın. Kullanımı: <!kapat #kanal>";return}
    putquick "ChanServ CLEAR $kanal USERS"
    putquick "ChanServ SET $kanal mlock +nti"
    putquick "ChanServ SET $kanal Founder $nick"
    putquick "TOPIC $kanal 4,1 \[0 UYARI 4\] 0Bu kanal yapılan uyarılara rağmen kötü kullanıma devam ettiği için süresiz olarak kapatılmıştır. Bilginize sunar, teşekkür ederiz."
    putquick "ChanServ Suspend $kanal Kanal Transferi"
    putquick "PRIVMSG #Opers :Belirtilen kanal kullanıma kapatılarak kanal sahibi $nick olarak değiştirilmiştir."
  }
}
putlog "Kanal Kontrol/Forbid TCL v1.0 Written By CLubber"
#Opers kanal genelinde <!uyar #kanal> ve <!kapat #kanal> komutları ile çalışır.
Uyarı yapıldığında kanal topicini değiştirir, opları deop yapar, kanal founderine memoserv mesaj atar.
Kanal kapatıldığında kanala kullanıcı girişine izin vermez. Mlock olarak modları +i olarak değiştirir.
TCL Yapımcısı: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Rhall 16 Ekim 2011 21:59
Cevap: Eggdrop bir soru yada deneme :)
 
sagolun

Rhall 17 Ekim 2011 01:33
Cevap: Eggdrop bir soru yada deneme :)
 
Botuma şunu nasıl ekliyebilirim /allsend users private global nick mesaj

yani biliyorsunuz komudu ben denedim biraz diğerlerinden ozenerek ama hatada vermedi calısmadıda :D yardımcı olursanız sevinirim

EceLMeriC 17 Ekim 2011 10:18
Cevap: Eggdrop bir soru yada deneme :)
 
Şimdi verilen kodlar açık ve basit biraz zorlasan kendin bile yapabilirsin 2 gün uğraş ama uğraş yani :) takıldığın noktada burda takıldım dersin hoşunada gidecektir uğraşması birdene :)

Rhall 17 Ekim 2011 11:19
Cevap: Eggdrop bir soru yada deneme :)
 
:D tamam bunu ben yapacam oyleyse sagolun hocam :))

EceLMeriC 17 Ekim 2011 12:31
Cevap: Eggdrop bir soru yada deneme :)
 
Az uğraş bakalım yapamazsan zaten yine yardım edicez etmicez değil ama burda önemli olan seninde birşeyler öğrenmen :)

CLubber 17 Ekim 2011 19:15
Cevap: Eggdrop bir soru yada deneme :)
 
Kod:
bind pub - !global msg_global
proc msg_global {nick uhost handle chan text} {
  global botnick
  if {[string match -nocase "#Opers" $chan]} {
    if {$text == ""} {putquick "PRIVMSG #Opers :Sunucu üzerindeki tüm kullanıcılara mesaj göndermek için lütfen komutu doğru kullanın. Kullanım: <!global mesaj>";return}
    putquick "Allsend users private global $nick $text"
    putquick "PRIVMSG #Opers :Belirtilen mesajınız sunucu üzerindeki tüm kullanıcılara gönderilmiştir."
  }
}
putlog "Allsend TCL v.1.0 Written By CLubber"
#Opers kanalında <!global mesaj> şeklinde kullandığında tüm kullanıcıların özeline kendi nickinle mesaj gidecektir.

Sunucu üzerinde allsend modülünün kurulu olması gerekir.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:49.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net