IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Özelde Mesaj Yazana istedigim Mesajı Atması

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Özelde Mesaj Yazana istedigim Mesajı Atması (https://www.ircforumlari.net/mirc-scripting-sorunlari/31184-ozelde-mesaj-yazana-istedigim-mesaji-atmasi.html)

alemdar66

07 Mayıs 2007 02:04

Özelde Mesaj Yazana istedigim Mesajı Atması

Öncelikle Merhaba Arkadaslar;

Acaba Su Dedigim mümkün mü;

Ben g.sozler adında bir txt acacam icinde diyelimki 10 tane kelime var askım canım sevgilim vs.vs.

Biri bana özelimde g.sozler.txt deki kelimelerden birini yazınca ona gul.txt icindeki gül isaretini yollamak istiyorum.

Kod:

on *:text:*:?:{ if askım isin $1 { .msg $nick $read(gul.txt) }

Burdaki askım yazan yere g.sozler.txt, özele gidecek msj dada gul.txt deki gül ifadesinin tamamını yollamak istiyorum arkadaslar nasıl yapabilirim.

2. kısımdakini read edebildim de sadece ilk satır gidiyor msj olarak tamamını gönderemedim

KiLL	07 Mayıs 2007 02:38

Cevap: Özelde Mesaj Yazana istedigim Mesajı Atması

on *:text:*:?:{ if askım isin $1 {
var %say = 1
var %t = $lines(gul.txt)
while %say <= %t {
.msg $nick $read(gul.txt,%say)
inc %say
}
}
}

işine yarıycaktır

alemdar66

07 Mayıs 2007 11:12

Cevap: Özelde Mesaj Yazana istedigim Mesajı Atması

Calıstı da askım yazan kısmıda read edemezmiyiz Kelimeleri cogaltacam yani bir kelime icin deil birden cok kelime icin gecerli olacak

$read(askim.txt) bu sekilde denedim olmadı

IceR	09 Mayıs 2007 17:56

Cevap: Özelde Mesaj Yazana istedigim Mesajı Atması

Kod:

on *:text:*:?:{

 if askım isin $1 {

var %say = 1

var %t = $lines(gul.txt)

while %say <= %t {

.msg $nick $read(gul.txt,%say) 

inc %say

  }

 }

 if bitanem isin $1 {... }

}

Böyle devam et kardeş

detay

09 Mayıs 2007 18:30

Yanıt: Özelde Mesaj Yazana istedigim Mesajı Atması

PHP- Kodu:

   alias txtoku {  var %' = 0 | var %t = $lines($2)  | while %' <= %t { inc %' | .msg $1 $read($2,%') } }

su kodu remotene koy sonrada

PHP- Kodu:

   on *:text:*:?: {
if ask&#305;m isin $1- { txtoku $nick askım.txt }
if sevgilim isin $1- { txtoku $nick sevgilim.txt }
if falan isin $1- { txtoku $nick falan.txt }
}

bu sekilde türet olayi

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 17:17.