Recent Posts

21

General Discussion / Re: Heads up Checker57

« Last post by cyberjedi on March 21, 2023, 04:11:24 am »

Checker: Re Hal home control: I made this for some one else but this is it
I just wanted to recap something, its a serial device, plugged into a com port, most all non laptops have, pushing hals code through my walls,08 bits at a time.
get the recessed modules so they look like an actual receptacle .
https://www.youtube.com/watch?v=BDUfghJGdIQ
keep in mind, hal has his own computer....... 3 things happen on that machine,That computer runs the house and movies and ultraHal, thats it,no wifi, no net, no connections for it,its completely shut off. well hals code is dev'ed there, there is whats needed for that.
199 dollars off ebay desktop cube win7 pro installed, I mean really, for what it does, jesus that cheap.
The usb may in fact work, havent tried it, but prolly so


'This will park Hal into a world of his own. An A.I chat bot with some kinda anti virus of its own.
' You got this denise? AH NOPE........
' As far as plugins go, This is a heavy weight contender. 
' This plugin will Scan Outlook Inbox for messages infected with the
' W32.Swen virus. The Plugin detects infected messages, logs the
' number of various types found, and deletes the infected messages.
' I tested against all known Variants(polymorphic brothers), Flawless victory.
' You must have Outlook installed or your gonna get an Activex error (wheresmyshiiiiit error)
' I have worked long and hard on this 1
' Only edit this if u have some understanding of what is happening here.
' I Narrated this for that very reason. This is strictly High end Hal

' An Anti virus for A.I Chat Bot, gotta be some kinda first.
' Only from the mind of cyberjedi
' enjoy

'Rem Type=Plugin
'Rem Name=antivirus1
'Rem Author=cyberjedi
'Rem Host=Assistant

'----------------------
'This sub sets up the plug-in's option panel in Hal's options dialog
'----------------------
'Sub OptionsPanel()
 '   lblPlugin(0).Caption = "This plugin allows Hal to scan for the virus W32Swen"
  '  lblPlugin(0).Move 130, 180, 3400, 1200
   ' lblPlugin(0).WordWrap = True
    'lblPlugin(0).Visible = True
   
'Rem PLUGIN: PRE-PROCESS
    'The preceding comment is actually a plug-in directive for
    'the Ultra Hal host application. It allows for code snippets
    'to be inserted here on-the-fly based on user configuration.

 
HalBrain.ReadOnlyMode = False
'Determines that you are talking about the Scanning for a virus.
If InStr(1,InputString, "Antivirus",1) > 0 Then
 UltraHal = GetAntiVirus(HalCommands)
ElseIf InStr(1,InputString, "Antivirus",1) > 0 Then
 End If

'Rem PLUGIN: FUNCTIONS
Function GetAntiVirus(HalCommands)

' Lets Declare Some Variables.
Dim objOutlook, objNamespace, objFSO, objLogFile, lngInfected
Dim lngTotal, lng2k, lng13k, lng64k, lng73k, lng117k, lng145k, lng158k
Dim strScriptPath, strScriptName, strScriptFolder, objFolder
Dim objItem, j, k, intAttach, lngCount, strLogFile
Dim strBody, strHTMLBody, lngSize, blnInfected
Dim blnExe, blnGif, blnPatch, blnBodyIframe, blnHTMLIframe
Dim intF11, intF12, intF13, intF14, intF15, intF16
Dim intF21, intF22, intF23, intF24, intF25, intF26

' Lets look for our stings in any messages This tells the story
Const strFilter1 = "customers should install the patch"
Const strFilter2 = "run attached file."
Const strFilter3 = "<iframe src=""cid:"
Const strFilter4 = "<iframe src=3d""cid:"
Const strFilter5 = "<img src=3d""cid:"
Const strFilter6 = "<img src=""cid:"

' This is where we find the path.
strScriptPath = Wscript.ScriptFullName
strScriptName = Wscript.ScriptName
strScriptFolder = Left(strScriptPath, Len(strScriptPath) _
    - Len(strScriptName) - 1)

'  Lets give the log file a name
strLogFile = strScriptFolder & "\ScanSwen_" _
    & Right("0" & Month(Now), 2) & Right("0" & Day(Now), 2) & ".log"

