nice try on file skimmer lol

3 files changed, 70 insertions, 2 deletions

diff --git a/ShiftOS-TheRevival/Functions/InGame/ROMs/Strings.vb b/ShiftOS-TheRevival/Functions/InGame/ROMs/Strings.vb
index 9ebbd3e..e9c28a1 100644
--- a/ShiftOS-TheRevival/Functions/InGame/ROMs/Strings.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/ROMs/Strings.vb
@@ -3,7 +3,7 @@
     Public Shared ComputerInfo(7) As String
     Public Shared IsFree As Boolean
     Public Shared OnceInfo(8) As String
-    Public Shared AvailableFeature(41) As String
+    Public Shared AvailableFeature(42) As String
     Public Shared CLIInterpreter As String
     Public Shared SaveFile As String
     Public Shared Achievement As String
@@ -96,6 +96,7 @@
     '39 = KI Fruits [Adds fruit category into the Knowledge Input] (default : 0)
     '40 = DuWM RGB Support [Adds RGB and its other variant support to DuWM] (default : 0)
     '41 = DuWM 16 Colors Support [Adds mix of RGB color support into ShiftOS] (default : 0)
+    '42 = KI US States [Adds United States States category into the Knowledge Input] (default : 0)
     '
     'Features bought hierarchy :
     '
@@ -145,4 +146,5 @@
     '>>Knowledge Input (KNOWLEDGE) (275 CP)
     '>>>KI Animals (KI_ANIMALS) (300 CP)
     '>>>KI Fruits (KI_FRUITS) (300 CP)
+    '>>>KI US States (KI_US) (300 CP)
 End Class
diff --git a/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb b/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb
index 098e782..d13c40c 100644
--- a/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb
@@ -159,8 +159,11 @@
                 If Strings.AvailableFeature(39) = 0 Then
                     NewLine("(ki_fruits | 300 CP) KI Fruits")
                 End If
+                If Strings.AvailableFeature(42) = 0 Then
+                    NewLine("(ki_us | 300 CP) KI US States")
+                End If
+            End If
             End If
-        End If
     End Sub
 
     Public Sub Shiftorium_InformationFeatures()
@@ -495,6 +498,61 @@
                     NewLine(ManHeader(1))
                     NormalCommand()
                 End If
+            Case "ki_animals"
+                If Strings.AvailableFeature(38) = 0 Then
+                    ManHeader(0) = "KI Animals"
+                    ManHeader(1) = "300 CP"
+                    NewLine(ManHeader(0))
+                    NewLine(Nothing)
+                    NewLine("Adds animals category into Knowledge Input")
+                    NewLine(Nothing)
+                    NewLine(ManHeader(1))
+                    NormalCommand()
+                End If
+            Case "ki_fruits"
+                If Strings.AvailableFeature(39) = 0 Then
+                    ManHeader(0) = "KI Fruits"
+                    ManHeader(1) = "300 CP"
+                    NewLine(ManHeader(0))
+                    NewLine(Nothing)
+                    NewLine("Adds fruits category into Knowledge Input")
+                    NewLine(Nothing)
+                    NewLine(ManHeader(1))
+                    NormalCommand()
+                End If
+            Case "duwmrgb"
+                If Strings.AvailableFeature(40) = 0 Then
+                    ManHeader(0) = "DuWM RGB support"
+                    ManHeader(1) = "225 CP"
+                    NewLine(ManHeader(0))
+                    NewLine(Nothing)
+                    NewLine("Adds Red, Green, and Blue and its darker/lighter color support for Dual Window Manager")
+                    NewLine(Nothing)
+                    NewLine(ManHeader(1))
+                    NormalCommand()
+                End If
+            Case "duwmrgb2"
+                If Strings.AvailableFeature(41) = 0 Then
+                    ManHeader(0) = "DuWM 16 Colors support"
+                    ManHeader(1) = "275 CP"
+                    NewLine(ManHeader(0))
+                    NewLine(Nothing)
+                    NewLine("Adds 16 colors support for Dual Window Manager")
+                    NewLine(Nothing)
+                    NewLine(ManHeader(1))
+                    NormalCommand()
+                End If
+            Case "ki_us"
+                If Strings.AvailableFeature(42) = 0 Then
+                    ManHeader(0) = "KI US States"
+                    ManHeader(1) = "300 CP"
+                    NewLine(ManHeader(0))
+                    NewLine(Nothing)
+                    NewLine("Adds US States category into Knowledge Input")
+                    NewLine(Nothing)
+                    NewLine(ManHeader(1))
+                    NormalCommand()
+                End If
             Case Else
                 NormalCommand()
                 Console.TextBox1.Text = Console.TextBox1.Text & Environment.NewLine & "Shiftorium: Bad command or not available"
@@ -631,6 +689,9 @@
             Case "duwmrgb2"
                 Shiftorium_InstallFeatures(True, "duwmrgb2", 41, 275)
                 NormalCommand()
+            Case "ki_us"
+                Shiftorium_InstallFeatures(True, "ki_us", 42, 300)
+                NormalCommand()
             Case Else
                 NormalCommand()
                 NewLine("Shiftorium: Bad command or not available")
@@ -811,6 +872,7 @@
                             Strings.AvailableFeature(37) = "1"
                             Strings.AvailableFeature(38) = "0"
                             Strings.AvailableFeature(39) = "0"
+                            Strings.AvailableFeature(42) = "0"
                             success = True
                         Case "ki_animals"
                             Strings.AvailableFeature(38) = "1"
@@ -825,6 +887,9 @@
                             Strings.AvailableFeature(40) = "3"
                             Strings.AvailableFeature(41) = "1"
                             success = True
+                        Case "ki_us"
+                            Strings.AvailableFeature(42) = "1"
+                            success = True
                     End Select
                     If success = False Then
                         If IsCLI = True Then
diff --git a/ShiftOS-TheRevival/Functions/InGame/SystemManager/Terminate.vb b/ShiftOS-TheRevival/Functions/InGame/SystemManager/Terminate.vb
index 25dabb2..263c5ff 100644
--- a/ShiftOS-TheRevival/Functions/InGame/SystemManager/Terminate.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/SystemManager/Terminate.vb
@@ -12,6 +12,7 @@
         Cursor.Show()
         NewLine("Shutting down...")
         ShiftOSMenu.Show()
+        Cursor.Show()
         If IsStartG = False Then
             Console.Close()
         End If