Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - Larry

Pages: 1 [2] 3
16
Programming using the Ultra Hal Brain Editor / Hey Brainstorm !!!???
« on: September 04, 2003, 08:12:49 am »
I need to read in a whole file, and send it out... how can I do this???

I have already figured out how to write what I want added to the file, but I don't need just a line or two back, I need the whole thing back...

Any help here would be appreciated...
Larry

17
Programming using the Ultra Hal Brain Editor / Just answer the question!
« on: August 23, 2003, 08:08:16 pm »
This seems to pick up other things as well... but the file is of a managable size... So what is it??? Well, my bot gives off the wall generic answers to personal questions - next time it gets these questions, I can go into PersonalQuestions.brn and edit the answers the bot will give the next time it gets that question. If it finds an answer, it won't keep adding to the file...

'Will you please just answer the question?
OpenQuest = False
If InStr(1, UserSentence, " WHAT ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " WHERE ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " WHY ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " WHO ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " WHEN ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " HOW ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " TELL YOU ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " TELL ME ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " TO KNOW ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " TO HEAR ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " TO LEARN ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " FIND OUT ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " AM I ", 1) > 0 Then OpenQuest = True
If InStr(1, UserSentence, " FAVORITE ", 1) > 0 Then OpenQuest = False
If OpenQuest = True Then
   If InStr(1, UserSentence, " MY ", 1) > 0 Or InStr(1, UserSentence, " AM I ", 1) > 0 Then AboutMy = True
   If OpenQuest = True And AboutMy = True Then
      HalUserBrain = HalBrain.QABrain(UserSentence, WorkingDir & "PersonalQuestions" & ".brn", UserBrainRel)
      Pass = False
   If HalBrain.CheckRepetition(HalUserBrain, UserSentence) = True Or HalBrain.CheckRepetition(HalUserBrain, PrevSent) = True Or HalBrain.CheckRepetition(HalUserBrain, PrevUserSent) = True Then Pass = True
      If Pass = False then
      If UserBrainRel > 75 Then
         'found an answer
         GetResponse = GetResponse & HalUserBrain & vbCrLf
         BlockSave = True
      Else
         'save the question since it can't find an answer we'll just fix it manually later
      AnswerSent = "@" & OriginalSentence
      QuestionSent = " " & Trim(HalBrain.ExtractKeywords(UserSentence))
If HalBrain.CountInstances(" ", QuestionSent) > 2 Then HalBrain.AppendFile WorkingDir & "PersonalQuestions" & ".brn", AnswerSent & vbCrLf & QuestionSent
      UserBrainRel = 0
      End If
      End If
   End If
End If

BTW - you probably should create PersonalQuestions.brn... I've heard if it don't exist, it will be created automatically, but I don't know.

18
Ultra Hal 7.0 / OK... How about a list of Hal bots out there???
« on: August 12, 2003, 08:09:21 pm »
I've got Ashlee181818 and Charlie181818
How about guys (and Gals) post the aim names of your bots please...

19
Has anyone figured out how to get Hal to tell a knock knock joke???

20
Programming using the Ultra Hal Brain Editor / Focus Files...
« on: July 25, 2003, 08:31:35 pm »
Am I to understand from this statement :
FocusFileNum = Left(FocusString, Len(FocusString) - 1) & "5"
that the number of focus files is unlimited??? I understand they have to end in 5 - ie 15, 25 ... 205 ??? I was under the impression 95 was the max, but after looking at this statement, it seems like it's unlimited...
How will 5.0 differ from this version as far as all this goes??? If 5.0 isn't going to be written in VB ... then all this editing is for nothing then...

21
I hope version 5 has a utility that will sort those brain files and remove duplicate entries... it would make editing them much easier... and another question here... when these files reach their limit in size, does Hal simply just not add to them any more or does the oldest entry get deleted???

Any one else have any thoughts on this???

