Çevrimdışı

Hayır, rastgele satır seçmiyor en iyisi yazdığım kodun açıklamasını yapayım. Anlaman(ız) için gerekli olabilir.

;join eventinin çalışması için sohbet kanalını hedef alıyoruz.
on !*:join:#sohbet:{
;ve diyoruz ki eğer %giris değişkeninin değeri kanal.txt toplam satırına eşit ise,
if %giris == $lines(kanal.txt) {
;%giris değişkenini sil
unset %giris
;%giris değişkeninin değerini 1 olarak yeniden yaz
%giris = 1
sajoin $nick $read(kanal.txt,%giris)
;şimdi %giris değişkenimizin değeri 1 yani kanal.txt dosyasındaki 1. satırdaki verileri oku diyoruz.
}
else {
Eğer if koşulu sağlanmıyorsa
inc %giris 1
;%giris değerini 1 daha arttır demin 1di şimdi 2 oldu
sajoin $nick $read(kanal.txt,%giris)
;kanal.txt dosyasındaki 2. satırı oku.
}
}
Not: if koşulu sağlanmadığı sürece %giris değişkeninin değeri 1 arttırılır taki if koşulu sağlanıncaya kadar if koşulu sağlandığı zamanda %giris değişkeni yeniden 1den başlar. Ve döngü böylece sohbet kanalına giren kullanıcı olduğu sürece devam eder
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
. Umarım işin(iz)e yarar bir anlatım olmuştur

__________________
TurkSohbet.NET | #XPass

 

Çevrimdışı

diE arkada$im kod ilk 3 4 giri$te cali$ior daha sonra

-
SAJOIN Yetersiz parametre.
-
Paso ßu yazior giri$ yapmiyor cozemedim?

 

Çevrimdışı

Arkadaslar ßiri tam kod vereßilir mi yahu.

 

Çevrimdışı

IRCTeam, kullanıcıyı tek kanal'a sıra ile sokmak istiyorsan, #kanal'ları alt alta ekle. Eğer 2 kanal'a sokmak istiyorsan, #kanal1,#kanal2 şeklinde kanal'ları yine alt alta ekle.(dosya.txt) Ve dikkat et, en alt'da boş satır bırakma.

on !*:join:#sohbet:$iif($lines(dosya.txt) == %1,unset %1) | inc %1 | sajoin $nick $read(dosya.txt,%1)

Verdiğim kod işini görecektir.

 

Çevrimdışı

t$kürler deniyeyim.

 

Çevrimdışı

Arkada$lar $unu çözemedim ilk 1 2 dk istedigim gißi giri$leri yapiyor daha sonrada SAJOIN Yetersiz parametre. giris oldugu zmn ßu yazior giri$yapmior.

 

Çevrimdışı

Sajoin yetersiz parametre demesinin, %90 ihtimal ile sebebi; dosya.txt içerisin'de satırlar arasında boşluk veya son satırdan sonra boş satır(lar) olabilir. Bundan dolayı, herhangi bir veri alamadığı için, sajoin yetersiz veya eksik parametre diyecektir.

 

Çevrimdışı

Hatta denemen için şu verdiğim alias'ı kullan anlarsın(boş satır olup olmadığını)
alias deneme $iif($lines(dosya.txt) == %2,unset %2) | inc %2 | echo -a $read(dosya.txt,%2)
/deneme yaz dosya.txt içince bulunan veri sayısı kadar. Daha doğrusu tüm verileri okutana kadar. /echo yetersiz veya eksik parametre der ise, muhakkak boş satır vardır.

 

Çevrimdışı

L4roXyL Fazla olmazsam ßunun sunucu'ya ßaglaninca otomatik listeden ayni sekilde sokaninida vereßilir misiniz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

on *:snotice:*client connect*:$iif($lines(dosya.txt) == %1,unset %1) | inc %1 | sajoin $9 $read(dosya.txt,%1)