- new acinerella.dll (based on 1.4)

- the song does not restart if you change the video gap in the editor while playing 
- some corrections in Blue Sensation theme; darker sing notes graphics
- some bugfixes
- max fps at ~200 

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2425 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 4 insertions, 8 deletions

diff --git a/Game/Code/Classes/UVideo.pas b/Game/Code/Classes/UVideo.pas
index 8d56182e..ee3d2bbd 100644
--- a/Game/Code/Classes/UVideo.pas
+++ b/Game/Code/Classes/UVideo.pas
@@ -130,10 +130,7 @@ end;
 

 function seek_proc(sender: Pointer; pos: int64; whence: integer): int64; cdecl;

 begin

-  if whence in [0, 1, 2] then

-    result := fs.Seek(pos, TSeekOrigin(whence))

-  else

-    result := -1;

+  result := fs.Seek(pos, TSeekOrigin(whence))

 end;
 
 procedure Init;
@@ -180,7 +177,7 @@ begin
 

   inst := ac_init();

   videodecoder := nil;

-  ac_open(inst, nil, nil, @read_proc, @seek_proc, nil);

+  ac_open(inst, nil, nil, @read_proc, @seek_proc, nil, nil);

 

   if not inst^.opened then

   begin

@@ -251,12 +248,12 @@ begin
     PIXEL_FORMAT, GL_UNSIGNED_BYTE, nil);

   glBindTexture(GL_TEXTURE_2D, 0);

 
-  if(pbo_supported) then

+  if(pbo_supported) then
   begin

     glBindBuffer(GL_PIXEL_UNPACK_BUFFER_ARB, pbo);

     glBufferData(GL_PIXEL_UNPACK_BUFFER_ARB, numBytes*TexX*TexY, nil, GL_STREAM_DRAW);

     glBindBuffer(GL_PIXEL_UNPACK_BUFFER_ARB, 0);

-  end;

+  end;
 

   mmfps := 50;

 end;
@@ -812,7 +809,6 @@ begin
     // upper-right coord

     glTexCoord2f(TexRect.Right, TexRect.Upper);

     glVertex2f(ScreenRect.Right, ScreenRect.Upper);
-
   glEnd;
 
   if Window.windowed then