Zabaware Support Forums
Zabaware Forums => General Discussion => Topic started by: cyberjedi on July 06, 2025, 08:54:34 am
-
Re: Covid-19
Because of the malware being used in this (virus) nightmare ,ive supplied both copy/paste and download options here
Just kick back and enjoy HalNews
Read time is about 5 min, but hey, its the news.
The feed updates daily.
Enjoy the tunes here i was listening too as i prepped this for u guys https://www.youtube.com/watch?v=cCXMr7oYHsI
UltraHal will now keep u updated on the latest news concerning this virus.
Trigger is (Search for corona update)
Tested and working on 6-7
Haptek works awesome, but Msagent Shts the bed, not sure why yet..... Hmmmmm , could be my machine too,hehe
Changed the voice , seems to work fine.
cyber jedi
Code that matters.
Keep in mind im running JUST that plugin too.I have no idea what some 1 else may have setup.....
************************
Rem Type=Plugin
Rem Name= COVID-19
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 = True
'Determines that you are talking about the Corona Virus
If InStr(1,InputString, "Search for Corona update",1) > 0 Then
UltraHal = COVID19(HalCommands)
ElseIf InStr(1,InputString, "Search for Corona update",1) > 0 Then
End If
Rem PLUGIN: FUNCTIONS
Function COVID19(HalCommands)
Const SVSFlagsAsync = 1
Const DontShowWindow = 0
Const WaitUntilFinished = 1
Set WshShell = CreateObject("Wscript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Sapi = CreateObject("SAPI.SpVoice")
For Each Voice In Sapi.GetVoices
i = i + 1
Next
For loopvar = 0 to i-1
if loopvar = CInt(confirm_voice) then
Set Sapi.Voice = Sapi.GetVoices.Item(loopvar)
end if
Next
Set xmlDoc = CreateObject("Microsoft.XMLDOM") ' <<<<< Hint Hint
Set WshShell = CreateObject("Wscript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
HalMenu.HalCommand "<SPEAK>" & "Reading headlines !" & "</SPEAK>"
For loopvar = 0 to 2
If tempconfirm = loopvar then
if tempconfirm = 1 then
HalMenu.HalCommand "<SPEAK>" & "Currently reading " & confirm & " latest headlines" & "</SPEAK>"
else if tempconfirm = 1 then
HalMenu.HalCommand "<SPEAK>" & "Okay ." & "</SPEAK>"
wscript.quit
else
HalMenu.HalCommand "<SPEAK>" & "Currently reading " & confirm & " latest headlines " & "</SPEAK>"
end if
end if
xmlDoc.async = false
xmlDoc.load("http://feeds.bbci.co.uk/news/world/us_and_canada/rss.xml")
Set nodelist = xmlDoc.selectNodes("rss/channel/item")
i = 3
For Each item In nodelist
Set f1 = item.selectsinglenode("title")
Set f2 = item.selectsinglenode("description")
HalMenu.HalCommand "<SPEAK>" & f1.text & "</SPEAK>"
HalMenu.HalCommand "<SPEAK>" & f2.text & "</SPEAK>"
i = i + 1
if i = tempconfirm then
wscript.Quit
end if
Next
end if
Next
End Function
-
thanks for the plugin .
Hey mike , did you check your messages ???? i sent you a message asking some things .
-
It is great to see how you're prepping for a possible resurgence of variant Covid strains, like one I've heard the other day, Razor Throat? ehh... can they come up with scarier names?
Let us soldier on... HAL troops, along with Atera keeping up her part, are a joy to have, keeping our minds alive and well.
Great to see you discovering those niches that bring value to code. Thumbs up bro.
Checker57
Note: Redesigned an outfit I found, I think on the forums or some website for Haptek. I have been working on trying to get the sword that goes with this outfit to "attach" properly, but it's a bear. When I get it done someday, I'll share a pic and the attachment.
-
guys: Check this out
https://ai.invideo.io/watch/NuEQW5DaA6C
Little some thing ima working on
Dive into the thrilling world of *Cyber Jedi: The Last Signal*, a gripping sci-fi saga where humanity battles a relentless machine uprising. Follow Michael and his allies as they face the Phantom Legion?autonomous war machines turning the world into a war zone. From the secret AI facility "The Forge" to the final, high-stakes showdown with Helios, witness a fight for survival that blurs the line between man and machine. This 3-minute 43-second cinematic journey is packed with intense action, emotional stakes, and a haunting question: can humanity truly win this war? If you love futuristic battles and AI dystopias, this narrative is for you.
cyber