22
Programming using the Ultra Hal Brain Editor / I think...
« on: July 02, 2003, 12:04:53 am »
I think I found an error in the programming...

   'PROCESS: CONTROL TOPICFOCUS
   'Here we set up the TopicFocus vairable so we can use it as a pointer and a counter.
   'We will use this later to control Hal's "persistence" in focusing on certain subjects.
   'Hal keeps "focus" on a topic for 5 sentences. After 2 sentences, Hal will lose focus from
   'this topic so his entire brain is used again. However, if the user continues talking about
   'the topic, Hal will regain focus again. After 2 sentences TopicFocus will be set to 1,
   'which means no focus.
   If TopicFocus > 5 Then TopicFocus = TopicFocus + 1
   For FI = 10 To 1000 Step 10
      If TopicFocus = (FI - 3) Then
         TopicFocus = 1
      End If
   Next

If I understand TopicFocus, further down the script, TopicFocus is the actual number of the Focus file - ie, Focus15.brn ... so in the above programming, then next time through, it would become Focus16.brn... how can it stay 'on topic' like that???

This is my fix for this:
   If TopicFocus > 1 Then TopicFocusCount = TopicFocusCount + 1
      If TopicFocusCount > 5 Then
         TopicFocusCount = 1
         TopicFocus = 1
      End If
