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. }
}
[/QUOTE]
Teşekkürler kodda sorun yok fakat şöyle bir problem var Aynı anda iki kişi şiir isteğinde bulundumu mirc.exe hata veriyor bunu onleye bilirmiyiz ? Difuzyon ?
orneğin iki kişi aynı anda !şiir 5 !şiir 10 yazdımı mirc.exe hata veriyor. zamanlama ile alakalımıdır çözümü varmıdır teşekkürler şimdiden ilgilendiğin için.