'Here we give hal some color basics.
'download teachcolors.brn and colors.brn to
'your hals default folder.
If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "TEACHCOLORS.BRN") = "TRUE" Then
COLORS = HalBrain.ChooseSentenceFromFile(WorkingDir & "COLORS.BRN")
GetResponse = COLORS & vbCrLf
DebugInfo = DebugInfo & "The user is talking about COLORS: " & COLORS & vbCrLf
Else
DebugInfo = DebugInfo & "User is not talking about COLORS: " & COLORS & vbCrLf
End If
'Best of wishes and grand new discoveries.
'Jerry.
Download Attachment: Colors.brn536 Bytes
Download Attachment: TEACHCOLORS.BRN1.19 KB