hedgewars/uConsts.pas
author unc0rr
Thu, 29 May 2008 20:57:24 +0000
changeset 964 4c6ff62c54d2
parent 961 a9a349b2b3fa
child 965 a4d5fc8eec7a
permissions -rw-r--r--
Update Italian translation
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
     1
(*
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
     2
 * Hedgewars, a worms-like game
883
07a568ba44e0 Update copyright info in source files headers
unc0rr
parents: 876
diff changeset
     3
 * Copyright (c) 2004-2008 Andrey Korotaev <unC0Rr@gmail.com>
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
     4
 *
183
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
     5
 * This program is free software; you can redistribute it and/or modify
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
     6
 * it under the terms of the GNU General Public License as published by
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
     7
 * the Free Software Foundation; version 2 of the License
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
     8
 *
183
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
     9
 * This program is distributed in the hope that it will be useful,
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
    10
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
    11
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
    12
 * GNU General Public License for more details.
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    13
 *
183
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
    14
 * You should have received a copy of the GNU General Public License
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
    15
 * along with this program; if not, write to the Free Software
57c2ef19f719 Relicense to GPL
unc0rr
parents: 176
diff changeset
    16
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    17
 *)
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    18
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    19
unit uConsts;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    20
interface
755
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
    21
uses SDLh, GL, uLocale;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    22
{$INCLUDE options.inc}
271
f2f9a3d5b441 Protocol version sets in CMake
unc0rr
parents: 267
diff changeset
    23
{$INCLUDE proto.inc}
689
f4ec46c48ed2 The rest of stuff converted to sprites
unc0rr
parents: 688
diff changeset
    24
type
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    25
946
42c5cc87cbd1 Preparing to have gsChat gamestate
unc0rr
parents: 941
diff changeset
    26
     TGameState = (gsLandGen, gsStart, gsGame, gsConsole, gsChat, gsExit);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    27
155
401f4ea24715 Engine can generate land preview and send it via IPC
unc0rr
parents: 112
diff changeset
    28
     TGameType  = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    29
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
    30
     TPathType  = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptTeams, ptMaps,
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
    31
                   ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts,
822
2ae8fd8ef804 Use 'rope gun' sprite
unc0rr
parents: 815
diff changeset
    32
                   ptLocale, ptAmmoMenu, ptHedgehog, ptVoices);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    33
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    34
     TSprite    = (sprWater, sprCloud, sprBomb, sprBigDigit, sprFrame,
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    35
                   sprLag, sprArrow, sprGrenade, sprTargetP, sprUFO,
10
edf56dca1587 - Mine weapon
unc0rr
parents: 9
diff changeset
    36
                   sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,
78
66bb79dd248d Cluster bomb
unc0rr
parents: 75
diff changeset
    37
                   sprMineOn, sprCase, sprFAid, sprDynamite, sprPower,
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
    38
                   sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
161
d8870bbf960e - AmmoMenu
unc0rr
parents: 155
diff changeset
    39
                   sprSky, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos,
283
28d105f378f1 Airplane sprite
unc0rr
parents: 282
diff changeset
    40
                   sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb,
534
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
    41
                   sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask,
688
e4d1fb310a66 Convert some stuff to sprites
unc0rr
parents: 621
diff changeset
    42
                   sprSwitch, sprParachute, sprTarget, sprRopeNode, sprConsoleBG,
823
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
    43
                   sprQuestion, sprPowerBar, sprWindBar, sprWindL, sprWindR,
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
    44
                   sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun,
847
66970c0ed3aa Use blowtorch sprites
unc0rr
parents: 845
diff changeset
    45
                   sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer,
876
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
    46
                   sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath,
961
a9a349b2b3fa Use turnsleft sprites to indicate turns left to activate ammo
unc0rr
parents: 959
diff changeset
    47
                   sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    48
803
3f73901a350a - Use cloud as 'visual gear'
unc0rr
parents: 802
diff changeset
    49
     TGearType  = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
83
207c85fbef51 - First hedgehog in team has first turn in team
unc0rr
parents: 82
diff changeset
    50
                   gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
49
3afe33c1cf06 - Teams health bars sorting
unc0rr
parents: 43
diff changeset
    51
                   gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
82
2f4f3236cccc - New fort
unc0rr
parents: 80
diff changeset
    52
                   gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
211
558476056205 Parachute
unc0rr
parents: 202
diff changeset
    53
                   gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
520
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
    54
                   gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
925
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
    55
                   gtTeleport, gtSmallDamage, gtSwitcher, gtTarget, gtMortar,
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
    56
                   gtWhip);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    57
803
3f73901a350a - Use cloud as 'visual gear'
unc0rr
parents: 802
diff changeset
    58
     TVisualGearType = (vgtFlake, vgtCloud);
802
ed5450a89b96 Start implementing 'visual gears' - gears, that don't need to be synchronized (clouds and flakes)
unc0rr
parents: 801
diff changeset
    59
16
b6f4b413dd41 - Various fixes for ammo cases
unc0rr
parents: 14
diff changeset
    60
     TGearsType = set of TGearType;
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    61
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    62
     TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    63
                   sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
799
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
    64
                   sndMineTick, sndPickhammer, sndGun, sndUFO, sndJump1, sndJump2,
815
82ff416301bd Use sounds 'stupid' and 'missed'
unc0rr
parents: 805
diff changeset
    65
                   sndJump3, sndYesSir, sndLaugh, sndIllGetYou, sndIncoming,
864
024369e09a53 Use some more sounds
unc0rr
parents: 863
diff changeset
    66
                   sndMissed, sndStupid, sndFirstBlood, sndBoring, sndByeBye,
867
dc7901b1120e - Use more sounds
unc0rr
parents: 866
diff changeset
    67
                   sndSameTeam, sndNutter, sndReinforce, sndTraitor, sndRegret,
873
9bec5af9b23c One more sound
unc0rr
parents: 870
diff changeset
    68
                   sndEnemyDown, sndCoward, sndHurry, sndWatchIt);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    69
82
2f4f3236cccc - New fort
unc0rr
parents: 80
diff changeset
    70
     TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
925
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
    71
                   amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
409
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
    72
                   amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
924
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
    73
                   amGirder, amTeleport, amSwitch, amMortar);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    74
522
ca089787f59d Tags with current damage
unc0rr
parents: 520
diff changeset
    75
     THWFont    = (fnt16, fntBig, fntSmall);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    76
174
0b2c5b22f644 Changeable volume
unc0rr
parents: 162
diff changeset
    77
     TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    78
869
daddcd31ef34 - New statistics
unc0rr
parents: 868
diff changeset
    79
     TStatInfoType = (siGameResult, siMaxStepDamage, siMaxStepKills, siKilledHHs);
306
7b61834edcf6 - Better blowtorch
unc0rr
parents: 305
diff changeset
    80
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    81
     THHFont    = record
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    82
                  Handle: PTTF_Font;
371
731ad6d27bd1 integer -> LongInt
unc0rr
parents: 351
diff changeset
    83
                  Height: LongInt;
731ad6d27bd1 integer -> LongInt
unc0rr
parents: 351
diff changeset
    84
                  style: LongInt;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    85
                  Name: string[15];
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    86
                  end;
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    87
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
    88
     PAmmo = ^TAmmo;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    89
     TAmmo = record
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    90
             Propz: LongWord;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    91
             Count: LongWord;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    92
             NumPerTurn: LongWord;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    93
             Timer: LongWord;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
    94
             Pos: LongWord;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    95
             AmmoType: TAmmoType;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    96
             end;
