D.A.V.I.D's Programming

[onthecuttingedge2005]

I have made some very good progress in D.A.V.I.D's programming.
'D-YNAMIC A-RTIFICIAL V-IRTUAL I-NTELLIGENT D-EVICE

There is a demo script sample of one of D.A.V.I.D's Reasoning routines at my website.

Jerry[8D]

[JohnS]

I like the concept of HAL but I am looking for someone or a firm to write more advanced programming for a project using  AI type scripting.  I am willing to pay upfront, place the contributor on the receiving end or a portion of both for a working product.  I tried contacting Zabaware without a response.  Is there anyone that can help???

[Dr.Benway]

I like to recommend Gerald Blakley (onthecuttingedge2005).
He is really good with chatbots and very knowledgeable.

http://www.zabaware.com/forum/pop_profile.asp?mode=display&id=602

[onthecuttingedge2005]

Some other Functions in D.A.V.I.D has been added.
This Function Preserves the Past OriginalSentence.
no reverse person in this Function.

'PAST ORIGINAL SENTENCE.
    Dim PastSentence
    PastSentence = LastStatement(PrevUserSent)
    HalBrain.DebugWatch PastSentence, "Past Sentence"


'FUNCTION: PRESERVE LAST ORIGINAL SENTENCE.      
Public Function LastStatement(PrevUserSent)   
    LastStatement = PrevUserSent
    LastStatement = Replace(LastStatement, "[]", "", 1, -1, vbTextCompare)
    LastStatement = Replace(LastStatement, "][", " ", 1, -1, vbTextCompare)
    LastStatement = Replace(LastStatement, "[", " ", 1, -1, vbTextCompare)
    LastStatement = Replace(LastStatement, "]", " ", 1, -1, vbTextCompare)
    LastStatement = Replace(LastStatement, ">", " ", 1, -1, vbTextCompare)
    LastStatement = Replace(LastStatement, "<", " ", 1, -1, vbTextCompare)
    LastStatement = Trim(LastStatement)
    LastStatement = HalBrain.SwitchPerson(LastStatement)
End Function


If you don't require the Tag stripper then use this Function instead.

'FUNCTION: PRESERVE LAST ORIGINAL SENTENCE.      
Public Function LastStatement(PrevUserSent)   
    LastStatement = PrevUserSent
    LastStatement = Trim(LastStatement)
    LastStatement = HalBrain.SwitchPerson(LastStatement)
End Function

This is for writting Script that requires the Last OriginalSentence
that is not reverse person.

Lot's of other Functions have been added.

Jerry[8D]