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

Difuzyon · 12 Temmuz 2011, 21:31

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

bende sorun yok çalışmasına çalışıor ancak şiirler klasörü içine 9'dan fazla sayıda şiir.txt olması sorun yarattı ..şöyleki !şiir 44 desek 9.txt okuo yada !şiir 23 desek 4.txt okuo ..yani 9'dan fazlasını algılamakta bi sorun oluştu..ilginç....

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

evet arkadaşlar 10 ve üzeri şiirleri okumuyor sorun nededir yardımcı olurmusunuz ? Şöyleki Mesela şiir klasörüne 10.txt 11.txt diye gidiyor bota !şiir 10 yazdımı 9.txt deki şiirleri okuyor hata nerede acaba ;idea

$findfile identifieri ile çağrılan sıralama no belirtilen metin belge numarası değildir.Burada çağrılan klasör içindeki metin belge isimlerinin numerik\alfabetik bir başka deyişle artan\azalan çağrışım no'sudur.Örneğin,klasörünüzdeki metin belgeleri alt alta dizilim şu şekilde olsun;
1.txt
2.txt
3.txt
10.txt
11.txt

Burada $findfile ile aranılan metin sıralama nosu "//echo -a $findfile($mircdirşiirler,*.txt,1)" şu şekilde gelişir:
1.sıra 1.txt
2.sıra 10.txt
3.sıra 11.txt
4.sıra 2.txt
5.sıra 3.txt

Bu kısım sanırım anlaşıldı,kodda herhangi bir hata yok.
____________________________________________

(!şiir 1)Belge numarasına(1.txt) göre okutmak istiyorsanız kod aşağıdaki şekilde düşünülebilir:

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

on *:text:!şiir*:#:{
  var %: = $findfile($qt($mircdirşiirler),*.txt,0)
  if !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. }
  elseif $2 == random { play -n $nick $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%:)) ) 1500 }
  elseif $2 isnum $+(1-,%:) { play -n $nick $qt($+($mircdirşiirler,\,$2,.txt)) 1500 } | else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. }
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
📢 Şiir Fm'De KepomeyL ile Şiir mevsimi başladı..	ImOriqinaL	Yayındaki DJ'ler	0	22 Şubat 2022 20:06
Garson Mustafa'nın şiir aşkı: Müşteri sipariş aldığımı sanıyor ama ben şiir yazıyorum	NurSima	Güncel ve Son Dakika Haberler	0	23 Haziran 2021 21:13
Şiir nasıl yazılır, şiir yazma teknikleri. Şahsi fikrim.	IF	Şiir, Hikaye ve Güzel Sözler	6	02 Ağustos 2014 23:06
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

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.