diff options
| author | EverythingWindows <[email protected]> | 2022-11-24 21:26:45 +0700 |
|---|---|---|
| committer | EverythingWindows <[email protected]> | 2022-11-24 21:26:45 +0700 |
| commit | 9754f495672581abd7098c39027b512525b5f9ab (patch) | |
| tree | 60ea20826d7743f25b49be9254373b1e7f9cbee3 /ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb | |
| parent | a594d38810939c8afbf0e12fb970d8aa3fd880e5 (diff) | |
| download | shiftos-therevival-old-9754f495672581abd7098c39027b512525b5f9ab.tar.gz shiftos-therevival-old-9754f495672581abd7098c39027b512525b5f9ab.tar.bz2 shiftos-therevival-old-9754f495672581abd7098c39027b512525b5f9ab.zip | |
Fully functional and partially working Shifter
Diffstat (limited to 'ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb')
| -rw-r--r-- | ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb | 17 |
1 files changed, 16 insertions, 1 deletions
diff --git a/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb b/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb index be9269c..5747e1d 100644 --- a/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb +++ b/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb @@ -55,6 +55,11 @@ Module SaveLoadSystem Strings.AvailableFeature(34) = "2" Strings.AvailableFeature(35) = "2" Strings.AvailableFeature(36) = "2" + Strings.AvailableFeature(37) = "2" + Strings.AvailableFeature(38) = "2" + Strings.AvailableFeature(39) = "2" + Strings.AvailableFeature(40) = "2" + Strings.AvailableFeature(41) = "2" End Sub Public Sub FreeRoamMode() @@ -105,6 +110,11 @@ Module SaveLoadSystem Strings.AvailableFeature(34) = "1" Strings.AvailableFeature(35) = "1" Strings.AvailableFeature(36) = "1" + Strings.AvailableFeature(37) = "1" + Strings.AvailableFeature(38) = "1" + Strings.AvailableFeature(39) = "1" + Strings.AvailableFeature(40) = "3" + Strings.AvailableFeature(41) = "1" End Sub Public Sub GodMode() @@ -153,6 +163,11 @@ Module SaveLoadSystem Strings.AvailableFeature(34) = "2" Strings.AvailableFeature(35) = "2" Strings.AvailableFeature(36) = "2" + Strings.AvailableFeature(37) = "2" + Strings.AvailableFeature(38) = "2" + Strings.AvailableFeature(39) = "2" + Strings.AvailableFeature(40) = "2" + Strings.AvailableFeature(41) = "2" End Sub Public Sub SaveGame() @@ -171,4 +186,4 @@ Module SaveLoadSystem Strings.AvailableFeature = File.ReadAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved\AvailableFeature.sos") End If End Sub -End Module +End Module
\ No newline at end of file |