(*

 * Hedgewars, a free turn based strategy game

 * Copyright (c) 2004-2015 Andrey Korotaev <unC0Rr@gmail.com>

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License as published by

 * the Free Software Foundation; version 2 of the License

 *

 * This program is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 * GNU General Public License for more details.

 *

 * You should have received a copy of the GNU General Public License

 * along with this program; if not, write to the Free Software

 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

 *)

{$INCLUDE "options.inc"}

unit uVariables;

interface

uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uUtils{$IFDEF GL2}, uMatrix{$ENDIF};

procedure initScreenSpaceVars();

var

/////// init flags ///////

    cMinScreenWidth    : LongInt;

    cMinScreenHeight   : LongInt;

    cFullscreenWidth   : LongInt;

    cFullscreenHeight  : LongInt;

    cWindowedWidth     : LongInt;

    cWindowedHeight    : LongInt;

    cScreenWidth       : LongInt;

    cScreenHeight      : LongInt;

    cNewScreenWidth    : LongInt;

    cNewScreenHeight   : LongInt;

    cScreenResizeDelay : LongWord;

    ipcPort            : Word;

    AprilOne           : boolean;

    cFullScreen        : boolean;

    cLanguageFName     : shortstring;

    cLanguage          : shortstring;

    cTimerInterval     : LongInt;

    PathPrefix         : ansistring;

    UserPathPrefix     : ansistring;

    cShowFPS           : boolean;

    cFlattenFlakes     : boolean;

    cFlattenClouds     : boolean;

    cIce               : boolean;

    cSnow              : boolean;

    isInChatMode       : boolean;

    cAltDamage         : boolean;

    cReducedQuality    : LongWord;

    cHolidaySilliness  : boolean;

    UserNick           : shortstring;

    recordFileName     : shortstring;

    cReadyDelay        : Longword;

    cStereoMode        : TStereoMode;

    cOnlyStats         : boolean;

{$IFDEF USE_VIDEO_RECORDING}

    RecPrefix          : shortstring;

    cAVFormat          : shortstring;

    cVideoCodec        : shortstring;

    cVideoFramerateNum : LongInt;

    cVideoFramerateDen : LongInt;

    cVideoQuality      : LongInt;

    cAudioCodec        : shortstring;

{$ENDIF}