755
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
    97
     TTexture = record
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
    98
                id: GLuint;
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
    99
                w, h: LongInt;
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
   100
                end;
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
   101
     PTexture = ^TTexture;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   102
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   103
105
e7cb9bb4a9de - Fixed integer->longint
unc0rr
parents: 102
diff changeset
   104
const
43
e297fea1a2f3 - Removed dark pixels on the corners of health case
unc0rr
parents: 42
diff changeset
   105
      errmsgCreateSurface   = 'Error creating SDL surface';
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   106
      errmsgTransparentSet  = 'Error setting transparent color';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   107
      errmsgUnknownCommand  = 'Unknown command';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   108
      errmsgUnknownVariable = 'Unknown variable';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   109
      errmsgIncorrectUse    = 'Incorrect use';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   110
      errmsgShouldntRun     = 'This program shouldn''t be run manually';
615
b646b3c43369 - Add 'Mission Fail' trigger type
unc0rr
parents: 614
diff changeset
   111
      errmsgWrongNumber     = 'Wrong parameters number';
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   112
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   113
      msgLoading           = 'Loading ';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   114
      msgOK                = 'ok';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   115
      msgFailed            = 'failed';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   116
      msgGettingConfig     = 'Getting game config...';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   117
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   118
const
304
8096e69e839e Attack angle constraints
unc0rr
parents: 302
diff changeset
   119
      cMaxPower     = 1500;
8096e69e839e Attack angle constraints
unc0rr
parents: 302
diff changeset
   120
      cMaxAngle     = 2048;
8096e69e839e Attack angle constraints
unc0rr
parents: 302
diff changeset
   121
      cPowerDivisor = 1500;
621
8bdbc240f50f New game flag for non-destroyable land
unc0rr
parents: 615
diff changeset
   122
74
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   123
      MAXNAMELEN = 32;
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   124
760
23aaafa40b4e Now land texture renders properly
unc0rr
parents: 759
diff changeset
   125
      COLOR_LAND = $00FFFFFF;
64
9df467527ae5 - Start AI rewrite
unc0rr
parents: 56
diff changeset
   126
55
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   127
      cifRandomize = $00000001;
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   128
      cifTheme     = $00000002;
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   129
      cifMap       = $00000002; // either theme or map (or map+theme)
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   130
      cifAllInited = cifRandomize or
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   131
                     cifTheme or
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   132
                     cifMap;
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   133
188
a7c2a61524c2 Cardinal -> Longword
unc0rr
parents: 183
diff changeset
   134
      cTransparentColor: Longword = $000000;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   135
614
0e04504bc140 - Fix some warnings
unc0rr
parents: 601
diff changeset
   136
      cMaxTeams        = 6;
109
ab0340f580c2 - Initialize translations earlier
unc0rr
parents: 105
diff changeset
   137
      cMaxHHIndex      = 7;
423
5f4559ce7062 Better construction tool
unc0rr
parents: 411
diff changeset
   138
      cMaxHHs          = 30;
53
0e27949850e3 - Fixed bubble theme object
unc0rr
parents: 49
diff changeset
   139
      cMaxSpawnPoints  = 1024;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   140
22
517be8dc5b76 - Fixed spawning boxes under water
unc0rr
parents: 17
diff changeset
   141
      cMaxEdgePoints = 16384;
517be8dc5b76 - Fixed spawning boxes under water
unc0rr
parents: 17
diff changeset
   142
53
0e27949850e3 - Fixed bubble theme object
unc0rr
parents: 49
diff changeset
   143
      cHHRadius = 9;
70
82d93eeecebe - Many AI improvements
unc0rr
parents: 64
diff changeset
   144
      cHHStepTicks = 38;
509
fd58135a4407 Bots know shotgun behavior better
unc0rr
parents: 495
diff changeset
   145
294
92a7ccd67bb9 Current hedgehog is on top of others in Z-order
unc0rr
parents: 285
diff changeset
   146
      cHHZ = 1000;
92a7ccd67bb9 Current hedgehog is on top of others in Z-order
unc0rr
parents: 285
diff changeset
   147
      cCurrHHZ = Succ(cHHZ);
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   148
509
fd58135a4407 Bots know shotgun behavior better
unc0rr
parents: 495
diff changeset
   149
      cShotgunRadius = 22;
511
2b5b9e00419d - Further work on new collisions implementation
unc0rr
parents: 509
diff changeset
   150
      cBlowTorchC    = 6;
509
fd58135a4407 Bots know shotgun behavior better
unc0rr
parents: 495
diff changeset
   151
109
ab0340f580c2 - Initialize translations earlier
unc0rr
parents: 105
diff changeset
   152
      cKeyMaxIndex = 1023;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   153
97
e7c1df9cce2c - make the game be run from ${PREFIX}/bin with data in ${PREFIX}/share/hedgewars/Data
unc0rr
parents: 95
diff changeset
   154
      cMaxCaptions = 4;
e7c1df9cce2c - make the game be run from ${PREFIX}/bin with data in ${PREFIX}/share/hedgewars/Data
unc0rr
parents: 95
diff changeset
   155
601
78a68cc4d846 Special game mode allowing the only clan on map for training mode
unc0rr
parents: 590
diff changeset
   156
      gfForts       = $00000001;
614
0e04504bc140 - Fix some warnings
unc0rr
parents: 601
diff changeset
   157
      gfMultiWeapon = $00000002;
621
8bdbc240f50f New game flag for non-destroyable land
unc0rr
parents: 615
diff changeset
   158
      gfSolidLand   = $00000004;
601
78a68cc4d846 Special game mode allowing the only clan on map for training mode
unc0rr
parents: 590
diff changeset
   159
      gfOneClanMode = $10000000;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   160
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   161
      gstDrowning       = $00000001;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   162
      gstHHDriven       = $00000002;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   163
      gstMoving         = $00000004;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   164
      gstAttacked       = $00000008;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   165
      gstAttacking      = $00000010;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   166
      gstCollision      = $00000020;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   167
      gstHHChooseTarget = $00000040;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   168
      gstHHJumping      = $00000100;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   169
      gsttmpFlag        = $00000200;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   170
      gstHHThinking     = $00000800;
79
29b477319854 - New test map
unc0rr
parents: 78
diff changeset
   171
      gstNoDamage       = $00001000;
424
4598c21bb421 Disable cheat trick with hjump
unc0rr
parents: 423
diff changeset
   172
      gstHHHJump        = $00002000;
511
2b5b9e00419d - Further work on new collisions implementation
unc0rr
parents: 509
diff changeset
   173
      gstAnimation      = $00004000;
868
4884bce5e5eb Hedgehog death animation
unc0rr
parents: 867
diff changeset
   174
      gstHHDeath        = $00008000;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   175
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   176
      gm_Left   = $00000001;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   177
      gm_Right  = $00000002;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   178
      gm_Up     = $00000004;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   179
      gm_Down   = $00000008;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   180
      gm_Switch = $00000010;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   181
      gm_Attack = $00000020;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   182
      gm_LJump  = $00000040;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   183
      gm_HJump  = $00000080;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   184
      gm_Destroy= $00000100;
783
4f59db6f147d - New command 'set weapon'
unc0rr
parents: 776
diff changeset
   185
      gm_Slot   = $00000200; // with param
4f59db6f147d - New command 'set weapon'
unc0rr
parents: 776
diff changeset
   186
      gm_Weapon = $00000400; // with param
