hedgewars/uVariables.pas
changeset 7615 b39beffcf05e
parent 7594 5f03595335e6
parent 7503 deaeac102355
child 7628 bc7b1d228a2c
equal deleted inserted replaced
7614:3ae60c8a15f2 7615:b39beffcf05e
    50     UserNick        : shortstring = '';
    50     UserNick        : shortstring = '';
    51     recordFileName  : shortstring = '';
    51     recordFileName  : shortstring = '';
    52     cReadyDelay     : Longword    = 5000;
    52     cReadyDelay     : Longword    = 5000;
    53     cStereoMode     : TStereoMode = smNone;
    53     cStereoMode     : TStereoMode = smNone;
    54     cOnlyStats      : boolean = False;
    54     cOnlyStats      : boolean = False;
       
    55 {$IFDEF USE_VIDEO_RECORDING}
       
    56     RecPrefix      : shortstring;
       
    57     cAVFormat       : shortstring;
       
    58     cVideoCodec     : shortstring;
       
    59     cVideoFramerateNum : LongInt;
       
    60     cVideoFramerateDen : LongInt;
       
    61     cVideoQuality      : LongInt;
       
    62     cAudioCodec     : shortstring;
       
    63 {$ENDIF}
    55 //////////////////////////
    64 //////////////////////////
    56     cMapName        : shortstring = '';
    65     cMapName        : shortstring = '';
    57 
    66 
    58     isCursorVisible : boolean;
    67     isCursorVisible : boolean;
    59     isInLag         : boolean;
    68     isInLag         : boolean;
    61     isInMultiShoot  : boolean;
    70     isInMultiShoot  : boolean;
    62     isSpeed         : boolean;
    71     isSpeed         : boolean;
    63     SpeedStart      : LongWord;
    72     SpeedStart      : LongWord;
    64 
    73 
    65     fastUntilLag    : boolean;
    74     fastUntilLag    : boolean;
       
    75     fastScrolling   : boolean;
    66     autoCameraOn    : boolean;
    76     autoCameraOn    : boolean;
    67 
    77 
    68     CheckSum        : LongWord;
    78     CheckSum        : LongWord;
    69     GameTicks       : LongWord;
    79     GameTicks       : LongWord;
    70     GameState       : TGameState;
    80     GameState       : TGameState;
  2447 
  2457 
  2448     // stereoscopic framebuffer and textures
  2458     // stereoscopic framebuffer and textures
  2449     framel, framer, depthl, depthr: GLuint;
  2459     framel, framer, depthl, depthr: GLuint;
  2450     texl, texr: GLuint;
  2460     texl, texr: GLuint;
  2451 
  2461 
       
  2462     // video recorder framebuffer and texture
       
  2463     defaultFrame, depthv: GLuint;
       
  2464     texv: GLuint;
       
  2465 
  2452     VisualGearLayers: array[0..6] of PVisualGear;
  2466     VisualGearLayers: array[0..6] of PVisualGear;
  2453     lastVisualGearByUID: PVisualGear;
  2467     lastVisualGearByUID: PVisualGear;
  2454     vobFrameTicks, vobFramesCount, vobCount: Longword;
  2468     vobFrameTicks, vobFramesCount, vobCount: Longword;
  2455     vobVelocity, vobFallSpeed: LongInt;
  2469     vobVelocity, vobFallSpeed: LongInt;
  2456     vobSDFrameTicks, vobSDFramesCount, vobSDCount: Longword;
  2470     vobSDFrameTicks, vobSDFramesCount, vobSDCount: Longword;
  2572     cCaseFactor     := 5;  {0..9}
  2586     cCaseFactor     := 5;  {0..9}
  2573     cLandMines      := 4;
  2587     cLandMines      := 4;
  2574     cExplosives     := 2;
  2588     cExplosives     := 2;
  2575 
  2589 
  2576     GameState       := Low(TGameState);
  2590     GameState       := Low(TGameState);
  2577     GameType        := gmtLocal;
  2591 //    GameType        := gmtLocal;
  2578     zoom            := cDefaultZoomLevel;
  2592     zoom            := cDefaultZoomLevel;
  2579     ZoomValue       := cDefaultZoomLevel;
  2593     ZoomValue       := cDefaultZoomLevel;
  2580     WeaponTooltipTex:= nil;
  2594     WeaponTooltipTex:= nil;
  2581     cLaserSighting  := false;
  2595     cLaserSighting  := false;
  2582     cVampiric       := false;
  2596     cVampiric       := false;
  2589     isPaused        := false;
  2603     isPaused        := false;
  2590     isInMultiShoot  := false;
  2604     isInMultiShoot  := false;
  2591     isSpeed         := false;
  2605     isSpeed         := false;
  2592     SpeedStart      := 0;
  2606     SpeedStart      := 0;
  2593     fastUntilLag    := false;
  2607     fastUntilLag    := false;
       
  2608     fastScrolling   := false;
  2594     autoCameraOn    := true;
  2609     autoCameraOn    := true;
  2595     cScriptName     := '';
  2610     cScriptName     := '';
  2596     cSeed           := '';
  2611     cSeed           := '';
  2597     cVolumeDelta    := 0;
  2612     cVolumeDelta    := 0;
  2598     cHasFocus       := true;
  2613     cHasFocus       := true;