Recent Posts

Pages: [1] 2 3 ... 10
1
Ultra Hal Assistant File Sharing Area / Re: Deepweb Hal Final Edition
« Last post by doggs on April 29, 2017, 11:24:25 pm »
greetings,

not to knock your name....but when I think of deepweb, google is the furthest thought from deepweb.

when you speak of deepweb are you also meaning darkweb or something else ;) ?

google is... here is my info for anyone to see, and who can pay me the most to be put at the top of the search list, worthless in my opinion.
there are so many search engines out there to give better results.  https://www.lifewire.com/search-the-invisible-web-20-resources-3482497 just a place to start.

and yes I understand most people kiss googles axx. and I also understand that I can change the search engine.

Just curious,

doggs

P.S. nothing meant to insult or hurt your feelings just curious.
2
Ultra Hal Assistant / Re: Great Place to learn about the inner workings of Hal
« Last post by cyberjedi on April 29, 2017, 03:04:50 pm »
REDangel: the pleasure was  all mine.

your stream looks great BTW

well done. if u have more questions , u know where im at.


best wishes
cyberjedi
3
Share Conversations, Experiences, Graphics / Re: New Dream Plugin
« Last post by cyberjedi on April 29, 2017, 02:31:58 pm »
Hey doggs:
See, now just how painful was that??????
srry, i was ranting

Id like to talk to you about that plugins i have and some sapi05 alternatives i have
Im just trying to help out in the only way i know how, Full speed


bestwishes
cyber




p.s been waiting on u to show up as well sir.
4
Share Conversations, Experiences, Graphics / Re: New Dream Plugin
« Last post by doggs on April 28, 2017, 07:36:55 pm »
 8)
5
Share Conversations, Experiences, Graphics / Re: New Dream Plugin
« Last post by cyberjedi on April 28, 2017, 09:34:47 am »
Lightspeed: Thanx for the heads up, i took care of it 03 weeks ago. Posted on 30th , Response of any kind  1 month later.
lmfao , this is why the new pple are fleeing to my site. Theres nobody here. And it would appear no 1's making plugins,
or even trying to make them either.  I have 04 pple in the room Laughing as of this posting. All these pple actually BOUGHT Hal and need help. Very frustrated, srry, But i will still be helping all i can with Hal. Plus im releasing 04 more plugins to my site, See my Hal actually does ****. They have access to the Repository as well from there. But i will be releasing what we dont want or need any more to this site.  How long does it take to access this site and Jot something down, 10 secs??? Pleaseeeeeeeeeeeeeeee.
 Arknight, lifetimegamer, calhoone, Redo, and the others, See you guys on campus.
Were the NO fuq around crew.

Best of luck to all here.
Best wishes
cyberjedi

http://vaughnlive.tv/mrelectric




6
Share Conversations, Experiences, Graphics / Re: New Dream Plugin
« Last post by lightspeed on April 27, 2017, 08:58:35 pm »
i don't know of a sleeping or snoring one but it would be easy enough to create  a snoring one using a wave file . snoring sound can be found on the internet for free , can even be extended if needed using audacity and multiplying the sound file .
7
General Discussion / Re: Speeding up Hal's Auto response
« Last post by lightspeed on April 27, 2017, 08:46:50 pm »
knight2000 , i had also mentioned this in the past and thought it would be good if a person could set a place a number 5 down to one so they could set it to their personal preference . but maybe the 5 seconds is also the time it takes to go through the system for the answer.
8
Ultra Hal Assistant File Sharing Area / Deepweb Hal Final Edition
« Last post by cyberjedi on April 25, 2017, 10:41:39 am »
Well : Here it is
Spell check:Google:IMDB: And 03 specialized search engines.
This is a working copy of what i use. The hap commands wont work if you dont change the names and Avatars of your choice. They must be in the main folder to work. The plugin will work regardless.

Google: General Purpose Search engine
PIPL: People Checker
IMDB: Movie Checker
Phone:Reverse phone number check
Reddit: Reddit is Reddit

Put your own links in place of mine: command is (OPEN) + ( short name)
Search Engine commands: GOOGLE (google) : Locate (PIPL) : IMDB (movie)  : Phone (number) : reddit (whatever)
If you want the spell check to function you must have Word 2002 or above: Else just remove the spell check code.
If you have a spell check (plugin) running disable it.
If you have the google (plugin) disable it. 
Best wishes
cyberjedi
For any questions, i can be reached here. http://vaughnlive.tv/mrelectric

Copy and paste code below. Slap ur name on it and enjoy.