926
d231e007452a Timer as hedgehog message (avoid possible desync in very rare cases)
unc0rr
parents: 925
diff changeset
   187
      gm_Timer  = $00000800; // with param
936
ba582673db7d Fix 'AI may break demos playing' message while loading saves
unc0rr
parents: 931
diff changeset
   188
      gmAllStoppable = gm_Left or gm_Right or gm_Up or gm_Down or gm_Attack;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   189
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   190
      cMaxSlotIndex       = 8;
409
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   191
      cMaxSlotAmmoIndex   = 2;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   192
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   193
      ammoprop_Timerable    = $00000001;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   194
      ammoprop_Power        = $00000002;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   195
      ammoprop_NeedTarget   = $00000004;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   196
      ammoprop_ForwMsgs     = $00000008;
542
ec26095f1bed - Get rid of ammoProp_AttackInFall and gstFalling
unc0rr
parents: 534
diff changeset
   197
      ammoprop_AttackInMove = $00000010;
13
7a5db822fd3f - Show no crosshair when using mine
unc0rr
parents: 10
diff changeset
   198
      ammoprop_NoCrosshair  = $00000040;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   199
      ammoprop_AttackingPut = $00000080;
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   200
      ammoprop_DontHold     = $00000100;
928
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   201
      ammoprop_AltAttack    = $00000200;
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   202
      ammoprop_AltUse       = $00000400;
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   203
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   204
      AMMO_INFINITE = High(LongWord);
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   205
42
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   206
      EXPLAllDamageInRadius = $00000001;
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   207
      EXPLAutoSound         = $00000002;
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   208
      EXPLNoDamage          = $00000004;
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   209
      EXPLDoNotTouchHH      = $00000008;
305
1c1cd66ffcdc Better blowtorch
unc0rr
parents: 304
diff changeset
   210
      EXPLDontDraw          = $00000010;
42
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   211
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   212
      posCaseAmmo    = $00000001;
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   213
      posCaseHealth  = $00000002;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   214
371
731ad6d27bd1 integer -> LongInt
unc0rr
parents: 351
diff changeset
   215
      NoPointX = Low(LongInt);
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   216
74
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   217
      cHHFileName   = 'Hedgehog';
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   218
      cCHFileName   = 'Crosshair';
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   219
      cThemeCFGFilename = 'theme.cfg';
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   220
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   221
      Fontz: array[THWFont] of THHFont = (
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   222
                                         (Handle: nil;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   223
                                          Height: 12;
202
8603c0420461 Support font styles
unc0rr
parents: 199
diff changeset
   224
                                          style: TTF_STYLE_NORMAL;
74
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   225
                                          Name: 'DejaVuSans.ttf'),
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   226
                                         (Handle: nil;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   227
                                          Height: 24;
202
8603c0420461 Support font styles
unc0rr
parents: 199
diff changeset
   228
                                          style: TTF_STYLE_NORMAL;
522
ca089787f59d Tags with current damage
unc0rr
parents: 520
diff changeset
   229
                                          Name: 'DejaVuSans.ttf'),
ca089787f59d Tags with current damage
unc0rr
parents: 520
diff changeset
   230
                                         (Handle: nil;
ca089787f59d Tags with current damage
unc0rr
parents: 520
diff changeset
   231
                                          Height: 10;
ca089787f59d Tags with current damage
unc0rr
parents: 520
diff changeset
   232
                                          style: TTF_STYLE_NORMAL;
74
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   233
                                          Name: 'DejaVuSans.ttf')
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   234
                                         );
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   235
202
8603c0420461 Support font styles
unc0rr
parents: 199
diff changeset
   236
      FontBorder = 2;
8603c0420461 Support font styles
unc0rr
parents: 199
diff changeset
   237
99
fd9613278d1b - On windows make packages with all needed dlls
unc0rr
parents: 97
diff changeset
   238
      PathPrefix: string = './';
fd9613278d1b - On windows make packages with all needed dlls
unc0rr
parents: 97
diff changeset
   239
      Pathz: array[TPathType] of string      = (
805
4d75759b38bd Flakes concept, still need some development
unc0rr
parents: 803
diff changeset
   240
                                               '',                              // ptNone
267
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   241
                                               '',                              // ptData
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   242
                                               'Graphics',                      // ptGraphics
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   243
                                               'Themes',                        // ptThemes
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   244
                                               'Themes/avematan',               // ptCurrTheme
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   245
                                               'Teams',                         // ptTeams
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   246
                                               'Maps',                          // ptMaps
53
0e27949850e3 - Fixed bubble theme object
unc0rr
parents: 49
diff changeset
   247
                                               '',                              // ptMapCurrent
267
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   248
                                               'Demos',                         // ptDemos
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   249
                                               'Sounds',                        // ptSounds
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   250
                                               'Graphics/Graves',               // ptGraves
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   251
                                               'Fonts',                         // ptFonts
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   252
                                               'Forts',                         // ptForts
bf7c1503f569 Engine gets Data path from frontend
unc0rr
parents: 263
diff changeset
   253
                                               'Locale',                        // ptLocale
799
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   254
                                               'Graphics/AmmoMenu',             // ptAmmoMenu
822
2ae8fd8ef804 Use 'rope gun' sprite
unc0rr
parents: 815
diff changeset
   255
                                               'Graphics/Hedgehog',             // ptHedgehog
799
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   256
                                               'Sounds/voices'                  // ptVoices
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   257
                                               );
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   258
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   259
      SpritesData: array[TSprite] of record
35
9367f246fb5f - New rope
unc0rr
parents: 22
diff changeset
   260
                     FileName: String[31];
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   261
                     Path, AltPath: TPathType;
755
edf26e9554ac Now show sprites too
unc0rr
parents: 708
diff changeset
   262
                     Texture: PTexture;
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   263
                     Surface: PSDL_Surface;
371
731ad6d27bd1 integer -> LongInt
unc0rr
parents: 351
diff changeset
   264
                     Width, Height: LongInt;
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   265
                     saveSurf: boolean;
