IRC serverinizdaki user sayisini Web sitenizde gostermek. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

tarzan · 23 Ocak 2008, 02:29

Evet arkadaslar epeydir beklenen bir tcl di sanirim. Bende cok aradim webde ancak tam anlamiyla isimi goren birsey bulamamistim. tcl dilinide pek bilmedigim icin kendim yazamamistim bugune kadar. Sadece aCouSTiC'in yazmis oldugu istek.tcl inde ufak tefek bir kac editleme yapmistim. Ancak uzun aramalarim bir sonuca ulasmayinca [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] adresini bir ziyaret etmek zorunluluk oldu. Bu kadar basit olduguna sanirim sizde inanamiyacaksiniz.

İstatistik.tcl:

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

#********************************************************************
# İstatistik v1 Yapımcı :Armağan YÜKSEL
# 
# İrc serverdaki kanalları ve user sayılarını .txt dosyasına kaydeder.
# 3 dk. sonra kendini günceller. (Süreyi kendiniz ayarlayabilirsiniz)
# Yazacağınız herhangi bir javascript,php,asp ..vs koduyla dosyayı okutup,
# web sayfasina yansıtabilirsiniz. Çalışan halini;
# 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
adresinde görebilirsiniz.
# ********************************************************************

#Verilerin tutulacagi dosya adi.Yol belirtemyip sadece istatistik.txt seklinde yazarsaniz,
#Eggdrop kalsorunde botunuzun .conf dosyasinin oldugu dizine yaratacaktir ve web sitenizden dosyayi okuyamiyacaksiniz.
#Bu yuzden dosyayi web klasorunuzun icine yaratmaniz gerekiyor. 
set dosyaadi "/home/usr/public_html/istatistik.txt"

#bindler
bind join - * listcek
bind raw -|- 322 listele_ve_yaz

#Bot servera baglandiginda /list cekiyor..
proc listcek {args} {
global chan dosyaadi
putserv "LIST"
#Burda dosya yoksa yaratiyor. 3dk sonra geri dondugunde dosyayi temizliyor.
set fs [open "$dosyaadi" w]
close $fs 
}

#Bot /list komutuyla gelen verilerin icersinden kanal isimlerini ve kisi sayilarini aliyor.
proc listele_ve_yaz {from key arg} {
global kanal kisi dosyaadi
#burda verileri aliyor
set kanal [lindex $arg 1]
set kisi [lindex $arg 2]
#burda dosyaya yaziyor.
set fs [open "$dosyaadi" a]
#Ben kendi web sayfamdaki tasarimima gore dosyaya <div>'ler ve style'larla beraber yazmasini istedim.
#Ozellikle silmedimki belki sizede yardimci olur.
#Siz "" icini kendinize gore ayarlayabilir yada sadece $kanal ve $kisi yazarak bu bilgileri yazdirabilirsiniz. 
puts $fs "<div style=\"float:left; padding:3px; width:150px;\"><span style=\"font-weight:bold; color:black;\">$kanal:</span>$kisi kisi</div>"
close $fs
#burda 3 dk. bekliyor ve tekrar basa donuyor.(Boylelikle yeniden /list cekilmesini sagliyor ve
#verilerin oldugu dosyayi yeni verilerin yazilmasi icin temizliyor.
timer 3 listcek
}
putlog "4Istatistik.v1 Yüklendi.."
putlog "4Yapımcı : Armağan YÜKSEL"

Tcl dosyamiz bu kadar. Gerekli aciklamalari icersinde yaptim. Simdi olusacak txt dosyasindaki verileri okumak icin bir php dosyasi yaratalim.

oku.php

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

<html>
<head>
<title></title>
</head>
<body style="font-family:Verdana; font-size:12px; color:#ff096c;">

<div style="width:650px;">
<?
  $dosya = fopen("istatistik.txt","r");
  while(!feof($dosya)) { 
    $satir= fgets($dosya, 50);
    echo "$satir";
  }
  fclose($dosya);
?>
</div>
</body>
</html>

istatistik.txt dosyamiz web kalsorumuzun icinde oldugu icin oku.php dosyamizinda ayni yerde olmasi cok mantikli
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Su anda gerekli veriyi aldik okuduk duzenledik ve yazdik. tcl dosyasinin icersinde de aciklamistim ama bir kez daha soyliim ben tcl icindeki ve php icindeki divleri stylelari kendi web sayfama gore tasarladim. kanallari 4 sira yana diziyor sona asagi satira geciyor. Sizede fikir olsun diye silmedim. Siz kendinize gore ayarlayabilirsiniz.
Aslinda html den anlayan arkadaslar icin mevzu burada bitiyor ama daha az bilgisi olan arkadaslar icin devam ediyim. Su asamada [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] de verileri gosteriyor. BEn bunu ana sayfama koymak istiyorum derseniz; index sayfaniz icersinde yaratacaginiz bir iframein src sine oku.php linkini vermeniz yeterli.
Olayi dahada ileri goturup ana sayfamdaki verilerde 3-5 da bir yenilensin diyorsaniz, oku.php icersinde <head></head> taglari arasina;

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

