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.


Messages - jasondude7116

Pages: 1 2 3 [4] 5 6 ... 32
46
Ultra Hal Assistant File Sharing Area / Re: GRETTA PLUGINS
« on: March 04, 2011, 04:55:43 pm »
the plugin takes some processing power. I have done several things to it to make it as fast as possible.
it will speed up a little after it has been used for a while. ALSO IMPORTANT - download the latest version that i posted, i cleaned some code that i was using to debug it. the latest version will be a little faster.
it has to run a few thousand processes to get an answer.

47
okay, here is the text file to import into your Substitutions table.

IF YOU USE IT -

you might want to also use the .uhp brain file that i have attached also.
there are 3 changes in it from the 6.2 default brain.
1 - it looks for CurrentSubject in two ways. (default tries one way)
2 - it has improved sentence splitting. (builds on the default version)
3 - it makes the building of the UserSentence consistently have two spaces at the beginning and end of the UserSentence. the brain uses this feature to properly parse Substitutions and other things. (although it tries to add the spaces, the default brain was not consistent due to various parsing techniques)

the sections that were modified are clearly marked and the original stuff is still there (it is just commented out - so that it doesn't use it).

here are the install instructions per Robert:

To import people just need to open the text file in notepad, then click edit, select all. Then edit, copy. Next they need to open the brain editor and open the substitutions table. Right-click anywhere in the table and select "Paste" and the table from the file will be appended.

Actually before pasting it may be a good idea to clear the table so we don't get duplicate entries. To delete records just select all rows by clicking on the upper left box, then right click and select delete row.

48
Ultra Hal Assistant File Sharing Area / Re: GRETTA PLUGINS
« on: March 03, 2011, 04:53:34 pm »
i know how you feel jake.
i abandoned computers totally at one point (about 20 years ago....wow), when everyone and their mother was asking me to write this or that. also fixed a lot of computers. also walked away from hacking. (i had a lot of fun with that one)
picked it up again about ...i guess 6 years or so ago. this time i have to set strict limits on what kind of time i will spend on things. that doesn't always seem to work. :)
my brain is always thinking about 1000 miles an hour. i see most things in a logical reasoned way, always trying to make things more efficient. can't ever satisfy my craving for new info about almost anything including brains and a.i.
this leads to insomnia and crazy programming runs.
if i were a better programmer, then i could write some cool stuff. i have lots of a.i. ideas based on neocortex functions ect. i have spent my life studying people/animals, brains, and logic. i have some ideas for the proper structure of a strong a.i.
i am learning more all the time, but my programming skills just don't match my other skills/knowledge that could make good a.i.
will keep trying, studying, and drinking coffee.
rule no.1 - must have fun doing it!

by the way - i live in cleveland, tx. (a little more country than yall austin city folk) YEEHAW!

49
Yeah, i solved that problem, but then i saw some results from it that i didn't like. So it was abandoned.

50
thank you for the help.
i have been working on this table for a while, and will continue to do so.
reversal is hard to deal with, but this might help, and you might be able to use it also Robert.

again, thanks.

51
yeah, there might be. i'm just not familiar with that stuff.
if anyone can figure out a way, then i will upload my table.
if not, then i will upload the whole database file, so that people can do it manually if they want.

52
Programming using the Ultra Hal Brain Editor / better pronoun reversal
« on: March 03, 2011, 12:19:04 pm »
i have spent some time adding and changing the pronoun reversal database aka Substitutions field.
i can upload the whole database file and then people could manually put it into their databases, but i was wondering if there is a way to just import a single field.
any ideas?

(it would be a lot of manual entering)

53
Ultra Hal Assistant File Sharing Area / Re: GRETTA PLUGINS
« on: March 02, 2011, 11:23:44 pm »
GRETTA Markov Response Engine plugin now available.

please see the first post for link and info.

54
Ultra Hal 7.0 / Re: Hal keeps asking me...
« on: February 02, 2011, 10:53:04 am »
sounds like it might not be saving the info in the database?
might check and see if there is a table labeled Username_sex
and look in that and see if it is saving info

55
Ultra Hal Assistant File Sharing Area / Re: Better sentence splitting
« on: December 16, 2010, 10:43:16 pm »
been using the code from the first post for a couple of years without error.

56
General Discussion / Re: Ai Developments
« on: December 12, 2010, 10:53:37 pm »
Jeff Hawkins is cool, and he also walks like a primate/George Bush.  Bonus!

57
Lightspeed, this might sound stupid but I really think it has great value.

"Rejoice for those around you who transform into the Force. Mourn them do not. Miss them do not. "

Everyone who continues to influence us, continues to change the world.
Maybe you could share a story about her, so that we can be influenced also.

Peace to you my friend.

58
Ultra Hal Assistant File Sharing Area / Re: Better sentence splitting
« on: December 09, 2010, 05:00:36 pm »
Snowman -

in the code that you "modified" for sentence splitting, i noticed that you changed the ones that have just letters i.e.: 

InputString = Replace(InputString, " A. ", " A<PERIOD> ", 1, -1, vbTextCompare)

to this:

AbbCol(0) = "a."

Note: mine has a space on either side of the letter. and on the other splits like "Rep." there is not because usually space+letter+period+space is used for things like a middle name. however things like "Rep." can be in a sentence like "I saw my state rep., but i didn't get to talk to him." so that the abbreviation might not have spaces on either side but rather some punctuation.

59
Ultra Hal Assistant File Sharing Area / Better sentence splitting
« on: December 08, 2010, 01:45:12 am »
for those interested:
this will give you better sentence splitting.
go to your current brain .uhp file. (mine is GRETTA44.uhp) The default is Hal6.uhp

find this:

Code: [Select]
    ''PROCESS: SPLIT USER'S INPUT STRING INTO SEPERATE SENTENCES
    'Encode abbreviations such as Mr. Mrs. and Ms.
    InputString = Replace(InputString, "MR.", "Mr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MRS.", "Mrs<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MS.", "Ms<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "DR.", "Dr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MS.", "Ms<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "ST.", "St<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "PROF.", "Prof<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "GEN.", "Gen<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "REP.", "Rep<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "SEN.", "Sen<PERIOD>", 1, -1, vbTextCompare)
    ''Remove unnecessary punctuation



And replace it with this:

Code: [Select]
'*********************************Edited out section***********************************************
   
    ''PROCESS: SPLIT USER'S INPUT STRING INTO SEPERATE SENTENCES
    ''Encode abbreviations such as Mr. Mrs. and Ms.
    'InputString = Replace(InputString, "MR.", "Mr<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "MRS.", "Mrs<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "MS.", "Ms<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "DR.", "Dr<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "MS.", "Ms<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "ST.", "St<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "PROF.", "Prof<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "GEN.", "Gen<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "REP.", "Rep<PERIOD>", 1, -1, vbTextCompare)
    'InputString = Replace(InputString, "SEN.", "Sen<PERIOD>", 1, -1, vbTextCompare)
    ''Remove unnecessary punctuation
   
'*********************************New section***************************************************** 

    'PROCESS: SPLIT USER'S INPUT STRING INTO SEPERATE SENTENCES
    'Encode abbreviations such as Mr. Mrs. and Ms.
    InputString = Replace(InputString, " A. ", " A<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " B. ", " B<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " C. ", " C<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " D. ", " D<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " E. ", " E<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " F. ", " F<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " G. ", " G<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " H. ", " H<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " I. ", " I<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " J. ", " J<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " K. ", " K<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " L. ", " L<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " M. ", " M<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " N. ", " N<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " O. ", " O<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " P. ", " P<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " Q. ", " Q<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " R. ", " R<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " S. ", " S<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " T. ", " T<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " U. ", " U<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " V. ", " V<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " W. ", " W<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " X. ", " X<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " Y. ", " Y<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, " Z. ", " Z<PERIOD> ", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "SR.", "Mr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MR.", "Mr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "JR.", "Jr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "INC.", "Inc<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "...", "<PERIOD><PERIOD><PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MRS.", "Mrs<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MS.", "Ms<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "DR.", "Dr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MS.", "Ms<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "ST.", "St<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "PROF.", "Prof<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "GEN.", "Gen<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "REP.", "Rep<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "SEN.", "Sen<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MT.", "Mt<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "JAN.", "Jan<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "FEB.", "Feb<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "MAR.", "Mar<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "APR.", "Apr<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "JUN.", "Jun<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "JUL.", "Jul<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "AUG.", "Aug<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "SEP.", "Sep<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "OCT.", "Oct<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "NOV.", "Nov<PERIOD>", 1, -1, vbTextCompare)
    InputString = Replace(InputString, "DEC.", "Dec<PERIOD>", 1, -1, vbTextCompare)
    'Remove unnecessary punctuation
   
'******************************************************************************************************


it will give you a clearly marked area with the original and new code. Original code is commented out and not in use.
**ANY TIME YOU EDIT THE MAIN BRAIN FILE PLEASE MAKE A BACKUP FIRST.

60
it's hard for us to fix it, because it seems like we will need to know some things that are not "privy" to us. long way around a problem. especially with all the user variables.
Robert needs to test with clean Hal release, and the ability to see all of the code.

ROBERT....some of us think that there is a significant bug in the original code.

the people i am talking about have written some pretty good code for Hal over the years. We don't have all the tools like you do to fix it, but we are trying. Please lend a hand with this one if possible.

I'm not complaining at all. I love your product. I just think that this one...after reading most all posts here...is worth attention.
Maybe that is already happening, if so, please post. It will help us to know.


Thank you for your time and patience sir.  :)

Pages: 1 2 3 [4] 5 6 ... 32