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

17Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 12 Ağustos 2015, 21:52   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Şiir pLayer




Kodu altta verdiğim şekilde, Boş bir REMOTE sayfasına eklemelisin. (ALT + R)

1- mIRC klasörünün içinde dll isimli bir klasör olacak o klasörün içine mdx.dll dosyasını atman gerekiyor.
Link: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

2- mIRC klasörünün içinde texts isimli bir klasör açıp içerisine siir hikaye komik ozdeyis isminde klasör daha açmalısın ve bu 4 klasörün içine ilgili kategori ile alakalı sözler - şiirler bulunan metin belgeleri atmalısın örnek komik1.txt gibi. Bunu yaptığın takdirde oluşturduğun metin dosyaların dialog ekranında gözükecek ve metin okutma işlemini yapabileceksin.

- mirc ana dizinini açmak için //run $mircdir komutunuda kullanabilirsin.

İşlemler bittikten sonra /sanat yazıp başlatabilirsin. İyi forumlar.
Not: Bunları yeterince doğru yaptığına emin ol lütfen.

__________________
Hüznümün en yükseğinden şöyle baksan manzarama gözlerini alamazdın. Gözlerini alırdılar..
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 23 Mart 2017, 14:31   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Şiir pLayer




Çalışmıyor solda şiirlerin isimleri görünüyor fakat sağda şiirin kendisi görünmüyor Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. yazısı hiç degişmiyor gönder dediğimde BILGI Unknown command yazıyor yardımı olabilecek yok mu şimdiden teşekkürler

 
Alıntı ile Cevapla

Alt 31 Ağustos 2017, 01:24   #13
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Şiir pLayer




Feragat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kodu altta verdiğim şekilde, Boş bir REMOTE sayfasına eklemelisin. (ALT + R)

1- mIRC klasörünün içinde dll isimli bir klasör olacak o klasörün içine mdx.dll dosyasını atman gerekiyor.
Link: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

2- mIRC klasörünün içinde texts isimli bir klasör açıp içerisine siir hikaye komik ozdeyis isminde klasör daha açmalısın ve bu 4 klasörün içine ilgili kategori ile alakalı sözler - şiirler bulunan metin belgeleri atmalısın örnek komik1.txt gibi. Bunu yaptığın takdirde oluşturduğun metin dosyaların dialog ekranında gözükecek ve metin okutma işlemini yapabileceksin.

- mirc ana dizinini açmak için //run $mircdir komutunuda kullanabilirsin.

