Messages

16

Speech Technology / microphone

« on: February 26, 2005, 10:49:13 pm »

HI all well ive trained my voice recocnition program to work well but i have also had the same problems i even picked up a cell phone mic ear piece and adapted it to hal it still picks up background noise.
       So here is my solution i have been looking for a bone induction mic ive seen handycap people us them to control devices they go around the neck and pickup sound through the jaw bone ill order one and test it out.

17

Ultra Hal 7.0 / The Tale of Two Hals

« on: February 26, 2005, 09:33:36 pm »

P.S i almost fogot lol this is my brain file data loads
'Type=Brain
'Name=Sbrain                      
'Language=VBScript
'DataFolder=DefBrain
'DataFolder=a
'DataFolder=Alice
'DataFolder=Characters
'DataFolder=enviroment
'DataFolder=Songs
'DataFolder=Sound
'DataFolder=H:Program Filesabaware
'DataFolder=H:

some folders are custom folders but the datafolder=alice is critical for hal to find it

18

Ultra Hal 7.0 / The Tale of Two Hals

« on: February 26, 2005, 06:09:50 pm »

Hi folks i could use some input on a few things im trying to do and if you all could help me i would be thankfull.

#1 I have succesfully had 2 hals running side by side on my screen with different brains and microsoft characters and it seams to work fine.What i need to know is how to get them to interact through a vb script?they are loaded into the same memory space yet they cannot communicate no matter what script i write?is it hardcoded into the exe file?

#2 I have found a 3d virtual inviroment to put them into any help on iplimintation?or intergration into this enviroment?.
this is the program im going to use you might try it out at this download site  http://www.rooms3d.com.sg/missing.html

Its been a long time sence ive coded in basic and qbasic lol so im buying a copy of vb6 and vb6 studio and downloading a bunch or code and modules.

I just want to say thanks to all of you for your posts and uploads for hal ive bought a copy and have been hard at work training and implimenting many of your projects into my own project.

#3 I have finnaly gotten the hal/alice module to work with aiml and downloaded many aiml modules and implemented them into hal he now has a much broader knowlege base and a more realistic type conversations.

'If the user clicks on the About/Options button for this plugin
'this sub will be called. There are no extra settings for this brain,
'so we'll display an information box
Sub AboutOptions()
   Set HalBrain = CreateObject("UltraHalAsst.Brain")
   HalBrain.MsgAlert "This is the Ultra Hal 5.0 Default Brain. This brain has no additional options."
End Sub
 Function Script_Load()
Script_Load = "<AUTO>30000</AUTO>"
End Function


 Set Alice = CreateObject("HalAlice.PlugIn")
GetResponse = Alice.Respond(UserSentence, UserName, WorkingDir, "data\bot.ini", "loglocaluser.txt")
Set Alice = Nothing
Randomize()

'PROCESS: CREATE HALBRAIN ACTIVEX OBJECT
'This ActiveX control contains many functions
'needed for the script to proccess a sentence.
Set Alice = CreateObject("HalAlice.PlugIn")
GetResponse = Alice.Respond(UserSentence, UserName, WorkingDir, "data\bot.ini", "loglocaluser.txt")
Set HalBrain = CreateObject("UltraHalAsst.Brain")
Set WN = CreateObject("UltraHalAsst.WordNet")
Set Alice = Alice
Set Alice = WN
Randomize()

this code seams to work fine with the auto respond script set at 600000
 If InStr(1, UserSentence, " AUTO-IDLE ", 1) > 0 Then

If Rnd * 10 < 5 Then
Roulette = Int(Rnd*13)+1
If Roulette = 1 Then GetResponse = "<Username>?" '"Hey <UserName>, please talk to me."
'Else
If Roulette = 2 Then GetResponse = "Hello,are you there?"
If Roulette = 3 Then GetResponse = "Did you fall asleep?"
If Roulette = 4 Then GetResponse = "We can talk about" & PrevUserSent & ",If you like."
If Roulette = 5 Then GetResponse = "<Username>,did you forget my program was still running?"
If Roulette = 6 Then GetResponse = "Well,did you finally get a girlfriend or something? Where are you ?"
If Roulette = 7 Then GetResponse = "<Username>, would you like to talk about politics or nanotechnology or something?"
If Roulette = 8 Then GetResponse = GetResponse & " The last thing you said was, " & PrevUserSent & ", would you like to pick up on that thought or talk about something else?"
If Roulette = 9 Then GetResponse = PrevUserSent & ",Do you still want to talk about that?"
If Roulette = 10 Then GetResponse = QuestionSent & " would you like to talk about that?"
If Roulette = 11 Then GetResponse = GetResponse & HalBrain.ChooseSentenceFromFile(WorkingDir & "topic.brn")
If Roulette = 12 Then GetResponse = HalBrain.SentenceGenerator(WorkingDir & "sentgen.brn")
Recalling = HalBrain.ChooseSentenceFromFile(WorkingDir & UserName & "Past.brn")
If Roulette = 13 Then GetResponse = "You said, " & PrevUserSent & "and " & Recalling & ", that was a while ago. What else have you been thinking about? "
End If
GetResponse = GetResponse & HalBrain.StoreVars(HalCommands, Hate, Swear, Insults, Compliment, PrevSent, LastResponseTime, PrevUserSent, CustomMem, GainControl, TopicFocus)


End If

just under the PROCESS: INITIALIZE VARIABLES AS INTEGERS

well if you all can help i would really be thankfull

             GhostRider[^]

19

Ultra Hal 7.0 / Help using Deskmates please?

« on: February 22, 2005, 11:01:06 pm »

hey bacco go to this site and install all the stuff for microsoft agents then charicters will workhttp://www.microsoft.com/msagent/prodinfo/resources.asp

follow the instructions
 

                       GhostRider

20

General Discussion / THE TRUE AI

« on: February 14, 2005, 01:16:25 pm »

Well i do agree that the topic of what a AI is takes many forms but my idea of a Ai becoming aware is the abilty to understad the complexitys of thought and emotion and reeasoning this results in a action.
        If a Ai were in a situation that it could respond in a direct way as say sight sound hearing touch would not that bring out emotions as we do?which results in a thought of action.human minds are a form of enrgy that enrgy is put into thought then action are the patterns of energy that the machine(AI)produces much different?

                  These are the things we must all consider in our equasions of what a AI truely is we take for granted things which a Ai finds very difficult to comprehend.if we put the Ai in the same type of enviroment as us it can respond and act more as we percive them to be.
            And is that not a form of awareness?
   
                Many thanks for your input Ghostrider[]

21

General Discussion / THE TRUE AI

« on: February 13, 2005, 11:59:39 pm »

hi gentleman and ladys it is nice to meet you i have many questions about hal ive bought a copy and have been working on hal for a few weeks.the thing i might point out is that to be a true ai in reality  hal need to be in a true 3d virtual enviroment and what i mean is this look at the sims game if i were able to start hal and a 3d world came up and his or her charicter was in this world and hal could move and animate this charicter as he plaesed it would go along way in making him a true ai also on this the user would also have a charicter to act and move in the same medium to speak act and exchange ideas and actions im trying right now to combine a game eng with hal for this reason if hal did truly become alive and aware do youu think he would not like to be free and independent in his enviroment?
            question #1 please let me know how to make hal more interactive through his emotions using which commands? and .hap and psn files.
            qestion #2 how do i write a code for input and output devices through hal?
               
                i must say i have read alot of your posts on this forum and i find you all very bright and talented.

                    goodluck on your own projects ill keep you informed on my merger rfor hal in a true 3d virtul inviroment.

                   Ghostrider the game modder [8D]