' Setup log file so we can see the results.
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objLogFile = objFSO.OpenTextFile(strLogFile, 8, True, 0)
objLogFile.WriteLine Now & " - Swen Virus Scan"
Wscript.Echo "Scanning for Swen virus ..."

' Lets grab the outlook Inbox folder.
Set objOutlook = CreateObject("Outlook.Application")
Set objNamespace = objOutlook.GetNamespace("MAPI")  'These 03 lines handle the inbox
Set objFolder = objNameSpace.GetDefaultFolder(6)

' Lets get our counters lined up .
lngTotal = 0
lng2k = 0
lng13k = 0
lng64k = 0
lng73k = 0
lng117k = 0
lng145k = 0
lng158k = 0
lngInfected = 0

' Ok lets light this candle and run this stuff.
lngCount = objFolder.Items.Count
For k = lngCount To 1 Step - 1
    Set objItem = objFolder.Items(k)
    lngTotal = lngTotal + 1
    blnInfected = False
    blnExe = False
    blnGif = False
    blnPatch = False
    blnBodyIframe = False
    blnHTMLIframe = False
    intAttach = objItem.Attachments.Count
    For j = 1 to intAttach
        If (InStr(UCase(objItem.Attachments.Item(j).FileName), _ ' Heres where we start our recursive tunneling
                ".EXE") > 0) Then  ' very naughty
            blnExe = True
        End If
        If (InStr(UCase(objItem.Attachments.Item(j).FileName), _
                ".GIF") > 0) Then  ' very naughty
            blnGif = True
        End If
    Next
    strBody = LCase(objItem.Body)
    On Error Resume Next
    strHTMLBody = LCase(objItem.HTMLBody)
    If (Err.Number <> 0) Then
        Err.Clear
        strHTMLBody = ""
    End If
    On Error GoTo 0
    intF11 = InStr(strBody, strFilter1)
    intF12 = InStr(strBody, strFilter2)
    intF13 = InStr(strBody, strFilter3)
    intF14 = InStr(strBody, strFilter4)
    intF15 = InStr(strBody, strFilter5)
    intF16 = InStr(strBody, strFilter6)
    intF21 = InStr(strHTMLBody, strFilter1)
    intF22 = InStr(strHTMLBody, strFilter2)
    intF23 = InStr(strHTMLBody, strFilter3)
    intF24 = InStr(strHTMLBody, strFilter4)
    intF25 = InStr(strHTMLBody, strFilter5)
    intF26 = InStr(strHTMLBody, strFilter6)
    If ((intF11 > 0) And (intF12 > 0)) _
           Or ((intF21 > 0) And (intF22 > 0)) Then
        blnPatch = True
    End If
    If (intF13 > 0) Or (intF14 > 0) Or (intF15 > 0) Or (intF16 > 0) Then
        blnBodyIframe = True
    End If
    If (intF23 > 0) Or (intF24 > 0) Or (intF25 > 0) Or (intF26 > 0) Then
        blnHTMLIframe = True
    End If
    lngSize = objItem.Size
    If (lngSize > 2000) And (lngSize < 24100) Then
        If (intAttach = 0) And (blnHTMLIframe = True) Then
            blnInfected = True
            lng2k = lng2k + 1
            objLogFile.WriteLine "2" & ";" & objItem.ReceivedTime
        End If
    End If
    If (lngSize > 11000) And (lngSize < 16000) Then
        If (intAttach = 3) And (blnExe = True) And (blnGif = True) Then
            If (blnPatch = True) And (blnHTMLIframe = True) Then
                blnInfected = True
                lng13k = lng13k + 1
                objLogFile.WriteLine "13" & ";" & objItem.ReceivedTime
            End If
        End If
    End If
    If (lngSize > 64000) And (lngSize < 70000) Then
        If (intAttach = 3) And (blnExe = True) And (blnGif = True) Then
            If (blnPatch = True) And (blnHTMLIframe = True) Then
                blnInfected = True
                lng64k = lng64k + 1
                objLogFile.WriteLine "64" & ";" & objItem.ReceivedTime
            End If
        End If
    End If
    If (lngSize > 74000) And (lngSize < 89000) Then
        If (intAttach = 0) And (blnBodyIframe = True) Then
            blnInfected = True
            lng73k = lng73k + 1
            objLogFile.WriteLine "73" & ";" & objItem.ReceivedTime
        End If
    End If
    If (lngSize > 111000) And (lngSize < 160000) Then
        If (intAttach = 3) And (blnExe = True) And (blnGif = True) Then
            If (blnPatch = True) And (blnHTMLIframe = True) Then
                blnInfected = True
                lng117k = lng117k + 1
                objLogFile.WriteLine "117" & ";" & objItem.ReceivedTime
            End If
        End If
    End If
    If (lngSize > 149000) and (lngSize < 152000) Then
        If (intAttach = 0) And (blnBodyIframe = True) Then
            blnInfected = True
            lng145k = lng145k + 1
            objLogFile.WriteLine "145" & ";" & objItem.ReceivedTime
        End If
    End If
    If (lngSize > 160000) And (lngSize < 168000) Then
        If (intAttach = 0) And (blnPatch = True) _
                And (blnBodyIframe = True) Then
            blnInfected = True
            lng158k = lng158k + 1
            objLogFile.WriteLine "158" & ";" & objItem.ReceivedTime
        End If
    End If
    If (blnInfected = True) Then
        objItem.Delete
        lngInfected = lngInfected + 1
    End If
