diff options
Diffstat (limited to 'ShiftOS-TheRevival/Functions/InGame/StoreManager')
| -rw-r--r-- | ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb b/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb index 5dd7222..9a8d6af 100644 --- a/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb +++ b/ShiftOS-TheRevival/Functions/InGame/StoreManager/Shiftoriums.vb @@ -6,6 +6,7 @@ 'Only AvailableFeature that are in the value of 0 can be displayed in the list NewLine("Shiftorium Available Feature(s)") NewLine(Nothing) + 'This is for Chapter 1 features of ShiftOS If Strings.AvailableFeature(11) = 0 Then NewLine("(key | 5 CP) ShiftOS Key") Else @@ -134,6 +135,10 @@ End If End If End If + 'This is for Chapter 2 packages for ShiftOS + If Strings.AvailableFeature(35) = 0 Then + NewLine("(duwm | 200 CP) Dual Window Manager") + End If End Sub Public Sub Shiftorium_InformationFeatures() @@ -435,6 +440,17 @@ NewLine(ManHeader(1)) NormalCommand() End If + Case "duwm" + If Strings.AvailableFeature(35) = 0 Then + ManHeader(0) = "Dual Window Manager" + ManHeader(1) = "200 CP" + NewLine(ManHeader(0)) + NewLine(Nothing) + NewLine("Simple tiling window manager for ShiftOS") + 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" @@ -549,6 +565,10 @@ Case "mathquiz" Shiftorium_InstallFeatures(True, "mathquiz", 34, 60) NormalCommand() + 'Chapter 2 packages + Case "duwm" + Shiftorium_InstallFeatures(True, "duwm", 35, 200) + NormalCommand() Case Else NormalCommand() NewLine("Shiftorium: Bad command or not available") @@ -712,6 +732,10 @@ Case "mathquiz" Strings.AvailableFeature(34) = "1" success = True + 'Chapter 2 packages + Case "duwm" + Strings.AvailableFeature(35) = "1" + success = True End Select If success = False Then If IsCLI = True Then |