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

Alıntı:

YellowLine Nickli Üyeden Alıntı (Mesaj 1042289486)

selam,
aşağıdaki linklere bakabilirsin,

Kod:

https://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
https://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
https://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Hocam, Bahsettiğim Bot Eggdrop TCL yalnız, mirc remote olarak değil O Sebeple Bu Bölüme Açdım

aquabluee

19 Nisan 2020 22:50

Cevap: Webistek

TCL olarak bu var bende

Kod:

set db "/home/kullanıcıadı/public_html/istek/veri.txt"

set gecikme_zamani "0"

set wait "1"

bind time - "* * * * *" time:optara

proc time:optara {min hour day month year} {

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]

set ch "#Dj"

utimer $wait[list putserv "privmsg $ch :$i"]

}

 

set filem [open $db w]

set listfilem [split [subst -nocommands [read $filem]] "\n"]

foreach i $listfilem {

set wait [expr $wait + $gecikme_zamani]

set ch "#Dj"

utimer $wait[list putserv "privmsg $ch :$i"]

}

close $file

}

Joop	23 Nisan 2020 08:21

Cevap: Webistek

Alıntı:

aquabluee Nickli Üyeden Alıntı (Mesaj 1042290591)

TCL olarak bu var bende

Kod:

set db "/home/kullanıcıadı/public_html/istek/veri.txt"

set gecikme_zamani "0"

set wait "1"

bind time - "* * * * *" time:optara

proc time:optara {min hour day month year} {

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]

set ch "#Dj"

utimer $wait[list putserv "privmsg $ch :$i"]

}

 

set filem [open $db w]

set listfilem [split [subst -nocommands [read $filem]] "\n"]

foreach i $listfilem {

set wait [expr $wait + $gecikme_zamani]

set ch "#Dj"

utimer $wait[list putserv "privmsg $ch :$i"]

}

close $file

}

Bunun Hocam Webe Atılacak Dosyalarıda vardı. Eggdrop bot ordan okuyup dj rakanalına yazıyordu Radyo botuna okutturuyorduk tcl yi

aquabluee

24 Nisan 2020 15:38

Cevap: Webistek

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

Joop	29 Nisan 2020 07:52

Cevap: Webistek

Alıntı:

aquabluee Nickli Üyeden Alıntı (Mesaj 1042293634)

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

Çok Saol Ustad. Aradığım Tam Olarakda Buydu.
Türkçe Karakter sorunu veriyor. UTF_8 Olarak değiştim kayıtları ama yine veriyor ona bakıyorum şimdi.
Çok saol tekrardan

aquabluee

29 Nisan 2020 13:39

Cevap: Webistek

yapamazsan yardım ederim yazarsın pmden

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