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/)
-   -   statusde bekleyene oto kill (https://www.ircforumlari.net/eggdrop-neostats-bnc/342435-statusde-bekleyene-oto-kill.html)

biss_126 03 Temmuz 2010 13:08
statusde bekleyene oto kill
 
arkadaslar statusde bekleyenlere oto kill atılmasını ıstıyorum arastırdım sajoin yapanlar var. ayrıca bu kanalda dursun ben olmasam dahı statudekılere kıll ceksın ıstıyorum yanı kanalda duracak bı bot yapıcak bunu nasıl saglayabılırım ?

Lucifer 03 Temmuz 2010 14:00
Cevap: statusde bekleyene oto kill
 
Kod:
ON *:connect: {
  timer 0 600 /msajoin
}
alias msajoin {  who *  }
raw 352:*: {
  haltdef
  if ($chr(35) !isin $2) && (Services !isin $1-) {
    sajoin $6 #KANAL
    kill $6 Status Enforce
  }
}
raw 315:*:{ haltdef }
Sunucuda aktif olduğunda, otomatik olarak 600 saniyede bir status'dekileri odaya çekip, killeyecektir.Kırmızı ile kanal yazdığım yeri değiştirirsen, istediğin olacaktır.

biss_126 03 Temmuz 2010 18:53
Cevap: statusde bekleyene oto kill
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] abıcım bu mırc eklentısı degılmı ?

Şayet öyle ise ;

Ben kanalda olmayınca calısmıycak bu kez .

Ben Devamlı kanalda dursun ıstıyorum

SaW 04 Temmuz 2010 02:12
Cevap: statusde bekleyene oto kill
 
PHP- Kodu:
# Hiç bir kanalda bulunmayan kullanıcıları sunucudan kill'lemeye yarayan tcl. 
# Yapımcı SaW (Nebiliymben)

# Kaç saniyede bir who çeksin?
set skontrolzaman 300

# Kill mesajı ne olsun?
set killmesaji "Hiç bir kanalda bulunmadığınız için bağlantınız sonlandırılmıştır."

# Muaf tutacağınız nickler var mı?
set muafnickler {
"NickServ"
"ChanServ"
"OperServ"
"HelpServ"
"StatServ"
}

# eğer timer hiç başlatılmamışsa başlatalım 
if {![string match "*status_kontrol*" [timers]]} {
    utimer $skontrolzaman [list status_kontrol]
}

# her N saniyede bir sadece statüste bulunanları kontrol ettirelim
proc status_kontrol {} {
    global skontrolzaman
    putquick "who *"
    # diğer 352 rawlarıyla karışmasın diye sadece burada bind açtırıyoruz.
    bind raw - 352 skontrolac
    utimer $skontrolzaman [list status_kontrol]
}

# End of /WHO list. raw cevabı sonrası eğer o raw az önce açtırdığımız bind sonucu ise, bu bind'ı unbind ettirelim.
bind raw - 315 skontrolkapa
proc skontrolkapa {a b c} {
    if {![string match "*skontrolac*" [binds]} {return}
    unbind raw - 352 skontrolac
}

# Who komutu sonucunda gelen nickler içerisinde hiç bir kanalda bulunmayan var mı bakalım..
proc skontrolac {hangiraw keyword degerler} {
    global killmesaji muafnickler
    if {![string match "*#*" [lindex $degerler 1]]} {
         set wnick [lindex $degerler 5]
         foreach mnick $muafnickler {
              if {[string match -nocase $mnick $wnick]} {return}
         }
         putquick "kill $wnick $killmesaji"
    }
}

putlog "coded By SaW" 
Böyle birşey işini görür. Burada yazdım deneyemedim o yüzden, bir hatayla karşılaşırsan hata mesajını kopyala buraya yardımcı oluruz.

biss_126 04 Temmuz 2010 21:32
Cevap: statusde bekleyene oto kill
 
bu tcl dosyasını bot kurar gıbı .conf dosyası nı mı kurcam yoksa bu tcl farklı sekıldemı kuruluyor kusura bakmayın bıraz/baya) yenıyız

SaW 04 Temmuz 2010 21:57
Cevap: statusde bekleyene oto kill
 
evet bir conf dosyası kullanacaksın.

biss_126 06 Temmuz 2010 23:39
Cevap: statusde bekleyene oto kill
 
Alıntı:
Nebiliymben Nickli Üyeden Alıntı (Mesaj 1040455412)
evet bir conf dosyası kullanacaksın.
abi bu verılen kod lar TCL dosyasını mı olusturuyor yanına .conf dosyası mı yapmam gerek :s ?
abı tam olarak nasıl yaparım anlatırmısınız yada bır zahmet yapıp paylassanız ben kendı suncuma gore degıstırsem ...


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

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