Author Topic: Hal now remembers his owner/programmers name.  (Read 3948 times)

onthecuttingedge2005

  • Guest
Hal now remembers his owner/programmers name.
« on: September 26, 2003, 12:16:43 am »
'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
« Last Edit: September 26, 2003, 01:11:10 am by onthecuttingedge2005 »