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

ModuLes · 10 Haziran 2011, 04:29

Arkadaşlar bana opver botu lazım conf ve tcl si elinde olan varsa paylaşırsa sevinirim şimdiden tşkler

CLubber · 11 Haziran 2011, 12:02

Merhabalar.
#Operator Kanalında Bulunan Kullanıcı Kanal genelinde !opver #Kanal ismi Yazdığında
Kullanıcı Bot Tarafından O Kanala Alınır.
Kullanıcıya OperServ Tarafından (@) Operator verilir.

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

bind pub - !opver opver
proc opver {nick uhost handle chan text} {
if {![string match -nocase "#Operator" $chan]} {return 0}
set kanal [lrange $text 0 end]
if {$kanal == ""} {putquick "PRIVMSG $chan :Kanala girmek ve Operator (@) Flagı almak için Lütfen Kanal ismini Belirtiniz. Komutun Kullanımı !opver #Kanal";return}
putquick "SAJOIN $nick $kanal"
putquick "OperServ MODE $kanal +o $nick"
putquick "PRIVMSG $chan :\[Operator Girişi\] $nick isimli Kullanıcı $kanal Kanalına alınmıştır. Tarafımca Kullanıcıya (@) Operator verilmiştir."
}

Eğer #Operator değilde farklı Bir kanalda kullanmak istiyorsanız,

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

if {![string match -nocase "#Operator" $chan]} {return 0}

Belirtilen "#Operator" Kanalına istediğiniz kanalı Yazabilirsiniz.

Khepri · 11 Haziran 2011, 13:51

arkadaşlar ben kanalda sunucumda olan koruma botuna operlerin !kb komutunu kullanmasını istiyorum op olmadan.bu kod elinde olan varsa paylaşırsa sevinirim.kolay gelsin

CLubber · 12 Haziran 2011, 00:53

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

bind pub - !kb kickban
proc kickban {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    set sebep [lrange $text 1 end]
    putquick "MODE $chan +b $person"
    putquick "KICK $chan $person $sebep"
  }
}
bind pub - !k kick
proc kick {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    set sebep [lrange $text 1 end]
    putquick "KICK $chan $person $sebep"
  }
}
bind pub - !voice voice
proc voice {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    putquick "MODE $chan +v $person"
  }
}
bind pub - !devoice devoice
proc devoice {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    putquick "MODE $chan -v $person"
  }  
}
putlog "Fantasy TCL v1.0 CLubber"

"!k, !kb, !voice, !devoice" #Opers kanalındaki herkes, op olmadan kullanabilir.

Khepri · 12 Haziran 2011, 05:39

hocam bu komutu #staff kanalında kullananların #staff2 kanalındaki kullanıcıları atmasını istiyorum sadece bunu nasıl yapacağım? ve nereye ekleyeceğimide söylersen makbule geçer
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

CLubber · 12 Haziran 2011, 11:55

Nasıl yani, anlayamadım.

Khepri · 13 Haziran 2011, 03:02

Şöyle anlatıyım hocam en iyisi ben derdimi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
şimdi #ircforumları kanalındayız değilmi kanalda koruma botum var tcl. kanalda opa çıkması gerekiyor operlerimin !kb komutuyla kullanıcı atmak için ben operlerimin opa çıkmadan kanalda !kb nick kullanmalarını istiyorum sadece oper-admin olanların yalnız. anlatabildim sanırım demek istediğimi

CLubber · 13 Haziran 2011, 20:00

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

bind pub - !kb kickban
proc kickban {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    set sebep [lrange $text 1 end]
    putquick "MODE $chan +b $person"
    putquick "KICK $chan $person $sebep"
  }
}
bind pub - !k kick
proc kick {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    set sebep [lrange $text 1 end]
    putquick "KICK $chan $person $sebep"
  }
}
bind pub - !voice voice
proc voice {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    putquick "MODE $chan +v $person"
  }
}
bind pub - !devoice devoice
proc devoice {nick uhost handle chan text} {
  if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
    set person [lindex $text 0]
    putquick "MODE $chan -v $person"
  }  
}
putlog "Fantasy TCL v1.0 CLubber"

#Opers gördüğün, yere adminlerin olduğu kanalı yaz, tamamdır.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
eggdrop Bnc	Tupac	Eggdrop, NeoStats, BNC	5	19 Mart 2018 18:56
Eggdrop Bot -eggdrop: No such file or directory hatası	Scprit	Eggdrop, NeoStats, BNC	1	04 Ocak 2015 00:49
Eggdrop	Tupac	Eggdrop, NeoStats, BNC	6	23 Şubat 2011 21:58
eggdrop	KnOuCK	Eggdrop, NeoStats, BNC	1	16 Eylül 2007 23:47

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.