Kelimeleri kelime.txt dosyasına aşağıdaki gibi ekledikten sonra istediğin olacaktır. Yanlız şunu bilmelisin ki; eğer txt dosyasında geçen sözcüklerden birden fazlası aynı cümlede kullanılırsa sana karşı, kod dosyada ilk bulduğu cevabı verir. Örneğin, txt dosyasına "
selam sanada selam" ve "
nasılsın iyiyim sen?" şeklinde ekledin alt atla ve kullanıcı sana "selam dostum nasılsın" dedi.
Bu durumda kod, txt dosyasına ilk eklediğin
sorunun
cevabını verir.
txt dosyasına ekleme şekli;
SORU CEVAP Selam sanada selam nasılsın iyiyim, sen? naber iyi, senden ne haber?
işte kod:
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias tamamla { var %" 1 | while $gettok($1-,%",32) { if $read(kelime.txt,s,$v1) { inc $+(%,/!/) 1 | %/ = $v1 | if $+(%/!/) == 1 { return %/ } } | inc %" } }
on *:text:*:#: if $tamamla($1-) { say $v1 | unset %/* }
Umarım işine yarar.