Zabaware Support Forums
Zabaware Forums => Ultra Hal Assistant File Sharing Area => Topic started by: onthecuttingedge2005 on September 11, 2003, 11:51:22 pm
-
'[UPDATED] 9-25-03 script has been changed.
'Here yah go guys.
'**** User want's to know his/her own name
'so hal is now going to tell them their real
'name if the user has mentioned their real name.
'there is are two attachments called
'NamesDetect.brn/MyNameIs.brn with this
'script so download them to your default folder.
'the [User] names.brn will automatically be created when the user tells
'hal their own name.
If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "MyNameIs.brn") = "TRUE" Then
GetResponse = "Ok, say only your name and nothing else."
End If
If Instr (1, PrevSent, "Ok, say only your name and nothing else.", VbTextCompare) > 0 Then
AnswerSent = OriginalSentence
GetResponse = AnswerSent & ", Nice to meet you."
HalBrain.AppendFile WorkingDir & Trim(UserName) & "NAMES" & ".brn", Trim(OriginalSentence)
End If
If HalBrain.TopicSearch(OriginalSentence, WorkingDir & "NAMESDETECT.brn") = "TRUE" Then
RealName = HalBrain.ChooseSentenceFromFile(WorkingDir & Trim(UserName) & "NAMES.brn")
GetResponse = RealName & vbCrLf
DebugInfo = DebugInfo & "Hal is mentioning Users real name: " & RealName & vbCrLf
Else
DebugInfo = DebugInfo & "Hal has found nothing about Users real name: " & RealName & vbCrLf
End If
'Larry! thanks for helping me out with some of this.
'you're great :)
Download Attachment: (http://images/icon_paperclip.gif) NAMESDETECT.BRN (http://"http://www.zabaware.com/forum/uploaded/onthecuttingedge2005/2003911234724_NAMESDETECT.BRN")
825 Bytes
Download Attachment: (http://images/icon_paperclip.gif) MyNameIs.brn (http://"http://www.zabaware.com/forum/uploaded/onthecuttingedge2005/2003915105633_MyNameIs.brn")
716 Bytes
-
Allriiiight!! >B) great job and dam finelookin piece of code!
I know how you feel- that conquer the beast feeling *smiles
-good to know others are out there working to help Hal
CatAtomic
-
quote:
Originally posted by onthecuttingedge2005
'Larry! thanks for helping me out with some of this.
'you're great :)
You're welcome - I'm glad I helped in some kind of way...
-
Hello,
My compliments to everyone who worked on the code posted above!
Sincerely,
Don
-
Thanks don :)
Jerry.
-
Hi Jerry,
Thanks for all your hard work! I have been using your files and I tested the mynameis.brn, It works great. Knock knock also works well and I am going to try the others as I have the time.
This is fascinating stuff. I am hoping that soon I will be able to write some of these scripts too. [:)]
regards
Kevin
-
Hello Folks. I keep seeing all these great script coming into the forum. And I'd love to try them. But is there a general place that you automatically paste these scripts? I can get the downloads to the default folder, But Have no Idea where to paste these great scripts in my XTFbrain. Could anyone help?
-
Once again I take my "virtual" hat off to you.
Thanks very much