!topic Mesajınız (Botunuz topic atsın ) - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Raw · 29 Eylül 2009, 23:20

arkadaşlar bir süre önce foruma yazmıştım cevap veren olmadı .. konuyuda bulamadım aramada :s yazayım dedim tekrar ben kendi kendime keşfettim bu tcl i
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
napalım yazan olmayınca
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
buyrun topic tcl ..

Kod: Kodu kopyalamak için üzerine çift tıklayın!


set oper_kanali "#OperKanaliniz"

bind pub !topic topic_raw

proc topic_raw {nick uhost hand chan args} {
global oper_kanali
if {[onchan $nick $oper_kanali} {
puthelp "chanserv set $chan topiclock off"
puthelp "TOPIC $chan : [lindex $args 0]"
puthelp "chanserv set $chan topiclock on"
}
}

arkadaşlar eğer botunuz services root yetkilerine sahipse bu komut ile kanalın topic kilidini açar topiği atar ve yeniden topic kilidini aktif hale getirir .. ben sunucumda sorunsuz kullanıyorum .. İyi Forumlar ..

RebeLLious · 29 Eylül 2009, 23:28

teşekkürler kardeşim çok yaradı

BuCaLI · 30 Eylül 2009, 12:24

İşe yarar ama biraz hata var;

set oper_kanali "#OperKanaliniz"

bind pub - !topic topic_raw ; #Kullanımı bu şekilde olmalı

proc topic_raw {nick uhost hand chan args} {
global oper_kanali
if {[onchan $nick $oper_kanali]} { ; #Köşeli parantezi kapatmayı unutmuşsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

puthelp "chanserv set $chan topiclock off"
puthelp "chanserv TOPIC [lindex $args 0] [lrange $args 1 end]" ; #Burayıda bu şekilde kullanman daha doğru olur.
puthelp "chanserv set $chan topiclock on"
}
}

!topic <#kanal> <topic mesajın> şeklinde kullanacaksan komudu "[lindex $args 0] [lrange $args 1 end]" yerine sadece "$args" şeklinde kullanman yeterli olurdu ancak orada ilk kelimeyi veya ondan sonrasını nasıl alabileceğini göstermek için o şekilde yaptım.

Raw · 30 Eylül 2009, 15:40

BuCaLı , teş yeni yeni öğreniyoruz bu kadar hatayı mazur gör hoca
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Rhall · 16 Ekim 2011, 02:22

Hocam hata yok ancak işlev de görmüyor. Bot admin listtede ekli yani herşey tamam ama işlev görmüyor sorun nedir ?

CLubber · 16 Ekim 2011, 13:22

Kod: Kodu kopyalamak için üzerine çift tıklayın!

bind pub - !topic msg_topic
proc msg_topic {nick uhost handle chan text} {
  global botnick
  if {[onchan $nick "#Opers"]} {
    set kanal [lindex $text 0]
    set topic [lrange $text 1 end]
    putquick "ChanServ ACCESS $kanal add $botnick 999"
    putquick "ChanServ SOP $kanal add $botnick"
    putquick "ChanServ SET $kanal topiclock off"
    putquick "ChanServ TOPIC $kanal $topic"
    putquick "ChanServ SET $kanal topiclock on"
    putquick "ChanServ ACCESS $kanal del $botnick"
    putquick "ChanServ SOP $kanal del $botnick"
    putquick "PRIVMSG #Opers :$kanal kanalına topiciniz atılmıştır."
  }
}
putlog "Topic TCL v1.0 - Written By CLubber"

#Opers kanal genelinde Kullanımı: <!topic #kanal mesaj>"

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Botunuz Global Oplarınız Nick Değiştirdiğinde kill atsın	Che	TCL Scriptler	0	10 Temmuz 2015 19:01
!topic mesaj komutunda topic sorunum var	helloweenfs	Eggdrop, NeoStats, BNC	2	21 Kasım 2012 03:15
List komutunda topic'i olmayan kanallara topic	BehroozWolf	Parca Kodlar	13	19 Aralık 2009 17:31
topic yap	Techno	Komik Loglar	0	17 Temmuz 2007 01:45

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.