//////////////////////////

    cMapName           : shortstring;

    syncedPixelDigest  : LongInt;

    isCursorVisible : boolean;

    isInLag         : boolean;

    isPaused        : boolean;

    isInMultiShoot  : boolean;

    isSpeed         : boolean;

    isAFK           : boolean;

    isShowMission   : boolean;

    isShowGearInfo  : boolean;

    isForceMission  : boolean;

    SpeedStart      : LongWord;

    fastUntilLag    : boolean;

    fastScrolling   : boolean;

    autoCameraOn    : boolean;

    CheckSum        : LongWord;

    CampaignVariable: shortstring;

    MissionVariable : shortstring;

    GameTicks       : LongWord;

    OuchTauntTimer  : LongWord; // Timer which blocks sndOuch from being played too often and fast

    GameState       : TGameState;

    GameType        : TGameType;

    InputMask       : LongWord;

    GameFlags       : Longword;

    WorldEdge       : TWorldEdge;

    LeftImpactTimer : LongWord;

    RightImpactTimer: LongWord;

    TurnTimeLeft    : Longword;

    TurnClockActive : boolean;

    TagTurnTimeLeft : Longword;

    ReadyTimeLeft   : Longword;

    IsGetAwayTime   : boolean;

    GameOver        : boolean;

    cSuddenDTurns   : LongInt;

    LastSuddenDWarn : LongInt; // last round in which the last SD warning appeared. -2 = no warning so far

    cInitHealth     : LongInt; // initial hedgehog health (from game scheme. note the real hog health is sent directly

                               // from frontend, this is only used to inform Lua scripts)

    cDamagePercent  : LongInt;

    cMineDudPercent : LongWord;

    cTemplateFilter : LongInt;

    cFeatureSize    : LongInt;

    cMapGen         : TMapGen;

    cRopePercent    : LongWord;

    cGetAwayTime    : LongWord;

    cAdvancedMapGenMode: boolean;

    cHedgehogTurnTime: Longword;

    cMinesTime       : LongInt;

    cMaxAIThinkTime  : Longword;

    cHealthCaseProb  : LongInt;

    cHealthCaseAmount: LongInt;

    cWaterRise       : LongInt;

    cHealthDecrease  : LongInt;

    cCloudsNumber    : LongWord;

    cSDCloudsNumber  : LongWord;

    cTagsMask        : byte;

    cPrevTagsMask    : byte;

    zoom             : GLfloat; // current zoom

    ZoomValue        : GLfloat; // aimed zoom

    UserZoom         : GLfloat; // user-chosen initial and default zoom

    cWaterLine       : LongInt;

    cGearScrEdgesDist: LongInt;

    isAudioMuted     : boolean;

    // originally typed consts

    ExplosionBorderColorR,

    ExplosionBorderColorG,

    ExplosionBorderColorB,

    ExplosionBorderColorNoA,

    ExplosionBorderColor:  LongWord;

    IceColor            : LongWord;

    IceEdgeColor        : LongWord;

    WaterOpacity: byte;

    SDWaterOpacity: byte;

    GrayScale: Boolean;

    CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;

    LAND_WIDTH       : LongInt;

    LAND_HEIGHT      : LongInt;

    LAND_WIDTH_MASK  : LongWord;

    LAND_HEIGHT_MASK : LongWord;

    ChefHatTexture : PTexture;

    CrosshairTexture : PTexture;

    GenericHealthTexture : PTexture;

    cLeftScreenBorder     : LongInt;

    cRightScreenBorder    : LongInt;

    cScreenSpace          : Longword;

    cCaseFactor     : Longword;

    cMaxCaseDrops   : Longword; // Max. number of crates which can be in the game when dropping

    cLandMines      : Longword;

    cAirMines       : Longword;

    cExplosives     : Longword;

    cScriptName     : shortstring;

    cScriptParam    : shortstring;

    cSeed           : shortstring;

    cIsSoundEnabled : boolean; // If the sound system is enabled

    cVolumeDelta    : LongInt;

    cVolumeUpKey    : boolean;

    cVolumeDownKey  : boolean;

    cMuteToggle     : boolean; // Mute toggle requested

    cHasFocus       : boolean;

    cInactDelay     : Longword;

    bBetweenTurns   : boolean;

    bWaterRising    : boolean;

    bDuringWaterRise: boolean;

    CrosshairX      : LongInt;

    CrosshairY      : LongInt;

    CrosshairGear   : PGear;

    CursorMovementX : LongInt;

    CursorMovementY : LongInt;

    cWaveHeight     : LongInt;

    cDrownSpeed     : hwFloat;

    cDrownSpeedf    : real;

    cMaxWindSpeed   : hwFloat;

    cWindSpeed      : hwFloat;

    cWindSpeedf     : real;

    cElastic        : hwFloat;

    cGravity        : hwFloat;

    cGravityf       : real;

    cLowGravity     : boolean;

    cBuildMaxDist   : LongInt;

    cDamageModifier : hwFloat;

    cLaserSighting  : boolean;

    cLaserSightingSniper : boolean;

    cVampiric       : boolean;

    WeaponTooltipTex: PTexture;

    AmmoMenuInvalidated: boolean;

    AmmoRect        : TSDL_Rect;

    HHTexture       : PTexture;

    cMaxZoomLevel   : real;

    cMinZoomLevel   : real;

    cZoomDelta      : real;

    cZoomDeltaSmall : real;

    cMinMaxZoomLevelDelta : real;

    flagMakeCapture : boolean;

    flagDumpLand    : boolean;

    InitStepsFlags  : Longword;

    RealTicks       : Longword;

    AttackBar       : LongInt;

    WaterColorArray : array[0..7] of HwColor4f;

    SDWaterColorArray : array[0..7] of HwColor4f;

    ClanColorArray : array[0..Pred(cClanColors)] of Longword;

    TargetCursorPoint     : TPoint;

    CursorPoint           : TPoint;

    CursorPointDelta      : TPoint;

    TargetPoint           : TPoint;

    ScreenFade      : TScreenFade;

    ScreenFadeValue : LongInt;

    ScreenFadeSpeed : LongInt;

    InCinematicMode : boolean;

    CinematicSteps  : LongInt;

    CinematicBarH   : LongInt;

    CinematicScript : boolean;

    UIDisplay       : TUIDisplay;

    LocalMessage    : LongWord;

    Theme           : shortstring;

    disableLandBack : boolean;

    WorldDx: LongInt;

    WorldDy: LongInt;

    SpeechHogNumber: LongInt;

    // for tracking the limits of the visible grid based on cScaleFactor

    ViewLeftX, ViewRightX, ViewBottomY, ViewTopY, ViewWidth, ViewHeight: LongInt;

    // for debugging the view limits visually

    cViewLimitsDebug: boolean;

    dirtyLandTexCount: LongInt;

    hiTicks: Word;

    LuaGoals        : ansistring;

    LuaTemplateNumber : LongWord;

    // for EndTurn Lua call

    LuaEndTurnRequested: boolean;

    LuaNoEndTurnTaunts: boolean;

    // whether Lua requested to pause the clock

    LuaClockPaused: boolean;

    MaskedSounds : array[TSound] of boolean;

    LastVoice : TVoice;

    mobileRecord: TMobileRecord;

    MaxTextureSize: LongInt;

    SDLwindow: PSDL_Window;

    SDLGLcontext: PSDL_GLContext;

