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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 10 Nisan 2006, 02:15   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
TCL Scripting'den anlayan?




Ufak bi tcl script yazdırmam gerekli.

Temeli şu, belirteceğimiz kanala girenlere ctcp ile bir bilgi soracak. Ve geriye gelen cevap istediğimiz cevap değil ise, kanaldan atacak. Fakat, belirteceğimiz nickteki kişiler girince tcl istediği ctcp cevabını alamasada kanaldan atmayacak.

Script tamamen bundan ibaret.

Kodlayabilecek bir arkadaşımız varsa bana pm'den ulaşabilir.

İsterse ücret, isterse ücretsiz shell, isterse dostluğumuzu kazanır.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 10 Nisan 2006, 08:37   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




version.tcl diye birşey var bende istersen veriyim kurcala biraz ? lantardaki King'den almıştım

 
Alıntı ile Cevapla

Alt 10 Nisan 2006, 13:17   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




egghelp.org'da noversions.tcl işine yarayabilir, adres: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

 
Alıntı ile Cevapla

Alt 10 Nisan 2006, 14:18   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




teşekkürler,

fakat version sormayacak eggdrop /ctcp nick papatya gibi birşey gidecek karşı tarafa ve papatya v5'de ctcp papatya eventi olacak. o cevaba göre yapacak herşeyi. el33t, verdiğin adresdeki tcl yi çektim belki editleyip istediğim şekle getirebilirim diye ama olamayacak gibi... evil, elindeki tcl yi bi yere yükleyip adresi pm ile atarsan sevinirim, bide ona bakıyım..

 
Alıntı ile Cevapla

Alt 10 Nisan 2006, 14:55   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




Neden illaki tcl onu anlamadim mesela bu tur bir istedigini mirc ile rahatca yapabilirsin , herhangi bir windows sunucudan calistirsan 7/24 istedigini elde etmis olursun tcl mantigi ile + gelistirilmesi daha kolay olur yada kodladiysan calistiricak win sunucu bulamadiysan bilmiyorum.

iyi calismalar.

 
Alıntı ile Cevapla

Alt 10 Nisan 2006, 15:17   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




bu botun tek işlevi ctcp çekip cevabına göre işlem yapmak. böyle bişeyin tcl scripting ile imkanı varken ve sibertr'nin linux makinesi varken, mircde yazıp windows makinede host etmenin anlamı yok...

yinede teşekkürler önerin için.

 
Alıntı ile Cevapla

Alt 10 Nisan 2006, 16:58   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

adresindeki TCl yeterli butun gereksinimleri sunmakta

putserv "PRIVMSG $nick :\001VERSION\001"

satirinin VERSION yazisini FALANFILAN diye

bind ctcr - VERSION ctcr:bv_ctcp

satirinida ayni sekilde

bind ctcr - FALANFILAN ctcr:bv_ctcp

olarakduzenlediginde istedigin sonucu alabilirsin.

ek olarak kullanicilarin etkilenmemesi icin etkilenmemesini istedigin kullanicilara +mf flaglarini eklemelisin.

__________________
Our brain is Our Weapon
 
Alıntı ile Cevapla

Alt 10 Nisan 2006, 23:03   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




acoustic teşekkürler.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
proc nv_punish {nick uhost} { global botnick nv_chans nv_onlynvchans nv_reason nv_kick nv_givewarning nv_warning nv_ban nv_bantime nv_ignore nv_ignoretime set hostmask "*!*[string range $uhost [string first "@" $uhost] end]" set dowhat "" if {[string tolower $nick] != [string tolower $botnick]} { if {$nv_givewarning} { lappend dowhat "giving warning" putserv "NOTICE $nick :$nv_warning" } if {($nv_ignore) && (![isignore $hostmask])} { lappend dowhat "ignoring" newignore $hostmask $botnick $nv_reason $nv_ignoretime } foreach chan [channels] { if {($nv_onlynvchans) && ([lsearch -exact [split [string tolower $nv_chans]] [string tolower $chan]] == -1)} { continue } if {($nv_ban) && (![isban $hostmask $chan]) && ([onchan $nick $chan])} { if {![string match "*banning*" $dowhat]} { lappend dowhat "banning" } newchanban $chan $hostmask $botnick $nv_reason $nv_bantime } if {($nv_kick) && ([botisop $chan]) && ([onchan $nick $chan])} { if {![string match "*kicking*" $dowhat]} { lappend dowhat "kicking" } putserv "KICK $chan $nick :$nv_reason" } } if {$dowhat != ""} { set dowhat "-- [join $dowhat " & "]" } putlog "noversions: $nick ($uhost) is using lame IRC-client/script $dowhat" } }

proc nv_punish {nick uhost} {
global botnick nv_chans nv_onlynvchans nv_reason nv_kick

buradan sonra, if $nick = bLackStar,Nick2,Nick3 vs. gibi bişey ekleyebiliyormuyuz tclde? Yeni izin verilen nick ekleneceğinde ben tcl yi yeniden düzenlesem daha rahat olur. Böyle bi imkan var mı ?

 
Alıntı ile Cevapla

Alt 11 Nisan 2006, 14:16   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




aCoustiC Nickli Üyeden Alıntı


ek olarak kullanicilarin etkilenmemesi icin etkilenmemesini istedigin kullanicilara +mf flaglarini eklemelisin.

işini görmezmi bLackStar

__________________
TurkSohbet.NET | #XPass
 
Alıntı ile Cevapla

Alt 11 Nisan 2006, 15:21   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: TCL Scripting'den anlayan?




console girerek user eklemelisin

.adduser aCoustiC

sonrasinda buna flag vermen gerekiyor

chattr aCoustiC +f

bunu yaptigin kullanicilar korumadan etkilenmeyecektir

__________________
Our brain is Our Weapon
 
Alıntı ile Cevapla

Cevapla

Etiketler
anlayan, scriptingden, tcl


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

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
mIRC Scripting By_GuRbey mIRC Scripting Sorunları 3 01 Ağustos 2008 18:57
Scripting laglagorg mIRC Scripting Sorunları 1 17 Aralık 2007 03:50