aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS-TheRevival/MainForms/Terminal.vb
diff options
context:
space:
mode:
authorEverythingWindows <[email protected]>2022-11-05 23:48:35 +0700
committerEverythingWindows <[email protected]>2022-11-05 23:48:35 +0700
commita0e7f1ba37f891bec48fcc20ec0b629dc52abc90 (patch)
tree7fc265c56cd894bbd2e05a3dc431a89a6ccca058 /ShiftOS-TheRevival/MainForms/Terminal.vb
parented6f6ee29d5d29a6e06cb15fadb4c0e3520c6e40 (diff)
downloadshiftos-therevival-old-a0e7f1ba37f891bec48fcc20ec0b629dc52abc90.tar.gz
shiftos-therevival-old-a0e7f1ba37f891bec48fcc20ec0b629dc52abc90.tar.bz2
shiftos-therevival-old-a0e7f1ba37f891bec48fcc20ec0b629dc52abc90.zip
Menu system, bc fixings, and references to directory navigation added
Diffstat (limited to 'ShiftOS-TheRevival/MainForms/Terminal.vb')
-rw-r--r--ShiftOS-TheRevival/MainForms/Terminal.vb5
1 files changed, 5 insertions, 0 deletions
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