/////////////////////////////////////

//Buttons

{$IFDEF USE_TOUCH_INTERFACE}

    buttonScale: GLFloat;

    bounceButtonPressed: boolean;

    arrowUp, arrowDown, arrowLeft, arrowRight : TOnScreenWidget;

    firebutton, jumpWidget, AMWidget          : TOnScreenWidget;

    pauseButton, utilityWidget                : TOnScreenWidget;

    utilityWidget2                            : TOnScreenWidget;

{$ENDIF}

var

    // these consts are here because they would cause circular dependencies in uConsts/uTypes

    cPathz: array[TPathType] of shortstring;

const

    cPathzInit: array[TPathType] of shortstring = (

        '',                              // ptNone

        '//',                            // ptData

        '/Graphics',                     // ptGraphics

        '/Themes',                       // ptThemes

        '/Themes/Nature',                // ptCurrTheme

        '/Config',                       // ptConfig

        '/Config/Teams',                 // ptTeams

        '/Maps',                         // ptMaps

        '',                              // ptMapCurrent

        '/Demos',                        // ptDemos

        '/Sounds',                       // ptSounds

        '/Graphics/Graves',              // ptGraves

        '/Fonts',                        // ptFonts

        '/Forts',                        // ptForts

        '/Locale',                       // ptLocale

        '/Graphics/AmmoMenu',            // ptAmmoMenu

        '/Graphics/Hedgehog',            // ptHedgehog

        '/Sounds/voices',                // ptVoices

        '/Graphics/Hats',                // ptHats

        '/Graphics/Flags',               // ptFlags

        '/Missions/Maps',                // ptMissionMaps

        '/Graphics/SuddenDeath',         // ptSuddenDeath

        '/Graphics/Buttons',             // ptButton

        '/Shaders',                      // ptShaders

        '/Sounds/voices/Default'         // ptDefaultVoice

    );

var

    Fontz: array[THWFont] of THHFont;

const

    FontzInit: array[THWFont] of THHFont = (

            (Handle: nil;

            Height: 12*HDPIScaleFactor;

            style: TTF_STYLE_NORMAL;

            Name: 'DejaVuSans-Bold.ttf'),

            (Handle: nil;

            Height: 24*HDPIScaleFactor;

            style: TTF_STYLE_NORMAL;

            Name: 'DejaVuSans-Bold.ttf'),

            (Handle: nil;

            Height: 10*HDPIScaleFactor;

            style: TTF_STYLE_NORMAL;

            Name: 'DejaVuSans-Bold.ttf')

            {$IFNDEF MOBILE}, // remove chinese fonts for now

            (Handle: nil;

            Height: 12*HDPIScaleFactor;

            style: TTF_STYLE_NORMAL;

            Name: 'wqy-zenhei.ttc'),

            (Handle: nil;

            Height: 24*HDPIScaleFactor;

            style: TTF_STYLE_NORMAL;

            Name: 'wqy-zenhei.ttc'),

            (Handle: nil;

            Height: 10*HDPIScaleFactor;

            style: TTF_STYLE_NORMAL;

            Name: 'wqy-zenhei.ttc')

            {$ENDIF}

            );

var

    SpritesData: array[TSprite] of TSpriteData;

