eggdrop invite / davet sorgusu - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

saywhat · 20 Eylül 2014, 22:35

hadi biraz daha geliştirip o özelliği de ekleyelim... memo/not değilde (ki şart da değil öyle olması)

ortada botun aldığı bir davet (invite) var ise ,davet edilen kanalı ::targetchan ile ve kimden geldiğini ayrı bir değişken ile bot hafızasında saklayıp,ortada bilgilendirecek bir sahip (owner) yoksa, o geldiğinde/kanala (botun olduğu herhangi bir kanala) girişinde sahibine bu aldığı davet bilgisini iletsin....

ki böylelikle bot sahibi "online" değilse dahi ,döndüğünde isteğe kabul yada red cevabını verebilsin....

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

bind raw - "INVITE" inv_join
bind msg n "!tamam" accept_inv
bind msg n "!olmaz" reject_inv
bind join n "* *" owner_note

proc inv_join {from key arg} {
           set ::targetchan [lindex [split $arg ":"] 1]
           set ::invited $from
         putserv "notice $::owner :$from tarafından, $::targetchan kanalına davet edildim."
         putserv "notice $::owner :daveti kabul etmek için: /msg $::botnick !tamam"
         putserv "notice $::owner :daveti red etmek için: /msg $::botnick !olmaz"
    return 0
}

proc reject_inv {nick uhost hand text} {
    if {[info exists ::targetchan] && [info exists ::invited]} {
         unset ::targetchan
         unset ::invited
         putserv "notice $::owner :Red edildi .."
         return 1
         }
     return 0
}

proc accept_inv {nick uhost hand text} {
    if {[info exists ::targetchan] && [info exists ::invited]} {
         channel add $::targetchan
         putserv "notice $::owner :Kanala girildi .."
        unset ::targetchan
        unset ::invited
        return 1
        }
    return 0
}

proc owner_note {nick uhost hand chan} {
     if {[info exists ::targetchan] && [info exists ::invited]} {
            putserv "notice $::owner :$::invited tarafından, $::targetchan kanalına davet edildim."
            putserv "notice $::owner :daveti kabul etmek için: /msg $::botnick !tamam"
            putserv "notice $::owner :daveti red etmek için: /msg $::botnick !olmaz"
            return 1
          }
    return 0
}

putlog "ok..."

ki böylelikle bot sahibinin botun attığı davet bilgisi notice'ini görmemesi/gözden kaçırma olasılığı da bir anlamda ortadan kalkıyor.çünkü buna bir kabul yada red cevabı verinceye dek bu bilgi (bot hafızası temizlenmediği sürece) saklanacak ve sahibi her kanala girdiğinde ona bir karşılama mesajı gibi atacaktır.. sahibi yanıt verdiğinde bu bilgiler temizlenmiş olacak ve artık o kabul/red komutları da işlemeyecek.... hikayenin sonu...

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
invite	tsctl	IRCd	0	16 Ocak 2012 00:14
!invite	Voodo	mIRC Scripting Sorunları	7	28 Mart 2011 11:10
invite script	ztyle	mIRC Scripting Sorunları	13	09 Kasım 2010 22:46
invite raw	Flyman	mIRC Scripting Sorunları	3	08 Mayıs 2005 16:34

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.