How can I create a search file for text?

[bplus]

Another very simple way is to just read the whole file into one string, and then use INSTR with your search term.

Oh yeah that's nice too!

here I made a little AI Game to watch for Guess Number:

Code: (Select All)

'2024-01-25 update
DefInt A-Z
While 1
    Hi = 101: Lo = 0: number = Int(Rnd * 100) + 1
    ' number = 1  'test limits
    ' number = 100
    Do
        guess = Int((Hi + Lo) / 2)
        Print "AI guesses the number ("; _Trim$(Str$(number)); ") as"; guess
        If guess < number Then Print "low": Lo = guess + 1
        If guess > number Then Print "high": Hi = guess - 1
    Loop Until guess = number
    Input "Yeah, press enter for another..."; w$
    Cls
Wend