İşlemler bittikten sonra /sanat yazıp başlatabilirsin. İyi forumlar.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias sanat { if $1 { set %sanat $1 } /dialog -m sanat sanat } dialog sanat { title "Şiir/hikaye/komik/özdeyişler" size -1 -1 438 301 option pixels button "Kapat", 3, 2 270 76 24, cancel list 1, 3 9 156 214, size extsel tab "Tab 1", 5, -50 -50 600 400 edit "", 2, 161 9 275 214, tab 5 read multi return autovs vsbar combo 4, 3 226 155 85, tab 5 size drop edit "", 6, 251 228 100 21, tab 5 button "Gönder", 7, 360 226 76 24, tab 5 text "Rumuz/#kanal:", 8, 174 232 72 16, tab 5 text "* Göndermek istediğiniz rumuz/#kanalı yazın ve gönder butonuna tıklayın. Seçtiğiniz eser otomatikman gönderilecektir.", 9, 183 255 252 44, tab 5 tab "Tab 2", 12 box "Quit ve Part Mesajları Düzenleme", 13, 171 3 336 282, tab 12 combo 14, 177 33 239 241, tab 12 size hsbar vsbar button "Ekle", 15, 425 32 76 24, tab 12 button "Çıkar", 16, 425 65 76 24, tab 12 } on *:dialog:sanat:*:*: { if $devent == init { mdxinit mdx SetControlMDX $dname 1 Treeview fullrowselect singleexpand nohscroll > $views mdx SetColor $dname 2 text $rgb(255,255,255) mdx SetColor $dname 2 textbg $rgb(89,162,166) mdx SetColor $dname 2 background $rgb(89,162,166) kalin 1,2 12 did -i $dname 1 1 setcolor text $rgb(255,255,255) did -i $dname 1 1 setcolor line $rgb(186,218,7) did -i $dname 1 1 setcolor bkg $rgb(99,99,156) didtok $dname 4 44 Şiirler,Hikayeler,Komikler,Özdeyişler did -c $dname 4 1 did -a $dname 2 Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. if %sanat { did -a $dname 6 $ifmatch } else { if $active ischan || $query($active) { did -a $dname 6 $ifmatch } } sanat.yukle did -f $dname 6 } if $devent == sclick { if $did == 1 && slclick select * iswm $did($did,1) { set %sanat.y $right($gettok($did($dname,1,$gettok($did($did,1),4-,32)),-1,48),-1) if $did(sanat,4).sel == 1 { set %sanat.dosya siir } if $did(sanat,4).sel == 2 { set %sanat.dosya hikaye } if $did(sanat,4).sel == 3 { set %sanat.dosya komik } if $did(sanat,4).sel == 4 { set %sanat.dosya ozdeyis } if $exists($shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt))) { .loadbuf 0 -oipr $dname 2 $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) } } if $did == 4 { sanat.yukle } if $did == 7 { if %sanat.dosya && %sanat.y { if $did($dname,6) { var %im $did($dname,6) if %im !ischan && !$query(%im) { query %im } scid $activecid play %im $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) 2000 bilgi %sanat.y dosyası $iif($left(%im,1) == $chr(35),%im kanalına,%im rumuzuna) yazılıyor... } else { var %im $$?"Gönderilecek rumuzu veya #kanal ismini yazınız:" if %im { did -a $dname 6 %im if %im !ischan && !$query(%im) { query %im } scid $activecid play %im $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) 2000 bilgi %sanat.y dosyası $iif($left(%im,1) == $chr(35),%im kanalına,%im rumuzuna) yazılıyor... } } } else { bilgi Göndermek için herhangi bir şiir/hikaye/komik/özdeyiş seçmediniz. } } } if $devent == close { unset %sanat* } } alias sanat.yukle { did -r sanat 1,2 did -a sanat 2 Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. if $did(sanat,4).sel == 1 { set %sanat.dosya siir } if $did(sanat,4).sel == 2 { set %sanat.dosya hikaye } if $did(sanat,4).sel == 3 { set %sanat.dosya komik } if $did(sanat,4).sel == 4 { set %sanat.dosya ozdeyis } var %i 1 while %i <= $findfile($+(texts\,%sanat.dosya),*.txt,0) { did -a sanat 1 $left($nopath($findfile($+(texts\,%sanat.dosya),*.txt,%i)),-4) inc %i 1 } } alias mdx dll dll\mdx.dll $1- alias mdxinit { mdx SetMircVersion $version mdx MarkDialog $dname } alias kalin { mdx SetFont $dname $1 $2 800 tahoma }


selam..
ayenen denilenleri yaptim ama calismiyor..
siirler ismi sol pencerede gözteriyor ama tiklayinca sag pencerede siiri yazmiyor ve kanala gönder tikladigimizdada göndermiyor..

sorun ne bilen varmi? tskler..

HATA:
BILGI Unknown command
-
Simdi fark ettimde.. dialog'da bunlar yazili ama yoklaar dialogda
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


box "Quit ve Part Mesajları Düzenleme", 13, 171 3 336 282, tab 12
combo 14, 177 33 239 241, tab 12 size hsbar vsbar
button "Ekle", 15, 425 32 76 24, tab 12
button "Çıkar", 16, 425 65 76 24, tab 12

__________________
SeN BeNiM YiLDiZ KaYaRKeN TuTTuGuM DiLeGiM DeGiL, eZaN oKuRKeN eTTiGiM DuaMSiN!!!

Konu ZaLiM1979 tarafından (31 Ağustos 2017 Saat 01:30 ) değiştirilmiştir. Sebep: düzenleme
 
Alıntı ile Cevapla

Alt 31 Ağustos 2017, 21:08   #14
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Şiir pLayer




ZaLiM1979 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
selam..
ayenen denilenleri yaptim ama calismiyor..
siirler ismi sol pencerede gözteriyor ama tiklayinca sag pencerede siiri yazmiyor ve kanala gönder tikladigimizdada göndermiyor..

