From 2a3e5ec4d537770bb3d310bfb9bda12c0615aedd Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Sun, 6 Nov 2022 16:22:35 +0700 Subject: directory majority finished --- ShiftOS-TheRevival/MainForms/Terminal.vb | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) (limited to 'ShiftOS-TheRevival/MainForms/Terminal.vb') diff --git a/ShiftOS-TheRevival/MainForms/Terminal.vb b/ShiftOS-TheRevival/MainForms/Terminal.vb index 37e83df..8370f9a 100644 --- a/ShiftOS-TheRevival/MainForms/Terminal.vb +++ b/ShiftOS-TheRevival/MainForms/Terminal.vb @@ -22,7 +22,7 @@ Public Class Terminal End Sub Public Sub InitializeTerminal() - Strings.OnceInfo(1) = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\ShiftFS\" + Strings.OnceInfo(1) = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\ShiftFS" Strings.OnceInfo(4) = "!" If Strings.IsFree = True Then Strings.ComputerInfo(0) = "shiftos" @@ -214,6 +214,8 @@ Public Class Terminal TextBox1.Text = TextBox1.Text & Environment.NewLine AdvancedCommand = False BadCommand = False + Case "textpad" + Case "reboot" TextBox1.Text = Nothing AdvancedCommand = False @@ -300,6 +302,11 @@ Public Class Terminal End Select If AdvancedCommand = True Then + If command Like "cd *" Then + NavigateDir(command.Replace("cd ", "")) + AdvancedCommand = False + BadCommand = False + End If If command Like "color *" Then GetColor("terminal", command.Substring(6, 1), command.Substring(7, 1)) BadCommand = False @@ -408,6 +415,16 @@ Public Class Terminal End Select End If End If + If command Like "mkdir *" Then + CreateDir(command.Replace("mkdir ", "")) + AdvancedCommand = False + BadCommand = False + End If + If command Like "rmdir *" Then + RemoveDir(command.Replace("rmdir ", "")) + AdvancedCommand = False + BadCommand = False + End If If command Like "shiftorium *" Then Dim prompt As String = command.Replace("shiftorium ", "") TextBox1.Text = TextBox1.Text & Environment.NewLine & "Shiftorium ShiftOS Center" -- cgit v1.2.3