diff options
| author | EverythingWindows <[email protected]> | 2022-11-20 02:25:18 +0700 |
|---|---|---|
| committer | EverythingWindows <[email protected]> | 2022-11-20 02:25:18 +0700 |
| commit | ad70e4162d8c55c0a882997a0c47c168b286e5d1 (patch) | |
| tree | ec04d1d349c14a70b9ecaf03fa1e0a7bfddfea99 /ShiftOS-TheRevival/MainForms | |
| parent | eb41e07992fa2cb51194a0d4327a494f66b87b9b (diff) | |
| download | shiftos-therevival-old-ad70e4162d8c55c0a882997a0c47c168b286e5d1.tar.gz shiftos-therevival-old-ad70e4162d8c55c0a882997a0c47c168b286e5d1.tar.bz2 shiftos-therevival-old-ad70e4162d8c55c0a882997a0c47c168b286e5d1.zip | |
Zip, and Unzip is now working
Diffstat (limited to 'ShiftOS-TheRevival/MainForms')
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb | 6 | ||||
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/ShiftOSMenu.vb | 6 |
2 files changed, 12 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb b/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb index bd61679..6404c76 100644 --- a/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb +++ b/ShiftOS-TheRevival/MainForms/SaveLoadSystem.vb @@ -47,6 +47,8 @@ Module SaveLoadSystem Strings.AvailableFeature(30) = "2" '0.2.6 Features Strings.AvailableFeature(31) = "2" + Strings.AvailableFeature(32) = "2" + Strings.AvailableFeature(33) = "2" End Sub Public Sub FreeRoamMode() @@ -90,6 +92,8 @@ Module SaveLoadSystem Strings.AvailableFeature(30) = "1" '0.2.6 Features Strings.AvailableFeature(31) = "1" + Strings.AvailableFeature(32) = "1" + Strings.AvailableFeature(33) = "1" End Sub Public Sub GodMode() @@ -132,6 +136,8 @@ Module SaveLoadSystem Strings.AvailableFeature(30) = "2" '0.2.6 Features Strings.AvailableFeature(31) = "2" + Strings.AvailableFeature(32) = "2" + Strings.AvailableFeature(33) = "2" End Sub Public Sub SaveGame() diff --git a/ShiftOS-TheRevival/MainForms/ShiftOSMenu.vb b/ShiftOS-TheRevival/MainForms/ShiftOSMenu.vb index 53f4fef..8a65f59 100644 --- a/ShiftOS-TheRevival/MainForms/ShiftOSMenu.vb +++ b/ShiftOS-TheRevival/MainForms/ShiftOSMenu.vb @@ -167,9 +167,15 @@ Public Class ShiftOSMenu Else Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved") End If + If Directory.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS") = True Then + + Else + Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS") + End If Else Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS") Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\ShiftFS") + Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS") Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved") File.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\version.txt", My.Resources.CurrentVersion) End If |