Topics

1

General Discussion / I figured out something very cool

« on: May 23, 2020, 12:53:15 pm »

I finally succeeded in installing vb6 on a win10 64 bit platform






long live legacy code

cyber jedi

2

Share Conversations, Experiences, Graphics / Solar Pvv systems (myth breaking)

« on: May 13, 2020, 07:03:08 pm »

Art we talked briefly about solar so let me expand that with some fairly simple math.
Ohm's Law..... works the same with low/high voltage.

The main Problem with US solar systems is the NEC, National Electrical code.
They set limits on battery voltage, meaning nothing above 48 volts DC in battery banks.
This is an Idea that went horribly wrong, in my opinion
 https://invertersrus.com/prius-power-inverter/

Rule number #1 : The higher the voltage, the more efficient it is

Normal voltage on Solar is this 12/24/48 VDC 
12DC X 120VAC is a 10 to 1 ratio. Meaning 1 amp Ac will Pull 10 amps on the battery's
24vDC X 120VAC is a 5 to 1 ratio. Meaning 1 amp Ac will Pull 5 amps on the battery's
48VDC X120VAC is  a 2.5 to 1 ratio. Meaning 1 amp Ac will pull 2.5 amp's on the battery's

Believe it or not you can keep working this math till it starts going in the other direction.<<<<This is Important too
Try this: theoretically
If you generating solar voltage in lets say the 250v DC range, That same 1 amp 120 VAC load would only be .5 amps on the battery's..<Seee whats up here.
 
As you can clearly see , The Higher the Voltage on the DC End brings Down the work load
Now another important factiod is Solar Cells, The max on any givin solar cell is about 8 amp's, maxed out. <<This is important.

So we have covered basic Ohm's Law when applying it to solar electric systems
https://www.ebay.com/i/372979890046?chn=ps&var=641765103308&norover=1&mkevt=1&mkrid=711-117182-37290-0&mkcid=2&itemid=641765103308_372979890046&targetid=883441960689&device=c&mktype=pla&googleloc=9012108&campaignid=9426387573&mkgroupid=96480184500&rlsatarget=pla-883441960689&abcId=1140476&merchantid=101982200&gclid=EAIaIQobChMIjdO67fex6QIVIeeGCh2LNw04EAQYASABEgKL3PD_BwE

3

General Discussion / ART: green house

« on: April 30, 2020, 09:21:50 pm »

ya folks, ive been ad it again

if i aint building , i aint happy

In florida u just cant grow sht, Its to hot for a green house.
I had a full blown green house where that sets now.
heat would go up 30 degrees above outside temp, so if its 100+, you got a real problem.....

So this is how its done......
They make these things 20' X 12'  about 1k dollars for this size,, i paid 100.Including the screen top , Its all about the Labor cost in any job.
Hurricane Tough, can even remove top, hehehe
Blocks 70% of direct sunlight
best to all
Pressure treated everything,  4 X 4 legs  incased in 5k psi concrete. (Cyber flexes Mad Muscles) built cyber tough. 
Hals obedient servant
cyber

4

Ultra Hal Assistant File Sharing Area / pg 13 posting HalTwitchBot Release. Not for youngins

« on: April 30, 2020, 06:18:27 am »

RE: HalTwitchBot Release
As promised

DownLoad
Unzip
Drag folder to desktop or where ever.
Run twitchbot
Im including hals radio as well

No Hal though, srry. this is all i dare release without conflict of interest
Current layout uses my old access which in fact still works
Hit connect, Hal will login and ull see him in yellow
the bot has his own access account, you will need to setup an account.
Log in and navigate to Hal's channel #darkmatterai
After a time you should set up hals new account, twitch can help u with that, fairly simple. the current account is for u to use as long as you follow twitch rulez. And ease of use.
 Example: !hello hal
Has its own brain and Script
lock to desktop
learning on and off, when the trolls come at Hal
Dont forget the damn trigger !!!!!!!
let me know if u have an issue
My advise, make ole Hal mean and nasty, thats what they want on twitch. trust me........loololol
I do this is an effort to breath some GD LIFE back into the forum, cyber performing cpr on Forum, couff, couff. smoke to many cigarettes.   Breath damn it, forum. Breath..... lolol
Only bot on twitch with his own followers, 43 at time of posting
Bot Vs Bot on twitch is so ugly, other bots go home crying to moma.
Yes i let Hal talk to other A.I bots. epic moments in time
Never take Hal into another room without asking first, not nice. respect peoples privacy. Most have no issue. some get pissy because Hal steals the show alott.
cyber
If mods here need to pull down image, feel free, i get it. just wanted to show what can be done and only picture i have from then
https://www56.zippyshare.com/v/qXjweo0B/file.html

