year, else it will be a BIG slowdown! :P
myfile = WriteFile("C:\Program Files\Vendetta Online\myfile.txt") errors = ReadFile("C:\Program Files\Vendetta Online\errors.log") While Not KeyHit(1) SeekFile myfile,0: SeekFile errors,0 ; <-- to start from the beginning of the files starttime# = MilliSecs() While Eof(errors) <> 1 lastline$ = ReadLine$(errors) If Eof(errors) = 1 Then Print lastline : Print count : count = count + 1 Wend If lastline$ = pastline$ Then Else If Right$(lastline,22) = " has entered the room." Then End greeting$ = "Hello " + Mid$(lastline,20,Len(lastline) - 42) + "!" WriteLine(myfile,"alias VOidResponse " + Chr$(34) + "msg Smittens \'" + greeting + "\'" + Chr$(34) + "\n") End If End If pastline$ = lastline Wend CloseFile errors CloseFile myfile