const

    SpritesDataInit: array[TSprite] of TSpriteData = (

            (FileName:  'BlueWater'; Path: ptCurrTheme;AltPath: ptGraphics; Texture: nil; Surface: nil;

            Width:   0; Height:  -1; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: true; getImageDimensions: true),// sprWater

            (FileName:     'Clouds'; Path: ptCurrTheme;AltPath: ptGraphics; Texture: nil; Surface: nil;

            Width: 256; Height:128; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHigh; getDimensions: false; getImageDimensions: true),// sprCloud

            (FileName:       'Bomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBomb

            (FileName:  'BigDigits'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBigDigit

            (FileName: 'BigDigitsGray'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBigDigitGray

            (FileName: 'BigDigitsGreen'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBigDigitGreen

            (FileName: 'BigDigitsRed'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBigDigitRed

            (FileName:      'Frame'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   4; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprFrame

            (FileName:        'Lag'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  65; Height: 65; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpLowest; getDimensions: false; getImageDimensions: true),// sprLag

            (FileName:      'Arrow'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprCursor

            (FileName:'BazookaShell'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBazookaShell

            (FileName:    'Targetp'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprTargetP

            (FileName:        'Bee'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprBee

            (FileName: 'SmokeTrace'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHighest; getDimensions: false; getImageDimensions: true),// sprSmokeTrace

            (FileName:   'RopeHook'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprRopeHook

            (FileName:     'Expl50'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHigh; getDimensions: false; getImageDimensions: true),// sprExplosion50

            (FileName:    'MineOff'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprMineOff

            (FileName:     'MineOn'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprMineOn

            (FileName:     'MineDead'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprMineDead

            (FileName:       'Case'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHigh; getDimensions: false; getImageDimensions: true),// sprCase

            (FileName:   'FirstAid'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHigh; getDimensions: false; getImageDimensions: true),// sprFAid

            (FileName:   'dynamite'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprDynamite

            (FileName:      'Power'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHigh; getDimensions: false; getImageDimensions: true),// sprPower

            (FileName:     'ClBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprClusterBomb

            (FileName: 'ClParticle'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprClusterParticle

            (FileName:      'Flame'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHighest; getDimensions: false; getImageDimensions: true),// sprFlame

            (FileName:   'horizont'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: false; checkSum: false; priority: tpHigh; getDimensions: true; getImageDimensions: true),// sprHorizont

            (FileName:  'horizontL'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: false; checkSum: false; priority: tpHigh; getDimensions: true; getImageDimensions: true),// sprHorizontL

            (FileName:  'horizontR'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: false; checkSum: false; priority: tpHigh; getDimensions: true; getImageDimensions: true),// sprHorizontR

            (FileName:        'Sky'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: false; checkSum: false; priority: tpHigh; getDimensions: true; getImageDimensions: true),// sprSky

            (FileName:       'SkyL'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: false; checkSum: false; priority: tpHigh; getDimensions: true; getImageDimensions: true),// sprSkyL

            (FileName:       'SkyR'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: false; checkSum: false; priority: tpHigh; getDimensions: true; getImageDimensions: true),// sprSkyR

            (FileName:   'Slot'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;

            Width: 32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: true; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAMSlot

            (FileName:      'Ammos_base'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: true; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAMAmmos

            (FileName:   'Ammos_bw_base'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: true; critical: true; checkSum: false; priority: tpHigh; getDimensions: false; getImageDimensions: true),// sprAMAmmosBW

            (FileName:   'SlotKeys'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAMSlotKeys

            (FileName:  'Corners'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  2; Height: 2; imageWidth: 0; imageHeight: 0; saveSurf: true; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAMCorners

            (FileName:     'Finger'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprFinger

            (FileName:    'AirBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAirBomb

            (FileName:   'Airplane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width: 256; Height: 128; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAirplane

            (FileName: 'amAirplane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  64; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAmAirplane

            (FileName:   'amGirder'; Path: ptCurrTheme; AltPath: ptGraphics; Texture: nil; Surface: nil;

            Width: 160; Height:160; imageWidth: 0; imageHeight: 0; saveSurf: true; critical: true; checkSum: true; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprAmGirder

            (FileName:     'hhMask'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: true; critical: true; checkSum: true; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprHHTelepMask

            (FileName:     'Switch'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprSwitch

            (FileName:  'Parachute'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprParachute

            (FileName:     'Target'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprTarget

            (FileName:   'RopeNode'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:   6; Height:  6; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpHighest; getDimensions: false; getImageDimensions: true),// sprRopeNode

            (FileName:   'thinking'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpLowest; getDimensions: false; getImageDimensions: true),// sprQuestion

            (FileName:   'PowerBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width: 256; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprPowerBar

            (FileName:    'WindBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width: 151; Height: 17; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprWindBar

            (FileName:      'WindL'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  80; Height: 13; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprWindL

            (FileName:      'WindR'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;

            Width:  80; Height: 13; imageWidth: 0; imageHeight: 0; saveSurf: false; critical: true; checkSum: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprWindR

{$IFDEF USE_TOUCH_INTERFACE}

            (FileName: 'firebutton'; Path: ptButtons; AltPath: ptNone; Texture: nil; Surface: nil;