diff options
Diffstat (limited to 'ShiftOS-TheRevival/Functions')
| -rw-r--r-- | ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb | 4 | ||||
| -rw-r--r-- | ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb | 104 |
2 files changed, 106 insertions, 2 deletions
diff --git a/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb b/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb index 8a55d24..a8a0478 100644 --- a/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb +++ b/ShiftOS-TheRevival/Functions/OutGame/SaveLoadSystem.vb @@ -144,7 +144,7 @@ Module SaveLoadSystem Strings.ComputerInfo(0) = "shiftos" Strings.ComputerInfo(1) = "user" Strings.ComputerInfo(2) = "0" - Strings.ComputerInfo(4) = "42" + Strings.ComputerInfo(4) = "53" Strings.AvailableFeature(0) = "1" Strings.AvailableFeature(1) = "1" Strings.AvailableFeature(2) = "1" @@ -213,7 +213,7 @@ Module SaveLoadSystem '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 + Strings.ComputerInfo(2) = 100000 Strings.ComputerInfo(4) = "0" Strings.AvailableFeature(0) = "2" Strings.AvailableFeature(1) = "2" diff --git a/ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb b/ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb index b8b66ec..db45c42 100644 --- a/ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb +++ b/ShiftOS-TheRevival/Functions/OutGame/TheUpdater.vb @@ -187,6 +187,18 @@ Module TheUpdater Strings.AvailableFeature(39) = 2 Strings.AvailableFeature(40) = 2 Strings.AvailableFeature(41) = 2 + 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 + Strings.AvailableFeature(53) = 2 Strings.ComputerInfo(0) = ComputerInfoHere(0) Strings.ComputerInfo(1) = ComputerInfoHere(1) Strings.ComputerInfo(2) = ComputerInfoHere(2) @@ -247,6 +259,98 @@ Module TheUpdater Strings.AvailableFeature(39) = 2 Strings.AvailableFeature(40) = 2 Strings.AvailableFeature(41) = 2 + 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 + Strings.AvailableFeature(53) = 2 + Strings.ComputerInfo(0) = ComputerInfoHere(0) + Strings.ComputerInfo(1) = ComputerInfoHere(1) + Strings.ComputerInfo(2) = ComputerInfoHere(2) + Strings.ComputerInfo(3) = ComputerInfoHere(3) + Strings.ComputerInfo(4) = ComputerInfoHere(4) + Strings.ComputerInfo(5) = "0F" + Strings.ComputerInfo(6) = "F0" + If Directory.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS") = True Then + + Else + Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS") + End If + ShiftOSUpdater.Button2.Text = "Updated!" + Case "0.2.7" + Strings.AvailableFeature(0) = AvailableFeatureHere(0) + Strings.AvailableFeature(1) = AvailableFeatureHere(1) + Strings.AvailableFeature(2) = AvailableFeatureHere(2) + Strings.AvailableFeature(3) = AvailableFeatureHere(3) + Strings.AvailableFeature(4) = AvailableFeatureHere(4) + Strings.AvailableFeature(5) = AvailableFeatureHere(5) + Strings.AvailableFeature(6) = AvailableFeatureHere(6) + Strings.AvailableFeature(7) = AvailableFeatureHere(7) + Strings.AvailableFeature(8) = AvailableFeatureHere(8) + Strings.AvailableFeature(9) = AvailableFeatureHere(9) + Strings.AvailableFeature(10) = AvailableFeatureHere(10) + Strings.AvailableFeature(11) = AvailableFeatureHere(11) + Strings.AvailableFeature(12) = AvailableFeatureHere(12) + Strings.AvailableFeature(13) = AvailableFeatureHere(13) + Strings.AvailableFeature(14) = AvailableFeatureHere(14) + Strings.AvailableFeature(15) = AvailableFeatureHere(15) + Strings.AvailableFeature(16) = AvailableFeatureHere(16) + Strings.AvailableFeature(17) = AvailableFeatureHere(17) + Strings.AvailableFeature(18) = AvailableFeatureHere(18) + Strings.AvailableFeature(19) = AvailableFeatureHere(19) + Strings.AvailableFeature(20) = AvailableFeatureHere(20) + Strings.AvailableFeature(21) = AvailableFeatureHere(21) + Strings.AvailableFeature(22) = AvailableFeatureHere(22) + Strings.AvailableFeature(23) = AvailableFeatureHere(23) + Strings.AvailableFeature(24) = AvailableFeatureHere(24) + Strings.AvailableFeature(25) = AvailableFeatureHere(25) + Strings.AvailableFeature(26) = AvailableFeatureHere(26) + Strings.AvailableFeature(27) = AvailableFeatureHere(27) + Strings.AvailableFeature(28) = AvailableFeatureHere(28) + Strings.AvailableFeature(29) = AvailableFeatureHere(29) + Strings.AvailableFeature(30) = AvailableFeatureHere(30) + Strings.AvailableFeature(31) = AvailableFeatureHere(31) + Strings.AvailableFeature(32) = AvailableFeatureHere(32) + Strings.AvailableFeature(33) = AvailableFeatureHere(33) + Strings.AvailableFeature(34) = AvailableFeatureHere(34) + Strings.AvailableFeature(35) = AvailableFeatureHere(35) + Strings.AvailableFeature(36) = AvailableFeatureHere(36) + Strings.AvailableFeature(37) = AvailableFeatureHere(37) + Strings.AvailableFeature(38) = AvailableFeatureHere(38) + Strings.AvailableFeature(39) = AvailableFeatureHere(39) + Strings.AvailableFeature(40) = AvailableFeatureHere(40) + Strings.AvailableFeature(41) = AvailableFeatureHere(41) + If Strings.AvailableFeature(37) = 1 Then + Strings.AvailableFeature(42) = 0 + Else + Strings.AvailableFeature(42) = 2 + End If + If Strings.AvailableFeature(35) = 1 Then + Strings.AvailableFeature(43) = 0 + Else + Strings.AvailableFeature(43) = 2 + End If + 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 + If Strings.AvailableFeature(36) = 1 Then + Strings.AvailableFeature(53) = 0 + Else + Strings.AvailableFeature(53) = 2 + End If Strings.ComputerInfo(0) = ComputerInfoHere(0) Strings.ComputerInfo(1) = ComputerInfoHere(1) Strings.ComputerInfo(2) = ComputerInfoHere(2) |