diff -r 3ae60c8a15f2 -r b39beffcf05e hedgewars/uVariables.pas --- a/hedgewars/uVariables.pas Mon Aug 27 16:52:50 2012 -0400 +++ b/hedgewars/uVariables.pas Tue Aug 28 20:30:57 2012 +0400 @@ -52,6 +52,15 @@ cReadyDelay : Longword = 5000; cStereoMode : TStereoMode = smNone; cOnlyStats : boolean = False; +{$IFDEF USE_VIDEO_RECORDING} + RecPrefix : shortstring; + cAVFormat : shortstring; + cVideoCodec : shortstring; + cVideoFramerateNum : LongInt; + cVideoFramerateDen : LongInt; + cVideoQuality : LongInt; + cAudioCodec : shortstring; +{$ENDIF} ////////////////////////// cMapName : shortstring = ''; @@ -63,6 +72,7 @@ SpeedStart : LongWord; fastUntilLag : boolean; + fastScrolling : boolean; autoCameraOn : boolean; CheckSum : LongWord; @@ -2449,6 +2459,10 @@ framel, framer, depthl, depthr: GLuint; texl, texr: GLuint; + // video recorder framebuffer and texture + defaultFrame, depthv: GLuint; + texv: GLuint; + VisualGearLayers: array[0..6] of PVisualGear; lastVisualGearByUID: PVisualGear; vobFrameTicks, vobFramesCount, vobCount: Longword; @@ -2574,7 +2588,7 @@ cExplosives := 2; GameState := Low(TGameState); - GameType := gmtLocal; +// GameType := gmtLocal; zoom := cDefaultZoomLevel; ZoomValue := cDefaultZoomLevel; WeaponTooltipTex:= nil; @@ -2591,6 +2605,7 @@ isSpeed := false; SpeedStart := 0; fastUntilLag := false; + fastScrolling := false; autoCameraOn := true; cScriptName := ''; cSeed := '';