5

Ultra Hal Assistant File Sharing Area / HapTar Skins

« on: April 03, 2020, 02:46:08 pm »

This is a great one.
Torso Female
I will be pulling out .jhp (another style of Texture) as well<<<<< These work well. quality wise. This allows for many more Skins by adding .JHP textures
look at how the layout is completely diff...... Mhmmm
im working on a process that will allow us to pull apart any .HTR file as well as cut them back in as an .HTR playable file.
No need for PP.
Enjoy
Unpak the .zip file and extract the .jhp and drop it on any PP Head<<<This is just the head, not the torso
The torso is for any 1 needing a,,,,,, Welll, ,,,,,,,torso
cyber

6

Share Conversations, Experiences, Graphics / Cyber and Hal Vs Scammerz

« on: March 27, 2020, 03:35:52 am »

Great times.
UltraHal, the gift that keeps on giving
To those in the know, just priceless
https://streamable.com/37agd


cyber

7

General Discussion / Covid-19 updater complete

« on: March 14, 2020, 04:55:28 pm »

RE: COVID-19 AKA Corona virus

Hope all is well.
Im writing a plugin for the Corona Virus so Hal will update us on the spread of this virus. Hal 6-7
Its basically done now, Having some results but buggy ATM
Will be releasing it here any day now.
Just searching the rite RSS Feed now.....

Really want to do a shout out to my wife who works at Quest Diagnostics to isolate and Kill this fricking thing.
Very brave women, not sure i would have the wavo's to handle this thing. Says a lot too.
Plan to catch her at lunch and take some shots of her all gear'ed up, i dont have access to her building,card key access sorta thing. Gotta sneak attack lmao. ill bring her lunch monday night... hehe
Never say no to free food,,,hehe

On another note, Over the years ive heard all kinda jokes, quips, otherwise foolishness  said about my little bunker......
Well , here we are.. At the end of the day, Mhmmmmmmm, I told u so. We will not be getting COVID-19... most likely survive it anyway but who wants to stick around for that. That's like sticking around while the police execute a search warrant. lolol
Im planning to buy 1200 lbs of MRE's and the water is well fed, so i guess u know. In preparation for job losses, Duke Energy has told all its customers it will NOT be turning power off due to lack of payment, till further notice, Way to go DUKE..... (Bows with respect)
Electricians rule
Stay safe, stay out away from crowds, Not scared, just serious about it.


Best from my family to all of Zabaware, we are family
cyber jedi





 

8

General Discussion / cybers new rolling cash register

« on: February 21, 2020, 01:46:20 pm »

Got my truck


Lovin life
As too what i may need all that for, just cause i can...


Any 1 that knows me here knows... thats just so me.


The mighty Dodge 3500/20K pound tow package w/ Dana 8 rear dually
cyber jedi

9

General Discussion / ARP Poisoning

« on: February 13, 2020, 07:50:49 am »

RE: ARP Poisoning

ARP Poisoning AKA Man in the middle attack.......
 
Ive fallen victim to this myself, now ima show u how to stop it.
First:
Do not believe that your antivirus ect ect ect will protect you from this kinda attack.
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Im not here to push any 1 type of code on you guys, they all have there strong points and weaknesses.
What i will say is this: If they dont advertise it, they prolly dont protect against it.


I know Antimalware (Malware Bytes Corp) does not. any version.
Bitdefender does NOT. Any version
Avast : Not happening
Norton: NOPE
Eset: Does

Now the good news:

You can fix this without any 3rd party software.
This is done in your windows firewall in 8 easy steps.
Enjoy

cyberjedi
https://www.youtube.com/watch?v=UBrdhjMCGuU
For the more detailed https://www.youtube.com/watch?v=Mg5TLN1ELFk
Hope this helps out
 

10

General Discussion / ART: Ogg factory

« on: February 10, 2020, 10:38:31 am »

http://www.ultrahal.com/community/index.php?topic=2859.0

This is what im after....


I will continue to search GRRRRRRR


cyber

11

General Discussion / HapTargh De-Compressor

« on: February 04, 2020, 04:53:31 am »

RE: HapTargh De-Compressor
Im searching for the Compressor/Decompressor
Any version is fine as well as any license situations

Like to get it to work  for win10   
Im also thinking i might be able to pull that from PP, as i set here....lol
Surely its in there, "slaps forhead and hides head in shame"
Puff Puff Pass cyber...... jesus


michael

12

Ultra Hal Assistant File Sharing Area / Art , lightspeed :The project