<meta http-equiv="refresh" content="180" />

kodunu eklerseniz 3dk da bir oku.php dosyasini guncelleyecektir.

Ben bide goriyim derseniz.

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

Sonuc olarak bu goruntuyu alabilirsiniz. Gorunmesini istemediginiz kanallari +p moduna almaniz botunuz oper degilse ise yariyor.
Tek eksigide sanirim kanallari rastgele almasi. Bunun icinde tclden benden daha iyi anlayan arkadaslar tcl icersinde ufak bir editleme yapip kanallari kisi sayisina gore siralatabilirler. Ben cok urasamadim acikcasi. Bende zaman zaman forumlarda yazilan bilgilerden faydalanan bir insan olarak ve bu olayin baya cok yapilamak istenilen birsey olamasi dolayisyla sizlerlede paylasmanin guzel olacagini dusundum.

Kolay gelsin.;oki

Mickey · 23 Ocak 2008, 07:24

Paylaşımın ve emeğin için teşekkürler ancak bunun yerine çok daha gelişmiş olan thales var lakin bunun kurulumu hakkında geniş bir anlatım yok. En kısa sürede ekran görüntülü bir şekilde anlatımını sağlayan yeni bir makale yayınlayacağım.

NeXteR · 27 Ocak 2008, 11:57

Birazdaha Geniş Anlatımlı olsaydı GüzeL olurdu Gerçekten..

Radows · 27 Ocak 2008, 12:03

Anlatımda daha çok resim,grafik vs kullansaydın bence daha güzel olurdu.
Yinede paylaşım için tşkler.

Radows.

SurucLu · 30 Ocak 2008, 01:28

Bot 3 dakikada bir /list komutunu uygulayacakmıs
peki bu durumun bir sakıncası yokmu ?

bide sadece belirledigimiz kanalları alabilirmi?
veya toplamını gosterebilirmi?

Ornek : Suanda 544 kişi sohbet ediyor..

erd200 · 14 Nisan 2009, 01:07

Paylaşım için teşekkürler. Hereşeyi yaptım oku linkinde bu şekilde hata verdi nedendir acaba ?

403 Forbidden

Access to this resource on the server is denied!
Powered By [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
LiteSpeed Technologies is not responsible for administration and contents of this web site!

erd200 · 13 Mayıs 2009, 02:00

Arkadaşlar kanal isimlerini ve kişi sayılarını yazdı bot güzel çalıştı. Ben buna birde kanal başlıklarını (topic) eklemek istiyorum. Nasıl yapabilirim.

delibela · 21 Haziran 2009, 19:30

Ellerine sağlık. Ben de kurdum gayet güsel çalışıyor. Benim bi isteğim olcak. Webde kanallar karışık çıkıyor. Kanallar alfabetik sıraya yada en çok kişi olana göre sıralansa daha güzel olur.

SAB!KA · 23 Haziran 2009, 00:29

Eski bi konu ama yapabilen varmı ben denedim beyaz sayfa çıkıyor herhangi bir içerik yok ?

Raw · 18 Ekim 2009, 04:13

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

Arkadaşlar kanal isimlerini ve kişi sayılarını yazdı bot güzel çalıştı. Ben buna birde kanal başlıklarını (topic) eklemek istiyorum. Nasıl yapabilirim.

#Sohbet:2 kisi 1Keyf4ALem1
#Samsun:2 kisi 1Keyf4ALem1
#25+:2 kisi 1Keyf4ALem1

topic gösterimi ben denedim hoş olmuyor arkadaşlar .. php deki renk kodlamaları ile irc deki renk kodlamaları birbirini tutmuyor çünki .. iyi forumlar ..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Oracle UI (User Interface)-user profile	SeckiN	Oracle	0	04 Eylül 2013 23:57
Bu Moduledeki sifre karekter sayisini nasil Yukseltebiliriz?	janus	Unreal IRCd	7	25 Kasım 2010 15:06
Google ile Sitenizde Ziyaretcilerle Online İletişim Talk	ircpolice	Arama Motorları Haberleri	0	04 Temmuz 2010 03:47

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.