diff options
Diffstat (limited to 'ShiftOS/Helper.vb')
| -rw-r--r-- | ShiftOS/Helper.vb | 76 |
1 files changed, 0 insertions, 76 deletions
diff --git a/ShiftOS/Helper.vb b/ShiftOS/Helper.vb deleted file mode 100644 index f6b04ba..0000000 --- a/ShiftOS/Helper.vb +++ /dev/null @@ -1,76 +0,0 @@ -Imports System.Speech.Synthesis -Imports System.Speech.Recognition - - -Module Helper - Dim path As String = ShiftOSDesktop.ShiftOSPath - Public Sub addCP(points As Integer) 'Add some CP - ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + points - End Sub - Public Sub setCP(points As Integer) 'Set the CP - ShiftOSDesktop.codepoints = points - End Sub - - Public Sub removeCP(points As Integer) - ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints - points - End Sub - Public Sub playSound(path As String, playMode As AudioPlayMode) - My.Computer.Audio.Play(path, playMode) - End Sub - - Public Sub speak(text As String) - text = text.Replace("#user#", ShiftOSDesktop.username) - Dim speaker As New Speech.Synthesis.SpeechSynthesizer - speaker.Speak(text) - End Sub - Public Sub SpeakOnTerminal(text As String) - Dim txt As TextBox = Terminal.txtterm - text = text.Replace("#USER#", ShiftOSDesktop.username) - If Terminal.Visible = False Then - Terminal.Show() - txt.Text = "" - Terminal.fullterminal() - End If - txt.Text = txt.Text + vbNewLine + text - Dim speaker As New SpeechSynthesizer - speaker.Speak(text) - End Sub - - 'Misc. Features that aren't practical, but fun to mess around with in the game engine - Public Sub speakInfoBox(title As String, text As String) - infobox.showinfo(title, text) - Dim speaker As New SpeechSynthesizer - speaker.Speak(title & "..." & text) - infobox.Close() - End Sub -#Region "Catalyst's Story Dialogue" - 'CATALYST STORY - Public catalyststory() As String = { - "Hello, #USER#. My name is Catalyst.", "I am an AI built by DevX to help maintain ShiftOS.", "I have gone against DevX and will tell you some secrets I have learned from him.", - "DevX is an artificial inteligence created by a scientific organization named 'Earth' to see if computers could program themselves.", - "Everyone you've met on the Shiftnet is an AI created by the same company.", - "ShiftOS is not an experimental operating system, but is part of this experiment.", -"Now, onto the good bit. Everything around you is a part of this experiment, and this experiment takes place in a simulation so realistic that everyone believes it's real.", -"Everyone on this 'planet' is infact an AI, and is created by 'Earth'. You are the only real human.", -"I've cracked some ShiftOS code, and I've found that there's a line that says:", -"int aiworkers = 0; while(aiworkers < 8,000,000,000) { str workername = 'Dev' + aiworkers; spawn(workername); aiworkers += 1 }", -"This basically means, that everyone is represented by a codename of Dev and whatever their place in the order of spawning is.", -"This also means that when the total population of AI's equals 8 billion, everyone dies.", -"I can help you escape, but you'll need to do some tasks for me.", -"First, I'll need to install some programs onto your computer. I'll quickly run a secret command that DevX doesn't know about:", -"shiftnet.get 'shiftnet.catalyststorage.shiftscript_packages/CatalystFramework'", -"Downloading... 1%", -"Downloading... 14%", -"Downloading... 37%", -"Downloading... 55%", -"Downloading... 79%", -"Downloading... 92%", -"Download Complete.", -"This app will let you contact me without using the Terminal. ", -"I'll return you to your desktop, it'll be a bit before I can help you. First, I'd start with gaining atleast 5000 codepoints for me to test some stuff.""" - } 'Sorry about the big array, I'll add a #Region to it - The Ultimate Hacker. - -#End Region - - -End Module |