sorun ne bilen varmi? tskler..

HATA:
BILGI Unknown command
-
Simdi fark ettimde.. dialog'da bunlar yazili ama yoklaar dialogda
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


box "Quit ve Part Mesajları Düzenleme", 13, 171 3 336 282, tab 12
combo 14, 177 33 239 241, tab 12 size hsbar vsbar
button "Ekle", 15, 425 32 76 24, tab 12
button "Çıkar", 16, 425 65 76 24, tab 12

Aldığın hata mesajının sebebi, Kod içinde /bilgi komutu olması ve bu komutun çalışmasını sağlayacak işlevi barındıran alias bulunmaması.

Renkli bölümler değişen/oynanan kısımlar.

Ekle/Çıkar dialog tasarımı ve event'ı ile alakaladır.

Örnek Görüntü:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias sanat { if $1 { set %sanat $1 } /dialog -m sanat sanat } dialog sanat { title "Şiir/hikaye/komik/özdeyişler" size -1 -1 438 301 option pixels button "Kapat", 3, 2 270 76 24, cancel list 1, 3 9 156 214, size extsel tab "Tab 1", 5, -50 -50 600 400 edit "", 2, 161 9 275 214, tab 5 read multi return autovs vsbar combo 4, 3 226 155 85, tab 5 size drop edit "", 6, 251 228 100 21, tab 5 button "Gönder", 7, 360 226 76 24, tab 5 text "Rumuz/#kanal:", 8, 174 232 72 16, tab 5 text "* Göndermek istediğiniz rumuz/#kanalı yazın ve gönder butonuna tıklayın. Seçtiğiniz eser otomatikman gönderilecektir.", 9, 183 255 252 44, tab 5 tab "Tab 2", 12 box "Quit ve Part Mesajları Düzenleme", 13, 171 3 336 282, tab 12 combo 14, 177 33 239 241, tab 12 size hsbar vsbar button "Ekle", 15, 425 32 76 24, tab 12 button "Çıkar", 16, 425 65 76 24, tab 12 } on *:dialog:sanat:*:*: { if $devent == init { mdxinit mdx SetControlMDX $dname 1 Treeview fullrowselect singleexpand nohscroll > $views mdx SetColor $dname 2 text $rgb(255,255,255) mdx SetColor $dname 2 textbg $rgb(89,162,166) mdx SetColor $dname 2 background $rgb(89,162,166) kalin 1,2 12 did -i $dname 1 1 setcolor text $rgb(255,255,255) did -i $dname 1 1 setcolor line $rgb(186,218,7) did -i $dname 1 1 setcolor bkg $rgb(99,99,156) didtok $dname 4 44 Şiirler,Hikayeler,Komikler,Özdeyişler did -c $dname 4 1 did -a $dname 2 Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. if %sanat { did -a $dname 6 $ifmatch } else { if $active ischan || $query($active) { did -a $dname 6 $ifmatch } } sanat.yukle did -f $dname 6 } if $devent == sclick { if $did == 1 { set %sanat.y $did(sanat,1).seltext if $did(sanat,4).sel == 1 { set %sanat.dosya siir } if $did(sanat,4).sel == 2 { set %sanat.dosya hikaye } if $did(sanat,4).sel == 3 { set %sanat.dosya komik } if $did(sanat,4).sel == 4 { set %sanat.dosya ozdeyis } if $exists($shortfn(texts\ $+ %sanat.dosya $+ \ $+ %sanat.y $+ .txt)) { .loadbuf 0 -oipr $dname 2 $shortfn(texts\ $+ %sanat.dosya $+ \ $+ %sanat.y $+ .txt) } } if $did == 4 { sanat.yukle } if $did == 7 { if %sanat.dosya && %sanat.y { if $did($dname,6) { var %im $did($dname,6) if %im !ischan && !$query(%im) { query %im } scid $activecid play %im $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) 2000 bilgi %sanat.y dosyası $iif($left(%im,1) == $chr(35),%im kanalına,%im rumuzuna) yazılıyor... } else { var %im $$?"Gönderilecek rumuzu veya #kanal ismini yazınız:" if %im { did -a $dname 6 %im if %im !ischan && !$query(%im) { query %im } scid $activecid play %im $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) 2000 bilgi %sanat.y dosyası $iif($left(%im,1) == $chr(35),%im kanalına,%im rumuzuna) yazılıyor... } } } else { bilgi Göndermek için herhangi bir şiir/hikaye/komik/özdeyiş seçmediniz. } } } if $devent == close { unset %sanat* } } alias sanat.yukle { did -r sanat 1,2 did -a sanat 2 Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. if $did(sanat,4).sel == 1 { set %sanat.dosya siir } if $did(sanat,4).sel == 2 { set %sanat.dosya hikaye } if $did(sanat,4).sel == 3 { set %sanat.dosya komik } if $did(sanat,4).sel == 4 { set %sanat.dosya ozdeyis } var %i 1 while %i <= $findfile(texts\ $+ %sanat.dosya ,*.txt,0) { did -a sanat 1 $left($nopath($findfile(texts\ $+ %sanat.dosya ,*.txt,%i)),-4) inc %i 1 } } alias mdx dll dll\mdx.dll $1- alias mdxinit { mdx SetMircVersion $version mdx MarkDialog $dname } alias kalin { mdx SetFont $dname $1 $2 800 tahoma } alias bilgi echo -a $1-


