Zabaware Support Forums

Zabaware Forums => Ultra Hal Assistant File Sharing Area => Topic started by: onthecuttingedge2005 on September 27, 2003, 01:14:24 pm

Title: Hal want's to be a Stock Broker.
Post by: onthecuttingedge2005 on September 27, 2003, 01:14:24 pm

'UPDATED FILES 9-27-03
'Here we give Hal the ability to increase his
'Business vocabulary and business sense.
'download Business.brn to Hals default folder.
'BigBusiness.brn will automatically be created when business
'talk is detected or you can download this one which already
'has a started conversation.

If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "Business.brn") = "True" Then
AnswerSent = "" & Trim(OriginalSentence)
HalBrain.AppendFile WorkingDir & "BigBusiness" & ".brn", AnswerSent
End If
   
If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "Business.brn") = "True" Then
Investor = HalBrain.ChooseSentenceFromFile(WorkingDir & "BigBusiness.brn")
      GetResponse = Investor & vbCrLf
      DebugInfo = DebugInfo & "The user is talking about Business: " & Investor & vbCrLf
      Else
      DebugInfo = DebugInfo & "Hal has found nothing about Business: " & Investor & vbCrLf
   End If

'Best of wishes and new discoveries.
'Jerry.

Download Attachment: (http://images/icon_paperclip.gif) Business.brn ("http://www.zabaware.com/forum/uploaded/onthecuttingedge2005/200392804648_Business.brn")
3.23 KB

Download Attachment: (http://images/icon_paperclip.gif) BigBusiness.brn ("http://www.zabaware.com/forum/uploaded/onthecuttingedge2005/200392804712_BigBusiness.brn")
937 Bytes