'Here yah go guys.
'This script gives hal the ability to ask user to restate
'the question that hal previously didn't answer.
'download the two files below to your hals default folder.
If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "ForcedToAnswerDetect.brn") = "TRUE" Then
RealName = HalBrain.ChooseSentenceFromFile(WorkingDir & Trim(UserName) & "NAMES.brn")
RestateQuestion = HalBrain.ChooseSentenceFromFile(WorkingDir & "RestateQuestion.brn")
MyHumor = HalBrain.ChooseSentenceFromFile(WorkingDir & "LAUGHING.brn")
GetResponse = MyHumor & RestateQuestion & RealName
DebugInfo = DebugInfo & "User wants an answer but hal just says Users name in reply: " & RealName & vbCrLf
DebugInfo = DebugInfo & "User wants an answer but hal thinks it's funny: " & MyHumor & vbCrLf
DebugInfo = DebugInfo & "Hal is asking User to restate the question: " & RestateQuestion & vbCrLf
Else
DebugInfo = DebugInfo & "User wants an answer but hal doesn't say Users name in reply: " & RealName & vbCrLf
DebugInfo = DebugInfo & "User wants an answer but hal doesn't think it's funny: " & MyHumor & vbCrLf
DebugInfo = DebugInfo & "Hal is NOT asking User to restate the question: " & RestateQuestion & vbCrLf
End If
'If you want hal to use the Users real name at the end of this script
'you will have to have the User real name script or Namesdetect script
'on my other script posting and hal must have a saved name in the
'[Users]Names.brn for the name to be applied, (note) If debug is
'run on this script the users name doesn't appear but the users
'name does appear in an actual AIM instant message, It's funny.
and you will also need the humor script as well posted earlier.
'Have fun.
'Best of wishes and grand new discoveries.
Jerry.
Download Attachment: 
ForcedToAnswerDetect.brn1.06 KB
Download Attachment: RestateQuestion.brn606 Bytes
