From 60b6ce686dfd812c6f808a01463473610787e15c Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Sat, 5 Nov 2022 05:36:43 +0700 Subject: neofetch ported to shiftfetch --- ShiftOS-TheRevival/MainForms/TerminalApps.vb | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) (limited to 'ShiftOS-TheRevival/MainForms/TerminalApps.vb') diff --git a/ShiftOS-TheRevival/MainForms/TerminalApps.vb b/ShiftOS-TheRevival/MainForms/TerminalApps.vb index 8d1dd25..b493118 100644 --- a/ShiftOS-TheRevival/MainForms/TerminalApps.vb +++ b/ShiftOS-TheRevival/MainForms/TerminalApps.vb @@ -21,6 +21,12 @@ Terminal.CurrentInterpreter = "guess" GTN_GenerateNumber() ShouldChange = True + Case "shiftoriumfx" + Terminal.DefaultPrompt = "Navigate> " + Terminal.CurrentInterpreter = "shiftoriumfx" + ShiftoriumFX_DisplayPackages() + Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & Environment.NewLine & "Type any package you want to investigate" + ShouldChange = True End Select If ShouldChange = True Then Terminal.ChangeInterpreter = True @@ -48,6 +54,16 @@ Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & "Invalid value!" End Try End Select + Case "shiftoriumfx" + Select Case Terminal.command + Case "" + + Case "exit" + TerminateApp() + Case Else + ShiftoriumFX_DisplayPackages() + Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & Environment.NewLine & "Type any package you want to investigate" & Environment.NewLine & "Invalid package or bad command" + End Select End Select End Sub @@ -74,4 +90,9 @@ End If End If End Sub + + Public Sub ShiftoriumFX_DisplayPackages() + Terminal.TextBox1.Text = "Shiftorium FX!" & Environment.NewLine & "The place to shiftisize the ShiftOS" & Environment.NewLine & Environment.NewLine & "Available Package(s)" + Shiftorium_ListFeatures() + End Sub End Module -- cgit v1.2.3