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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)
-   -   Forum Tcl Yardım ? (https://www.ircforumlari.net/tcl-scriptler/681077-forum-tcl-yardim.html)

Laqinta 14 Şubat 2015 01:20

Forum Tcl Yardım ?
 
s.a arkadaslar arkdasın forumuna bu tcl yi kurdumda calısmadı acaba kod eski mi yardım edecek biri var mı .?

Kod:

######################################################################
#              IrcForumları TCL v1.0 - Written By CLubber          #
#  Bu TCL ile IF konularını sunucunuz üzerinden takip edebilirsiniz. #
#          TCL'nin çalışabilmesi için HTTP TCL'ye ihtiyaç vardır.    #
######################################################################
# Botun konuları yazacağı kanal
set forum_chan "#IF"
# Botun kanala yazma süresi (dakika cinsinden)
set forum_time "60"
##############################################
# IrcForumları TCL v1.0 - Written By CLubber #
##############################################
if {![string match "*forum_mesaj*" [timers]]} {
  timer $forum_time forum_mesaj
}
proc forum_mesaj {} {
  global botnick forum_time forum_chan
  set connect [::http::geturl
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
set files [::http::data $connect]
  set list [split [subst -nocommands $files] "\n"]
  foreach i $list {
    regexp -- {<title>(.+?)</title>} $i - topic
    regexp -- {>(.+?)</category>} $i - category
    regexp -- {<dc:creator>(.+?)</dc:creator>} $i - author
    regexp -- {<guid isPermaLink="true">(.+?)</guid>} $i - link
    if {[info exists topic]} {
      putserv "privmsg $forum_chan 4» Konu Başlığı:2 $topic"
      unset topic
    }
    if {[info exists category]} {
      putserv "privmsg $forum_chan 4» Konu Kategorisi:2 $category"
      unset category
    }
    if {[info exists author]} {
      putserv "privmsg $forum_chan 4» Konu Yazarı:2 $author"
      unset author
    }
    if {[info exists link]} {
      putserv "privmsg $forum_chan 4» Konu Linki:2 $link"
      unset link
    }
  }
  ::http::cleanup $files
  timer $forum_time forum_mesaj
}
putlog "IrcForumları TCL v1.0 - Written By CLubber"


saywhat 14 Şubat 2015 02:35

Cevap: Forum Tcl Yardım ?
 
sadece linki değişerek bir kodun/scriptin çalışmasını bekleyemezsiniz. her site/adrese göre kod/scriptin yapısı oluşturulup yazılması gerekir. keşke o kadar basit olsaydı.

bunu kullanabilirsiniz rss feed'leri için -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Laqinta 14 Şubat 2015 14:38

Cevap: Forum Tcl Yardım ?
 
Forumlarin ikiside vbullettin fazla bi yerin degişcegini sanmiyorum su title,category,creator filan kısımlarını nasıl görürüm bnm forumdaki ?

saywhat 14 Şubat 2015 16:09

Cevap: Forum Tcl Yardım ?
 
browser üzerinde (internet Explorer, mozilla firefox vs..) sayfayı açıp, ya sayfa üstüne sağ tıkla açılan menüden , sayfa kaynağını göster* (view source) yada browser'ınızın araçlar (tools ALT+X) menüsünde geliştirici araçları* (F12 developer tools) tıklayarak sayfa kaynağını görebilirsiniz. (IE Explorer için*)


firefox'ta ya sağ tık "sayfa kaynağını göster"yada ,sağ üst köşeden,"menüyü aç/geliştirici/sayfa kaynağı* yada geliştirici araç çubuğu" açarak sayfa kaynak kodlarını görebilirsiniz.

MesqeN 14 Şubat 2015 22:12

Cevap: Forum Tcl Yardım ?
 
Merhaba RSS Okuycu Forum için ideal ..


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


burdan indire bilirsin.


Editlemen gereken yerler.


"
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color="red"> "./scripts/webdestek/1222.db
"


"channels" "#Radyo"




!haber komutu ile çalışacaktır..
Veya.. yeni eklemelerde kanala oto yansıtacaktır.

saywhat 15 Şubat 2015 07:15

Cevap: Forum Tcl Yardım ?
 
MesqeN : buradaki -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] -> set version(number) 0.5.1; set version(date) "2012-02-27"

sizin verdiğiniz linkteki -> set version(number) "0.4"; set version(date) "2007-02-08"

rss okuyucu * adını kim koymuş,bilemem, ama kodun "gerçek" adı rss-sync ( RSS Syndication ) oldukça popüler ve en çok kullanılan,tanınan scriptlerden biridir. -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

scriptin son* sürümü github'taki benim yukarıda verdiğim halidir. ve öylede kalacak ,çünkü scriptin yazarı bu işleri bıraktığını ilan edip vedalaştı.
ve o günden beridir yaklaşık iki senedir irc'ye girmiyor artık...

Efnet'teki #EggTcl kanalı projelerinden biriydi. bir ideal * peşinde bir grup oluşturup bunun gibi "kaliteli" scriptler üretmek gibi bir ideal/oluşum vardı birkaç yıl öncesine kadar... ancak bir noktaya kadar ilerleyebildi. bu script'te bunun ürünlerinden biri.

ben yukarıda önermiştim ama istemediler. o Clubber'ın scriptini düzenlemekte ısrarcı belli ki...

Laqinta 16 Şubat 2015 23:53

Cevap: Forum Tcl Yardım ?
 
Bu verdiginiz tcl sadece rss olarak mı yayınlıyor kanala kim tarafından hangi kategori, konun linki vermez heralde ben o şekilde istiyordumda clubberin kodununu onun için sectim yani.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk