diff options
| author | EverythingWindows <[email protected]> | 2022-11-05 23:48:35 +0700 |
|---|---|---|
| committer | EverythingWindows <[email protected]> | 2022-11-05 23:48:35 +0700 |
| commit | a0e7f1ba37f891bec48fcc20ec0b629dc52abc90 (patch) | |
| tree | 7fc265c56cd894bbd2e05a3dc431a89a6ccca058 /ShiftOS-TheRevival/MainForms/Shiftoriums.vb | |
| parent | ed6f6ee29d5d29a6e06cb15fadb4c0e3520c6e40 (diff) | |
| download | shiftos-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/Shiftoriums.vb')
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/Shiftoriums.vb | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/MainForms/Shiftoriums.vb b/ShiftOS-TheRevival/MainForms/Shiftoriums.vb index ced477d..e5713b9 100644 --- a/ShiftOS-TheRevival/MainForms/Shiftoriums.vb +++ b/ShiftOS-TheRevival/MainForms/Shiftoriums.vb @@ -37,6 +37,9 @@ If Strings.AvailableFeature(9) = "0" Then Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & "(bc | 10 CP) Basic Calculator" End If + If Strings.AvailableFeature(10) = "0" Then + Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & "(2bitcolor | 100 CP) 2-bit Color Support" + End If End If End Sub @@ -116,6 +119,13 @@ Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & ManHeader(0) & Environment.NewLine & Environment.NewLine & "Basic Calculator for simple calculation" & Environment.NewLine & Environment.NewLine & ManHeader(1) Terminal.BadCommand = False End If + Case "2bitcolor" + If Strings.AvailableFeature(10) = "0" Then + ManHeader(0) = "2-bit Color Support" + ManHeader(1) = "100 CP" + Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & ManHeader(0) & Environment.NewLine & Environment.NewLine & "Adds 2 colours (Dark Gray, Light Gray) supports to the terminal" & Environment.NewLine & Environment.NewLine & ManHeader(1) + Terminal.BadCommand = False + End If Case Else Terminal.BadCommand = False Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & "Shiftorium: Bad command or not available" @@ -155,6 +165,9 @@ Case "bc" Shiftorium_InstallFeatures(True, "bc", 9, 75) Terminal.BadCommand = False + Case "2bitcolor" + Shiftorium_InstallFeatures(True, "2bitcolor", 10, 100) + Terminal.BadCommand = False Case Else Terminal.BadCommand = False Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & "Shiftorium: Bad command or not available" @@ -185,6 +198,7 @@ Strings.AvailableFeature(3) = "1" Strings.AvailableFeature(4) = "0" Strings.AvailableFeature(8) = "0" + Strings.AvailableFeature(10) = "0" success = True Case "infobar" Strings.AvailableFeature(4) = "1" |