diff options
Diffstat (limited to 'Game/Code/Classes/UIni.pas')
-rw-r--r-- | Game/Code/Classes/UIni.pas | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas index df291ec3..e5891f58 100644 --- a/Game/Code/Classes/UIni.pas +++ b/Game/Code/Classes/UIni.pas @@ -23,6 +23,7 @@ type Sorting: integer;
Debug: integer;
LoadFaultySongs:integer;
+ NewPartyPoints: integer;
// Graphics
Screens: integer;
@@ -122,6 +123,7 @@ const IDebug: array[0..1] of string = ('Off', 'On');
ILoadFaultySongs: array[0..1] of string = ('Off', 'On');
+ INewPartyPoints: array[0..1] of string = ('Off', 'On');
IScreens: array[0..1] of string = ('1', '2');
IFullScreen: array[0..1] of string = ('Off', 'On');
@@ -257,6 +259,11 @@ begin for Pet := 0 to High(ILoadFaultySongs) do
if Tekst = ILoadFaultySongs[Pet] then Ini.LoadFaultySongs := Pet;
+ // NewPartyPoints
+ Tekst := IniFile.ReadString('Game', 'NewPartyPoints', INewPartyPoints[1]);
+ for Pet := 0 to High(INewPartyPoints) do
+ if Tekst = INewPartyPoints[Pet] then Ini.NewPartyPoints := Pet;
+
//if Ini.Debug = 1 then SongPath := 'E:\UltraStar 03\Songs\';
// Screens
@@ -645,6 +652,10 @@ begin Tekst := ILoadFaultySongs[Ini.LoadFaultySongs];
IniFile.WriteString('Game', 'LoadFaultySongs', Tekst);
+ // NewPartyPoints
+ Tekst := INewPartyPoints[Ini.NewPartyPoints];
+ IniFile.WriteString('Game', 'NewPartyPoints', Tekst);
+
// Screens
Tekst := IScreens[Ini.Screens];
IniFile.WriteString('Graphics', 'Screens', Tekst);
@@ -849,4 +860,4 @@ begin end;
end;
-end.
+end.
\ No newline at end of file |