From a0e7f1ba37f891bec48fcc20ec0b629dc52abc90 Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Sat, 5 Nov 2022 23:48:35 +0700 Subject: Menu system, bc fixings, and references to directory navigation added --- ShiftOS-TheRevival/MainForms/Terminal.vb | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'ShiftOS-TheRevival/MainForms/Terminal.vb') diff --git a/ShiftOS-TheRevival/MainForms/Terminal.vb b/ShiftOS-TheRevival/MainForms/Terminal.vb index 007fdad..6f283f1 100644 --- a/ShiftOS-TheRevival/MainForms/Terminal.vb +++ b/ShiftOS-TheRevival/MainForms/Terminal.vb @@ -10,6 +10,7 @@ Public Class Terminal Public StoryToTell As String Public ChangeInterpreter As Boolean = False Public CurrentInterpreter As String = "terminal" + Public CurrentDirectory As String Private Sub Terminal_Load(sender As Object, e As EventArgs) Handles MyBase.Load FormBorderStyle = FormBorderStyle.None @@ -19,6 +20,7 @@ Public Class Terminal End Sub Public Sub InitializeTerminal() + Strings.OnceInfo(1) = My.Computer.FileSystem.SpecialDirectories.Temp & "\ShiftOS\ShiftFS\" If Strings.IsFree = True Then Strings.ComputerInfo(0) = "shiftos" Strings.ComputerInfo(1) = "user" @@ -143,6 +145,9 @@ Public Class Terminal Else TextBox1.Text = TextBox1.Text & Environment.NewLine End If + If Strings.AvailableFeature(9) = 1 Then + TextBox1.Text = TextBox1.Text & Environment.NewLine & "BC Basic Calculator for simple calculation" + End If If Strings.AvailableFeature(1) = 1 Then TextBox1.Text = TextBox1.Text & Environment.NewLine & "CLEAR Clear the terminal" End If -- cgit v1.2.3