aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-10 15:10:26 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-10 15:10:26 +0000
commitda9dc16fd9983e4af6790900c7c007cfe603709b (patch)
tree2d15568f90cf1b842fe5a2e5da494ae84697737c
parentd28350b7fe6e1c827e9994d28f7f95cae4ac2db6 (diff)
downloadusdx-da9dc16fd9983e4af6790900c7c007cfe603709b.tar.gz
usdx-da9dc16fd9983e4af6790900c7c007cfe603709b.tar.xz
usdx-da9dc16fd9983e4af6790900c7c007cfe603709b.zip
Beautified Credits Screen
Edited Texts to Fit Screen Width git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@76 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--Game/Code/Screens/UScreenMain.pas27
1 files changed, 19 insertions, 8 deletions
diff --git a/Game/Code/Screens/UScreenMain.pas b/Game/Code/Screens/UScreenMain.pas
index dcd7db26..ccd81ee9 100644
--- a/Game/Code/Screens/UScreenMain.pas
+++ b/Game/Code/Screens/UScreenMain.pas
@@ -45,11 +45,11 @@ const Credits_Text: Array[0..46] of PChar = (
'DennistheMenace:',
'Beta Testing and great Support in "the Board"',
':SPACE:',
- 'Moq/Moguhguh:',
+ 'Mog:',
'Programming',
':SPACE:',
'Mota:',
- 'Programming, Idea of creating this Mod, Team Leading',
+ 'Programming, Idea of creating this Mod',
':SPACE:',
'Sawyer:',
'Web Master, Programming',
@@ -72,9 +72,9 @@ const Credits_Text: Array[0..46] of PChar = (
':SPACE:',
':SPACE:',
'Visit us at:',
- 'http://www.UltraStar-Deluxe.de.vu',
- 'http://www.USD.de.vu',
- 'http://www.Ultra-Star.dl.am ("The Board" by Blind Guard)',
+ 'http://www.ultrastardx.dl.am',
+ 'http://sourceforge.net/projects/ultrastardx/',
+ 'http://www.Ultra-Star.dl.am',
'Please write Bug Reports and Feature Requests',
'to help making this a better Game');
@@ -329,7 +329,7 @@ begin
SetFontStyle (2);
SetFontItalic(False);
SetFontSize(9);
- SetFontPos (460, 570);
+ SetFontPos (10, 5);
glColor4f(1, 0, 0, 0.2 + Abs((Credits_Alpha mod 150)/100 - 0.75));
glPrint ('Credits! Press any Key to Continue');
@@ -339,7 +339,12 @@ begin
if (Credits_Y>-35) then
begin
Ver := PChar(Language.Translate('US_VERSION'));
- glColor4f(1, 0.6, 0.08, 0.8);
+ //Set Color
+ if Credits_Y > 500 then
+ glColor4f(1, 0.6, 0.08, (600 - Credits_Y)/100 - 0.2)
+ else
+ glColor4f(1, 0.6, 0.08, 0.8);
+
SetFontPos (400 - glTextWidth(Ver)/2, Credits_Y);
glprint(Ver);
end;
@@ -367,6 +372,12 @@ begin
Y := Y + 55
else
begin
+ //Set Color
+ if Y > 500 then
+ glColor4f(0.8, 0.8, 1, (600 - Y)/100 - 0.2)
+ else
+ glColor4f(0.8, 0.8, 1, 0.8);
+
SetFontPos (400 - glTextWidth(Credits_Text[T])/2, Y);
glprint(Credits_Text[T]);
Y := Y + 30;
@@ -376,7 +387,7 @@ begin
break;
end;
- //If lower Position is outside the Screen-> Show MainMenu
+ //If lowest Position is outside the Screen-> Show MainMenu
if (Y <= 0) then
Credits_Visible := False;
end;