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/)
-   -   tcl yazabilen var mı (https://www.ircforumlari.net/eggdrop-neostats-bnc/118618-tcl-yazabilen-var-mi.html)

KAIN 18 Haziran 2008 05:16

tcl yazabilen var mı
 
Arkadaşlar tcl den anlarim ama bunu pek kodlayacak kadar bilgim yok bana soyle bişey lazim. mesela #sohbet kanalina girene bot "/chgswhois nick yazi" komutunu uygulayacak fakat giren kişi oper ise ona uygulamayacak. var mı yazabilicek.

Siber55 18 Haziran 2008 21:58

Cevap: tcl yazabilen var mı
 
Simdi arkadasım chgswhois bildigim kadar module 'dür. Her server da olmayabilir. Benimkinde var diyorsan Sunucuya Her girene yapsın ama oper / adminse yapmasın diyorsun. Bunu Şu şekilde yapabilirsin. Sunucuya Her girene bu komutu uygularsın daha sonra o kişi oper girerse zaten oper girdigi icin onun vasıflarını taşıyan swhois ' e dönecektir. Eğer dönmüyor ise bunu iptal et en azından denemiş olursun.

Kod:

bind join - * kanala_join
proc kanala_join {nick uhost handle chan} {
if {$chan == "#kanal"} {
putquick "CHGswhois $nick YAZI"
}
RETURN 1
}

Bu işlemin hızlı calışmasını istiyorsan
cd eggdrop1.6.18
cd src
cd mod
cd server.mod
pico server.c
dosyası icinden
#define msgrate 2
olan kısmı
#define msgrate 0 yap
sonrasında ctrl+x sonrasında y 'ye basarak kaydederek çık.
En son aşama olarak ;
cd
cd eggdrop1.6.18
yazıp açılan dizinde sırasıyla
./configure
make config
make
make install
Yap Bu işlemlerin hızlı yapılmasını istemiyorsan
Kod:

putquick "CHGswhois $nick YAZI"
olan kısmı

Kod:

putserv "CHGswhois $nick YAZI"
Yapabilirsin.
Şunu soylemeden de gecemeyecegim . Bunu Eggdrop bota yaptırırsan hele ki server cok giriş cıkışlı bir yerse eggdrop botu kasma imkanı var module hakkında bilgisi olan arkadaslar varsa module olarak bulabilirsen sorunsuz olarak calıstırabilirsin.

KAIN 20 Haziran 2008 03:44

Cevap: tcl yazabilen var mı
 
iyide operlere uygulamıcaktı ? ve make config make make install de hata veriyor

GemLik 20 Haziran 2008 13:42

Cevap: tcl yazabilen var mı
 
make confing , make ve make install da sorun çıkmıyor tcl de çalışıyor fakat operlere de uyguluyor denedim

JoinT 20 Haziran 2008 15:52

Cevap: tcl yazabilen var mı
 
Operlere uygulamaması için bişey yapılmamışda ondan hem arkadas #sohbet kanalına giren adminse uygulamasın diyo ama ilk sunucuya baglanırken adminde olsa normal user gibi giriyo yani onu tanımasının imkani yok ha eger #sohbet kanalı ajoinde degilse adam operini girdikten sonra #sohbet kanalına giriyosa dediginiz olur . bunu iki şekilde yapabiliriz birincisi

Kod:


bind join - * kanala_join
proc kanala_join {nick uhost handle chan} {
if {$nick != "NİCK" && $nick != "BASKABİRNİCK"} {
if {$chan == "#osman"} {
putquick "CHGswhois $nick YAZI"
}
}
RETURN 1
}

Burda NİCK ve BASKABİRNİCK yerine admin nicklerini dogru şekilde yazarsanız yazdıgınız nickler #sohbet kanalına girdiginde komutu uygulamıycaktır .Ordaki iki nick Haricinde giren olursa komutu uyguluycaktır Ben iki kişiyle örnek verdim orayı 3 nick içinde 4 nick içinde daha fazlası içinde ayarlayabilirsiniz....


Ama Eger diyosanki #sohbet kanalı ajoinde degil operimizi girdikten sonra #sohbet kanalına giriyoruz diyosan şunuda yapabilirsin

Kod:


set admin_kanali "#Opers"
bind join - * kanala_join
proc kanala_join {nick uhost handle chan} {
global admin_kanali
if {![onchan $nick $admin_kanali]} {
if {$chan == "#osman"} {
putquick "CHGswhois $nick YAZI"
}
}
RETURN 1
}

Burdada Opers yazdıgım yeri sizin admin kanalinizi yazip #sohbet kanalına giren nick eger admin kanalında degilse o komutu uygulasın diye yapabilirisiniz..

KAIN 20 Haziran 2008 23:23

Cevap: tcl yazabilen var mı
 
Çalışmadi..... osman yazan yeri gerekli kanal yaptım. oraya giren hiç kimseye yapmyr bu sefer

Supervisor 20 Haziran 2008 23:44

Cevap: tcl yazabilen var mı
 
missing close-brace
3. satırda parantez } kapatmamışsın sanırım mesajın türkçesi böyle.

JoinT 20 Haziran 2008 23:44

Cevap: tcl yazabilen var mı
 
CHGswhois $nick YAZI olan yerleri privmsg operserv raw svswhois $nick YAZI olarak yaparsan bide botun nickini admin liste eklersen calısır

KAIN 21 Haziran 2008 00:43

Cevap: tcl yazabilen var mı
 
Alıntı:

JoinT Nickli Üyeden Alıntı (Mesaj 491720)
CHGswhois $nick YAZI olan yerleri privmsg operserv raw svswhois $nick YAZI olarak yaparsan bide botun nickini admin liste eklersen calısır

zaten oyleydi olmadi


ilk kodumda şu bu numu opers kanalindakileri ellemicek şekilde ayarlasak ?

proc join_ww {nick uhost handle channel} {
putserv "privmsg operserv raw chgswhois $nick :^C7is an IRC Helper"
}
bind join - * join_ww

Siber55 22 Haziran 2008 09:47

Cevap: tcl yazabilen var mı
 
Arkadasım Sen bana sohbet kanalına göre soyledin bende sana şunu diyorum. Sohbet kanalı autojoin olacaktır büyük ihtimal. autojoin oldugu icin her girene mecburen uygulamak zorunda kalacak. Yani önceden opers kanalına giremeyecegine göre bot mecburen uygulamak zorunda kalacak. Eger belli başlı nicklere uygulamasın diyorsan ondan kolay bişi yok. Ama #opers kanalındakiler haricinde diyorsan ilk girişte zaten bunu yapman imkansız olacaktır.Tam olarak nasıl istedigini belirtirsen yardımcı olabilirim.


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

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