__________________
The Ghost of Christmas Past...

i'm here sometimes
 
Alıntı ile Cevapla

Alt 01 Eylül 2017, 20:06   #15
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Şiir pLayer




Eyv üstadim calisti.. Hayirli Bayramlar cümletten..


Feragat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Aldığın hata mesajının sebebi, Kod içinde /bilgi komutu olması ve bu komutun çalışmasını sağlayacak işlevi barındıran alias bulunmaması.

Renkli bölümler değişen/oynanan kısımlar.

Ekle/Çıkar dialog tasarımı ve event'ı ile alakaladır.

Örnek Görüntü:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias sanat { if $1 { set %sanat $1 } /dialog -m sanat sanat } dialog sanat { title "Şiir/hikaye/komik/özdeyişler" size -1 -1 438 301 option pixels button "Kapat", 3, 2 270 76 24, cancel list 1, 3 9 156 214, size extsel tab "Tab 1", 5, -50 -50 600 400 edit "", 2, 161 9 275 214, tab 5 read multi return autovs vsbar combo 4, 3 226 155 85, tab 5 size drop edit "", 6, 251 228 100 21, tab 5 button "Gönder", 7, 360 226 76 24, tab 5 text "Rumuz/#kanal:", 8, 174 232 72 16, tab 5 text "* Göndermek istediğiniz rumuz/#kanalı yazın ve gönder butonuna tıklayın. Seçtiğiniz eser otomatikman gönderilecektir.", 9, 183 255 252 44, tab 5 tab "Tab 2", 12 box "Quit ve Part Mesajları Düzenleme", 13, 171 3 336 282, tab 12 combo 14, 177 33 239 241, tab 12 size hsbar vsbar button "Ekle", 15, 425 32 76 24, tab 12 button "Çıkar", 16, 425 65 76 24, tab 12 } on *:dialog:sanat:*:*: { if $devent == init { mdxinit mdx SetControlMDX $dname 1 Treeview fullrowselect singleexpand nohscroll > $views mdx SetColor $dname 2 text $rgb(255,255,255) mdx SetColor $dname 2 textbg $rgb(89,162,166) mdx SetColor $dname 2 background $rgb(89,162,166) kalin 1,2 12 did -i $dname 1 1 setcolor text $rgb(255,255,255) did -i $dname 1 1 setcolor line $rgb(186,218,7) did -i $dname 1 1 setcolor bkg $rgb(99,99,156) didtok $dname 4 44 Şiirler,Hikayeler,Komikler,Özdeyişler did -c $dname 4 1 did -a $dname 2 Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. if %sanat { did -a $dname 6 $ifmatch } else { if $active ischan || $query($active) { did -a $dname 6 $ifmatch } } sanat.yukle did -f $dname 6 } if $devent == sclick { if $did == 1 { set %sanat.y $did(sanat,1).seltext if $did(sanat,4).sel == 1 { set %sanat.dosya siir } if $did(sanat,4).sel == 2 { set %sanat.dosya hikaye } if $did(sanat,4).sel == 3 { set %sanat.dosya komik } if $did(sanat,4).sel == 4 { set %sanat.dosya ozdeyis } if $exists($shortfn(texts\ $+ %sanat.dosya $+ \ $+ %sanat.y $+ .txt)) { .loadbuf 0 -oipr $dname 2 $shortfn(texts\ $+ %sanat.dosya $+ \ $+ %sanat.y $+ .txt) } } if $did == 4 { sanat.yukle } if $did == 7 { if %sanat.dosya && %sanat.y { if $did($dname,6) { var %im $did($dname,6) if %im !ischan && !$query(%im) { query %im } scid $activecid play %im $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) 2000 bilgi %sanat.y dosyası $iif($left(%im,1) == $chr(35),%im kanalına,%im rumuzuna) yazılıyor... } else { var %im $$?"Gönderilecek rumuzu veya #kanal ismini yazınız:" if %im { did -a $dname 6 %im if %im !ischan && !$query(%im) { query %im } scid $activecid play %im $shortfn($+(texts\,%sanat.dosya,\,%sanat.y,.txt)) 2000 bilgi %sanat.y dosyası $iif($left(%im,1) == $chr(35),%im kanalına,%im rumuzuna) yazılıyor... } } } else { bilgi Göndermek için herhangi bir şiir/hikaye/komik/özdeyiş seçmediniz. } } } if $devent == close { unset %sanat* } } alias sanat.yukle { did -r sanat 1,2 did -a sanat 2 Soldaki listeden herhangi bir eser seçip okuyabilir, alt bölümdeki kutucuğa gönderilecek rumuzu/#kanalı yazıp gönderebilirsiniz. if $did(sanat,4).sel == 1 { set %sanat.dosya siir } if $did(sanat,4).sel == 2 { set %sanat.dosya hikaye } if $did(sanat,4).sel == 3 { set %sanat.dosya komik } if $did(sanat,4).sel == 4 { set %sanat.dosya ozdeyis } var %i 1 while %i <= $findfile(texts\ $+ %sanat.dosya ,*.txt,0) { did -a sanat 1 $left($nopath($findfile(texts\ $+ %sanat.dosya ,*.txt,%i)),-4) inc %i 1 } } alias mdx dll dll\mdx.dll $1- alias mdxinit { mdx SetMircVersion $version mdx MarkDialog $dname } alias kalin { mdx SetFont $dname $1 $2 800 tahoma } alias bilgi echo -a $1-



__________________
SeN BeNiM YiLDiZ KaYaRKeN TuTTuGuM DiLeGiM DeGiL, eZaN oKuRKeN eTTiGiM DuaMSiN!!!
 
Alıntı ile Cevapla

Alt 18 Şubat 2018, 15:48   #16
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Şiir pLayer




Harika bir diyalog.. Ellerinize sağlık.. Bu diyaloga, şiir okutma esnasında şiiri durdurabilmek için Durdur butonu ekleyebilir miyiz.. Ayrıca Gönder butonuna bir kaç kez peşpeşe basıldıgında kaç kez basıldıysa o kadar sayıda yeniden okumaya devam ediyor.. Gönder butonunu sadece şiir okutulurken deaktif edebilir miyiz yani ilk okuması bitmeden ikinci kez tıklanamasın..
Bilgisayarımızda kayıtlı olan şiir text dosyalarını da diyalogdaki mevcut Ekle / Çıkar butonları ile ekleyip çıkarabilme özelliği kazandırabilir miyiz.. Teşekkür ederim..

 
Alıntı ile Cevapla

Cevapla

Etiketler
Şiir


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Video Player v1.1 [ mIRC Media Center ] CipriX mIRC Scripting Hazır Kodlar 1 22 Şubat 2022 17:15
Afrikalı Zenci Bir Adam'ın, 2005 Yılında En İyi Şiir Olmaya Aday Gösterilmiş Şiir'i Sevda Şiir, Hikaye ve Güzel Sözler 3 27 Ağustos 2011 09:14
Şiir yazmana gerek yok, şiir sensin. Luis Şiir, Hikaye ve Güzel Sözler 0 07 Mart 2010 22:03