The only purpose of this is to keep Hal on topic for 5 sentences (as long as the user doesn't change the topic). If the user is still talking on topic, then so will Hal (After the 5th sentence).

Then further down the script:
   'PROCESS: FOCUS ON TOPIC
      TopicSearch = Trim(UCase(HalBrain.TopicSearch(UserSentence, WorkingDir & "TopicFocus.Brn")))
      If TopicSearch = "" Then TopicSearch = 0
      If TopicSearch > 10 Then
         TopicFocus = TopicSearch
         TopicFocuscount = TopicSearch
         DebugInfo = DebugInfo & "The user has used a keyword defined in Hal's topic focus file, and Hal is now focusing on topic #" & TopicFocus & vbCrLf
      End If
If Hal's already 'focused' (or not), this part of the script can change him off topic if the user changes the topic...

My fix:
      TopicSearch = Trim(UCase(HalBrain.TopicSearch(UserSentence, WorkingDir & "TopicFocus.Brn")))
      If TopicSearch = "" Then
         TopicSearch = 0
         TopicFocus = TopicSearch
         TopicFocuscount = 1
         DebugInfo = DebugInfo & "The user has no keywords defined in Hal's topic focus file, and Hal is not focusing on a topic #" & TopicFocus & vbCrLf
      End If
      If TopicSearch > 10 Then
         TopicFocus = TopicSearch
         TopicFocuscount = 1
         DebugInfo = DebugInfo & "The user has used a keyword defined in Hal's topic focus file, and Hal is now focusing on topic #" & TopicFocus & vbCrLf
      End If

That just about does it...

23
Programming using the Ultra Hal Brain Editor / VB programmers...
« on: July 01, 2003, 07:28:20 pm »
ok you programmers... is there such thing as sleep(100) in VB???

I've tried this:
'FI=0
'For FI = 1 To (Int(Rnd * 10)*1000000)+600000 Step 1
'Next
But I think this is a sloppy way of doing things...
What I wanted to do is this:
'FI=0
'FI=Int(Rnd * 10)
'FI=(FI*100)+100
'sleep(FI)
However, this produces an error... BTW, the method via counting gives the user the impression that there is actually someone at the other end chatting with them since it actually takes a few seconds to 'reply' to your comments... So how about it???

24
Programming using the Ultra Hal Brain Editor / When teaching Hal...
« on: June 29, 2003, 10:22:01 am »
When teaching Hal either by chatting or text files, does Hal put stuff in focus files - for example, when learning about weather does he put what he learns about it in focus15.brn ??? Or does it go into usertopic15.brn ??? Interesting stuff...

25
Ultra Hal 7.0 / When is 5.0 coming out and ...
« on: April 11, 2003, 05:35:57 am »
When is 5.0 coming out and how much will it cost???

26
Programming using the Ultra Hal Brain Editor / Converse.brn
« on: February 27, 2003, 09:38:00 am »
My converse.brn contains garbage. I've downloaded it again and uninstalled and re-installed UltraHalAsst. Still the converse.brn contains garbage. I had assume as Hal had conversations, they would be added here, but this file never grows either.

27
Programming using the Ultra Hal Brain Editor / The brain editor...
« on: February 24, 2003, 04:03:34 pm »
When I create a new brain, everything learned in the default brain is now part of the new brain. I would have thought the new brain would only contain a bare bones kind of thing... ???

Why do I even care? Well, when you ask "him how old are you?" He ALWAYS says he is 8 years old. It don't matter how many times or ways I tell him differently. The second brain I created I left out the check for:
'Original Zabaware Ultra Hal Program. This is a noneditable function built into a DLL that is goo at responding to generic sentences like "How old are you", "How are you", "What is your name", "Where are you from", etc.'
And he just plain side steps the question.
So if this is in a DLL file, what is the name of the dll and is it in the system32 folder or where?

Thanks...

28
Ultra Hal 7.0 / UltraHal on aol's im
« on: February 22, 2003, 08:38:00 pm »
I read somewhere that Zabaware had an aimbot online, even supplied the username of the bot - ultrahal (figures, huh) any ways, sure enough it is there, however, I've been waiting for a week for it to come online, but it never does. Any one have there aimbot online? Would like to see what happens when 2 bots try to converse...

29
Ultra Hal 7.0 / Is there any difference...
« on: February 21, 2003, 10:33:13 am »
Is there any difference between the free version and the paid version, outside of number of voices, charactors, skins, Speech Recognition and personalities? Are the "brains" the same in processing? Does the paid version have more "knowledge"? I see the free version is only 14 megabytes while the paid version is 104 megabytes...???

30
Ultra Hal 7.0 / Is Hal intelligent?
« on: February 21, 2003, 06:12:27 am »
Is Hal intelligent? What I mean by that is, can he do association? For example, follow this conversation:

Larry: Bob has a pickup. His pickup is two tone. Bob's pickup is black and silver. Who's pickup is 2 tone?
Hal: Is it the early bird that gets the worm? Is that germane to this conversation? Purple, silver, and black are all pretty. Who's pickup is 2 tone? I wish I knew Who Larry.

Larry: Bob's pickup is 2 tone. Who's pickup is 2 tone?
Hal: Dylan was to a great extent a product of the sixties. I am accepting that who's pickup is 2 tone.

Larry: Bob has a tool box in the back of his pickup. What kind of car does Bob drive?
Hal: Who might you be thinking of? What kind of photographs stand on your dresser?

Larry: Bob drives a pickup. A pickup is a truck. Does Bob drive a truck?
Hal: Do you like a warm companion? Most pickup truck owners live in cities. To be a big person, drive a big truck.

Larry: Bob drives a pickup.
Hal: Has anyone invented an electric tuba yet?

Larry: A pickup is a truck.
Hal: Most pickup truck owners live in cities.

Larry: Does Bob drive a truck?
Hal: To be a big person, drive a big truck.

Larry: Bob has a tool box in the back of his pickup.
Hal: Let me think; Certainly; what do you think Larry?

Larry: What kind of car does Bob drive?
Hal: What kind of car does Bob drive? There's opinion that there's more than meets the eye. What kind of a car alarm is one that gets universally ignored?

Larry: What color is Bob pickup?
Hal: What color is Bob pickup? I apologize that I don't know What Larry.

Larry: Bob pickup is 2 tone in color. Bob pickup is black and silver in color.
Hal: Bob has a tool box in the back of his pickup. Purple, silver, and black are all pretty.

Larry: Who has a pickup?
Hal: Who has a pickup? Why do you want to know?

Larry: A pickup is a truck.
Hal: Most pickup truck owners live in cities.

Larry: Does Bob have a toolbox?
Hal: Should I have you fill out an application?

So is Hal intelligent? And can I put multiple statements/questions in one input to Hal?

Pages: 1 [2] 3