From 37d5c6a5e34e3027d52b0b004588c42dbf67905b Mon Sep 17 00:00:00 2001 From: b1indy Date: Fri, 23 Nov 2007 15:12:57 +0000 Subject: half size video (works now with ffmpeg) git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1@634 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Classes/UVideo.pas | 38 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) (limited to 'Game/Code/Classes/UVideo.pas') diff --git a/Game/Code/Classes/UVideo.pas b/Game/Code/Classes/UVideo.pas index a38788c1..7378aa92 100644 --- a/Game/Code/Classes/UVideo.pas +++ b/Game/Code/Classes/UVideo.pas @@ -437,6 +437,44 @@ begin glDisable(GL_TEXTURE_2D); glDisable(GL_BLEND); +// showmessage('Ini.MovieSize = '+inttostr(Ini.MovieSize)); + if (Ini.MovieSize < 1) then //HalfSize BG + begin + // draw fading bars over top and bottom of background/video + glEnable(GL_BLEND); + glBegin(GL_QUADS); + (* black top *) + glColor4f(0,0,0,1); + glVertex2f(0, 0); + glVertex2f(800,0); + glVertex2f(800,110); + glVertex2f(0,110); + (* top gradient *) + glVertex2f(0, 110); + glVertex2f(800,110); + glColor4f(0,0,0,0); + glVertex2f(800,130); + glVertex2f(0,130); + + (* bottom gradient *) + glColor4f(0,0,0,0); + glVertex2f(0, 600-130); + glVertex2f(800,600-130); + glColor4f(0,0,0,1); + glVertex2f(800,600-110); + glVertex2f(0,600-110); + (* black bottom *) + glVertex2f(0, 600-110); + glVertex2f(800,600-110); + glVertex2f(800,600); + glVertex2f(0,600); + + glEnd; + glDisable(GL_BLEND); + end + +// info-stuff + {$ifdef Info} if VideoSkipTime+VideoTime+VideoTimeBase < 0 then begin glColor4f(0.7, 1, 0.3, 1); -- cgit v1.2.3