dupa

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 - Medeksza

Pages: 1 [2] 3 4 ... 10
16
Ultra Hal 7.0 / Development Update: Ultra Hal 7 + Spontanimation
« on: March 23, 2017, 02:11:43 pm »
Sorry for the lack of updates for a while, but I've actually been hard at work at Ultra Hal 7. And Chris Shaw from Haptek fame is back at it too, with a new character animation engine called Spontanimation. Check out it http://www.spontanimation.com

Check out https://www.twitch.tv/malfunction_ai for occasional live streams of development tests. Or if nothing is live, check out an older broadcast like https://www.twitch.tv/videos/130446110

We are both close to releasing beta versions of Ultra Hal 7 + Spontanimation in the coming few months. More updates and details to come...






17
If you want to interface with Hal's brain from an external project and can utilize COM/ActiveX here are some code samples in VB6 and VB.NET. C# would be very similar to the VB.net version.

Here's the full code how to make a command line version of Hal in VB.NET:

Code: [Select]
Option Strict Off
Option Explicit On

Module modHalConsole

    'Constants that point to path of script to run and database to open
    Const HalScript As String = "C:\Program Files\Zabaware\Ultra Hal Assistant 6\Hal6.uhp"
    Const HalDB As String = "C:\Program Files\Zabaware\Ultra Hal Assistant 6\HalBrain.db"

    'Objects that will contain reference to HalBrain and WordNet activex dll
    Dim HalBrain As Object
    Dim WN As Object

    'Variants to hold contents of Hal's short term memory
    Dim GainControl, PrevUserSent, PrevSent, Insults, Hate, Swear, Compliment, LastResponseTime, CustomMem, LastTopicList As Object

    Sub Main()

        Dim HalScriptControl As New MSScriptControl.ScriptControl
        Dim HalCommands As Object
        Dim ScriptOut As String
        Dim PassVars(14) As Object

        'Create instance of HalBrain and WordNet ActiveX DLL
        HalBrain = CreateObject("UltraHalAsst6.Brain")
        WN = CreateObject("UltraHalAsst6.WordNet")

        'Initialize Hal's memory
        ResetMem()

        'Read script file and add to script control, open database connection
        Dim ff As Short
        Dim TheScript As String
        ff = FreeFile()
        FileOpen(ff, HalScript, OpenMode.Input)
        TheScript = InputString(ff, LOF(ff))
        FileClose(ff)
        HalScriptControl.AllowUI = True
        HalScriptControl.Language = "VBScript"
        HalScriptControl.Timeout = 10000
        HalScriptControl.UseSafeSubset = False
        HalScriptControl.Reset()
        HalScriptControl.AddCode(TheScript)
        HalScriptControl.AddObject("HalBrain", HalBrain, True) 'Give script control access to HalBrain object
        HalScriptControl.AddObject("WN", WN, True) 'Give script control access to WN object
        HalBrain.OpenDatabase(HalDB) 'Open database

        Do
            'Load up object array with variant function paramaters script is expecting
            PassVars(0) = Console.ReadLine()
            PassVars(1) = "Judge"
            PassVars(2) = "Steve"
            PassVars(3) = 0 'Learning
            PassVars(4) = HalDB
            PassVars(5) = Hate
            PassVars(6) = Swear
            PassVars(7) = Insults
            PassVars(8) = Compliment
            PassVars(9) = PrevSent
            PassVars(10) = LastResponseTime
            PassVars(11) = PrevUserSent
            PassVars(12) = CustomMem
            PassVars(13) = GainControl
            PassVars(14) = LastTopicList

            'Run Script
            ScriptOut = HalScriptControl.Run("UltraHal", PassVars)

            'If script was successfull it will contain <STOREVARS> in which case we remember the variables passed and extract the response
            If InStr(ScriptOut, "<STOREVARS>") Then
                ScriptOut = HalBrain.RecallVars(ScriptOut, HalCommands, Hate, Swear, Insults, Compliment, PrevSent, LastResponseTime, PrevUserSent, CustomMem, GainControl, LastTopicList)
            End If

            Console.WriteLine(ScriptOut)

        Loop

    End Sub

    Sub ResetMem()
        Hate = 0
        Swear = 0
        Insults = 0
        Compliment = 0
        PrevSent = ""
        LastResponseTime = ""
        PrevUserSent = ""
        CustomMem = ""
        GainControl = ""
        LastTopicList = ""
    End Sub

End Module

18
Ultra Hal 7.0 / Looking for investors for next generation of Hal
« on: October 26, 2016, 09:23:31 am »
Zabaware, Inc. is looking for investors/partners to take Hal's AI technology to the next level in return for equity. Hal's current code base is almost 20 years old and a little dated and not entirely suited to the mobile/cloud server world. Since 2010 I've been rewriting Hal from scratch using newer technologies to take Hal into the mobile and cloud-connected world. Development has been slow but with some investment we can accelerate development. There has been a recent surge in interest in AI tech by big players such as Google, Facebook, Microsoft, IBM and others. Now is the perfect time to capitalize on this. Please contact me using http://zabaware.com/contact.html if interested or if you have some leads.

Thank you,
Robert Medeksza
Founder/President

20
Ultra Hal 7.0 / Quick Update
« on: January 29, 2016, 12:56:03 pm »
Sorry for my lack of visiting the forum recently. I had my first child, a daughter, born on December 12th. Have been really busy since and falling behind on Zabaware related work.

I've had Hal's brain in an almost ready to release stage for a while now, I just need to package everything together, update the graphics a bit (splash screen/UI updates), beta test and then release it. It's easier said then done though as I'm busy with a full time job and the new baby. I'm also trying to finish up a small side project unrelated to Hal that I'm doing work for hire. I'm hoping to finish that and then hopefully have the time to push out the new version of Hal. I'm unable to make a promise on a time commitment and it pains me that its been so many years since Hal got an update, especially since I've been sitting on an almost ready update for a while.

I'm mainly concentrating on just getting brain improvements out now. Character engine and avatar improvements are more on the back burner now as I know from experience how much money and work it will take to get that going. But there are some newer open source projects in character animation that seem promising to use as a base.

21
General Discussion / Haptek Kickstarter
« on: October 14, 2014, 11:55:44 pm »
I recently heard from Chris Shaw, the founder of Haptek. He's trying to modernize and bring the Haptek technology back to life with a new technique he calls spontaneous animation. For anyone new or who may not know, Haptek is the character animation technology currently in use by Hal. The technology hasn't been updated in a while but still holds its own compared to any other character animation tech out there. He has a Kickstarter project over at https://www.kickstarter.com/projects/1438878391/spontaneous-animation and is trying to raise $60,000 to be able to bring this project to fruition.

I've been trying to raise money on my own for a while to create my own open source engine for use with future of Hal as I was worried about the future of Haptek. I have not given up on my project, but fully support Chris and his efforts to breath new life into the Haptek technology. Zabaware and Ultra Hal will support any new Haptek based technology that comes out. Chris has a proven track record with character animation and is probably in the best position to get this project done. Please consider supporting this project as it will benefit Hal as well.

Pages: 1 [2] 3 4 ... 10