Okutma Tcl Değişiklik Yardım - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

KnOuCK · 28 Aralık 2007, 23:26

## Okutulacak dosya
set db "scripts/sohbet.txt"

## Dokunma.!
set wait "1"

## Başladıktan sonra kanala kaç saniye arayla yazacak?
set gecikme_zamani "15"

## Burdan sonrasına dokunma

bind pub - !sohbet sohbet:basla

proc sohbet:basla { n u h c a } {
global db wait gecikme_zamani
set file [open $db r]
set listfile [split [subst -nocommands [read $file]] "\n"]
foreach i $listfile {
set wait [expr $wait + $gecikme_zamani]
utimer $wait [list putserv "privmsg $c $i"]
}
close $file
}

putlog "Dosya yüklendi.. Coded By BuCaLI"

arkadaşımız sağolsun böle bir tcl yi verdi
bize ama bir sorum olcak bu tcl yi şöye değiştirebilecek arkadaşlar
varmı
bot otomatikj olarak sohbet.txt yi okutmaya başlayacak
ve bütün sayfayı okuttuktan sonra komuta gerek kalmadan
tekrar en baştan okumaya başlayacak umarım anlatabilmişimdir
tşk ederim kolay gelsin

Brain · 29 Aralık 2007, 13:50

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

proc sohbet:basla { n u h c a } { 
	global db wait gecikme_zamani 
	set file [open $db r] 
	set listfile [split [subst -nocommands [read $file]] "\n"] 
	foreach i $listfile { 
		set wait [expr $wait + $gecikme_zamani] 
		utimer $wait [list putserv "privmsg $c $i"] 
	} 
	sohbet:basla $n $u $h $c $a
	close $file 
}

Mutlaka durdurmakta istersin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

KnOuCK · 29 Aralık 2007, 16:16

teşekkür ederim aCoustiC peki botun okuyacağı txt dosyası bittiği zaman başa saracakmı kendiliğinden

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Txt belgesini okutma (yardım)	ciah	mIRC Scripting Sorunları	10	14 Temmuz 2013 16:53
Scriptte değişiklik yapamıyorum acil yardım	Nothinq	mIRC Scripting Sorunları	6	11 Şubat 2011 22:15
Helper.TCL de ufak bir değişiklik istiyorum ( ÜSTADLAR yardım )	Raw	Eggdrop, NeoStats, BNC	10	19 Ocak 2010 13:02
Tcl Satır okutma Yardım	akkaya	Eggdrop, NeoStats, BNC	9	01 Temmuz 2009 15:39
Reklamları Txt den Okutma Yardım	eXchanGe	mIRC Scripting Sorunları	7	07 Kasım 2005 22:07

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.