Hal now remembers his owner/programmers name.

[onthecuttingedge2005]

'Here yah go guys
'This script allows Hal the ability
'to remember and answer his current
'owner or programmers name.
'you will have to edit Hals Owner.brn to your own
'name inside and add more than one line descibing
'your name because of the vbCrLf.
'OwnerDetect.brn is the detection file and it is freely
'editable for extra keywords that might be discovered.
'My e-mail name is in this owner.brn so remember to change it.

If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "OwnerDetect.brn") = "TRUE" Then
Owners = HalBrain.ChooseSentenceFromFile(WorkingDir & "Owner.brn")
      GetResponse = Owners & vbCrLf
      DebugInfo = DebugInfo & "User is talking about Hals Owner: " & Owners & vbCrLf
      Else
      DebugInfo = DebugInfo & "User is not talking about Hals Owner: " & Owners & vbCrLf
   End If

'Best of wishes and new discoveries.
'Jerry.

Download Attachment: Owner.brn
602 Bytes

Download Attachment: OwnerDetect.brn
696 Bytes