35
9367f246fb5f - New rope
unc0rr
parents: 22
diff changeset
   266
                     end = (
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   267
                     (FileName:  'BlueWater'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
793
c4a790225799 - Massive images update by Tiyuri
unc0rr
parents: 783
diff changeset
   268
                      Width: 256; Height: 32; saveSurf: false),// sprWater
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   269
                     (FileName: 'Clouds'; Path: ptCurrTheme;AltPath: ptGraphics; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   270
                      Width: 256; Height:128; saveSurf: false),// sprCloud
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   271
                     (FileName:       'Bomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
776
8fc7e59d9cb4 Convert the rest of rotated sprites to be rotated by OpenGL
unc0rr
parents: 775
diff changeset
   272
                      Width:   8; Height:  8; saveSurf: false),// sprBomb
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   273
                     (FileName:  'BigDigits'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   274
                      Width:  32; Height: 32; saveSurf: false),// sprBigDigit
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   275
                     (FileName:      'Frame'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   276
                      Width:   4; Height: 32; saveSurf: false),// sprFrame
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   277
                     (FileName:        'Lag'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   278
                      Width:  65; Height: 65; saveSurf: false),// sprLag
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   279
                     (FileName:      'Arrow'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   280
                      Width:  16; Height: 16; saveSurf: false),// sprCursor
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   281
                     (FileName:    'Grenade'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
775
23c253aae336 - Some optimizations
unc0rr
parents: 769
diff changeset
   282
                      Width:  16; Height: 16; saveSurf: false),// sprGrenade
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   283
                     (FileName:    'Targetp'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   284
                      Width:  32; Height: 32; saveSurf: false),// sprTargetP
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   285
                     (FileName:        'UFO'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   286
                      Width:  32; Height: 32; saveSurf: false),// sprUFO
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   287
                     (FileName: 'SmokeTrace'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   288
                      Width:  32; Height: 32; saveSurf: false),// sprSmokeTrace
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   289
                     (FileName:   'RopeHook'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
776
8fc7e59d9cb4 Convert the rest of rotated sprites to be rotated by OpenGL
unc0rr
parents: 775
diff changeset
   290
                      Width:  16; Height: 16; saveSurf: false),// sprRopeHook
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   291
                     (FileName:     'Expl50'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   292
                      Width:  64; Height: 64; saveSurf: false),// sprExplosion50
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   293
                     (FileName:    'MineOff'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
776
8fc7e59d9cb4 Convert the rest of rotated sprites to be rotated by OpenGL
unc0rr
parents: 775
diff changeset
   294
                      Width:   8; Height:  8; saveSurf: false),// sprMineOff
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   295
                     (FileName:     'MineOn'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
776
8fc7e59d9cb4 Convert the rest of rotated sprites to be rotated by OpenGL
unc0rr
parents: 775
diff changeset
   296
                      Width:   8; Height:  8; saveSurf: false),// sprMineOn
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   297
                     (FileName:       'Case'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   298
                      Width:  32; Height: 32; saveSurf: false),// sprCase
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   299
                     (FileName:   'FirstAid'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   300
                      Width:  48; Height: 48; saveSurf: false),// sprFAid
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   301
                     (FileName:   'dynamite'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   302
                      Width:  32; Height: 32; saveSurf: false),// sprDynamite
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   303
                     (FileName:      'Power'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   304
                      Width:  32; Height: 32; saveSurf: false),// sprPower
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   305
                     (FileName:     'ClBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   306
                      Width:  16; Height: 16; saveSurf: false),// sprClusterBomb
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   307
                     (FileName: 'ClParticle'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   308
                      Width:  16; Height: 16; saveSurf: false),// sprClusterParticle
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   309
                     (FileName:      'Flame'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   310
                      Width:  16; Height: 16; saveSurf: false),// sprFlame
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   311
                     (FileName:   'horizont'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   312
                      Width:   0; Height:  0; saveSurf: false),// sprHorizont
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   313
                     (FileName:        'Sky'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   314
                      Width:   0; Height:  0; saveSurf: false),// sprSky
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   315
                     (FileName:  'BrdrLines'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   316
                      Width: 202; Height:  1; saveSurf: false),// sprAMBorders
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   317
                     (FileName:       'Slot'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   318
                      Width: 202; Height: 33; saveSurf: false),// sprAMSlot
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   319
                     (FileName:   'AmmoName'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   320
                      Width: 202; Height: 33; saveSurf: false),// sprAMSlotName
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   321
                     (FileName:      'Ammos'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   322
                      Width:  32; Height: 32; saveSurf: false),// sprAMAmmos
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   323
                     (FileName:   'SlotKeys'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   324
                      Width:  32; Height: 32; saveSurf: false),// sprAMSlotKeys
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   325
                     (FileName:  'Selection'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   326
                      Width:  32; Height: 32; saveSurf: false),// sprAMSelection
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   327
                     (FileName:     'Finger'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   328
                      Width:  32; Height: 48; saveSurf: false),// sprFinger
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   329
                     (FileName:    'AirBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
776
8fc7e59d9cb4 Convert the rest of rotated sprites to be rotated by OpenGL
unc0rr
parents: 775
diff changeset
   330
                      Width:  16; Height: 16; saveSurf: false),// sprAirBomb
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   331
                     (FileName:   'Airplane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   332
                      Width: 125; Height: 42; saveSurf: false),// sprAirplane
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   333
                     (FileName: 'amAirplane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
776
8fc7e59d9cb4 Convert the rest of rotated sprites to be rotated by OpenGL
unc0rr
parents: 775
diff changeset
   334
                      Width:  64; Height: 32; saveSurf: false),// sprAmAirplane
769
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   335
                     (FileName:   'amGirder'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   336
                      Width: 160; Height:160; saveSurf:  true),// sprAmGirder
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   337
                     (FileName:     'hhMask'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   338
                      Width:  32; Height: 32; saveSurf:  true),// sprHHTelepMask
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   339
                     (FileName:     'Switch'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   340
                      Width:  32; Height: 32; saveSurf: false),// sprSwitch
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   341
                     (FileName:  'Parachute'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   342
                      Width:  48; Height: 48; saveSurf: false),// sprParachute
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   343
                     (FileName:     'Target'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   344
                      Width:  32; Height: 32; saveSurf: false),// sprTarget
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   345
                     (FileName:   'RopeNode'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   346
                      Width:   6; Height:  6; saveSurf: false),// sprRopeNode
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   347
                     (FileName:    'Console'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   348
                      Width: 256; Height:256; saveSurf: false),// sprConsoleBG
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   349
                     (FileName:   'thinking'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   350
                      Width:  32; Height: 32; saveSurf: false),// sprQuestion
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   351
                     (FileName:   'PowerBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   352
                      Width: 256; Height: 32; saveSurf: false),// sprPowerBar
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   353
                     (FileName:    'WindBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   354
                      Width: 151; Height: 17; saveSurf: false),// sprWindBar
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   355
                     (FileName:      'WindL'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   356
                      Width:  80; Height: 13; saveSurf: false),// sprWindL
788efc1d649f - Save 8 MB of memory by freeing LandSurface and not using it anymore after game initialization
unc0rr
parents: 760
diff changeset
   357
                     (FileName:      'WindR'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
805
4d75759b38bd Flakes concept, still need some development
unc0rr
parents: 803
diff changeset
   358
                      Width:  80; Height: 13; saveSurf: false),// sprWindR
4d75759b38bd Flakes concept, still need some development
unc0rr
parents: 803
diff changeset
   359
                     (FileName:      'Flake'; Path:ptCurrTheme; AltPath: ptNone; Texture: nil; Surface: nil;
822
2ae8fd8ef804 Use 'rope gun' sprite
unc0rr
parents: 815
diff changeset
   360
                      Width:  64; Height: 64; saveSurf: false),// sprFlake
2ae8fd8ef804 Use 'rope gun' sprite
unc0rr
parents: 815
diff changeset
   361
                     (FileName:     'amRope'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
823
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
   362
                      Width:  32; Height: 32; saveSurf: false),// sprHandRope
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
   363
                     (FileName:  'amBazooka'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
   364
                      Width:  32; Height: 32; saveSurf: false),// sprHandBazooka
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
   365
                     (FileName:  'amShotgun'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
876
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
   366
                      Width:  64; Height: 64; saveSurf: false),// sprHandShotgun
823
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
   367
                     (FileName:   'amDEagle'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
876
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
   368
                      Width:  64; Height: 64; saveSurf: false),// sprHandDEagle
825
4b32f282f9d7 Use hedgehog with air attack weapon sprite
unc0rr
parents: 823
diff changeset
   369
                     (FileName:'amAirAttack'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
834
5687fa57a6c1 - Use baseball-in-hand sprite
unc0rr
parents: 830
diff changeset
   370
                      Width:  32; Height: 32; saveSurf: false),// sprHandAirAttack
5687fa57a6c1 - Use baseball-in-hand sprite
unc0rr
parents: 830
diff changeset
   371
                     (FileName: 'amBaseball'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
845
ca72cf446ec2 Add sprite for pickhammer
unc0rr
parents: 844
diff changeset
   372
                      Width:  32; Height: 32; saveSurf: false),// sprHandBaseball
ca72cf446ec2 Add sprite for pickhammer
unc0rr
parents: 844
diff changeset
   373
                     (FileName:     'Hammer'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
847
66970c0ed3aa Use blowtorch sprites
unc0rr
parents: 845
diff changeset
   374
                      Width:  32; Height: 64; saveSurf: false),// sprPHammer
66970c0ed3aa Use blowtorch sprites
unc0rr
parents: 845
diff changeset
   375
                     (FileName: 'amBTorch_i'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
66970c0ed3aa Use blowtorch sprites
unc0rr
parents: 845
diff changeset
   376
                      Width:  32; Height: 32; saveSurf: false),// sprHandBlowToch
66970c0ed3aa Use blowtorch sprites
unc0rr
parents: 845
diff changeset
   377
                     (FileName: 'amBTorch_w'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
853
0b4a23795530 Teleport animation
unc0rr
parents: 847
diff changeset
   378
                      Width:  32; Height: 32; saveSurf: false),// sprBlowToch
0b4a23795530 Teleport animation
unc0rr
parents: 847
diff changeset
   379
                     (FileName:   'Teleport'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
868
4884bce5e5eb Hedgehog death animation
unc0rr
parents: 867
diff changeset
   380
                      Width:  64; Height: 32; saveSurf: false),// sprTeleport
4884bce5e5eb Hedgehog death animation
unc0rr
parents: 867
diff changeset
   381
                     (FileName:    'HHDeath'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
876
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
   382
                      Width:  32; Height: 64; saveSurf: false),// sprHHDeath
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
   383
                     (FileName:'amShotgun_w'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
   384
                      Width:  64; Height: 64; saveSurf: false),// sprShotgun
d5b6e0ae5755 Desert Eagle and Shotgun shot animations
unc0rr
parents: 873
diff changeset
   385
                     (FileName: 'amDEagle_w'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
954
0cc31e998f4e Idle hedgehog animation
unc0rr
parents: 946
diff changeset
   386
                      Width:  64; Height: 64; saveSurf: false),// sprDEagle
0cc31e998f4e Idle hedgehog animation
unc0rr
parents: 946
diff changeset
   387
                     (FileName:       'Idle'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
959
18b05fc2d0a6 Mortar sprite
unc0rr
parents: 954
diff changeset
   388
                      Width:  32; Height: 32; saveSurf: false),// sprHHIdle
18b05fc2d0a6 Mortar sprite
unc0rr
parents: 954
diff changeset
   389
                     (FileName:     'Mortar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
961
a9a349b2b3fa Use turnsleft sprites to indicate turns left to activate ammo
unc0rr
parents: 959
diff changeset
   390
                      Width:  16; Height: 16; saveSurf: false),// sprMortar
a9a349b2b3fa Use turnsleft sprites to indicate turns left to activate ammo
unc0rr
parents: 959
diff changeset
   391
                     (FileName:  'TurnsLeft'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
a9a349b2b3fa Use turnsleft sprites to indicate turns left to activate ammo
unc0rr
parents: 959
diff changeset
   392
                      Width:  16; Height: 16; saveSurf: false) // sprTurnsLeft
35
9367f246fb5f - New rope
unc0rr
parents: 22
diff changeset
   393
                     );
