so far functional file skimmer

3 files changed, 69 insertions, 9 deletions

diff --git a/ShiftOS-TheRevival/Functions/InGame/ROMs/Strings.vb b/ShiftOS-TheRevival/Functions/InGame/ROMs/Strings.vb
index 9ea241f..685b484 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(42) As String
+    Public Shared AvailableFeature(52) As String
     Public Shared CLIInterpreter As String
     Public Shared SaveFile As String
     Public Shared Achievement As String
@@ -97,6 +97,16 @@
     '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)
+    '43 = DuWM Advanced Read and Write [Expands read and write support for DuWM] (default : 0)
+    '44 = File Skimmer [A file manager for ShiftOS] (default : 0)
+    '45 = File Skimmer Folder Support [Supports for reading and writing folder in File Skimmer] (default : 0)
+    '46 = File Skimmer File Support [Supports for reading and writing file in File Skimmer] (default : 0)
+    '47 = File Skimmer Delete Support [Adds file deletion function into ShiftOS] (default : 0)
+    '48 = File Skimmer ZIP Support [Adds ZIP compression function into ShiftOS] (default : 0)
+    '49 = File Skimmer Properties Pane [Adds a sidebar contains file/directory informations] (default : 0)
+    '50 = File Skimmer JobBar [Adds a top bar for actions on File Skimmer] (default : 0)
+    '51 = File Skimmer Small Icons [Adds small icons layout on File Skimmer] (default : 0)
+    '52 = File Skimmer List [Adds small icons layout on File Skimmer] (default : 0)
     '
     'Features bought hierarchy :
     '
@@ -147,11 +157,14 @@
     '>>>KI Animals (KI_ANIMALS) (300 CP)
     '>>>KI Fruits (KI_FRUITS) (300 CP)
     '>>>KI US States (KI_US) (300 CP)
-    '>>DuWM Read and Write support (250 CP)
-    '>>>File Skimmer (300 CP)
-    '>>>>FS Properties Pane (325 CP)
-    '>>>>FS Small Images Layout (350 CP)
-    '>>>>FS List Layout (350 CP)
-    '>>>>FS Delete (350 CP)
-    '>>>>FS ZIP support (400 CP)
+    '>>DuWM Advanced Read and Write support (DUWM_RW) (250 CP)
+    '>>>File Skimmer (FILESKIMMER) (300 CP)
+    '>>>>FS Folder Support (FS_FOLDER) (325 CP)
+    '>>>>>FS File Support (FS_FILE) (350 CP)
+    '>>>>>>FS Delete Support (FS_DELETE) (400 CP)
+    '>>>>>>FS ZIP Support (FS_ZIP) (500 CP)
+    '>>>>FS Properties Pane (FS_PPANE) (350 CP)
+    '>>>>FS JobBar (FS_JOBBAR) (400 CP)
+    '>>>>>FS Small Icons Layout (FS_SMALLICONS) (425 CP)
+    '>>>>>FS List Layout (FS_LIST) (425 CP)
 End Class
diff --git a/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb b/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb
index d13c40c..f8bb31f 100644
--- a/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb
@@ -150,7 +150,7 @@
                     End If
                 End If
             End If
-                If Strings.AvailableFeature(37) = 0 Then
+            If Strings.AvailableFeature(37) = 0 Then
                 NewLine("(knowledge | 275 CP) Knowledge Input")
             Else
                 If Strings.AvailableFeature(38) = 0 Then
@@ -163,6 +163,12 @@
                     NewLine("(ki_us | 300 CP) KI US States")
                 End If
             End If
+            If Strings.AvailableFeature(43) = 0 Then
+                NewLine("(duwm_rw | 250 CP) DuWM Advanced Read and Write support")
+            Else
+                If Strings.AvailableFeature(44) = 0 Then
+                    NewLine("(fileskimmer | 300 CP) File Skimmer")
+                End If
             End If
     End Sub
 
@@ -553,6 +559,17 @@
                     NewLine(ManHeader(1))
                     NormalCommand()
                 End If
+            Case "duwm_rw"
+                If Strings.AvailableFeature(43) = 0 Then
+                    ManHeader(0) = "DuWM Advanced Read and Write support"
+                    ManHeader(1) = "250 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"
diff --git a/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb b/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb
index 97721fe..550d01d 100644
--- a/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb
+++ b/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb
@@ -113,6 +113,16 @@ Module SaveLoadSystem
                 Strings.AvailableFeature(41) = "2"
                 '0.2.8 Features
                 Strings.AvailableFeature(42) = "2"
+                Strings.AvailableFeature(43) = "2"
+                Strings.AvailableFeature(44) = "2"
+                Strings.AvailableFeature(45) = "2"
+                Strings.AvailableFeature(46) = "2"
+                Strings.AvailableFeature(47) = "2"
+                Strings.AvailableFeature(48) = "2"
+                Strings.AvailableFeature(49) = "2"
+                Strings.AvailableFeature(50) = "2"
+                Strings.AvailableFeature(51) = "2"
+                Strings.AvailableFeature(52) = "2"
         End Select
     End Sub
 
@@ -171,6 +181,16 @@ Module SaveLoadSystem
         Strings.AvailableFeature(41) = "1"
         '0.2.8 Features
         Strings.AvailableFeature(42) = "1"
+        Strings.AvailableFeature(43) = "1"
+        Strings.AvailableFeature(44) = "1"
+        Strings.AvailableFeature(45) = "1"
+        Strings.AvailableFeature(46) = "1"
+        Strings.AvailableFeature(47) = "1"
+        Strings.AvailableFeature(48) = "1"
+        Strings.AvailableFeature(49) = "1"
+        Strings.AvailableFeature(50) = "1"
+        Strings.AvailableFeature(51) = "1"
+        Strings.AvailableFeature(52) = "1"
     End Sub
 
     Public Sub GodMode()
@@ -226,6 +246,16 @@ Module SaveLoadSystem
         Strings.AvailableFeature(41) = "2"
         '0.2.8 Features
         Strings.AvailableFeature(42) = "2"
+        Strings.AvailableFeature(43) = "2"
+        Strings.AvailableFeature(44) = "2"
+        Strings.AvailableFeature(45) = "2"
+        Strings.AvailableFeature(46) = "2"
+        Strings.AvailableFeature(47) = "2"
+        Strings.AvailableFeature(48) = "2"
+        Strings.AvailableFeature(49) = "2"
+        Strings.AvailableFeature(50) = "2"
+        Strings.AvailableFeature(51) = "2"
+        Strings.AvailableFeature(52) = "2"
     End Sub
 
     Public Sub SaveGame()