IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
16Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 10 Temmuz 2012, 21:44   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
txt satır okutma




selam arkadaslar bir kod yapmak ıstedım yapamadım

Alıntı:

alias vb {
var %l = 1
var %gg tokenize 32 $read(sistem\4.txt)
var %g $calc($numtok(%gg,32) - 2)
while %l <= %g { %gg
echo -a  $+ $rand(3,7) $*
inc %l
}
}


yapmak istediğim txt dosyasından rastgele bır satır secip okutmak okurken her kelimeyi farklı renkte okusun istedım ama olmadı yardım edermısınız

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 10 Temmuz 2012, 21:51   #2
Toprak
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




Buyrun;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias oku { msg $active $+(CTRL+K Koyunuz,$rand(1,15),$read(sistem/4.txt)) }


 
Alıntı ile Cevapla

Alt 10 Temmuz 2012, 22:01   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




$rand(3,7) $read(sistem\4.txt) gibi bende yapabilirdim satırdaki her kelimeyi demiştim sanırım dikkatinizden kactı

 
Alıntı ile Cevapla

Alt 10 Temmuz 2012, 22:06   #4
Toprak
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




Sanırım istedigin kod bu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias oku { msg $active $regsubex($read(sistem/4.txt),/(^| )(.)/g,\1 $+(Ctrl+K,$rand(1,15))) }


 
Alıntı ile Cevapla

Alt 10 Temmuz 2012, 22:38   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




merhaba arkadaslar txt adında bır konu bende tekrar exstra bır konu acmak istemedim

bir kode ihtıyacım var

dosyaadı.txt içerisinde isimler mevcut alt alta
ali*
*mehmet*
*hasan
gibi şimdi yapmak istediğimiz sey su mumkunse tabıkı
!ekle dediğimde
txt dosyasındakı isimleri /os SQLINE add txtdosyası yasaklı

seklınde ekleyecek yanı dosyada ne sekılde eklıyse wildcard kullanılmıs ahmet* ali?an *hasan* aynen dosyadakı halıyle SQLINE eklettirmek istıyorum


komut kullanımı / operserv SQLINE add nick sebeb

ilqilenırsenız sevınıırm

 
Alıntı ile Cevapla

Alt 10 Temmuz 2012, 23:17   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




!ekle komutu ile bota eklettireceksen
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#kanal: { if $1 == !ekle { var %mdczr 1 while %mdczr <= $lines(nickler.txt) { /.operserv sqline add $read(nickler.txt,%mdczr) Sebep inc %mdczr } } }

!ekle komutu ile kendin eklemeyi yapacaksan
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#kanal: { if $1 == !ekle { var %mdczr 1 while %mdczr <= $lines(nickler.txt) { /.operserv sqline add $read(nickler.txt,%mdczr) Sebep inc %mdczr } } }


 
Alıntı ile Cevapla

Alt 10 Temmuz 2012, 23:20   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




alias sekle { var %i = 1, %t = $lines(dosyaadi.txt) | while (%i <= %t) { operserv sqline add $read(dosyaadi.txt,%i) | inc %i } }

/sekle komutunu yaptığında dosyaadi.txt dosyasındaki nickleri sqline listesine otomatikmen ekler.

__________________
Şimdi Saat Sensizliğin Ertesi..
 
Alıntı ile Cevapla

Alt 07 Eylül 2012, 19:20   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




on *:text:*:#kanal: {
if $1 == !oku {
var %mdczr 1
while %mdczr <= $lines(topix.txt) {
/msg #btrg $read(topix.txt,%mdczr)
inc %mdczr
}
}
}


Arkadaşlar: !oku dediğimde topix.txt içinde eklenen son satırı okuyup kanala yansıtıcak. Ancak yukarıdaki kod ile !oku dediğimde
topix.txt icindeki tüm satırları pasteliyor. Ben sadece topix.txt içinde son eklenen satırı listeletmek istiyorum.

on *:TEXT:*!topic*:#:{
if !$count($nick(#,$nick).pnick,@,&) { msg # 4Topic 2yazabilmek için 4@p olmanız 2gereklidir. | return }
if $1 == !topic { write topix.txt $2
topic $chan $2 $3- }
}

Topic eklemede sıkıntı şu !topic merhaba ben geldim nasılsınız.yazdığımda topix.txt içine sadece Merhaba kelimesini alıyor. ben geldim 2 ve 3 kelimeler topix.txt içinde çıkmamaktadır.

Haliyle !oku dediğimde tek satırı almaktadır.

Topic eklemek için topix.txt 'ye !topic mesajınız seklinde yazdırıyorum.
!oku dediğimde son eklenen !topic mesajını kanala yazsın istiyorum.
Saygılar.

 
Alıntı ile Cevapla

Alt 07 Eylül 2012, 20:02   #9
Toprak
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




Buyur;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#:{ if $1 == !topic { if !$count($nick(#,$nick).pnick,@,&) { msg # 4Topic 2yazabilmek için 4@p olmanız 2gereklidir. | return } if !$2 { msg # Lütfen Topic Mesajı Belirtiniz. | return } if !$read(topic.txt,w,$2-) { write topic.txt $2- } topic # $2- } if $1 == !oku { var %g = 1 | while %g <= $lines(topic.txt) { msg # $read(topic.txt,%g) | inc %g } } }


 
Alıntı ile Cevapla

Alt 07 Eylül 2012, 20:09   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: txt satır okutma




Ghost tsk ederım ancak. topic.txt icindeki tum msjları kanala yansıtıyor. Sadece topic.txt içindeki son eklenen satırı yazsın istiyorum. Teşekkürler.

Örnek:

!topic 7 eylül günü sonucları a nicki online b yok
!topic 8 eylül toplantı kararlastırılacak.


!oku dediğimde son eklediğim satır 8 eylül toplantı kararlastırılacak yazsın kanala.

 
Alıntı ile Cevapla

Cevapla

Etiketler
okutma, satır, txt


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
İşte satır satır Başbuğ'un ifadeleri Lucifer Haber Arşivi 0 06 Ocak 2012 09:18
Satır Satır Sır Şiir, Hikaye ve Güzel Sözler 0 07 Nisan 2011 13:11
Dosyadan satır satır okuma kod bloğu Fonzerelli Java 0 11 Kasım 2010 14:43
Tcl Satır okutma Yardım akkaya Eggdrop, NeoStats, BNC 9 01 Temmuz 2009 15:39
Bota satır okutma muratt_aziz mIRC Scripting Sorunları 3 02 Mayıs 2009 01:21