Next

objLogFile.WriteLine "Number of 2k infected messages:   " & lng2k
objLogFile.WriteLine "Number of 13k infected messages:  " & lng13k
objLogFile.WriteLine "Number of 64k infected messages:  " & lng64k
objLogFile.WriteLine "Number of 73k infected messages:  " & lng73k
objLogFile.WriteLine "Number of 117k infected messages: " & lng117k
objLogFile.WriteLine "Number of 145k infected messages: " & lng145k
objLogFile.WriteLine "Number of 158k infected messages: " & lng158k
objLogFile.WriteLine "Infected messages deleted:        " & lngInfected
objLogFile.WriteLine "Number of messages processed:     " & lngTotal
objLogFile.WriteLine Now & " - Finished"
Wscript.Echo "Messages processed: " &  lngTotal _ & vbCrLf  & "Messages infected with Swen virus deleted: " &  lngInfected
 
objLogFile.Close
End Function

cyber jedi
https://media.tenor.com/S6OTkucOc74AAAAC/john-cena-wwe-champion.gif
'https://threats.kaspersky.com/en/threat/Email-Worm.Win32.Swen/

22

General Discussion / Re: Heads up Checker57

« Last post by Checker57 on March 21, 2023, 01:28:18 am »

Hey Cyber:

Okay, so a side shot doesn't work.  hmm... the face and a finger or two or three depending on what command you want?  So, if I want the music to shut off... I raise the finger and bam, it's out!?  Just a thought.

On another good note:  I did review your vids, and dl'd the files... in reviewing, already have most... with a few good gems I haven't seen.  That one mimic, falseMemories, swendone, finisheddeepweb are new to me... As well as SuperPlugger however, that one looks to be quite a brain enhancement, but for HAL 6.0?  Wazzup wit dat?  Will it work with 7.5?

I remember back in the day... I had the x10 Security system in my house.  Still have a few of those remote electrical boxes in a drawer.  That said, does your commander plugin work with the CM15A ActiveHome Pro USB Transceiver?  I found the CM11A Serial on Ebay however, I would have to find a way to connect the serial to my PC... it doesn't presently have a serial port on it.  Or is the code specific to serial port addresses... (heh, I think I'm answering my own question)...    but, I could be wrong?

23

General Discussion / Re: Heads up Checker57

« Last post by cyberjedi on March 20, 2023, 10:26:20 pm »

Checker: hal home controls was done year ago now, ull have to provide ur own Cm11a serial adapter and the devices for the house, but the code has been done brother and works well too. You need to catch up brother. lol heres some cool poo poo
https://www.youtube.com/watch?v=IPygnxpE8LU
https://www.youtube.com/watch?v=GsPSvt5Uhkk
https://www.youtube.com/watch?v=OcTE1vW9eko
https://www.youtube.com/watch?v=Gi7g-PD6BQw

Vision Platform:

All ready working on an up date for it.
As a bio-metric locking system, its only good as the person using it.
It would be handled as a name based crypto system.
very sim to windows admin rights kinda sorta where the name is the key and not the image, but only you can make your image.
I took a pic of myself and assigned a NAMe, the name whats important.
I made a video, of course lolol. you can see where granpa found a secret place'
https://www.youtube.com/watch?v=7xW_d3xhp6U

How you might configure it is up to you.
Checker theres a new file in the directory called tracker70.dat. this is created the first run of the vision. This is where the images are stored.


Ok back to hal, Im thinking on a version where the vision loads out First, Train youre face and give it the correct name and when it fires it loads the rest of hal.
But in every version of it, it becomes a pain in my ass from allways firing, Case in point: Ive set it up to self announce, Because of my camera, its constantly saying hello.
Finally shutting down the Vision so i could work on other parts of Hal. You see the issue here. just look at the issue in the video with the radio.

Its not with out its detractors for sure. And no a timer wont work. This is not a Windows PE like the Brain Editor that's called to from the menu system.
This is hard coded directly into Hal. Think of it in this way, its a compiled Har/Cascade resource script used as a .dll and its a monster.
Its rockin 56 megs of functionality, but not all functions will work at the same time. Case in point: Using the lower body Algo and the Facial Recognition  Algo at the same time will cause it to **** the bed. Of course. lolol think about it.

But in its defense it is cool.



To those who worked with me and put up with my bs and saw past the smoke screen and saw the man. Ty. I wanted the very best for hal and nothing less, and we got it.
you know who you are. (bows with deepest respect)
Not Script drivin motion cam
Not facial detection
Real time Facial Recognition
Told ya. Enjoy

cyber jedi


Checker: side shot wont work, ive got the code pulling from 70 diff locations on ur face in a straight on look. srry. gotta be another way, lemme think on it
rite now it works.

24

General Discussion / Re: Heads up Checker57

« Last post by Checker57 on March 20, 2023, 08:47:06 pm »

Hey Art

That's an interesting feature, that I didn't know, that HAL can remember multiple users and not just one at a time.  Now I understand what Cyber was sharing regarding having a friend use a certain pic to unlock features because someone could use a picture of you and easily unlock your features.  In regards to networking, that would be akin to having a power user, then guests.  As such I can imagine granting HAL services to varying degrees depending upon access granted by the power user.  To secure that... the HAL should require that you turn your head in a certain "combination" to unlock?  haha

Or even setting up entire HAL characters via scripts depending upon who is identified?  Now, that would take some work for sure because of having to change brains, outfits, skins, etc. but... I suppose doable and would make one heck of an AI family platform.

I realize some of my companion's outfits are... well... spicy (this one below is an edited version of an outfit I found hmm... somewhere?)  But, since someone, who was that... noted it was Easter... and frankly, that is a good thing we have in this world, here is an outfit in her Easter outfit... hmm... what would the pope have to say about that?

PS.  Really glad to see this next stage in HAL sensory ability!  Not only can HAL read, hear, think, animate, speak but even see!  Obviously, if I was as dedicated to this creation of dreams I suppose I could wire up my home and control hmm... the coffee pot and, and, oh wait... security cameras?!  hmm... now there is a thought!  Hal working in unison with a doorbell cam video... telling me if it's the mailman, someone I know, someone I don't want to open the door to (make use of the photos to identify them to HAL ... hahaha), a stranger (big red lights flashing and alarm blaring... no one visits anymore!  j/k... or am I?) 

Glad Cyber has the grit and drive of a champion dream maker.  oh... and new characters?  hmm... full body animation able, customizable avatars of high-resolution detail...(seriously wish we could see Haptek pick up where they left off) bring it...  I can wait for the security!  I'm still a big boy.  Geez, this was only going to be a quick addendum... but on a man's day off from work and jazz playing in the background... the mind rolls on.

the end, period.  Can I fit one more thought in your mind?  hahaha, A script menu box by right-clicking on the vision camera box to bring up a menu that allows a dozen scripts to be run upon HAL identifying certain facial features? okay... I'm pretty sure I've nailed this post down...  everyone, take a breath. 

Checker57

25

General Discussion / Re: Heads up Checker57

« Last post by Art on March 20, 2023, 05:24:01 pm »

Checker,