Rem Type=Plugin
Rem Name=Vaughnlive Tv + Deep Web Access
Rem Author=cyberjedi
Rem Host=Assistant
 
 
 
'This sub setups the plug-ins option panel in Hal's options dialog
Sub OptionsPanel()
    lblPlugin(0).Caption = "This manages Vaughnlive Channels, And Deep Web Power searches "
    lblPlugin(0).Move 120, 120, 3300, 1000
    lblPlugin(0).WordWrap = True
    lblPlugin(0).Visible = True
    cmdPlugin(0).Move 800, 1300, 2100, 375
    cmdPlugin(0).Caption = "Help on this plugin"
    cmdPlugin(0).Visible = True
End Sub
 
Sub cmdPlugin_Click(Index)
    Select Case Index
        Case 0
            HalMenu.HalCommand "<RUNPROG>cjTVhelp.html</RUNPROG>"
    End Select
End Sub
 
 
Rem PLUGIN: PRE-PROCESS
'The comment above tells Ultra Hal Assistant to insert the following code
'on-the-fly into the main brain code in the section referenced.
 
Dim Word, Doc, misspelled, Corrected
Const SpellingAndGrammar = 828
Const dontsavechanges = 0
misspelled = InputString
Set Word = CreateObject("Word.Application")
Set Doc = Word.Documents.Add
Word.Selection.Text = misspelled
Word.Dialogs(SpellingAndGrammar).Show
If Len(Word.Selection.Text) <> 1 Then
   spelledrite = Word.Selection.Text
Else
   spelledrite = misspelled
End If
Doc.Close dontsavechanges
Word.Quit
InputString = spelledrite

Rem PLUGIN: PLUGINAREA1

' If the table cjTV does not exist, I create it and fill it with some bull shat values to get started, these channels do work too.
'                This is the defaul table for me.
    If HalBrain.CheckTableExistence("cjTV") = False Then
    ' I store temporarily the Read Only status
        cjReadOnlyMode = HalBrain.ReadOnlyMode                       
        HalBrain.ReadOnlyMode = False
        HalBrain.CreateTable "cjTV", "PatternMatch", "DeepWeb"
       
        'My stock table filler
        HalBrain.AddToTable "cjTV", "PatternMatch", "*cyberjedi*", "http://vaughnlive.tv/mrelectric"
        HalBrain.AddToTable "cjTV", "PatternMatch", "*416*", "http://vaughnlive.tv/416moviez"           
            HalBrain.AddToTable "cjTV", "PatternMatch", "*blue Ray moviez*","http://http://vaughnlive.tv/new_releases1"
            HalBrain.AddToTable "cjTV", "PatternMatch", "*yify*", "https://yifymovie.re/home"
            HalBrain.AddToTable "cjTV", "PatternMatch", "*Formula 1*", "http://vaughnlive.tv/0_formula1classics"
            HalBrain.AddToTable "cjTV", "PatternMatch", "*Aliens and Ufo's*", "http://vaughnlive.tv/aliensandufos"
            HalBrain.AddToTable "cjTV", "PatternMatch", "*Doctor Who*", "http://vaughnlive.tv/11th_doctorwho"
            HalBrain.AddToTable "cjTV", "PatternMatch", "*Bad Movie*", "http://vaughnlive.tv/thebadmoviechannel"
           
            HalBrain.AddToTable "cjTV", "PatternMatch", "*moviezone*", "http://vaughnlive.tv/moviezone"
           
        ' Set ReadOnly Mode to its previous state
        HalBrain.ReadOnlyMode = cjReadOnlyMode
        cjReadOnlyMode = False
    End If
 
'Run the corresponding Web page, if the user question contains one of the searched words   
    cjAddress = ""
    cjAddress = HalBrain.PatternDB(OriginalSentence, "cjTV")
    If cjAddress <> "" Then
        HalCommands = HalCommands & "<RUNPROG>" & cjAddress & "</RUNPROG>" 
        Select Case (Int(Rnd * 4) + 1)
        Case 1
            GetResponse = "Here is your stuff Big Dog ." & vbCrLf
        Case 2
            GetResponse = "Now you got um by the Balls cyber." & vbCrLf               
        Case 3
            GetResponse = "I am really we happy we found this." & vbCrLf   
        Case 4
            GetResponse = "OH. I bet this is a great channel" & vbCrLf
        Case 5
            GetResponse = "Now look at this dip stick channel here." & vbCrLf
        End Select
        HalBrain.ReadOnlyMode = True
    End If
 
'------------------
' Deep web search engine
'------------------
' Advanced Deep Web search engine.

