Tcl istek - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

SaW · 03 Temmuz 2007, 00:32

mirclan Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

Allah Razi olsun ...

Cok tesekkur ederim ...

Bunu cogaltirken,

Kod: Kodu kopyalamak için üzerine çift tıklayın!

   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

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

Challenger · 03 Temmuz 2007, 01:15

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

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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Sahip · 03 Temmuz 2007, 19:45

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.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
TCL istek	EHost-Gökhan	Eggdrop, NeoStats, BNC	3	21 Nisan 2011 01:41
tcl istek	RahmetLi	Eggdrop, NeoStats, BNC	3	05 Ocak 2011 23:34
istek	Ebul_Alemeyn	mIRC Scripting Hazır Kodlar	1	31 Ekim 2009 03:14
!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

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

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.