01 Nisan 2007, 13:16
|
#5 |
| Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Cevap: Text Okutma.
| | djiNn Nickli Üyeden Alıntı
| Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:input:#:{
if ($left($1-,1) != /) {
var %s_ $lines(kelime.txt)
var %q_ 1
while (%q_ <= %s_) {
if ($wildtok($strip($1-),* $+ $read(kelime.txt,%q_) $+ *,0,32) >= 1) { say $read(kelime.txt,%q_) | halt }
inc %q_
}
}
}
olmadı zamanında msg_kntrl die bi alias yapmıştm onu uyarlarsın kendine..
alias msg_kntrl {
var %s_ $gettok(%safe-word,0,44)
var %q_ 1
while (%q_ <= %s_) {
if ($wildtok($strip($2-),* $+ $gettok(%safe-word,%q_,44) $+ *,0,32) >= 1) { set %yy_ [ $+ [ $1 ] ] 1 }
inc %q_
}
if (%yy_ [ $+ [ $1 ] ]) { .unset %yy_ [ $+ [ $1 ] ] | halt }
else { who $1 | .enable #redirct | set %rea_son $2- | .unset %yy_ [ $+ [ $1 ] ] }
}
KoLay gELsin....
| kardeş bunların ikisede olmadı ama yinede ilgin için sağol bu soruna hala çözüm bulamadımm canımı sıkıyorr
|
|
|  |