aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ShiftOS-TheRevival/API/ConsoleAPI.vb (renamed from ShiftOS-TheRevival/MainForms/ConsoleAPI.vb)0
-rw-r--r--ShiftOS-TheRevival/API/TerminalAPI.vb (renamed from ShiftOS-TheRevival/MainForms/TerminalAPI.vb)0
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/DirectoryManagements.vb (renamed from ShiftOS-TheRevival/MainForms/DirectoryManagements.vb)0
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/FileManagement.vb (renamed from ShiftOS-TheRevival/MainForms/FileManagement.vb)0
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/Shiftoriums.vb (renamed from ShiftOS-TheRevival/MainForms/Shiftoriums.vb)26
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/Strings.vb (renamed from ShiftOS-TheRevival/MainForms/Strings.vb)4
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/TerminalColorSystem.vb (renamed from ShiftOS-TheRevival/MainForms/TerminalColorSystem.vb)0
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/TerminalExternalApps.vb (renamed from ShiftOS-TheRevival/MainForms/TerminalExternalApps.vb)0
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/TerminalInternalApps.vb (renamed from ShiftOS-TheRevival/MainForms/TerminalInternalApps.vb)0
-rw-r--r--ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb (renamed from ShiftOS-TheRevival/MainForms/TheUpdater.vb)0
-rw-r--r--ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb9
-rw-r--r--ShiftOS-TheRevival/ShiftOS-TheRevival.vbproj20
12 files changed, 48 insertions, 11 deletions
diff --git a/ShiftOS-TheRevival/MainForms/ConsoleAPI.vb b/ShiftOS-TheRevival/API/ConsoleAPI.vb
index 7021e2e..7021e2e 100644
--- a/ShiftOS-TheRevival/MainForms/ConsoleAPI.vb
+++ b/ShiftOS-TheRevival/API/ConsoleAPI.vb
diff --git a/ShiftOS-TheRevival/MainForms/TerminalAPI.vb b/ShiftOS-TheRevival/API/TerminalAPI.vb
index 715e075..715e075 100644
--- a/ShiftOS-TheRevival/MainForms/TerminalAPI.vb
+++ b/ShiftOS-TheRevival/API/TerminalAPI.vb
diff --git a/ShiftOS-TheRevival/MainForms/DirectoryManagements.vb b/ShiftOS-TheRevival/Functions/InGame/DirectoryManagements.vb
index 7647e1e..7647e1e 100644
--- a/ShiftOS-TheRevival/MainForms/DirectoryManagements.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/DirectoryManagements.vb
diff --git a/ShiftOS-TheRevival/MainForms/FileManagement.vb b/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb
index b84a2a0..b84a2a0 100644
--- a/ShiftOS-TheRevival/MainForms/FileManagement.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb
diff --git a/ShiftOS-TheRevival/MainForms/Shiftoriums.vb b/ShiftOS-TheRevival/Functions/InGame/Shiftoriums.vb
index d9317e0..89a1e77 100644
--- a/ShiftOS-TheRevival/MainForms/Shiftoriums.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/Shiftoriums.vb
@@ -2,6 +2,8 @@
Public prompt As String
Public Sub Shiftorium_ListFeatures()
+ 'Shows available installable feature on Shiftorium
+ 'Only AvailableFeature that are in the value of 0 can be displayed in the list
NewLine("Shiftorium Available Feature(s)")
NewLine(Nothing)
If Strings.AvailableFeature(11) = "0" Then
@@ -53,6 +55,9 @@
If Strings.AvailableFeature(30) = "0" Then
NewLine("(batchscript | 100 CP) ShiftOS Batch Script Support")
End If
+ If Strings.AvailableFeature(31) = "0" Then
+ NewLine("(clipboard | 100 CP) Clipboard support")
+ End If
End If
End If
End If
@@ -376,6 +381,17 @@
NewLine(ManHeader(1))
Console.BadCommand = False
End If
+ Case "clipboard"
+ If Strings.AvailableFeature(31) = "0" Then
+ ManHeader(0) = "Clipboard Support"
+ ManHeader(1) = "100 CP"
+ NewLine(ManHeader(0))
+ NewLine(Nothing)
+ NewLine("Adds the supports for clipboard")
+ NewLine(Nothing)
+ NewLine(ManHeader(1))
+ Console.BadCommand = False
+ End If
Case Else
Console.BadCommand = False
Console.TextBox1.Text = Console.TextBox1.Text & Environment.NewLine & "Shiftorium: Bad command or not available"
@@ -478,6 +494,9 @@
Case "batchscript"
Shiftorium_InstallFeatures(True, "batchscript", 30, 100)
Console.BadCommand = False
+ Case "clipboard"
+ Shiftorium_InstallFeatures(True, "clipboard", 31, 100)
+ Console.BadCommand = False
Case Else
Console.BadCommand = False
NewLine("Shiftorium: Bad command or not available")
@@ -485,7 +504,9 @@
End Sub
Public Sub Shiftorium_InstallFeatures(IsCLI As Boolean, Feature As String, FeatureRow As Integer, Codepoint As Integer)
+ 'Import the current CP as an Integer
Dim TempCP As Integer = Convert.ToInt32(Strings.ComputerInfo(2))
+ 'See what feature that are going to be installed
Select Case Strings.AvailableFeature(FeatureRow)
Case "0"
If TempCP >= Codepoint Then
@@ -570,6 +591,7 @@
Case "textpad"
Strings.AvailableFeature(17) = "1"
Strings.AvailableFeature(30) = "0"
+ Strings.AvailableFeature(31) = "0"
success = True
Case "shiftkey"
Strings.AvailableFeature(18) = "1"
@@ -623,12 +645,16 @@
Case "batchscript"
Strings.AvailableFeature(30) = "1"
success = True
+ Case "clipboard"
+ Strings.AvailableFeature(31) = "1"
+ success = True
End Select
If success = False Then
If IsCLI = True Then
NewLine("Shiftorium: Invalid command or feature already installed")
End If
Else
+ 'It will deduct the current codepoint to the modified codepoint and exporting it back to ComputerInfo(2)
Strings.ComputerInfo(4) = Strings.ComputerInfo(4) + 1
TempCP = TempCP - Codepoint
Strings.ComputerInfo(2) = Convert.ToString(TempCP)
diff --git a/ShiftOS-TheRevival/MainForms/Strings.vb b/ShiftOS-TheRevival/Functions/InGame/Strings.vb
index 41dcbe9..0bbada4 100644
--- a/ShiftOS-TheRevival/MainForms/Strings.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/Strings.vb
@@ -3,7 +3,7 @@
Public Shared ComputerInfo(6) As String
Public Shared IsFree As Boolean
Public Shared OnceInfo(8) As String
- Public Shared AvailableFeature(30) As String
+ Public Shared AvailableFeature(31) As String
Public Shared CLIInterpreter As String
Public Shared SaveFile As String
Public Shared Achievement As String
@@ -79,6 +79,7 @@
'28 = Date by month and year [Shows date in MM/YYYY format] (0.2.5) (default : 0)
'29 = Date by general [Shows date in general DD/MM/YYYY format] (0.2.5) (default : 0)
'30 = Batch-file support for ShiftOS [Gives execution support for ShiftOS Script File (.scr)] (0.2.5) (default : 0)
+ '31 = Clipboard support for ShiftOS [Gives clipboard support for copy-pasting in ShiftOS] (0.2.6) (default : 0)
'
'Features bought hierarchy :
'ShiftOS Key (KEY) (5 CP)
@@ -100,6 +101,7 @@
'>>>>>>>4-bit Color Display (4BITCOLOR) (80 CP)
'>>>>>>>>Terminal Read-Only Memory Driver (ROMDRIVER, DIR, MKDIR, RMDIR, CD, PWD) (90 CP)
'>>>>>>>>>TextPad (100 CP)
+ '>>>>>>>>>>Clipboard support (CLIPBOARD) (100 CP)
'>>>>>>>>>>ShiftOS Batch Script Support (BATCHSCRIPT) (100 CP)
'>>Basic Calculator (BC) (55 CP)
'>>Time by Seconds (TIME, STIME) (10 CP)
diff --git a/ShiftOS-TheRevival/MainForms/TerminalColorSystem.vb b/ShiftOS-TheRevival/Functions/InGame/TerminalColorSystem.vb
index 9042910..9042910 100644
--- a/ShiftOS-TheRevival/MainForms/TerminalColorSystem.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/TerminalColorSystem.vb
diff --git a/ShiftOS-TheRevival/MainForms/TerminalExternalApps.vb b/ShiftOS-TheRevival/Functions/InGame/TerminalExternalApps.vb
index 20188ed..20188ed 100644
--- a/ShiftOS-TheRevival/MainForms/TerminalExternalApps.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/TerminalExternalApps.vb
diff --git a/ShiftOS-TheRevival/MainForms/TerminalInternalApps.vb b/ShiftOS-TheRevival/Functions/InGame/TerminalInternalApps.vb
index 8b544a0..8b544a0 100644
--- a/ShiftOS-TheRevival/MainForms/TerminalInternalApps.vb
+++ b/ShiftOS-TheRevival/Functions/InGame/TerminalInternalApps.vb
diff --git a/ShiftOS-TheRevival/MainForms/TheUpdater.vb b/ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb
index ca1f7d9..ca1f7d9 100644
--- a/ShiftOS-TheRevival/MainForms/TheUpdater.vb
+++ b/ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb
diff --git a/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb b/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb
index 5b7f77e..bd61679 100644
--- a/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb
+++ b/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb
@@ -3,6 +3,7 @@
Module SaveLoadSystem
Public Sub NewGameMode()
+ 'Sets all features to 2 (Unavailable for Shiftorium) except ShiftOS Key (AvailableFeatures(11))
Directory.Delete(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\ShiftFS", True)
Directory.Delete(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved", True)
Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\ShiftFS")
@@ -44,9 +45,12 @@ Module SaveLoadSystem
Strings.AvailableFeature(28) = "2"
Strings.AvailableFeature(29) = "2"
Strings.AvailableFeature(30) = "2"
+ '0.2.6 Features
+ Strings.AvailableFeature(31) = "2"
End Sub
Public Sub FreeRoamMode()
+ 'Sets all features to as bought
Strings.ComputerInfo(0) = "shiftos"
Strings.ComputerInfo(1) = "user"
Strings.ComputerInfo(2) = "0"
@@ -84,9 +88,12 @@ Module SaveLoadSystem
Strings.AvailableFeature(28) = "3"
Strings.AvailableFeature(29) = "1"
Strings.AvailableFeature(30) = "1"
+ '0.2.6 Features
+ Strings.AvailableFeature(31) = "1"
End Sub
Public Sub GodMode()
+ 'Same as new game but codepoints automatically assigned to 9999 and not saved into the FS
Strings.ComputerInfo(0) = "shiftos"
Strings.ComputerInfo(1) = "user"
Strings.ComputerInfo(2) = 9999
@@ -123,6 +130,8 @@ Module SaveLoadSystem
Strings.AvailableFeature(28) = "2"
Strings.AvailableFeature(29) = "2"
Strings.AvailableFeature(30) = "2"
+ '0.2.6 Features
+ Strings.AvailableFeature(31) = "2"
End Sub
Public Sub SaveGame()
diff --git a/ShiftOS-TheRevival/ShiftOS-TheRevival.vbproj b/ShiftOS-TheRevival/ShiftOS-TheRevival.vbproj
index e499099..c7756c3 100644
--- a/ShiftOS-TheRevival/ShiftOS-TheRevival.vbproj
+++ b/ShiftOS-TheRevival/ShiftOS-TheRevival.vbproj
@@ -111,14 +111,14 @@
<Compile Include="MainForms\DebugWindow.vb">
<SubType>Form</SubType>
</Compile>
- <Compile Include="MainForms\DirectoryManagements.vb" />
+ <Compile Include="Functions\InGame\DirectoryManagements.vb" />
<Compile Include="MainForms\Epilepsy.Designer.vb">
<DependentUpon>Epilepsy.vb</DependentUpon>
</Compile>
<Compile Include="MainForms\Epilepsy.vb">
<SubType>Form</SubType>
</Compile>
- <Compile Include="MainForms\FileManagement.vb" />
+ <Compile Include="Functions\InGame\FileManagement.vb" />
<Compile Include="MainForms\IntroStory.Designer.vb">
<DependentUpon>IntroStory.vb</DependentUpon>
</Compile>
@@ -126,7 +126,7 @@
<SubType>Form</SubType>
</Compile>
<Compile Include="MainForms\SaveLoadSystem.vb" />
- <Compile Include="MainForms\Shiftoriums.vb" />
+ <Compile Include="Functions\InGame\Shiftoriums.vb" />
<Compile Include="MainForms\ShiftOSMenu.vb">
<SubType>Form</SubType>
</Compile>
@@ -140,19 +140,19 @@
<Compile Include="MainForms\ShiftOSUpdater.vb">
<SubType>Form</SubType>
</Compile>
- <Compile Include="MainForms\Strings.vb" />
+ <Compile Include="Functions\InGame\Strings.vb" />
<Compile Include="MainForms\Console.Designer.vb">
<DependentUpon>Console.vb</DependentUpon>
</Compile>
<Compile Include="MainForms\Console.vb">
<SubType>Form</SubType>
</Compile>
- <Compile Include="MainForms\ConsoleAPI.vb" />
- <Compile Include="MainForms\TerminalAPI.vb" />
- <Compile Include="MainForms\TerminalExternalApps.vb" />
- <Compile Include="MainForms\TerminalColorSystem.vb" />
- <Compile Include="MainForms\TerminalInternalApps.vb" />
- <Compile Include="MainForms\TheUpdater.vb" />
+ <Compile Include="API\ConsoleAPI.vb" />
+ <Compile Include="API\TerminalAPI.vb" />
+ <Compile Include="Functions\InGame\TerminalExternalApps.vb" />
+ <Compile Include="Functions\InGame\TerminalColorSystem.vb" />
+ <Compile Include="Functions\InGame\TerminalInternalApps.vb" />
+ <Compile Include="Functions\OutGame\TheUpdater.vb" />
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>