688
e4d1fb310a66 Convert some stuff to sprites
unc0rr
parents: 621
diff changeset
   394
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   395
      Soundz: array[TSound] of record
799
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   396
                FileName: String[31];
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   397
                Path    : TPathType;
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   398
                id      : PMixChunk;
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   399
                lastChan: LongInt;
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   400
                end = (
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   401
                (FileName: 'grenadeimpact.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndGrenadeImpact
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   402
                (FileName:     'explosion.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndExplosion
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   403
                (FileName:  'throwpowerup.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndThrowPowerUp
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   404
                (FileName:  'throwrelease.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndThrowRelease
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   405
                (FileName:        'splash.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndSplash
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   406
                (FileName: 'shotgunreload.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndShotgunReload
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   407
                (FileName:   'shotgunfire.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndShotgunFire
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   408
                (FileName:   'graveimpact.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndGraveImpact
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   409
                (FileName:      'minetick.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndMineTicks
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   410
                (FileName:    'pickhammer.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndPickhammer
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   411
                (FileName:           'gun.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndGun
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   412
                (FileName:           'ufo.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndUFO
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   413
                (FileName:         'Jump1.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndJump1
71ba310da909 - Commit voice sounds by Stephen Alexander
unc0rr
parents: 793
diff changeset
   414
                (FileName:         'Jump2.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndJump2
800
e95f16b7ec80 - Your hedgehogs says you: "Yes, sir"
unc0rr
parents: 799
diff changeset
   415
                (FileName:         'Jump3.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndJump3
e95f16b7ec80 - Your hedgehogs says you: "Yes, sir"
unc0rr
parents: 799
diff changeset
   416
                (FileName:        'Yessir.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndYesSir
801
0323e5c7ee54 - 'Incoming!' shout when the plane appears
unc0rr
parents: 800
diff changeset
   417
                (FileName:         'Laugh.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndLaugh
0323e5c7ee54 - 'Incoming!' shout when the plane appears
unc0rr
parents: 800
diff changeset
   418
                (FileName:     'Illgetyou.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndIllGetYou
815
82ff416301bd Use sounds 'stupid' and 'missed'
unc0rr
parents: 805
diff changeset
   419
                (FileName:      'Incoming.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndIncoming
82ff416301bd Use sounds 'stupid' and 'missed'
unc0rr
parents: 805
diff changeset
   420
                (FileName:        'Missed.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndMissed
829
1209eb768acf Use 'first blood' sound
unc0rr
parents: 825
diff changeset
   421
                (FileName:        'Stupid.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndStupid
863
dfa3aa51ecb5 Merge some more sounds
unc0rr
parents: 853
diff changeset
   422
                (FileName:    'Firstblood.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndFirstBlood
dfa3aa51ecb5 Merge some more sounds
unc0rr
parents: 853
diff changeset
   423
                (FileName:        'Boring.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndBoring
864
024369e09a53 Use some more sounds
unc0rr
parents: 863
diff changeset
   424
                (FileName:        'Byebye.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndByeBye
024369e09a53 Use some more sounds
unc0rr
parents: 863
diff changeset
   425
                (FileName:      'Sameteam.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndSameTeam
865
a4a5ec6c61d4 - Fix introduced bug with hh physics
unc0rr
parents: 864
diff changeset
   426
                (FileName:        'Nutter.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndNutter
866
ac6f6c95c23f - Some more sounds
unc0rr
parents: 865
diff changeset
   427
                (FileName:'Reinforcements.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndReinforce
ac6f6c95c23f - Some more sounds
unc0rr
parents: 865
diff changeset
   428
                (FileName:       'Traitor.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndTraitor
867
dc7901b1120e - Use more sounds
unc0rr
parents: 866
diff changeset
   429
                (FileName:'Youllregretthat.ogg';Path: ptVoices; id: nil; lastChan: 0),// sndRegret
870
dd418d9c18c5 Use more sounds
unc0rr
parents: 869
diff changeset
   430
                (FileName:     'Enemydown.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndEnemyDown
dd418d9c18c5 Use more sounds
unc0rr
parents: 869
diff changeset
   431
                (FileName:        'Coward.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndCoward
873
9bec5af9b23c One more sound
unc0rr
parents: 870
diff changeset
   432
                (FileName:         'Hurry.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndHurry
9bec5af9b23c One more sound
unc0rr
parents: 870
diff changeset
   433
                (FileName:       'Watchit.ogg'; Path: ptVoices; id: nil; lastChan: 0) // sndWatchIt
815
82ff416301bd Use sounds 'stupid' and 'missed'
unc0rr
parents: 805
diff changeset
   434
                );
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   435
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   436
      Ammoz: array [TAmmoType] of record
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   437
                                  NameId: TAmmoStrId;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   438
                                  NameTex: PTexture;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   439
                                  Probability, NumberInCase: Longword;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   440
                                  Ammo: TAmmo;
112
ca5f06017e99 Fix use of slot 8 and avoid such bug in future
unc0rr
parents: 109
diff changeset
   441
                                  Slot: 0..cMaxSlotIndex;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   442
                                  TimeAfterTurn: Longword;
304
8096e69e839e Attack angle constraints
unc0rr
parents: 302
diff changeset
   443
                                  minAngle, maxAngle: Longword;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   444
                                  isDamaging: boolean;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   445
                                  SkipTurns: Longword;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   446
                                  PosCount: Longword;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   447
                                  PosSprite: TSprite;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   448
                                  end = (
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   449
                                  (NameId: sidGrenade;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   450
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   451
                                   Probability: 0;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   452
                                   NumberInCase: 1;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   453
                                   Ammo: (Propz: ammoprop_Timerable or
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   454
                                                 ammoprop_Power or
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   455
                                                 ammoprop_AltUse;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   456
                                          Count: AMMO_INFINITE;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   457
                                          NumPerTurn: 0;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   458
                                          Timer: 3000;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   459
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   460
                                          AmmoType: amGrenade);
10
edf56dca1587 - Mine weapon
unc0rr
parents: 9
diff changeset
   461
                                   Slot: 1;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   462
                                   TimeAfterTurn: 3000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   463
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   464
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   465
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   466
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   467
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   468
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   469
                                  (NameId: sidClusterBomb;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   470
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   471
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   472
                                   NumberInCase: 3;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   473
                                   Ammo: (Propz: ammoprop_Timerable or
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   474
                                                 ammoprop_Power or
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   475
                                                 ammoprop_AltUse;
78
66bb79dd248d Cluster bomb
unc0rr
parents: 75
diff changeset
   476
                                          Count: 5;
66bb79dd248d Cluster bomb
unc0rr
parents: 75
diff changeset
   477
                                          NumPerTurn: 0;
66bb79dd248d Cluster bomb
unc0rr
parents: 75
diff changeset
   478
                                          Timer: 3000;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   479
                                          Pos: 0;
78
66bb79dd248d Cluster bomb
unc0rr
parents: 75
diff changeset
   480
                                          AmmoType: amClusterBomb);
66bb79dd248d Cluster bomb
unc0rr
parents: 75
diff changeset
   481
                                   Slot: 1;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   482
                                   TimeAfterTurn: 3000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   483
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   484
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   485
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   486
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   487
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   488
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   489
                                  (NameId: sidBazooka;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   490
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   491
                                   Probability: 0;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   492
                                   NumberInCase: 1;
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   493
                                   Ammo: (Propz: ammoprop_Power or
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   494
                                                 ammoprop_AltUse;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   495
                                          Count: AMMO_INFINITE;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   496
                                          NumPerTurn: 0;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   497
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   498
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   499
                                          AmmoType: amBazooka);
10
edf56dca1587 - Mine weapon
unc0rr
parents: 9
diff changeset
   500
                                   Slot: 0;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   501
                                   TimeAfterTurn: 3000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   502
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   503
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   504
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   505
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   506
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   507
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   508
                                  (NameId: sidUFO;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   509
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   510
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   511
                                   NumberInCase: 1;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   512
                                   Ammo: (Propz: ammoprop_Power or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   513
                                                 ammoprop_NeedTarget or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   514
                                                 ammoprop_DontHold;
56
a29135563e94 - Replaced water sprite
unc0rr
parents: 55
diff changeset
   515
                                          Count: 2;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   516
                                          NumPerTurn: 0;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   517
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   518
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   519
                                          AmmoType: amUFO);
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   520
                                   Slot: 0;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   521
                                   TimeAfterTurn: 3000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   522
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   523
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   524
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   525
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   526
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   527
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   528
                                  (NameId: sidShotgun;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   529
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   530
                                   Probability: 0;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   531
                                   NumberInCase: 1;
95
1ef5e2c41115 - Fixed compilation
unc0rr
parents: 83
diff changeset
   532
                                   Ammo: (Propz: ammoprop_ForwMsgs;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   533
                                          Count: AMMO_INFINITE;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   534
                                          NumPerTurn: 1;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   535
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   536
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   537
                                          AmmoType: amShotgun);
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   538
                                   Slot: 2;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   539
                                   TimeAfterTurn: 3000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   540
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   541
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   542
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   543
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   544
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   545
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   546
                                  (NameId: sidPickHammer;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   547
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   548
                                   Probability: 0;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   549
                                   NumberInCase: 1;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   550
                                   Ammo: (Propz: ammoprop_ForwMsgs or
542
ec26095f1bed - Get rid of ammoProp_AttackInFall and gstFalling
unc0rr
parents: 534
diff changeset
   551
                                                 ammoprop_AttackInMove or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   552
                                                 ammoprop_NoCrosshair or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   553
                                                 ammoprop_DontHold;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   554
                                          Count: 2;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   555
                                          NumPerTurn: 0;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   556
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   557
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   558
                                          AmmoType: amPickHammer);
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   559
                                   Slot: 6;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   560
                                   TimeAfterTurn: 0;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   561
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   562
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   563
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   564
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   565
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   566
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   567
                                  (NameId: sidSkip;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   568
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   569
                                   Probability: 0;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   570
                                   NumberInCase: 1;
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   571
                                   Ammo: (Propz: ammoprop_DontHold;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   572
                                          Count: AMMO_INFINITE;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   573
                                          NumPerTurn: 0;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   574
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   575
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   576
                                          AmmoType: amSkip);
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   577
                                   Slot: 8;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   578
                                   TimeAfterTurn: 0;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   579
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   580
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   581
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   582
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   583
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   584
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   585
                                  (NameId: sidRope;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   586
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   587
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   588
                                   NumberInCase: 3;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   589
                                   Ammo: (Propz: ammoprop_ForwMsgs or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   590
                                                 ammoprop_AttackInMove or
928
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   591
                                                 ammoprop_DontHold or
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   592
                                                 ammoprop_AltAttack;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   593
                                          Count: 5;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   594
                                          NumPerTurn: 0;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   595
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   596
                                          Pos: 0;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   597
                                          AmmoType: amRope);
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   598
                                   Slot: 7;
304
8096e69e839e Attack angle constraints
unc0rr
parents: 302
diff changeset
   599
                                   TimeAfterTurn: 0;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   600
                                   minAngle: 0;
823
90d651e75547 Use ammo-in-hand sprites for desert eagle, shotgun and bazooka
unc0rr
parents: 822
diff changeset
   601
                                   maxAngle: cMaxAngle div 2;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   602
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   603
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   604
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   605
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   606
                                  (NameId: sidMine;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   607
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   608
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   609
                                   NumberInCase: 1;
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   610
                                   Ammo: (Propz: ammoprop_NoCrosshair or
931
ab4d98858a40 Fix some bugs with dropping from parachute
unc0rr
parents: 930
diff changeset
   611
                                                 ammoprop_AttackInMove or
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   612
                                                 ammoprop_DontHold or
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   613
                                                 ammoprop_AltUse;
56
a29135563e94 - Replaced water sprite
unc0rr
parents: 55
diff changeset
   614
                                          Count: 2;
10
edf56dca1587 - Mine weapon
unc0rr
parents: 9
diff changeset
   615
                                          NumPerTurn: 0;
edf56dca1587 - Mine weapon
unc0rr
parents: 9
diff changeset
   616
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   617
                                          Pos: 0;
10
edf56dca1587 - Mine weapon
unc0rr
parents: 9
diff changeset
   618
                                          AmmoType: amMine);
79
29b477319854 - New test map
unc0rr
parents: 78
diff changeset
   619
                                   Slot: 4;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   620
                                   TimeAfterTurn: 5000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   621
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   622
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   623
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   624
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   625
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   626
                                   PosSprite: sprWater),
80
3c3dc6a148ca - Fixed bug with hedgehog under water using rope
unc0rr
parents: 79
diff changeset
   627
                                  (NameId: sidDEagle;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   628
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   629
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   630
                                   NumberInCase: 2;
37
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
   631
                                   Ammo: (Propz: 0;
75
d2b737858ff7 - New First Aid powerup
unc0rr
parents: 74
diff changeset
   632
                                          Count: 3;
37
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
   633
                                          NumPerTurn: 3;
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
   634
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   635
                                          Pos: 0;
37
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
   636
                                          AmmoType: amDEagle);
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
   637
                                   Slot: 2;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   638
                                   TimeAfterTurn: 3000;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   639
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   640
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   641
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   642
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   643
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   644
                                   PosSprite: sprWater),
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   645
                                  (NameId: sidDynamite;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   646
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   647
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   648
                                   NumberInCase: 1;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   649
                                   Ammo: (Propz: ammoprop_NoCrosshair or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   650
                                                 ammoprop_AttackInMove or
930
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   651
                                                 ammoprop_DontHold or
3f61bd3b08fd Initial support for attacking from rope
unc0rr
parents: 928
diff changeset
   652
                                                 ammoprop_AltUse;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   653
                                          Count: 1;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   654
                                          NumPerTurn: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   655
                                          Timer: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   656
                                          Pos: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   657
                                          AmmoType: amDynamite);
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   658
                                   Slot: 4;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   659
                                   TimeAfterTurn: 5000;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   660
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   661
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   662
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   663
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   664
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   665
                                   PosSprite: sprWater),
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   666
                                  (NameId: sidFirePunch;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   667
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   668
                                   Probability: 0;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   669
                                   NumberInCase: 1;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   670
                                   Ammo: (Propz: ammoprop_NoCrosshair or
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   671
                                                 ammoprop_ForwMsgs or
542
ec26095f1bed - Get rid of ammoProp_AttackInFall and gstFalling
unc0rr
parents: 534
diff changeset
   672
                                                 ammoprop_AttackInMove;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   673
                                          Count: AMMO_INFINITE;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   674
                                          NumPerTurn: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   675
                                          Timer: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   676
                                          Pos: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   677
                                          AmmoType: amFirePunch);
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   678
                                   Slot: 3;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   679
                                   TimeAfterTurn: 3000;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   680
                                   MinAngle: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   681
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   682
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   683
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   684
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   685
                                   PosSprite: sprWater),
925
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   686
                                  (NameId: sidWhip;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   687
                                   NameTex: nil;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   688
                                   Probability: 0;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   689
                                   NumberInCase: 1;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   690
                                   Ammo: (Propz: ammoprop_NoCrosshair;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   691
                                          Count: AMMO_INFINITE;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   692
                                          NumPerTurn: 0;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   693
                                          Timer: 0;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   694
                                          Pos: 0;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   695
                                          AmmoType: amWhip);
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   696
                                   Slot: 3;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   697
                                   TimeAfterTurn: 3000;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   698
                                   MinAngle: 0;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   699
                                   maxAngle: 0;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   700
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   701
                                   SkipTurns: 0;
925
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   702
                                   PosCount: 1;
c20156328529 Implement whip weapon
unc0rr
parents: 924
diff changeset
   703
                                   PosSprite: sprWater),
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   704
                                  (NameId: sidBaseballBat;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   705
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   706
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   707
                                   NumberInCase: 1;
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   708
                                   Ammo: (Propz: ammoprop_DontHold;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   709
                                          Count: 1;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   710
                                          NumPerTurn: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   711
                                          Timer: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   712
                                          Pos: 0;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   713
                                          AmmoType: amBaseballBat);
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   714
                                   Slot: 3;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   715
                                   TimeAfterTurn: 5000;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   716
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   717
                                   maxAngle: cMaxAngle div 2;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   718
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   719
                                   SkipTurns: 2;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   720
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   721
                                   PosSprite: sprWater),
211
558476056205 Parachute
unc0rr
parents: 202
diff changeset
   722
                                  (NameId: sidParachute;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   723
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   724
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   725
                                   NumberInCase: 1;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   726
                                   Ammo: (Propz: ammoprop_ForwMsgs or
542
ec26095f1bed - Get rid of ammoProp_AttackInFall and gstFalling
unc0rr
parents: 534
diff changeset
   727
                                                 ammoprop_AttackInMove or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   728
                                                 ammoprop_NoCrosshair or
928
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   729
                                                 ammoprop_DontHold or
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   730
                                                 ammoprop_AltAttack;
211
558476056205 Parachute
unc0rr
parents: 202
diff changeset
   731
                                          Count: 2;
558476056205 Parachute
unc0rr
parents: 202
diff changeset
   732
                                          NumPerTurn: 0;
558476056205 Parachute
unc0rr
parents: 202
diff changeset
   733
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   734
                                          Pos: 0;
211
558476056205 Parachute
unc0rr
parents: 202
diff changeset
   735
                                          AmmoType: amParachute);
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   736
                                   Slot: 7;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   737
                                   TimeAfterTurn: 0;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   738
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   739
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   740
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   741
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   742
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   743
                                   PosSprite: sprWater),
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   744
                                  (NameId: sidAirAttack;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   745
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   746
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   747
                                   NumberInCase: 1;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   748
                                   Ammo: (Propz: ammoprop_NoCrosshair or
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   749
                                                 ammoprop_NeedTarget or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   750
                                                 ammoprop_AttackingPut or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   751
                                                 ammoprop_DontHold;
285
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   752
                                          Count: 1;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   753
                                          NumPerTurn: 0;
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   754
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   755
                                          Pos: 0;
263
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   756
                                          AmmoType: amAirAttack);
36379e6abcdd - Health tags over drowned hedgehogs
unc0rr
parents: 211
diff changeset
   757
                                   Slot: 5;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   758
                                   TimeAfterTurn: 0;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   759
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   760
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   761
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   762
                                   SkipTurns: 5;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   763
                                   PosCount: 2;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   764
                                   PosSprite: sprAmAirplane),
285
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   765
                                  (NameId: sidMineStrike;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   766
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   767
                                   Probability: 400;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   768
                                   NumberInCase: 1;
285
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   769
                                   Ammo: (Propz: ammoprop_NoCrosshair or
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   770
                                                 ammoprop_NeedTarget or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   771
                                                 ammoprop_AttackingPut or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   772
                                                 ammoprop_DontHold;
285
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   773
                                          Count: 1;
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   774
                                          NumPerTurn: 0;
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   775
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   776
                                          Pos: 0;
285
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   777
                                          AmmoType: amMineStrike);
cdab49768c83 Mine Strike weapon
unc0rr
parents: 283
diff changeset
   778
                                   Slot: 5;
351
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   779
                                   TimeAfterTurn: 0;
29bc9c36ad5f Fixed-point arithmetics in engine.
unc0rr
parents: 307
diff changeset
   780
                                   minAngle: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   781
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   782
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   783
                                   SkipTurns: 5;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   784
                                   PosCount: 2;
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   785
                                   PosSprite: sprAmAirplane),
302
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   786
                                  (NameId: sidBlowTorch;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   787
                                   NameTex: nil;
394
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   788
                                   Probability: 100;
4c017ae1226a - Implement hack to let ammo stores work without needed assistance of frontend
unc0rr
parents: 393
diff changeset
   789
                                   NumberInCase: 2;
302
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   790
                                   Ammo: (Propz: ammoprop_ForwMsgs;
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   791
                                          Count: 1;
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   792
                                          NumPerTurn: 0;
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   793
                                          Timer: 0;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   794
                                          Pos: 0;
302
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   795
                                          AmmoType: amBlowTorch);
7aca131ecd7f First implementation of Blow Torch
unc0rr
parents: 300
diff changeset
   796
                                   Slot: 6;
304
8096e69e839e Attack angle constraints
unc0rr
parents: 302
diff changeset
   797
                                   TimeAfterTurn: 3000;
305
1c1cd66ffcdc Better blowtorch
unc0rr
parents: 304
diff changeset
   798
                                   minAngle: 768;
408
6c3da4907d00 Airplane can fly from right to left
unc0rr
parents: 394
diff changeset
   799
                                   maxAngle: 1280;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   800
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   801
                                   SkipTurns: 0;
495
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   802
                                   PosCount: 1;
62c1c2b4414c - Fix most of the warnings in hwengine
unc0rr
parents: 467
diff changeset
   803
                                   PosSprite: sprWater),
409
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   804
                                  (NameId: sidGirder;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   805
                                   NameTex: nil;
409
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   806
                                   Probability: 400;
411
fe3a3bd0512f Increased number of construction tools in ammo case
unc0rr
parents: 409
diff changeset
   807
                                   NumberInCase: 3;
409
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   808
                                   Ammo: (Propz: ammoprop_NoCrosshair or
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   809
                                                 ammoprop_NeedTarget or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   810
                                                 ammoprop_AttackingPut or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   811
                                                 ammoprop_DontHold;
409
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   812
                                          Count: 1;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   813
                                          NumPerTurn: 0;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   814
                                          Timer: 0;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   815
                                          Pos: 0;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   816
                                          AmmoType: amGirder);
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   817
                                   Slot: 6;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   818
                                   TimeAfterTurn: 3000;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   819
                                   minAngle: 0;
4f1841929ccc Construction tool
unc0rr
parents: 408
diff changeset
   820
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   821
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   822
                                   SkipTurns: 0;
423
5f4559ce7062 Better construction tool
unc0rr
parents: 411
diff changeset
   823
                                   PosCount: 8;
520
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   824
                                   PosSprite: sprAmGirder),
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   825
                                  (NameId: sidTeleport;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   826
                                   NameTex: nil;
520
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   827
                                   Probability: 400;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   828
                                   NumberInCase: 1;
525
ae21b8e86dd9 Teleported hedgehog picks up cases
unc0rr
parents: 522
diff changeset
   829
                                   Ammo: (Propz: ammoprop_ForwMsgs or
ae21b8e86dd9 Teleported hedgehog picks up cases
unc0rr
parents: 522
diff changeset
   830
                                                 ammoprop_NoCrosshair or
520
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   831
                                                 ammoprop_NeedTarget or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   832
                                                 ammoprop_AttackingPut or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   833
                                                 ammoprop_DontHold;
520
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   834
                                          Count: 2;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   835
                                          NumPerTurn: 0;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   836
                                          Timer: 0;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   837
                                          Pos: 0;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   838
                                          AmmoType: amTeleport);
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   839
                                   Slot: 7;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   840
                                   TimeAfterTurn: 0;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   841
                                   minAngle: 0;
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   842
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   843
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   844
                                   SkipTurns: 0;
520
e83dfb7ffead Teleportation tool
unc0rr
parents: 511
diff changeset
   845
                                   PosCount: 1;
534
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   846
                                   PosSprite: sprWater),
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   847
                                  (NameId: sidSwitch;
843
27b5180d0988 Repair weapon name show in ammo menu
unc0rr
parents: 834
diff changeset
   848
                                   NameTex: nil;
534
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   849
                                   Probability: 100;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   850
                                   NumberInCase: 1;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   851
                                   Ammo: (Propz: ammoprop_ForwMsgs or
553
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   852
                                                 ammoprop_NoCrosshair or
5478386d935f - Switch to bazooka (or whatever) after use of some weapon (fixes problem with bots)
unc0rr
parents: 547
diff changeset
   853
                                                 ammoprop_DontHold;
534
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   854
                                          Count: 3;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   855
                                          NumPerTurn: 0;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   856
                                          Timer: 0;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   857
                                          Pos: 0;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   858
                                          AmmoType: amSwitch);
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   859
                                   Slot: 8;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   860
                                   TimeAfterTurn: 0;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   861
                                   minAngle: 0;
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   862
                                   maxAngle: 0;
830
f07267032194 - Add statistics info for ammo used in step and whether it is damaging ammo
unc0rr
parents: 829
diff changeset
   863
                                   isDamaging: false;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   864
                                   SkipTurns: 0;
534
92fb2b0d5117 - Fix some bugs
unc0rr
parents: 525
diff changeset
   865
                                   PosCount: 1;
924
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   866
                                   PosSprite: sprWater),
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   867
                                  (NameId: sidMortar;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   868
                                   NameTex: nil;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   869
                                   Probability: 100;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   870
                                   NumberInCase: 5;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   871
                                   Ammo: (Propz: 0;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   872
                                          Count: 5;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   873
                                          NumPerTurn: 0;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   874
                                          Timer: 0;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   875
                                          Pos: 0;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   876
                                          AmmoType: amMortar);
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   877
                                   Slot: 1;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   878
                                   TimeAfterTurn: 3000;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   879
                                   minAngle: 0;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   880
                                   maxAngle: 0;
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   881
                                   isDamaging: true;
941
b5222ddafe1f - Fix bug with picking up ammos from cases, when total ammo count may become more than AMMO_INFINITE
unc0rr
parents: 936
diff changeset
   882
                                   SkipTurns: 0;
924
227f9fcdc2f4 Initial implementation of mortar
unc0rr
parents: 883
diff changeset
   883
                                   PosCount: 1;
928
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   884
                                   PosSprite: sprWater)
b9064b48b001 Some preparation work for attacking from rope, parachute and etc.
unc0rr
parents: 926
diff changeset
   885
                                  );
37
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
   886
844
9a82149409f3 Also, repair weapon count show in ammo menu
unc0rr
parents: 843
diff changeset
   887
var CountTexz: array[1..9] of PTexture;
9a82149409f3 Also, repair weapon count show in ammo menu
unc0rr
parents: 843
diff changeset
   888
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   889
implementation
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   890
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   891
end.