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/)
-   -   sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ? (https://www.ircforumlari.net/eggdrop-neostats-bnc/486638-sunucuya-giren-kayitsiz-nicklere-1dk-sonra-txt-ten-satir-okumak.html)

Paint 08 Haziran 2012 21:58

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Alıntı:

CLubber Nickli Üyeden Alıntı (Mesaj 1041137466)
PHP- Kodu:

bind raw notice go:baglanan

proc go
:baglanan {from keyword arg} {
  
set nick [lindex $arg 9]
  if {[
string match "*Client connecting*" $arg]} {
    
putquick "privmsg nickserv info $nick"
  
}
  if {[
string match "*Kullanicinin Nicki Kayitsizdir*" $arg]} {
    
yaz "soz.txt" $nick 
  
}
}

proc yaz {txt nick} { 
  
set dosyaoku [open scripts/$txt r]
  
set dosyalist [split [subst -nocommands [read $dosyaoku]] "\n"]
  
set rmsg [lindex $dosyalist [rand [llength $dosyalist]]]
  
utimer 60[list putquick "privmsg $nick :$rmsg"]
  
close $dosyaoku


Bunu deneyin olmazsa dediğim gibi nick'i bulamadığı içindir.

Not: utimer 60'dan sonra boşluk olması gerek 60 ve [ arasında.

Bu sanırım çalışacaktır, çalışmaz ise buraya Client connecting noticesini ve Nickserv'den gelen nick kayıtsız mesajını kopyalayın.

aspawa 08 Haziran 2012 22:07

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
-NickServ - Nick'iniz kayitli degil.
-NickServ - Kullanimi: IDENTIFY sifre
-NickServ - Daha fazla bilgi icin /msg NickServ HELP IDENTIFY yaziniz.

Setting/removing of usermode(s) 'ixBwCs' has been disabled.

bunumu demek istedin Paint ?

Paint 08 Haziran 2012 22:59

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Alıntı:

aspawa Nickli Üyeden Alıntı (Mesaj 1041137493)
-NickServ - Nick'iniz kayitli degil.
-NickServ - Kullanimi: IDENTIFY sifre
-NickServ - Daha fazla bilgi icin /msg NickServ HELP IDENTIFY yaziniz.

Setting/removing of usermode(s) 'ixBwCs' has been disabled.

bunumu demek istedin Paint ?

Hayır sunucuya bir nick bağlandığı zaman gelen noticeden bahsettim.

Örnek: [22:58:06] -irc.xxx.net- *** Notice -- Client connecting on port 6667: Misafir671622 (Feel@176.54.210.5x) [clients]

Birde /nickserv info Abuzittin58 komutunu uygulayıp gelen sonucu kopyala.

aspawa 08 Haziran 2012 23:14

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Notice -- Client connecting on port 6667: SevUser ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]

/nickserv info Abuzittin58

-NickServ- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-
-NickServ-
-
-NickServ- Kullanicinin Nicki Kayitsizdir..
-
-NickServ- Bu nedenle INFO Bilgileri yoktur..

Paint 09 Haziran 2012 01:19

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Fark yok gibi botun oper girdiğine emin misin? Bu arada bota konsoldan bağlan bir hata falan var mı?

CLubber 09 Haziran 2012 01:53

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Konsolla alakası yok, bu işlem için 2 ayrı proc gerekiyor.

Birinci proctaki işlemin sonucu ikinci proca yansımadığı için nicki göremeyip, mesaj atamıyor.

Tamamen servislerle alakalı bir durum.

Paint 09 Haziran 2012 02:29

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Alıntı:

CLubber Nickli Üyeden Alıntı (Mesaj 1041137787)
Konsolla alakası yok, bu işlem için 2 ayrı proc gerekiyor.

Birinci proctaki işlemin sonucu ikinci proca yansımadığı için nicki göremeyip, mesaj atamıyor.

Tamamen servislerle alakalı bir durum.

Haklısın denedim şimdi aynı procun içinde farklı bir koşul sorgulamada bile üstteki değişkeni tanımıyor. Bir şekilde üstteki değişkeni yaz procuna gönderebilsek sorun çözülecek servicesden gelen cevapta nick geçse olay bitecek ama ne yazık ki geçmiyor TCL Scriptlerdende pek anlamam açıkçası bir çaresi varsa artık siz bulacaksınız, bu kadar kolay görünen bir şeyin cevabının çıkmaması garip duruyor, mIRC ile 2 satırda yapılacabilecek birşey fakat istek eggdrop yine de verdiğim kod ircservices de çalışıyor artık gerisi TCL scriptlerden anlayanlara kalmış yaparlarsa bizde birşeyler daha öğrenmiş olacağız.

Yazdığın bütün yorumlar için teşekkür ederim.

İyi forumlar dilerim...

Çok resmi oldu sanırım ;s50

aspawa 09 Haziran 2012 13:30

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Tüm yorumlarınız için teşekür ediyorum

bu durumda iki seçenek var [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] bu konuya bi çözüm bulmaya çalışacak yada ben servisleri değişicem :)

aspawa 20 Haziran 2012 16:45

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
Alıntı:

CLubber Nickli Üyeden Alıntı (Mesaj 1041137449)
Kullandığınız services ruLLz olduğu için info bilgilerinde nick belirtilmiyor.

Bu yüzden botunuz göndereceği nicki bulamıyor.

Ayrıyetten nickserv mesajı olduğu için bind raw değil, bind notc kullanılmalıdır.

Servisleri değiştirdim ircservices-5.1.24 kurdum ama değişen olmadı
bot özele gelmiyor

CLubber 26 Haziran 2012 20:17

Cevap: sunucuya giren kayıtsız nicklere 1dk sonra txt ten satır okumak ?
 
PHP- Kodu:

# Botun vereceği mesajlar

set messages {
  
"Merhaba, Kullanmış olduğunuz nick kayıtsızdır. /NickServ REGISTER Pass E-Posta komutu ile kolayca nickinizi kaydedebilirsiniz."
}

bind raw notice connection
proc connection 
{from keyword arg} {
  global 
botnick
  
if {[string match -nocase "*Client connecting on port*" $arg]} {
    
set nick [lindex $arg 9]
    
putquick "NickServ INFO $nick"
  
}
}

bind NOTC – * if:notice
proc 
if:notice {nick uhost handle text dest} {
  global 
messages
  
if {[string match -nocase "*kayitli bir nick degil*" $text]} {
    
set information [lindex $messages [rand [llength $messages]]] 
    
set person [lindex [stripcodes bcru $text0]
    
utimer 60[list putquick "privmsg $person $information"]
  }


* utimer 60'dan sonra 60 ile [ arasında boşluk olması gerek, forum nedeni ile çıkmıyor, düzeltirsin.

* Botun belirlediğin rastgele mesajlardan bir tanesini kullanıcının özeline 60 sn. sonra gönderir.

TCL Yapımcısı: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk