aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Screens/UScreenMain.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Screens/UScreenMain.pas')
-rw-r--r--Game/Code/Screens/UScreenMain.pas12
1 files changed, 11 insertions, 1 deletions
diff --git a/Game/Code/Screens/UScreenMain.pas b/Game/Code/Screens/UScreenMain.pas
index bc2019b9..8c03a53f 100644
--- a/Game/Code/Screens/UScreenMain.pas
+++ b/Game/Code/Screens/UScreenMain.pas
@@ -25,7 +25,6 @@ type
procedure InteractInc; override;
procedure InteractDec; override;
procedure SetAnimationProgress(Progress: real); override;
- //function Draw: boolean; override;
end;
const
@@ -314,6 +313,9 @@ begin
end;
function TScreenMain.Draw: boolean;
+var
+ txt: string;
+
begin
Result := inherited Draw;
@@ -324,6 +326,14 @@ begin
begin
StartScreenScredits;
end;
+
+ glColor4f(1,1,1,1);
+ SetFontStyle(0);
+ SetFontItalic(False);
+ SetFontSize(6);
+ txt := Language.Translate('US_VERSION_NUMBER');
+ SetFontPos(795 - glTextWidth(PChar(txt)), 580);
+ glPrint(PChar(txt));
end;
procedure TScreenMain.InteractNext;