Eggdrop Bota şu işlemi nasıl yaptırırım - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

CLubber · 15 Nisan 2011, 22:11

Tam olarak botun ne yapmasını istiyorsun ¿

Sohbetcafesi · 15 Nisan 2011, 22:32

CLubber Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Tam olarak botun ne yapmasını istiyorsun ¿

Verilmiş olan tcl de yetkililerden biri operini girdiğinde ona tcl.deki yazıların global olarak gitmesini istiyorum yani tcl.ne işe yarıyosa o işte
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

CLubber · 15 Nisan 2011, 22:44

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

bind raw * notice administrator
proc administrator {from keyword arg} { 
  if {[string match "*is now a network admin*" $arg]} {
    set nick [string range [lindex [split [lindex $arg 1] ":"] 1] 0 end]
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Net Administrator'lerinden $nick şu anda online konumundadır."
  }
  if {[string match "*is now a services admin*" $arg]} {
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Services Administrator'lerinden $nick şu anda online konumundadır."
  }
  if {[string match "*is now a server admin*" $arg]} {
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Server Administrator'lerinden $nick şu anda online konumundadır."
  }
  if {[string match "*is now an operator*" $arg]} {
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Local Oper'lerinden $nick şu anda online konumundadır."
  }
}
putlog "Oper Login TCL v1.0 - Eggdrop CLubber"

OPER Olanı, GLOBAL atar.

Sohbetcafesi · 15 Nisan 2011, 23:02

CLubber Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

bind raw * notice administrator
proc administrator {from keyword arg} { 
  if {[string match "*is now a network admin*" $arg]} {
    set nick [string range [lindex [split [lindex $arg 1] ":"] 1] 0 end]
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Net Administrator'lerinden $nick şu anda online konumundadır."
  }
  if {[string match "*is now a services admin*" $arg]} {
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Services Administrator'lerinden $nick şu anda online konumundadır."
  }
  if {[string match "*is now a server admin*" $arg]} {
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Server Administrator'lerinden $nick şu anda online konumundadır."
  }
  if {[string match "*is now an operator*" $arg]} {
    putquick "PRIVMSG IRC OPERSERV GLOBAL :System Local Oper'lerinden $nick şu anda online konumundadır."
  }
}
putlog "Oper Login TCL v1.0 - Eggdrop CLubber"

OPER Olanı, GLOBAL atar.

Kardeş çok tşkrler sayende bunuda hallettik
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
eline koluna yüreğine sağlık..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Eggdrop Bota /Whois Çekildiğin de Özele Bilgi Vermesi...	No_FeaR	Eggdrop, NeoStats, BNC	13	05 Haziran 2014 00:01
EGGDROP - Tcl scriptleri bota yükleme,tanıtma..	Heartbroken	IRCd Makaleler	12	06 Haziran 2012 13:42
txt deki yazıları eggdrop bota okutmak	MesqeN	TCL Scriptler	2	01 Şubat 2012 16:47
Eggdrop bota version finger cektirme	SGuard	Eggdrop, NeoStats, BNC	7	17 Eylül 2010 20:12
Eggdrop bota hello ile kendini tanıtan	SaCiT	Eggdrop, NeoStats, BNC	1	07 Ekim 2006 19:17

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

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.