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

>
+
Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 29 Şubat 2008, 19:30   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Tcl istek ..........




bind msgm - root doruk
proc doruk { nick uhost handle text } {
putserv "PRIVMSG operserv :su şifre" }

bind pub - !op op
proc op {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putserv "PRIVMSG operserv :chghost $nick Globalop.Domain.Com"
putserv "PRIVMSG operserv :chgident $nick Globalop"
putserv "PRIVMSG operserv :chgname $nick is a Globalop on DorukChat"
putserv "NOTICE $nick Dj Olarak sisteme girisiniz onaylandi, yeni host ve yeni swhois eklendi."
putserv "NOTICE $nick Lutfen kanalindaki kullancilarla iyi gecinin ve saygili olun."
}
bind pub - !dj dj
proc dj {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putserv "PRIVMSG operserv :chghost $nick Dj.Domain.Com"
putserv "PRIVMSG operserv :chgident $nick Dj"
putserv "PRIVMSG operserv :chgname $nick is a DorukChat DJ"
putserv "NOTICE $nick Globallere girisiniz onaylandi, yeni host ve yeni swhois eklendi."
}

Su sekil bir tcl ayarladım sizce dogrumu..


Konu DorukChat tarafından (29 Şubat 2008 Saat 19:37 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 29 Şubat 2008, 19:41   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Tcl istek ..........




DorukChat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bind msgm - root doruk
proc doruk { nick uhost handle text } {
putserv "PRIVMSG operserv :su şifre" }

bind pub - !op op
proc op {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putserv "PRIVMSG operserv :chghost $nick Globalop.Domain.Com"
putserv "PRIVMSG operserv :chgident $nick Globalop"
putserv "PRIVMSG operserv :chgname $nick is a Globalop on DorukChat"
putserv "NOTICE $nick Dj Olarak sisteme girisiniz onaylandi, yeni host ve yeni swhois eklendi."
putserv "NOTICE $nick Lutfen kanalindaki kullancilarla iyi gecinin ve saygili olun."
}
bind pub - !dj dj
proc dj {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putserv "PRIVMSG operserv :chghost $nick Dj.Domain.Com"
putserv "PRIVMSG operserv :chgident $nick Dj"
putserv "PRIVMSG operserv :chgname $nick is a DorukChat DJ"
putserv "NOTICE $nick Globallere girisiniz onaylandi, yeni host ve yeni swhois eklendi."
}

Su sekil bir tcl ayarladım sizce dogrumu..

Eğer istediğin şey botun bulunduğu kanaldaki bir opun !op ya da !dj yazınca botun o komutu yazan kişinin hostunu v.s değiştirmesini amaçlıyorsan genel mantık doğru ama düzeltmen gereken yerler var

putserv "PRIVMSG operserv :chghost $nick ...

gibi yerleri

putserv "chghost $nick ...

Şeklinde değişmelisin.. bu diğer komutlar için de geçeleri.. (Tabi servislerinin operserv'ında eklenmiş chghost chgident v.s komutlarının olmadığını farzediyorum).

 
Alıntı ile Cevapla

Cevapla

Etiketler
istek, tcl


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
TCL istek Sephiroth Eggdrop, NeoStats, BNC 1 16 Kasım 2012 02:55
TCL istek aquabluee Eggdrop, NeoStats, BNC 0 02 Kasım 2012 21:52
TCL iStek.. n1ks1z Eggdrop, NeoStats, BNC 0 02 Aralık 2010 09:22
!radyo , !istek istek parçasi Yunus mIRC Scripting Sorunları 2 21 Temmuz 2008 21:11
tcl istek hipokrat TCL Scriptler 0 17 Ocak 2008 09:08