diff options
Diffstat (limited to 'ShiftOS/Terminal.vb')
| -rw-r--r-- | ShiftOS/Terminal.vb | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/ShiftOS/Terminal.vb b/ShiftOS/Terminal.vb index 2285bc3..509fc73 100644 --- a/ShiftOS/Terminal.vb +++ b/ShiftOS/Terminal.vb @@ -584,6 +584,7 @@ Public Class Terminal If command Like "speak_infobox ""*"" ""*""" Then Dim findwords() As String = command.Split("""") Helper.speakInfoBox(findwords(1), findwords(3)) + further = False End If If command Like "speak ""*""" Then Dim findwords() As String = command.Split("""") @@ -955,6 +956,17 @@ Public Class Terminal If further = True Then Select Case command + Case "adv app launcher on" + ShiftOSDesktop.boughtadvapplauncher = True + ShiftOSDesktop.savegame() + ShiftOSDesktop.setupdesktop() + WriteLine("Advanced App Launcher has been turned on successfully. Use ""adv app launcher off"" to turn it off again.") + Case "adv app launcher off" + ShiftOSDesktop.boughtadvapplauncher = False + ShiftOSDesktop.savegame() + ShiftOSDesktop.setupdesktop() + WriteLine("Advanced App Launcher has been turned off. Use ""adv app launcher on"" to turn it on again.") + Case "clear" txtterm.Text = "" Case "time" @@ -1778,4 +1790,8 @@ Public Class Terminal shiftnetstorylinetiming = shiftnetstorylinetiming + 1 End If End Sub + + Public Sub WriteLine(text As String) + txtterm.Text = txtterm.Text + vbNewLine + text + End Sub End Class
\ No newline at end of file |