diff options
author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-05-08 19:55:34 +0000 |
---|---|---|
committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-05-08 19:55:34 +0000 |
commit | e452e8c6d60af8e8a8eb957f1ef59d461f48c99a (patch) | |
tree | 65220e5c8463aa87324c5bbffead506adf63f8b1 /Game | |
parent | 5270a02d1dea4f660349f0414d63c3b969def187 (diff) | |
download | usdx-e452e8c6d60af8e8a8eb957f1ef59d461f48c99a.tar.gz usdx-e452e8c6d60af8e8a8eb957f1ef59d461f48c99a.tar.xz usdx-e452e8c6d60af8e8a8eb957f1ef59d461f48c99a.zip |
Fixed the "one Song too much" Bug
Added 2 Error Messages:
When Opening Sing or Party: No Songs Loaded
When Opening Party: No Plugins loaded
Added Messages to Language File
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@182 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game')
-rw-r--r-- | Game/Code/Classes/USongs.pas | 2 | ||||
-rw-r--r-- | Game/Code/Screens/UScreenMain.pas | 35 |
2 files changed, 25 insertions, 12 deletions
diff --git a/Game/Code/Classes/USongs.pas b/Game/Code/Classes/USongs.pas index 0a319370..4b49127c 100644 --- a/Game/Code/Classes/USongs.pas +++ b/Game/Code/Classes/USongs.pas @@ -110,7 +110,7 @@ begin BrowseDir(SongPath);
//Set Correct SongArray Length
- SetLength(Song, BrowsePos + 1);
+ SetLength(Song, BrowsePos);
// if Ini.Debug = 1 then BrowseDir('D:\Extract\Songs\');
end;
diff --git a/Game/Code/Screens/UScreenMain.pas b/Game/Code/Screens/UScreenMain.pas index 6fd458d7..47a79496 100644 --- a/Game/Code/Screens/UScreenMain.pas +++ b/Game/Code/Screens/UScreenMain.pas @@ -93,22 +93,35 @@ begin SDLK_RETURN:
begin
//Solo
- if (Interaction = 0) and (Length(Songs.Song) >= 1) then begin
- Music.PlayStart;
- if (Ini.Players >= 0) and (Ini.Players <= 3) then PlayersPlay := Ini.Players + 1;
- if (Ini.Players = 4) then PlayersPlay := 6;
-
- ScreenName.Goto_SingScreen := False;
- FadeTo(@ScreenName);
+ if (Interaction = 0) then
+ begin
+ if (Length(Songs.Song) >= 1) then
+ begin
+ Music.PlayStart;
+ if (Ini.Players >= 0) and (Ini.Players <= 3) then PlayersPlay := Ini.Players + 1;
+ if (Ini.Players = 4) then PlayersPlay := 6;
+
+ ScreenName.Goto_SingScreen := False;
+ FadeTo(@ScreenName);
+ end
+ else //show error message
+ ScreenPopupError.ShowPopup(Language.Translate('ERROR_NO_SONGS'));
end;
//Multi
if Interaction = 1 then begin
- if (Ini.Players >= 1) AND (Length(DLLMan.Plugins)>=1) then
+ if (Length(Songs.Song) >= 1) then
begin
- Music.PlayStart;
- FadeTo(@ScreenPartyOptions);
- end;
+ if (Length(DLLMan.Plugins)>=1) then
+ begin
+ Music.PlayStart;
+ FadeTo(@ScreenPartyOptions);
+ end
+ else //show error message, No Plugins Loaded
+ ScreenPopupError.ShowPopup(Language.Translate('ERROR_NO_PLUGINS'));
+ end
+ else //show error message, No Songs Loaded
+ ScreenPopupError.ShowPopup(Language.Translate('ERROR_NO_SONGS'));
end;
//Stats
|