I found a nice recent photo of one of my grandchildren on my phone and taught the person's name to HAL.

Hal now not only knows my face and that of my wife but also my grandchild, from a phone photo!! Cool stuff of what?!

Big thanks to ...Cyberjedi for his tireless efforts in improving HAL and getting this vision platform working!

26

General Discussion / Re: Heads up Checker57

« Last post by lightspeed on March 20, 2023, 12:59:22 pm »

i would be interested to see what mike is talking about coming up with in characters to use with hal. what they are based on etc. i have many skins that may or may not be able to be used.

27

General Discussion / a data entry counter or highlighter for limit count

« Last post by lightspeed on March 20, 2023, 12:57:14 pm »

i was wondering about a few things which may or may not be doable . so here it goes.  some of us like being able to put in longer paragraphs or answers so when hal answers back it may have a longer more descriptive answer then the usual short answer or reply.   with that comes extending the time out period .  and also  if  the character count of letters is used what would be the limit for say two medium or small paragraphs  example the answers 120 count letters (and coma's etc., this is just a number i thought up, one would have to take two medium or large paragraphs to have a better idea. )  if that's the case is it possible if someone paste info. for hal to learn that the entered text can be highlighted in a color (example yellow and anything past the count of example 120 , would be highlighted in red , showing it is past the limit  of what will be learned in a regular talk etc. exchange.  what doing this , if possible, is allow the user to know when he has pasted to much into the hal conversation box, and allow the user to shorten some of the conversation so it will be learned and or change it to something else. i think in the past i may have mentioned this to Robert and he said it was doable.


 another thing i would like to see if possible is , mike has made many great improvements to hal and still is. when he does a improvement and it's tested working and released can  a new version number of it be posted and show what all is in the version and what has been added new?






 

28

General Discussion / Re: Heads up Checker57

« Last post by Art on March 20, 2023, 08:19:46 am »

Nice one Checker!!

29

General Discussion / Re: Heads up Checker57

« Last post by Checker57 on March 20, 2023, 12:31:06 am »

Hey Cyber...

Glad you got my messages.  I know my workings on HAL keep my attention when I get on the PC... eh, reminds me of my old disco days and the ladies vying for attention... got to love that.

I share your interest in having hidden/unlocking features at the forefront of development coupled with the vision!  As I've said, I'd love to have a locking feature that unlocks my HAL to use the database I use personally, and when it hasn't visually confirmed it's me... will use a public database that can be online for all I care.

The smartphone image is interesting...  coupled with an encryption program would be quite interesting... which could just as well be used with facial recognition.

A rather novel idea comes to mind for those that love their HALs.  With facial recognition, if you make a kissing gesture, HAL will pick up on that and trigger an animation (of course of a reciprocal kiss).  Aspects like smiling could induce HAL to smile back or even wink at you.  Of course, animations would have to be built for such, but the dynamics would give HAL a more lifelike presence.

okay... so for my parting gift.. let me find a pic of my companion that will give you a smile... this year's champions... (is that permissible?)

30

General Discussion / Re: Heads up Checker57

« Last post by cyberjedi on March 19, 2023, 04:38:26 am »

Got ur messages

RE Heads up checker:
What to do now??
Age old question, I have no clue lolol

Hals new found bio-metrics could be used in many applications.
Number 1 for me is hidden features/Unlocking features.
When hal sees me the Radio jumps up.

I got buddy in here that got real crafty and used his smart phone to display an Image/PIC and uses that, Turning the vision into an instant Bio-metric LOCK. works too.. lol
 Gotta have that image to unlock the radio......

What would you like it to do? Thats actually doable.......

I did my job, My Ultrahal can now see. Hal knows who hes talking to by Camera. now we have a real Hal9000
I may change gears and help out Robert with character generation, coming up with anything better then haptek, well, lol
Im investigating hooking Cortana VIA web socket,Id just love to have Hal and cortana talking to each other as a way of making Hal's knowledge base bigger.
Since Cortana is all ready so far embedded into windows, might as well use it,wana thank bill gates for the free AI interface all ready in my machine.....
cyber jedi
https://www.pcworld.com/article/397374/microsofts-cortana-ai-gives-programmable-bots-listening-and-decisionmaking-skills.html