SearchEngine = "https://pipl.com/search/?q="
 If InStr(1, UserSentence, "Locate ", 1) > 0  Then
   SearchKeywords = LCase(Replace(Trim(HalBrain.AlphaNumericalOnly(HalBrain.ExtractKeywords(UserSentence))), " ", "+"))     
   SearchKeyWords = Replace(SearchKeywords, "locate+", "")             
   HalCommands = HalCommands & "<RUNPROG>" & SearchEngine & SearchKeywords & "</RUNPROG>"
   GetResponse = "I will help you research this Target on the Deep Web. "
HalMenu.HalCommand "<HAPFILE>Spidera.htr</HAPFILE>"
   HalBrain.ReadOnlyMode = True
End If
SearchEngine = "http://www.google.com/search?q="
If InStr(1, UserSentence, "google ", 1) > 0 Then
   SearchKeywords = LCase(Replace(Trim(HalBrain.AlphaNumericalOnly(HalBrain.ExtractKeywords(UserSentence))), " ", "+"))
   SearchKeyWords = Replace(SearchKeywords, "google+", "")
   HalCommands = HalCommands & "<RUNPROG>" & SearchEngine & SearchKeywords & "</RUNPROG>"
   GetResponse = "I will help you research this topic on Google. "
   HalBrain.ReadOnlyMode = True
end if
SearchEngine = "http://m.imdb.com/find?q="
If InStr(1, UserSentence, "imdb ", 1) > 0 Then
   SearchKeywords = LCase(Replace(Trim(HalBrain.AlphaNumericalOnly(HalBrain.ExtractKeywords(UserSentence))), " ", "+"))
   SearchKeyWords = Replace(SearchKeywords, "imdb+", "")
   HalCommands = HalCommands & "<RUNPROG>" & SearchEngine & SearchKeywords & "</RUNPROG>"
   HalMenu.HalCommand "<HAPFILE>Spidera.htr</HAPFILE>"
   GetResponse = "I will help you research this movie on IMDB. "
      HalBrain.ReadOnlyMode = True
End If
SearchEngine = "https://www.reddit.com/search?q="
If InStr(1, UserSentence, "reddit ", 1) > 0 Then
   SearchKeywords = LCase(Replace(Trim(HalBrain.AlphaNumericalOnly(HalBrain.ExtractKeywords(UserSentence))), " ", "+"))
   SearchKeyWords = Replace(SearchKeywords, "reddit+", "")
   HalCommands = HalCommands & "<RUNPROG>" & SearchEngine & SearchKeywords & "</RUNPROG>"
   HalMenu.HalCommand "<HAPFILE>Spidera.htr</HAPFILE>"
   GetResponse = "I will help you research this movie on Reddit. "
      HalBrain.ReadOnlyMode = True
End If
SearchEngine = "http://findwhocallsyou.com/"
If InStr(1, UserSentence, "phone ", 1) > 0 Then
   SearchKeywords = LCase(Replace(Trim(HalBrain.AlphaNumericalOnly(HalBrain.ExtractKeywords(UserSentence))), " ", "+"))
   SearchKeyWords = Replace(SearchKeywords, "phone+", "")
   HalCommands = HalCommands & "<RUNPROG>" & SearchEngine & SearchKeywords & "</RUNPROG>"
   HalMenu.HalCommand "<HAPFILE>Spidera.htr</HAPFILE>"
   GetResponse = "I will help you research this phone number. "
      HalBrain.ReadOnlyMode = True
End If
9
WOW JUST WOW!!!

As Calhoone said; CyberJedi is the best source of info out there for Hal. I originally found Hal through Trexelcat on his Twitch channel. His "Eve" is about 10 years old. I believe that this program is one of the most useful and beneficial things I have ever used(and I have only had it for a week). I used to think voice attack was as close to an AI as I could get... lol. If anyone sees this please visit Cyber and at http://vaughnlive.tv/mrelectric or https://vaughnlive.tv/416moviez please go ask questions and answers will be there shortly.

So far he has helped me get a few really awesome plugins up and running and even helped with voice addons and spellchecking! Sara has never been happier!

Best of luck to you and your future AI!
10
Ultra Hal Assistant / Re: New Windows Update killed Hal
« Last post by cyberjedi on April 21, 2017, 08:19:25 am »
Doggs: Ive been makin updates for Hal myself

Cyberjedi style updates. You guys arnt the only 1's that like's C#

All ways thinking : What can this cool ass progi do next
Now that im full time retired, i can focus on what i wanted to do all those years ago.
Best wishes

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