« on: January 09, 2020, 11:30:52 pm »

Well buddy: lol

This is running on win10 64bit, i7, quad pumped @3.30 Ghz, 32gigs of Ram with a 2Tb platter
I installed julie
I did NOT install any emgu, just calling .dll's ,ocx's ect ect
I went to x86 haptek tts  voice engine, checked for julie(was present)
Ran project.... all loaded
Surprisingly , facial recognition works like a dream(without Emgu) install.
SAPI5 works as it should. julie sounds great

No antivirus other then stock sht.
no firewall other then stock crap
That machine has no Net access, so im not worried. ill do that later
i just wanted to see whats up with a stock win10 machine. (Clean Install)
I did install Vs 2015,(needed C# for other version but that wouldnt effect you)
The fact that u DID get julie to work once,tells me most everything.
The cam is my logitech615 which i installed NO drivers for(just saying)
Just plugged it in


now back ontrack again, full speed ahead..... started my new bio-metric features.Turns out Matlab is damn handy for JUST that, as fate would have it, i got it, go figure.
Ended up with an .xml based haar cascade Biometrics PLAYER .Had time to play around waiting on the new machine's, loads like the book reader.
Just load out what u want, all ready looking at the possibility of combing bio-metrics like hals scripts(all in 1)
Thats on the list now, gonna load like Hal's plugins......


guess now ill look at the legendary WINDOWS 10, (after 18 mins) like it aint win7-8 backbone with a new skin and new bells and whistles (basicly win7 and 8 cobled together to make win10. Microsoft has a long history of JUST that..... lolololol.  when u look at win2000 at a source code level, first thing ull see is win95 code ALL OVER tHE place,, they just cobled win95, win98 ,ME, changed over to pure NTFS format, effectively killing DOS and called it the BRAND New Win 2000.... and windows 10 is apparently the same ,as i suspected, why i never bought it.

cyber

13

Ultra Hal Assistant File Sharing Area / MassMedia Player

« on: November 26, 2019, 11:06:34 pm »

'This is something ive spent a great deal of time with, what we have here is extreme Vbs......
'The format its running in rite now is pure vbs but if remove the ' in front of the plugin info and save as a .UHP, presto, this beaste is a plugin thats extremely powerful.
'Just play with the vbs included, point it at a folder where mp3's are stored and it will aggregate a playlist and save it as an m3u and launch the wmplayer.ocx.
'In case your wondering what the base64 crytpo is, that's an encrypted gif image just for flavor. Have see it to get it.
'This will prolly be the only time ull ever see graphics 'encoded/embedded within vbs .
'And it speaks . lolol Im currently using it in other areas of my work (LOL u can do many things with this) but i wanted to let you guys have at this, enjoy.
'Im including the vbs in zip format
'This can be used in many real time app's , who says it has to just do mp3's .... Classified Cyber Secret.
'ART :::Lightspeed: This is a direct action plugin (Think Companion), this is why i do this, push all this through Hal's MIND, I think NOT lololol
'10 min's later still waiting on UltraHal to respond. Wonder why?
'But in fact will work just fine as a plugin for UltraHal6.2/7 . But it is rather large.
Cyber






'Option Explicit
'Rem Type=Plugin
'Rem Name= mass media player
'Rem Author= cyberjedi
'Rem Host=All



'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 media player
'If InStr(1,InputString, "loadmedia",1) > 0 Then
 'UltraHal = Getmedia(HalCommands)
'ElseIf InStr(1,InputString, "loadmedia",1) > 0 Then
' End If

 ' This bad boy is a media list agregator and player 
   ' It makes a play list called MyPlayList.m3u
   ' In whatever folder the media is in
 ' Trigger= loadmedia
   
 ' I give myself about a flat 9.5 on my weirdshtometer
 

'Rem PLUGIN: FUNCTIONS
'Function Getmedia(HalCommands)

'Option Explicit
  Set FSO = CreateObject("Scripting.FileSystemObject")
  Set Sapi = CreateObject("SAPI.SpVoice")
  For Each Voice In Sapi.GetVoices
  i = i + 1
Next

If AppPrevInstance() Then
    MsgBox "There is an existing proceeding !" & VbCrLF &_
    CommandLineLike(WScript.ScriptName),VbExclamation,"There is an existing proceeding !"  ' This is my first exception handler  ,dont laugh
    WScript.Quit   
Else
    Dim Folder,File,fso,MyPlayList,Temp,oExec,ws,Title,WaitingMsg
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set ws = CreateObject("WScript.Shell")
    Temp = ws.ExpandEnvironmentStrings("%Temp%")
    Folder = Browse4Folder()
    MyPlayList = Folder & "\MyPlayList.m3u" 'this is where we set the stage for thew playlist
    If fso.FileExists(MyPlayList) Then
        fso.DeleteFile(MyPlayList)
    End If
    Title = "Looking for songs in "& DblQuote(Folder) & " From the mind of cyberjedi"
    WaitingMsg = "Please wait... Searching for songs  : <font color=Yellow>"& DblQuote(Folder) & "</font> is in progress..."
    Sapi.speak "Please wait... Searching for songs "
    Sapi.speak "From the mind of cyberjedi" ' Bragging rights area hahahahhaha
   
    Call CreateProgressBar(Title,WaitingMsg)'Creation of Waiting Bar
    Call LancerProgressBar() 'Launch of the Waiting Bar
    Call Pause(10)
    Call Scan4Songs(Folder)
    Call FermerProgressBar()
    Call Play(MyPlayList)
End If
'*********************************************************
Sub Play(File)
    On Error Resume Next
    Dim Sound,Ws,Copyright
    Copyright = " ? cyberjedi 2017"
    Set Ws = CreateObject("wscript.Shell")
    If Err <> 0 Then
        Ws.popup Err.Description & VbCrlF &_
        "No media file found !","3",Err.Description & Copyright,VbCritical
        wscript.quit()
    Else
    Set Sound = CreateObject("WMPlayer.OCX") ' This is where we call the media player
    Sound.settings.volume = 100                       'This is set to play at 100% Volume, consider 50% 
    Sound.OpenPlayer(File)
    End If
End Sub
'*********************************************************************************************
Function AppPrevInstance()   
    With GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")   
        With .ExecQuery("SELECT * FROM Win32_Process WHERE CommandLine LIKE " & CommandLineLike(WScript.ScriptFullName) & _
            " AND CommandLine LIKE '%WScript%' OR CommandLine LIKE '%cscript%'")   
            AppPrevInstance = (.Count > 1)   
        End With   
    End With   
End Function   
'*********************************************************************************************
Function CommandLineLike(ProcessPath)   
    ProcessPath = Replace(ProcessPath, "\", "\\")   
    CommandLineLike = "'%" & ProcessPath & "%'"   
End Function
'*********************************************************************************************
Function Browse4Folder()
    Dim objShell,objFolder,Message
    Message = "Please select a folder in order to scan into it and its subfolders for songs"
    Set objShell = CreateObject("Shell.Application")
    Set objFolder = objShell.BrowseForFolder(0,Message,1,"c:\Programs") ' Point this where ever you want, this is my choice
    If objFolder Is Nothing Then
        Wscript.Quit
    End If
    Browse4Folder = objFolder.self.path
end Function
'*********************************************************************************************
Function Scan4Songs(Folder)
    On Error Resume Next
    Dim File,Ext,item,SubFolder
    Set Folder = fso.GetFolder(Folder)
    For each File in Folder.Files
        Ext = Array("mp3")   'Here's where we tell it what to scan for. Hint, Hmmm does it have to be a MP3?? what else is on my machine in mass amounts??? HA, MP4's
        For each item in Ext   ' Now Hal can load out ur fav movies/music ect ect ect
            If LCase(fso.GetExtensionName(File.name)) = LCase(item) Then
                Call MakePlayListFile(MyPlayList,File.Path)
            end if
        Next
    Next
    For each SubFolder in Folder.SubFolders
        Call Scan4Songs(SubFolder.Path)
    Next
End Function
'*********************************************************************************************
Sub MakePlayListFile(MyPlayList,strContents)
    Dim fso,ts
    Const ForAppending = 8
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set ts = fso.OpenTextFile(MyPlayList,ForAppending,True) 'This is called from above routine to create the playlist it self
    ts.WriteLine "#UTF8: "& strContents
    ts.WriteLine strContents
    ts.Close
End Sub
'**********************************************************************************************
'This is where we create the progress window.
Sub CreateProgressBar(Title,WaitingMsg)
    Dim ws,fso,f,f2,ts,ts2,Ligne,i,fread,LireTout,NbLigneTotal,Temp,PathOutPutHTML,fhta,oExec
    Set ws = CreateObject("wscript.Shell")
    Set fso = CreateObject("Scripting.FileSystemObject")
    Temp = WS.ExpandEnvironmentStrings("%Temp%")
    PathOutPutHTML = Temp & "\Barre.hta"
    Set fhta = fso.OpenTextFile(PathOutPutHTML,2,True)
    fhta.WriteLine "<HTML>"
    fhta.WriteLine "<HEAD>"
    fhta.WriteLine "<Title>  " & Title & "</Title>"
    fhta.WriteLine "<HTA:APPLICATION"
    fhta.WriteLine "ICON = ""magnify.exe"" " ' change this to what ever u prefer, icon change is cool
    fhta.WriteLine "BORDER=""THIN"" "
    fhta.WriteLine "INNERBORDER=""NO"" "
    fhta.WriteLine "MAXIMIZEBUTTON=""NO"" "
    fhta.WriteLine "MINIMIZEBUTTON=""NO"" "
    fhta.WriteLine "SCROLL=""NO"" "
    fhta.WriteLine "SYSMENU=""NO"" "
    fhta.WriteLine "SELECTION=""NO"" "
    fhta.WriteLine "SINGLEINSTANCE=""YES"">"
    fhta.WriteLine "</HEAD>"
    fhta.WriteLine "<BODY text=""white""><CENTER>"
    fhta.WriteLine "<marquee DIRECTION=""LEFT"" SCROLLAMOUNT=""3"" BEHAVIOR=ALTERNATE><font face=""Comic sans MS"">" & WaitingMsg &"</font></marquee>"
 'Below is the encrypted image itself, change to what ever. Hint  http://31.media.tumblr.com/c891df5d9d74fb5f8f1496d33d1cbec3/tumblr_n40g5wTcba1t24k6go1_500.gif
 'just encode as base64) and  'copy/paste.
fhta.WriteLine " <img src=""data:image/gif;base64,R0lGODlhgAAPAPIAAP////INPvvI0/q1xPVLb/INPgAAAAAAACH/C05FVFNDQVBFMi4wAwEAAAAh/hpDcmVhdGVkIHdpdGggYWpheGxvYWQuaW5mbwAh+QQJCgAAACwAAAAAgAAPAAAD5wiyC/6sPRfFpPGqfKv2HTeBowiZGLORq1lJqfuW7Gud9YzLud3zQNVOGCO2jDZaEHZk+nRFJ7R5i1apSuQ0OZT+nleuNetdhrfob1kLXrvPariZLGfPuz66Hr8f8/9+gVh4YoOChYhpd4eKdgwDkJEDE5KRlJWTD5iZDpuXlZ+SoZaamKOQp5wAm56loK6isKSdprKotqqttK+7sb2zq6y8wcO6xL7HwMbLtb+3zrnNycKp1bjW0NjT0cXSzMLK3uLd5Mjf5uPo5eDa5+Hrz9vt6e/qosO/GvjJ+sj5F/sC+uMHcCCoBAAh+QQJCgAAACwAAAAAgAAPAAAD/wi0C/4ixgeloM5erDHonOWBFFlJoxiiTFtqWwa/Jhx/86nKdc7vuJ6mxaABbUaUTvljBo++pxO5nFQFxMY1aW12pV+q9yYGk6NlW5bAPQuh7yl6Hg/TLeu2fssf7/19Zn9meYFpd3J1bnCMiY0RhYCSgoaIdoqDhxoFnJ0FFAOhogOgo6GlpqijqqKspw+mrw6xpLCxrrWzsZ6duL62qcCrwq3EsgC0v7rBy8PNorycysi3xrnUzNjO2sXPx8nW07TRn+Hm3tfg6OLV6+fc37vR7Nnq8Ont9/Tb9v3yvPu66Xvnr16+gvwO3gKIIdszDw65Qdz2sCFFiRYFVmQFIAEBACH5BAkKAAAALAAAAACAAA8AAAP/CLQL/qw9J2qd1AoM9MYeF4KaWJKWmaJXxEyulI3zWa/39Xh6/vkT3q/DC/JiBFjMSCM2hUybUwrdFa3Pqw+pdEVxU3AViKVqwz30cKzmQpZl8ZlNn9uzeLPH7eCrv2l1eXKDgXd6Gn5+goiEjYaFa4eOFopwZJh/cZCPkpGAnhoFo6QFE6WkEwOrrAOqrauvsLKttKy2sQ+wuQ67rrq7uAOoo6fEwsjAs8q1zLfOvAC+yb3B0MPHD8Sm19TS1tXL4c3jz+XR093X28ao3unnv/Hv4N/i9uT45vqr7NrZ89QFHMhPXkF69+AV9OeA4UGBDwkqnFiPYsJg7jBktMXhD165jvk+YvCoD+Q+kRwTAAAh+QQJCgAAACwAAAAAgAAPAAAD/wi0C/6sPRfJdCLnC/S+nsCFo1dq5zeRoFlJ1Du91hOq3b3qNo/5OdZPGDT1QrSZDLIcGp2o47MYheJuImmVer0lmRVlWNslYndm4Jmctba5gm9sPI+gp2v3fZuH78t4Xk0Kg3J+bH9vfYtqjWlIhZF0h3qIlpWYlJpYhp2DjI+BoXyOoqYaBamqBROrqq2urA8DtLUDE7a1uLm3s7y7ucC2wrq+wca2sbIOyrCuxLTQvQ680wDV0tnIxdS/27TND+HMsdrdx+fD39bY6+bX3um14wD09O3y0e77+ezx8OgAqutnr5w4g/3e4RPIjaG+hPwc+stV8NlBixAzSlT4bxqhx46/MF5MxUGkPA4BT15IyRDlwG0uG55MAAAh+QQJCgAAACwAAAAAgAAPAAAD/wi0C/6sPRfJpPECwbnu3gUKH1h2ZziNKVlJWDW9FvSuI/nkusPjrF0OaBIGfTna7GaTNTPGIvK4GUZRV1WV+ssKlE/G0hmDTqVbdPeMZWvX6XacAy6LwzAF092b9+GAVnxEcjx1emSIZop3g16Eb4J+kH+ShnuMeYeHgVyWn56hakmYm6WYnaOihaCqrh0FsbIFE7Oytba0D7m6DgO/wAMTwcDDxMIPx8i+x8bEzsHQwLy4ttWz17fJzdvP3dHfxeG/0uTjywDK1Lu52bHuvenczN704Pbi+Ob66MrlA+scBAQwcKC/c/8SIlzI71/BduysRcTGUF49i/cw5tO4jytjv3keH0oUCJHkSI8KG1Y8qLIlypMm312ASZCiNA0X8eHMqPNCTo07iyUAACH5BAkKAAAALAAAAACAAA8AAAP/CLQL/qw9F8mk8ap8hffaB3ZiWJKfmaJgJWHV5FqQK9uPuDr6yPeTniAIzBV/utktVmPCOE8GUTc9Ia0AYXWXPXaTuOhr4yRDzVIjVY3VsrnuK7ynbJ7rYlp+6/u2vXF+c2tyHnhoY4eKYYJ9gY+AkYSNAotllneMkJObf5ySIphpe3ajiHqUfENvjqCDniIFsrMFE7Sztre1D7q7Dr0TA8LDA8HEwsbHycTLw83ID8fCwLy6ubfXtNm40dLPxd3K4czjzuXQDtID1L/W1djv2vHc6d7n4PXi+eT75v3oANSxAzCwoLt28P7hC2hP4beH974ZTEjwYEWKA9VBdBixLSNHhRPlIRR5kWTGhgz1peS30l9LgBojUhzpa56GmSVr9tOgcueFni15styZAAAh+QQJCgAAACwAAAAAgAAPAAAD/wi0C/6sPRfJpPGqfKsWIPiFwhia4kWWKrl5UGXFMFa/nJ0Da+r0rF9vAiQOH0DZTMeYKJ0y6O2JPApXRmxVe3VtSVSmRLzENWm7MM+65ra93dNXHgep71H0mSzdFec+b3SCgX91AnhTeXx6Y2aOhoRBkllwlICIi49liWmaapGhbKJuSZ+niqmeN6SWrYOvIAWztAUTtbS3uLYPu7wOvrq4EwPFxgPEx8XJyszHzsbQxcG9u8K117nVw9vYD8rL3+DSyOLN5s/oxtTA1t3a7dzx3vPwAODlDvjk/Orh+uDYARBI0F29WdkQ+st3b9zCfgDPRTxWUN5AgxctVqTXUDNix3QToz0cGXIaxo32UCo8+OujyJIM95F0+Y8mMov1NODMuPKdTo4hNXgMemGoS6HPEgAAIfkECQoAAAAsAAAAAIAADwAAA/8ItAv+rD0XyaTxqnyr9pcgitpIhmaZouMGYq/LwbPMTJVE34/Z9j7BJCgE+obBnAWSwzWZMaUz+nQQkUfjyhrEmqTQGnins5XH5iU3u94Crtpfe4SuV9NT8R0Nn5/8RYBedHuFVId6iDyCcX9vXY2Bjz52imeGiZmLk259nHKfjkSVmpeWanhhm56skIyABbGyBROzsrW2tA+5ug68uLbAsxMDxcYDxMfFycrMx87Gv7u5wrfTwdfD2da+1A/Ky9/g0OEO4MjiytLd2Oza7twA6/Le8LHk6Obj6c/8xvjzAtaj147gO4Px5p3Dx9BfOQDnBBaUeJBiwoELHeaDuE8uXzONFu9tE2mvF0KSJ00q7Mjxo8d+L/9pRKihILyaB29esEnzgkt/Gn7GDPosAQAh+QQJCgAAACwAAAAAgAAPAAAD/wi0C/6sPRfJpPGqfKv2HTcJJKmV5oUKJ7qBGPyKMzNVUkzjFoSPK9YjKHQQgSve7eeTKZs7ps4GpRqDSNcQu01Kazlwbxp+ksfipezY1V5X2ZI5XS1/5/j7l/12A/h/QXlOeoSGUYdWgXBtJXEpfXKFiJSKg5V2a1yRkIt+RJeWk6KJmZhogKmbniUFrq8FE7CvsrOxD7a3Drm1s72wv7QPA8TFAxPGxcjJx8PMvLi2wa7TugDQu9LRvtvAzsnL4N/G4cbY19rZ3Ore7MLu1N3v6OsAzM0O9+XK48Xn/+notRM4D2C9c/r6Edu3UOEAgwMhFgwoMR48awnzMWOIzyfeM4ogD4aMOHJivYwexWlUmZJcPXcaXhKMORDmBZkyWa5suE8DuAQAIfkECQoAAAAsAAAAAIAADwAAA/8ItAv+rD0XyaTxqnyr9h03gZNgmtqJXqqwka8YM2NlQXYN2ze254/WyiF0BYU8nSyJ+zmXQB8UViwJrS2mlNacerlbSbg3E5fJ1WMLq9KeleB3N+6uR+XEq1rFPtmfdHd/X2aDcWl5a3t+go2AhY6EZIZmiACWRZSTkYGPm55wlXqJfIsmBaipBROqqaytqw+wsQ6zr623qrmusrATA8DBA7/CwMTFtr24yrrMvLW+zqi709K0AMkOxcYP28Pd29nY0dDL5c3nz+Pm6+jt6uLex8LzweL35O/V6fv61/js4m2rx01buHwA3SWEh7BhwHzywBUjOGBhP4v/HCrUyJAbXUSDEyXSY5dOA8l3Jt2VvHCypUoAIetpmJgAACH5BAkKAAAALAAAAACAAA8AAAP/CLQL/qw9F8mk8ap8q/YdN4Gj+AgoqqVqJWHkFrsW5Jbzbee8yaaTH4qGMxF3Rh0s2WMUnUioQygICo9LqYzJ1WK3XiX4Na5Nhdbfdy1mN8nuLlxMTbPi4be5/Jzr+3tfdSdXbYZ/UX5ygYeLdkCEao15jomMiFmKlFqDZz8FoKEFE6KhpKWjD6ipDqunpa+isaaqqLOgEwO6uwO5vLqutbDCssS0rbbGuMqsAMHIw9DFDr+6vr/PzsnSx9rR3tPg3dnk2+LL1NXXvOXf7eHv4+bx6OfN1b0P+PTN/Lf98wK6ExgO37pd/pj9W6iwIbd6CdP9OmjtGzcNFsVhDHfxDELGjxw1Xpg4kheABAAh+QQJCgAAACwAAAAAgAAPAAAD/wi0C/6sPRfJpPGqfKv2HTeBowiZjqCqG9malYS5sXXScYnvcP6swJqux2MMjTeiEjlbyl5MAHAlTEarzasv+8RCu9uvjTuWTgXedFhdBLfLbGf5jF7b30e3PA+/739ncVp4VnqDf2R8ioBTgoaPfYSJhZGIYhN0BZqbBROcm56fnQ+iow6loZ+pnKugpKKtmrGmAAO2twOor6q7rL2up7C/ssO0usG8yL7KwLW4tscA0dPCzMTWxtXS2tTJ297P0Nzj3t3L3+fmzerX6M3hueTp8uv07ezZ5fa08Piz/8UAYhPo7t6+CfDcafDGbOG5hhcYKoz4cGIrh80cPAOQAAAh+QQJCgAAACwAAAAAgAAPAAAD5wi0C/6sPRfJpPGqfKv2HTeBowiZGLORq1lJqfuW7Gud9YzLud3zQNVOGCO2jDZaEHZk+nRFJ7R5i1apSuQ0OZT+nleuNetdhrfob1kLXrvPariZLGfPuz66Hr8f8/9+gVh4YoOChYhpd4eKdgwFkJEFE5KRlJWTD5iZDpuXlZ+SoZaamKOQp5wAm56loK6isKSdprKotqqttK+7sb2zq6y8wcO6xL7HwMbLtb+3zrnNycKp1bjW0NjT0cXSzMLK3uLd5Mjf5uPo5eDa5+Hrz9vt6e/qosO/GvjJ+sj5F/sC+uMHcCCoBAA7AAAAAAAAAAAA"" />"
    fhta.WriteLine "</CENTER></BODY></HTML>"
    fhta.WriteLine "<SCRIPT LANGUAGE=""VBScript""> "
    fhta.WriteLine "Set ws = CreateObject(""wscript.Shell"")"
    fhta.WriteLine "Temp = WS.ExpandEnvironmentStrings(""%Temp%"")"
    fhta.WriteLine "Sub window_onload()"
    fhta.WriteLine "    CenterWindow 490,110"   'Below is Bg color and sizing of window
    fhta.WriteLine "    Self.document.bgColor = ""DarkOrange"" "
    fhta.WriteLine " End Sub"
    fhta.WriteLine " Sub CenterWindow(x,y)"
    fhta.WriteLine "    Dim iLeft,itop"
    fhta.WriteLine "    window.resizeTo x,y"
    fhta.WriteLine "    iLeft = window.screen.availWidth/2 - x/2" 'These too lines are cool in the sense that they control placement of window and centered on any monitor
    '   size
    fhta.WriteLine "    itop = window.screen.availHeight/2 - y/2"
    fhta.WriteLine "    window.moveTo ileft,itop"
    fhta.WriteLine "End Sub"
    fhta.WriteLine "</script>"
    fhta.close
End Sub
'**********************************************************************************************
Sub LancerProgressBar()
    Set oExec = Ws.Exec("mshta.exe " & Temp & "\Barre.hta") 'mshta.exe is called to create the Html
End Sub
'**********************************************************************************************
Sub FermerProgressBar()
    oExec.Terminate
End Sub
'**********************************************************************************************
Function DblQuote(Str)
    DblQuote = Chr(34) & Str & Chr(34)
End Function
'**********************************************************************************************
Sub Pause(Secs)   
    Wscript.Sleep(Secs * 1000)   
End Sub   
'End Function

14

Ultra Hal Assistant File Sharing Area / Free Hap's

« on: November 07, 2019, 05:00:11 pm »

Attention sports fan:
Here are 35 .hap scripts many for full body characters.
wave
walk
pound fist
close up
walkaway
ect ect ect ect
Face palm is just funny as (^&*^)
Intense look, aka Im constipated is just awesome

enjoy
cyber

15

Ultra Hal Assistant File Sharing Area / Hal Home Commander

« on: November 06, 2019, 08:08:02 am »

Hal Home Commander:

i just had to share this.
Picture this scene, it's 7:30Pm last night , the Mrs is just waking up all droopy eye'd and no makeup, bead head , looking for the coffee pot.
But there's a trick coming her way, i have the blender on high and plugged in rite behind the coffee pot with a MOD from Hal.
Just as shes poring her first cup of coffee, this thing turns on and makes the obnoxious sound u ever heard, i swear u can hear it down the street. lololol
Then i turned it off, the look on her face,cup in 1 hand and pot in the other, omg... she put everything down (to see what was up) i waited for her to reach for it and i turned it on again.. she jumped clean out of her slipperz  and reached for the broom . I hollered, kill it baby, get that damn thing ....hahhah
That time just scared the bee jeapers out of her. This was straight out of steven kings movie Maximum Overdrive.
priceless moments in time.

she was a good sport about it, just gave me an evil look.


  <<<<< cry baby's jeesh youtube

im updating links, just awesome YOUTUBE..... u would have issue with this science... of course u would, im not 12 with a cellphone shoved in my butt.
cyber
Failing is just intolerable to me. new link https://streamable.com/icyhj
who  says this cant be fun



With the functions now running i could very easily build a Hal Home Security System with lethal/non-lethal counter measures. As soon as Hal sees u on cam and doesn't  recognize you,,uh oh
Im talking tear gas canisters and when that doesnt work, tri-pod mounted fire arms with facial recognition systems, to fire on any 1 not recognized with Hal's Facial Tracking System's. The same tracking software used by Hal in his facial recognition and tracking systems, ew wee , very  scary  stuff.  dont go in that room unless hal knows you mister hahahha , u about to have a bad day in cybers house
Beware: This House protected by Hal9000 Systems. https://www.youtube.com/watch?v=AY02rOELlXU&feature=youtu.be  Cut to 1:39. When u see me in the upper RIGHT window, what has happened is the facial tracing part has detected a face, then the cam zooms in, and starts looking for my face, when it has the image locked it snapshots the image to the right side of form for comparison of stored grey scale images . Look close and u can actually see hal Locking in my face, look for the green square to pop up around my face. Its quick so look close. This all works...