|
| delikan82 Nickli Üyeden Alıntı
|
elt33 hocam ben bir addon yazdım
#realkelime on
on *:input:#: {
if ($left($1,1) != /) {
if ($read(kelime.txt,w,$1- $+ *)) say $gettok($v1,2,61)
else { say $1- }
halt
}
}
#realkelime end
ama sadece eşleşen kelime var ise çalışacak ve eşleşen kelimeyi yollayacak mesela ben s yazdığımda da selamın aleyküm yazıyor
oysa ben sadece slm yazdığımda yazmasını istiyorum yardım edersen sevinirimmm
|
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....