READLINE() to parse the file and INSTR() to search for your selected text.

 Code:
Open (1,"somefile.txt",2)
Open (2,"output.txt",5)
$R=Readline(1)
While @Error = 0
  If INStr($R,"Looking")
    Writeline(2,$R+@CRLF)
  EndIf
  $R = Readline(1)
Loop
Close(1)
Close(2)

_________________________
Today is the tomorrow you worried about yesterday.