42      TPathType  = (ptData, ptGraphics, ptThemes, ptThemeCurrent, ptTeams, ptMaps,

    42      TPathType  = (ptData, ptGraphics, ptThemes, ptThemeCurrent, ptTeams, ptMaps,

    43                    ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts);

    43                    ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts);

    44      TSprite    = (sprWater, sprCloud, sprBomb, sprBigDigit, sprFrame,

    44      TSprite    = (sprWater, sprCloud, sprBomb, sprBigDigit, sprFrame,

    45                    sprLag, sprArrow, sprGrenade, sprTargetP, sprUFO,

    45                    sprLag, sprArrow, sprGrenade, sprTargetP, sprUFO,

    46                    sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,

    46                    sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,

    48      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,

    48      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,

    49                    gtGrave, gtUFO, gtShotgunShot, gtActionTimer, gtPickHammer, gtRope,

    49                    gtGrave, gtUFO, gtShotgunShot, gtActionTimer, gtPickHammer, gtRope,

    50                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite);

    50                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite);

    51      TGearsType = set of TGearType;

    51      TGearsType = set of TGearType;

    52      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,

    52      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,

   148 

   148 

   149       capgrpStartGame     = 0;

   149       capgrpStartGame     = 0;

   150       capgrpAmmoinfo      = 1;

   150       capgrpAmmoinfo      = 1;

   151       capgrpNetSay        = 2;

   151       capgrpNetSay        = 2;

   152 

   152 

   156 

   160 

   157       cToggleConsoleKey     = 39;

   161       cToggleConsoleKey     = 39;

   158 

   162 

   159       NoPointX = Low(Integer); // константа для TargetPoint, показывает, что цель не указана

   163       NoPointX = Low(Integer); // константа для TargetPoint, показывает, что цель не указана

   160 

   164 

   230                      (FileName:'SmokeTrace.png'; Path: ptGraphics; Width:  32; Height: 32; hasAlpha:  true),// sprSmokeTrace

   234                      (FileName:'SmokeTrace.png'; Path: ptGraphics; Width:  32; Height: 32; hasAlpha:  true),// sprSmokeTrace

   231                      (FileName:  'RopeHook.png'; Path: ptGraphics; Width:  32; Height: 32; hasAlpha: false),// sprRopeHook

   235                      (FileName:  'RopeHook.png'; Path: ptGraphics; Width:  32; Height: 32; hasAlpha: false),// sprRopeHook

   232                      (FileName:    'Expl50.png'; Path: ptGraphics; Width:  64; Height: 64; hasAlpha: false),// sprExplosion50

   236                      (FileName:    'Expl50.png'; Path: ptGraphics; Width:  64; Height: 64; hasAlpha: false),// sprExplosion50

   233                      (FileName:   'MineOff.png'; Path: ptGraphics; Width:  16; Height: 16; hasAlpha: false),// sprMineOff

   237                      (FileName:   'MineOff.png'; Path: ptGraphics; Width:  16; Height: 16; hasAlpha: false),// sprMineOff

   234                      (FileName:    'MineOn.png'; Path: ptGraphics; Width:  16; Height: 16; hasAlpha: false),// sprMineOn

   238                      (FileName:    'MineOn.png'; Path: ptGraphics; Width:  16; Height: 16; hasAlpha: false),// sprMineOn

   236                      );

   241                      );

   237       Soundz: array[TSound] of record

   242       Soundz: array[TSound] of record

   238                                        FileName: String[31];

   243                                        FileName: String[31];

   239                                        Path    : TPathType;

   244                                        Path    : TPathType;

   240                                        id      : PMixChunk;

   245                                        id      : PMixChunk;