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

Sayfa 2 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

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 istek (https://www.ircforumlari.net/eggdrop-neostats-bnc/33469-tcl-istek.html)

SaW	03 Temmuz 2007 00:32

Yanıt: Cevap: Tcl istek

Alıntı:

mirclan Nickli Üyeden Alıntı (Mesaj 228533)

bunu nasıl nereye hangi dosya içine ekliyoruz ?

Bu kodları dosyadı.tcl şeklinde bir dosyaya kaydet. (uzantısı tcl olmalı.)
Sonra eggdrop/scripts klasörüne koy.
Bundan sonrası sadece bu kod için bir conf ayarlayabilirsin veya sunucundaki mevcut botların herhangi birisinin confuna ilave edebilirsin (botun admin olması şart)
Her iki durumda da confun en altına
source scripts/dosyadı.tcl
satırını eklemen lazım.

Challenger

03 Temmuz 2007 00:48

Yanıt: Tcl istek

Allah Razi olsun ...

Cok tesekkur ederim ...

Bunu cogaltirken,

Kod:

   1 {

       putserv "sajoin [lindex $arg 9] [lindex $kanallar 1]"

   }

   2 {

       putserv "sajoin [lindex $arg 9] [lindex $kanallar 2]"

   }

   3 {

       putserv "sajoin [lindex $arg 9] [lindex $kanallar 3]"

kisimlarini cogaltiyoruz degil mi ...

SaW	03 Temmuz 2007 01:08

Yanıt: Tcl istek

evet. bracketlara dikkat et o mantıkla çoğaltabilirsin. yani dikkat etmen gerekenler { ve } işaretleri..

Challenger

03 Temmuz 2007 01:15

Yanıt: Tcl istek

sormusken bir soru daha sorayim aklimda kalmasin ...

cok guzel bir code cok tsk ederim...

sokmak istedigim kanallar'dan 1 tanesine yogunluk yapabilme gibi bir sans'imiz var mi ?... yani 3/2 1 kanal'a 3/1 diger kanallara random ...

SaW	03 Temmuz 2007 02:13

Yanıt: Tcl istek

var tabi bir satır daha ekle,
1 {
putserv "sajoin [lindex $arg 9] [lindex $kanallar 1]"
}
2 {
putserv "sajoin [lindex $arg 9] [lindex $kanallar 2]"
}
3 {
putserv "sajoin [lindex $arg 9] [lindex $kanallar 3]"

mesela
[lindex $kanallar 2] olandan bir kaç tane daha ekleyebilirsin.

tabi set deger [rand 4] değerini de ona göre artırmalısın ;)

Sahip

03 Temmuz 2007 19:45

Cevap: Tcl istek

Alıntı:

bunu nasıl nereye hangi dosya içine ekliyoruz ?

Şimdi...

Alıntı:

set kanallar "#kanal1 #kanal2 #kanal3"

bind raw * notice ssnotice
proc ssnotice {from keyword arg} {
global kanallar
if { [string match -nocase "*Client connecting on port*" $arg] } {
set deger [rand 4]
switch -- $deger {
1 {
putserv "sajoin [lindex $arg 9] [lindex $kanallar 1]"
}
2 {
putserv "sajoin [lindex $arg 9] [lindex $kanallar 2]"
}
3 {
putserv "sajoin [lindex $arg 9] [lindex $kanallar 3]"
}
}
}
}

Bunu Bir tcl dosyasi(örnek; sajoin.tcl) yapip ftp/eggdrop/script klasörüne atiyoruz.Daha sonra Hangi Botun Bunu yapmasini istiyorsan,
Confunun en altina bu TCL yi ekliyoruz.Alttaki gibi;

Alıntı:

# TCL EKLENTILERI
# bu bolum eklediginiz tcllere gore duzenliyeceginiz bolum..
source scripts/alltools.tcl
source scripts/action.fix.tcl
source scripts/sajoin.tcl

Ekliyoruz, daha sonra Botumuzu Calistiriyoruz.

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

Sayfa 2 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster