Çevrimdışı

arkadaslar bendeki code söyle hepsini yazmadim sorunlu kismini yazdim

msg # $read(C:\Bilgi.txt,w,* $+ $2- $+ *) sent to $nick

buradan herhangi bir kisiye bilgi gönderiyorum ama $read kisminda bir hata var bende 3 er 3 er kayitli bilgiler var text dosyasinda söyle



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

bunu okutup gönderiyorum ama scripts hep enbastakini gönderiyor
ben istiyorumki birinci kisiye bastakini gönderince ikinci kisiye ikincisini göndersin 3 üncüye de 3 üncüsünü ama olmuyor herkese en bastakini gönderiyor ve benim yazmis oldugum ikinci ve 3 üncü adresler ise yaramiyor

zamanla 8 veya 10 adresede cikartabilirim ama gelgelelim nasil yapcam iste onuda bilmiyorum yardim ederseniz sevinirim cok tesekkürler saygilar..

 

Çevrimdışı

bunun için kodun tamamını yollamalısın

 

Çevrimdışı

msg # $read(C:\Bilgi.txt,w,* $+ $2- $+ *)
bunu incelersek
bilgi.txt dosyasinda onceden verdigin yaziyi arastiriyor

$read(C:\Bilgi.txt,w,*[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]*)
dersen txtden
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buradan alabilirsiniz
yazisini vericektir cunku ilk karsilasan yazi bu.
$read(C:\Bilgi.txt,w,*[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]*,2)
$read(C:\Bilgi.txt,w,*[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]*,3)
bunlarda diger 2. ve 3.satirlari vericektir.yukarıdaki komutta $2- diye belirttigin kisim diger 3unude kapsayacak birsey olursa ki ornekte gosterdim istedigin sey olucaktir

 

Çevrimdışı

ne yapmaya calıstıgını tam anlatırsan yardımcı olabiliriz. Sana mesaj geldiğindemi kanala giriş oldugundamı hangi olayda bu mesajın atılmasını istiyorsun ? Kullanacagımız eventi bilmeden kodu yazamam

 

Çevrimdışı

on *:text:*!istek *http//.*.com*:#: {
if !$read(nickler.txt,w,$address($nick,2)) {
.timer 1 1 /msg $nick $read(C:\adres.txt,w,* $+ $2- $+ *)
/msg # $read(C:\url.txt,w,* $+ $2- $+ *) 12sent to $nick
}
else {
msg $nick sen önceden aldin simdi bekle
}
}


bu kodun tamami bu sekilde istek yapan kisinin istedigi adres bende varsa dosyadan okuyor gönderiyor kisinin özeline ve kanalada bilgi veriyor o kisiye gönderildi diye buraya kadar hepsi tamam ama okuyunca en bastakini veriyor devamli ama bende 3 veya 4 tane ayni bilgiden var ve text dosyasinda karisik olarak ayni dahada olmassa sirayla nasil okuturum yani burada neyi degistirmem gerekiyo $read(C:\url.txt,w,* $+ $2- $+ *)