hedgewars/uConsts.pas
author nemo
Fri, 05 Mar 2010 17:32:13 +0000
changeset 2941 566f967ec22f
parent 2933 02af54eb7e1e
child 2947 803b277e4894
permissions -rw-r--r--
White/Black smoke, break out rolling barrel into its own routine, adjust rolling barrel impact damage. NEEDS TESTING
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
     1
(*
1066
1f1b3686a2b0 Update copyright headers a bit
unc0rr
parents: 1047
diff changeset
     2
 * Hedgewars, a free turn based strategy 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
2599
c7153d2348f3 move compiler directives to standard pascal
koda
parents: 2588
diff changeset
    19
{$INCLUDE "options.inc"}
2587
0dfa56a8513c fix a segfault in the iphone simulator by moving options.inc at the beginning of the file
koda
parents: 2586
diff changeset
    20
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    21
unit uConsts;
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
    22
interface
1906
644f93d8f148 Apply koda's OpenGL ES compatibility patch
unc0rr
parents: 1904
diff changeset
    23
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    24
uses	SDLh, uFloat, uLocale,
2152
a2811690da1b Patch by koda:
unc0rr
parents: 2144
diff changeset
    25
{$IFDEF GLES11}
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    26
	gles11;
1906
644f93d8f148 Apply koda's OpenGL ES compatibility patch
unc0rr
parents: 1904
diff changeset
    27
{$ELSE}
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    28
	GL;
1906
644f93d8f148 Apply koda's OpenGL ES compatibility patch
unc0rr
parents: 1904
diff changeset
    29
{$ENDIF}
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    30
1906
644f93d8f148 Apply koda's OpenGL ES compatibility patch
unc0rr
parents: 1904
diff changeset
    31
2924
908851e59958 Engine:
smxx
parents: 2921
diff changeset
    32
{$INCLUDE "config.inc"}
2671
7e0f88013fe8 smaller patches, one missing Sky-lowres, IMG_Init and Mix_Init (might require newer libraries), updates to SDL bindings, code cleanup, new compile flags
koda
parents: 2653
diff changeset
    33
2697
75880595a9f1 code cleanup and opengles optimizations
koda
parents: 2677
diff changeset
    34
// typed const is a variable despite const qualifier
75880595a9f1 code cleanup and opengles optimizations
koda
parents: 2677
diff changeset
    35
// in freepascal you may actually use var for the same purpose
75880595a9f1 code cleanup and opengles optimizations
koda
parents: 2677
diff changeset
    36
689
f4ec46c48ed2 The rest of stuff converted to sprites
unc0rr
parents: 688
diff changeset
    37
type
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    38
	HwColor4f = record
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    39
		r, g, b, a: byte
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    40
		end;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
    41
		
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    42
	TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsConfirm, gsExit);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    43
2825
db7c35a0e9c1 Engine:
smxx
parents: 2780
diff changeset
    44
	TGameType = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview, gmtSyntax);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    45
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    46
	TPathType = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptTeams, ptMaps,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    47
			ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts,
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
    48
			ptLocale, ptAmmoMenu, ptHedgehog, ptVoices, ptHats, ptFlags);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    49
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    50
	TSprite = (sprWater, sprCloud, sprBomb, sprBigDigit, sprFrame,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    51
			sprLag, sprArrow, sprGrenade, sprTargetP, sprUFO,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    52
			sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,
2888
69d04079fb46 Graphic for dead mines
nemo
parents: 2881
diff changeset
    53
			sprMineOn, sprMineDead, sprCase, sprFAid, sprDynamite, sprPower,
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    54
			sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
2426
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
    55
			sprHorizontL, sprHorizontR, sprSky, sprSkyL,
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
    56
			sprSkyR, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos,
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    57
			sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    58
			sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    59
			sprSwitch, sprParachute, sprTarget, sprRopeNode,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    60
			sprQuestion, sprPowerBar, sprWindBar, sprWindL, sprWindR,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    61
			sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    62
			sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    63
			sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    64
			sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    65
			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
2056
ed8c83f1e4b0 Two new wavez - Juggle requires a different frame rate. using 38 instead of 125
nemo
parents: 2042
diff changeset
    66
			sprHurrah, sprLemonade, sprShrug, sprJuggle, sprExplPart, sprExplPart2,
1263
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
    67
			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
1286
a02a5345b91e Seduction animation
unc0rr
parents: 1285
diff changeset
    68
			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
1717
f4cf7e36ae3e Hedgehog controlling rc plane sprite
unc0rr
parents: 1712
diff changeset
    69
			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls,
2376
ece7b87f1334 Strip trailing spaces
nemo
parents: 2362
diff changeset
    70
			sprPlane, sprHandPlane, sprUtility, sprInvulnerable, sprVampiric, sprGirder,
2911
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
    71
			sprSpeechCorner, sprSpeechEdge, sprSpeechTail,
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
    72
			sprThoughtCorner, sprThoughtEdge, sprThoughtTail,
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
    73
			sprShoutCorner, sprShoutEdge, sprShoutTail,
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
    74
			sprSniperRifle, sprBubbles, sprJetpack, sprHealth, sprHandMolotov, sprMolotov,
2941
566f967ec22f White/Black smoke, break out rolling barrel into its own routine, adjust rolling barrel impact damage. NEEDS TESTING
nemo
parents: 2933
diff changeset
    75
			sprSmoke, sprSmokeWhite, sprShell, sprDust, sprExplosives, sprExplosivesRoll, sprAmTeleport);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    76
1505
3a96e93572cb - Convert small damage tag to visual gears
unc0rr
parents: 1445
diff changeset
    77
	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
3a96e93572cb - Convert small damage tag to visual gears
unc0rr
parents: 1445
diff changeset
    78
			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
3a96e93572cb - Convert small damage tag to visual gears
unc0rr
parents: 1445
diff changeset
    79
			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
2005
aa79f631711b Move health sorter to visual gears:
unc0rr
parents: 1914
diff changeset
    80
			gtClusterBomb, gtCluster, gtShover, gtFlame, // 18
aa79f631711b Move health sorter to visual gears:
unc0rr
parents: 1914
diff changeset
    81
			gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame, // 24
aa79f631711b Move health sorter to visual gears:
unc0rr
parents: 1914
diff changeset
    82
			gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder, // 27
aa79f631711b Move health sorter to visual gears:
unc0rr
parents: 1914
diff changeset
    83
			gtTeleport, gtSwitcher, gtTarget, gtMortar, // 31
aa79f631711b Move health sorter to visual gears:
unc0rr
parents: 1914
diff changeset
    84
			gtWhip, gtKamikaze, gtCake, gtSeduction, gtWatermelon, gtMelonPiece, // 37
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
    85
			gtHellishBomb, gtEvilTrace, gtWaterUp, gtDrill, gtBallGun, gtBall,gtRCPlane,
2911
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
    86
			gtSniperRifleShot, gtJetpack, gtMolotov, gtExplosives);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    87
1505
3a96e93572cb - Convert small damage tag to visual gears
unc0rr
parents: 1445
diff changeset
    88
	TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
    89
			vgtSmallDamageTag, vgtTeamHealthSorter, vgtSpeechBubble, vgtBubble,
2941
566f967ec22f White/Black smoke, break out rolling barrel into its own routine, adjust rolling barrel impact damage. NEEDS TESTING
nemo
parents: 2933
diff changeset
    90
			vgtSteam, vgtSmoke, vgtSmokeWhite, vgtHealth, vgtShell, vgtDust);
802
ed5450a89b96 Start implementing 'visual gears' - gears, that don't need to be synchronized (clouds and flakes)
unc0rr
parents: 801
diff changeset
    91
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    92
	TGearsType = set of TGearType;
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
    93
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
    94
	TSound = (sndNone,
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
    95
			sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    96
			sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    97
			sndMineTick, sndPickhammer, sndGun, sndUFO, sndJump1, sndJump2,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    98
			sndJump3, sndYesSir, sndLaugh, sndIllGetYou, sndIncoming,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
    99
			sndMissed, sndStupid, sndFirstBlood, sndBoring, sndByeBye,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   100
			sndSameTeam, sndNutter, sndReinforce, sndTraitor, sndRegret,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   101
			sndEnemyDown, sndCoward, sndHurry, sndWatchIt, sndKamikaze,
1279
33cae6d1635c Use new sounds
unc0rr
parents: 1270
diff changeset
   102
			sndCake, sndOw1, sndOw4, sndFirePunch1, sndFirePunch2,
33cae6d1635c Use new sounds
unc0rr
parents: 1270
diff changeset
   103
			sndFirePunch3, sndFirePunch4, sndFirePunch5, sndFirePunch6,
1712
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   104
			sndMelon, sndHellish, sndYoohoo, sndRCPlane, sndWhipCrack,
2376
ece7b87f1334 Strip trailing spaces
nemo
parents: 2362
diff changeset
   105
			sndRideOfTheValkyries, sndDenied, sndPlaced, sndBaseballBat,
2428
6800f8aa0184 Huge Smaxx patch with some fixes by me:
unc0rr
parents: 2426
diff changeset
   106
			sndVaporize, sndWarp, sndSuddenDeath, sndMortar, sndShutter,
2908
bd1909984a09 Engine:
smxx
parents: 2905
diff changeset
   107
			sndHomerun, sndMolotov, sndCover, sndUhOh, sndOops,
bd1909984a09 Engine:
smxx
parents: 2905
diff changeset
   108
			sndNooo, sndHello, sndRopeShot, sndRopeAttach, sndRopeRelease,
bd1909984a09 Engine:
smxx
parents: 2905
diff changeset
   109
			sndSwitchHog, sndVictory, sndSniperReload, sndSteps, sndLowGravity);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
   110
2357
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   111
	TAmmoType  = (amNothing, amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   112
			amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   113
			amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   114
			amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
2376
ece7b87f1334 Strip trailing spaces
nemo
parents: 2362
diff changeset
   115
			amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun,
2426
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   116
			amRCPlane, amLowGravity, amExtraDamage, amInvulnerable, amExtraTime,
2457
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
   117
			amLaserSight, amVampiric, amSniperRifle, amJetpack, amMolotov);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
   118
2677
83ad68ceef72 Non-hacked version of CJK handling. Should switch to CJK rendering only if a particular string needs it, instead of based on locale file.
nemo
parents: 2671
diff changeset
   119
	THWFont = (fnt16, fntBig, fntSmall, CJKfnt16, CJKfntBig, CJKfntSmall);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
   120
2142
48ed98cfd119 Make code suck less
unc0rr
parents: 2105
diff changeset
   121
	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpVolume,
2180
6c5a339f8e28 Use different group to not erase messages, restore gear deletion on hog damage.
nemo
parents: 2179
diff changeset
   122
			capgrpMessage, capgrpAmmostate);
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
   123
1625
37aae47943ce Initial health graphic implementation
unc0rr
parents: 1608
diff changeset
   124
	TStatInfoType = (siGameResult, siMaxStepDamage, siMaxStepKills, siKilledHHs,
37aae47943ce Initial health graphic implementation
unc0rr
parents: 1608
diff changeset
   125
			siClanHealth);
306
7b61834edcf6 - Better blowtorch
unc0rr
parents: 305
diff changeset
   126
2217
458c08d74ae6 sounds for teleport and beginning of sudden death
koda
parents: 2210
diff changeset
   127
	TWave = (waveRollup, waveSad, waveWave, waveHurrah, waveLemonade, waveShrug, waveJuggle);
1034
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   128
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   129
	THHFont = record
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   130
			Handle: PTTF_Font;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   131
			Height: LongInt;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   132
			style: LongInt;
2105
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   133
			Name: string[21];
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   134
			end;
282
b1e3387389b6 - Pickhammer sound
unc0rr
parents: 271
diff changeset
   135
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   136
	PAmmo = ^TAmmo;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   137
	TAmmo = record
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   138
			Propz: LongWord;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   139
			Count: LongWord;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   140
(* Using for place hedgehogs mode, but for any other situation where the initial count would be needed I guess.
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   141
For example, say, a mode where the weaponset is reset each turn, or on sudden death *)
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   142
			InitialCount: LongWord; 
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   143
			NumPerTurn: LongWord;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   144
			Timer: LongWord;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   145
			Pos: LongWord;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   146
			AmmoType: TAmmoType;
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   147
			AttackVoice: TSound;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   148
			end;
1912
c3d31fb59f0e Save much CPU time by initializing vertex arrays in texture creation function
unc0rr
parents: 1910
diff changeset
   149
c3d31fb59f0e Save much CPU time by initializing vertex arrays in texture creation function
unc0rr
parents: 1910
diff changeset
   150
	TVertex2f = record
c3d31fb59f0e Save much CPU time by initializing vertex arrays in texture creation function
unc0rr
parents: 1910
diff changeset
   151
		X, Y: GLfloat;
c3d31fb59f0e Save much CPU time by initializing vertex arrays in texture creation function
unc0rr
parents: 1910
diff changeset
   152
		end;
2376
ece7b87f1334 Strip trailing spaces
nemo
parents: 2362
diff changeset
   153
2362
ef4abaf2d5cc - Implement low quality rope
unc0rr
parents: 2360
diff changeset
   154
	TVertex2i = record
ef4abaf2d5cc - Implement low quality rope
unc0rr
parents: 2360
diff changeset
   155
		X, Y: GLint;
ef4abaf2d5cc - Implement low quality rope
unc0rr
parents: 2360
diff changeset
   156
		end;
ef4abaf2d5cc - Implement low quality rope
unc0rr
parents: 2360
diff changeset
   157
2715
0e4e0db79e2a Free up some unfreed memory. Needed for Koda's iphone lib work
nemo
parents: 2713
diff changeset
   158
	PTexture = ^TTexture;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   159
	TTexture = record
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   160
			id: GLuint;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   161
			w, h: LongInt;
1896
fdacad5d0acc Don't use GLU
unc0rr
parents: 1895
diff changeset
   162
			rx, ry: GLfloat;
1912
c3d31fb59f0e Save much CPU time by initializing vertex arrays in texture creation function
unc0rr
parents: 1910
diff changeset
   163
			vb, tb: array [0..3] of TVertex2f;
2715
0e4e0db79e2a Free up some unfreed memory. Needed for Koda's iphone lib work
nemo
parents: 2713
diff changeset
   164
            PrevTexture, NextTexture: PTexture;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   165
			end;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   166
105
e7cb9bb4a9de - Fixed integer->longint
unc0rr
parents: 102
diff changeset
   167
const
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   168
	// message constants
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   169
	errmsgCreateSurface   = 'Error creating SDL surface';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   170
	errmsgTransparentSet  = 'Error setting transparent color';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   171
	errmsgUnknownCommand  = 'Unknown command';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   172
	errmsgUnknownVariable = 'Unknown variable';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   173
	errmsgIncorrectUse    = 'Incorrect use';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   174
	errmsgShouldntRun     = 'This program shouldn''t be run manually';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   175
	errmsgWrongNumber     = 'Wrong parameters number';
2697
75880595a9f1 code cleanup and opengles optimizations
koda
parents: 2677
diff changeset
   176
	errmsgSlotsOverflow   = 'CurSlot overflowed';
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   177
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   178
	msgLoading           = 'Loading ';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   179
	msgOK                = 'ok';
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   180
	msgFailed            = 'failed';
2153
e41fdfaa8edd Patch by Smaxx:
unc0rr
parents: 2152
diff changeset
   181
	msgFailedSize        = 'failed due to size';
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   182
	msgGettingConfig     = 'Getting game config...';
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   183
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   184
	// color constants
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   185
	cWhiteColorChannels	: TSDL_Color = (r:$FF; g:$FF; b:$FF; unused:$FF);
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   186
	cNearBlackColorChannels	: TSDL_Color = (r:$00; g:$00; b:$10; unused:$FF);
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   187
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   188
	cWhiteColor		      : Longword = $FFFFFFFF;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   189
	cYellowColor		  : Longword = $FFFFFF00;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   190
	cNearBlackColor       : Longword = $FF000010;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   191
	cExplosionBorderColor : LongWord = $FF808080;
2376
ece7b87f1334 Strip trailing spaces
nemo
parents: 2362
diff changeset
   192
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   193
{$WARNINGS OFF}
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   194
	cAirPlaneSpeed: hwFloat = (isNegative: false; QWordValue:   3006477107); // 1.4
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   195
	cBombsSpeed   : hwFloat = (isNegative: false; QWordValue:    429496729);
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   196
{$WARNINGS ON}
621
8bdbc240f50f New game flag for non-destroyable land
unc0rr
parents: 615
diff changeset
   197
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   198
	// image flags (for LoadImage())
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   199
	ifNone        = $00000000;	// nothing special
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   200
	ifAlpha       = $00000001;	// use alpha channel (unused right now?)
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   201
	ifCritical    = $00000002;	// image is critical for gameplay (exit game if unable to load)
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   202
	ifTransparent = $00000004;	// image uses transparent pixels (color keying)
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   203
	ifIgnoreCaps  = $00000008;	// ignore hardware capabilities when loading (i.e. image will not be drawn using OpenGL)
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   204
	ifLowRes      = $00000010;	// try loading a low resolution image when it is critical
74
42257fee61ae - Unicode support for team and hedgehogs names
unc0rr
parents: 72
diff changeset
   205
2243
b4764993f833 additional touch support and nemo's reduced land array size
koda
parents: 2229
diff changeset
   206
	{*  REFERENCE
b4764993f833 additional touch support and nemo's reduced land array size
koda
parents: 2229
diff changeset
   207
      4096 -> $FFFFF000
b4764993f833 additional touch support and nemo's reduced land array size
koda
parents: 2229
diff changeset
   208
      2048 -> $FFFFF800
b4764993f833 additional touch support and nemo's reduced land array size
koda
parents: 2229
diff changeset
   209
      1024 -> $FFFFFC00
b4764993f833 additional touch support and nemo's reduced land array size
koda
parents: 2229
diff changeset
   210
       512 -> $FFFFFE00  *}
b4764993f833 additional touch support and nemo's reduced land array size
koda
parents: 2229
diff changeset
   211
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   212
{$IFDEF LOWRES}
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   213
	// default for iphone pre 3gs
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   214
	LAND_WIDTH  = 2048;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   215
	LAND_HEIGHT = 1024;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   216
	LAND_WIDTH_MASK  = $FFFFF800;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   217
	LAND_HEIGHT_MASK = $FFFFFC00;
2251
bf0b59d3536a fix a binding that was preveting to display anything else besides hogs on iphone
koda
parents: 2250
diff changeset
   218
{$ELSE}
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   219
	LAND_WIDTH  = 4096;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   220
	LAND_HEIGHT = 2048;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   221
	LAND_WIDTH_MASK  = $FFFFF000;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   222
	LAND_HEIGHT_MASK = $FFFFF800;
2251
bf0b59d3536a fix a binding that was preveting to display anything else besides hogs on iphone
koda
parents: 2250
diff changeset
   223
{$ENDIF}
2163
12730f5e79b9 koda's patch fixing some iphone port troubles (color, mouse)
unc0rr
parents: 2153
diff changeset
   224
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   225
	COLOR_LAND           = $FFFF;  // white
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   226
	COLOR_INDESTRUCTIBLE = $88FF;  // red
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   227
	COLOR_OBJECT         = $44FF;  // no idea
64
9df467527ae5 - Start AI rewrite
unc0rr
parents: 56
diff changeset
   228
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   229
	cMaxPower     = 1500;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   230
	cMaxAngle     = 2048;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   231
	cPowerDivisor = 1500;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   232
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   233
	MAXNAMELEN = 192;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   234
	
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   235
	// some opengl headers do not have these macros
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   236
	GL_BGR		 = $80E0;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   237
	GL_BGRA		 = $80E1;
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   238
	GL_CLAMP_TO_EDGE = $812F;
2250
70f344c911ea untested
nemo
parents: 2248
diff changeset
   239
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   240
	cSendCursorPosTime	: LongWord = 50;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   241
	cVisibleWater		: LongInt = 128;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   242
	cCursorEdgesDist	: LongInt = 100;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   243
	cTeamHealthWidth	: LongInt = 128;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   244
	cWaterOpacity		: byte = $80;
2163
12730f5e79b9 koda's patch fixing some iphone port troubles (color, mouse)
unc0rr
parents: 2153
diff changeset
   245
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   246
	cifRandomize = $00000001;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   247
	cifTheme     = $00000002;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   248
	cifMap       = $00000002; // either theme or map (or map+theme)
2247
10a5c05e09c9 moves indestructible color to green for iphone compatibility
koda
parents: 2244
diff changeset
   249
	cifAllInited = cifRandomize or cifTheme or cifMap;
55
e09f7c952a40 Send run parameters by cmd line, game parameters by IPC... breaks network game
unc0rr
parents: 53
diff changeset
   250
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   251
	cTransparentColor: Longword = $00000000;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   252
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   253
	cMaxTeams        = 6;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   254
	cMaxHHIndex      = 7;
1784
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
   255
	cMaxHHs          = 48;
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   256
	cMaxSpawnPoints  = 1024;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   257
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   258
	cMaxEdgePoints = 16384;
22
517be8dc5b76 - Fixed spawning boxes under water
unc0rr
parents: 17
diff changeset
   259
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   260
	cHHRadius = 9;
1141
44d4d6aaecb5 - Some physics changes
unc0rr
parents: 1125
diff changeset
   261
	cHHStepTicks = 29;
509
fd58135a4407 Bots know shotgun behavior better
unc0rr
parents: 495
diff changeset
   262
1270
ee024c14c904 Draw smoke trail underneath of grenade
unc0rr
parents: 1263
diff changeset
   263
	cUsualZ = 500;
ee024c14c904 Draw smoke trail underneath of grenade
unc0rr
parents: 1263
diff changeset
   264
	cSmokeZ = 499;
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   265
	cHHZ = 1000;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   266
	cCurrHHZ = Succ(cHHZ);
1109
87c44c14fdd4 - Cake sits down before exploding
unc0rr
parents: 1108
diff changeset
   267
	cOnHHZ = 2000;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   268
2916
31f8d418ced3 Make barrels a little easier to destroy (60 instead of 75) - still more than 2 shotgun blasts or a grenade, but in range of dynamite or a well-placed cluster
nemo
parents: 2911
diff changeset
   269
	cBarrelHealth = 60;
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   270
	cShotgunRadius = 22;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   271
	cBlowTorchC    = 6;
509
fd58135a4407 Bots know shotgun behavior better
unc0rr
parents: 495
diff changeset
   272
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   273
	cKeyMaxIndex = 1023;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   274
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   275
{$IFDEF IPHONEOS}
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   276
	cMaxCaptions = 3;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   277
{$ELSE}
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   278
	cMaxCaptions = 4;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   279
{$ENDIF}
97
e7c1df9cce2c - make the game be run from ${PREFIX}/bin with data in ${PREFIX}/share/hedgewars/Data
unc0rr
parents: 95
diff changeset
   280
2382
bfd378dfc4e7 Optimize network traffic a bit:
unc0rr
parents: 2376
diff changeset
   281
	cSendEmptyPacketTime = 1000;
bfd378dfc4e7 Optimize network traffic a bit:
unc0rr
parents: 2376
diff changeset
   282
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   283
	// from uTriggers
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   284
	trigTurns = $80000001;
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   285
2428
6800f8aa0184 Huge Smaxx patch with some fixes by me:
unc0rr
parents: 2426
diff changeset
   286
	// Training Flags
2468
0b62498c201a openal fix, training map selection and rcplane adjustments from Smaxx (untested, but look reasonable). Bunch of new graphics from Tiy, new translation for pt-pt from inu_
nemo
parents: 2457
diff changeset
   287
	tfNone          = $00000000;
0b62498c201a openal fix, training map selection and rcplane adjustments from Smaxx (untested, but look reasonable). Bunch of new graphics from Tiy, new translation for pt-pt from inu_
nemo
parents: 2457
diff changeset
   288
	tfTimeTrial     = $00000001;
0b62498c201a openal fix, training map selection and rcplane adjustments from Smaxx (untested, but look reasonable). Bunch of new graphics from Tiy, new translation for pt-pt from inu_
nemo
parents: 2457
diff changeset
   289
	tfRCPlane       = $00000002;
0b62498c201a openal fix, training map selection and rcplane adjustments from Smaxx (untested, but look reasonable). Bunch of new graphics from Tiy, new translation for pt-pt from inu_
nemo
parents: 2457
diff changeset
   290
	tfSpawnTargets  = $00000004;
0b62498c201a openal fix, training map selection and rcplane adjustments from Smaxx (untested, but look reasonable). Bunch of new graphics from Tiy, new translation for pt-pt from inu_
nemo
parents: 2457
diff changeset
   291
	tfIgnoreDelays  = $00000008;
0b62498c201a openal fix, training map selection and rcplane adjustments from Smaxx (untested, but look reasonable). Bunch of new graphics from Tiy, new translation for pt-pt from inu_
nemo
parents: 2457
diff changeset
   292
	tfTargetRespawn = $00000010;
2428
6800f8aa0184 Huge Smaxx patch with some fixes by me:
unc0rr
parents: 2426
diff changeset
   293
	
2908
bd1909984a09 Engine:
smxx
parents: 2905
diff changeset
   294
	gfAny            = $FFFFFFFF;
2891
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   295
	gfForts          = $00000001;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   296
	gfMultiWeapon    = $00000002;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   297
	gfSolidLand      = $00000004;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   298
	gfBorder         = $00000008;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   299
	gfDivideTeams    = $00000010;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   300
	gfLowGravity     = $00000020;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   301
	gfLaserSight     = $00000040;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   302
	gfInvulnerable   = $00000080;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   303
	gfMines          = $00000100;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   304
	gfVampiric       = $00000200;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   305
	gfKarma          = $00000400;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   306
	gfArtillery      = $00000800;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   307
	gfOneClanMode    = $00001000;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   308
	gfRandomOrder    = $00002000;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   309
	gfKing           = $00004000;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   310
	gfPlaceHog       = $00008000;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   311
	gfSharedAmmo     = $00010000;
e1f902eb0cfe Formerly "Draw Girders" by MrMfS - now "Disable Girders" to allow template prefs to still exist
nemo
parents: 2888
diff changeset
   312
	gfDisableGirders = $00020000;
2911
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
   313
	gfExplosives     = $00040000;
2903
e28356fe532a Engine:
smxx
parents: 2891
diff changeset
   314
	// NOTE: When adding new game flags, ask yourself
e28356fe532a Engine:
smxx
parents: 2891
diff changeset
   315
	// if a "game start notice" would be useful. If so,
e28356fe532a Engine:
smxx
parents: 2891
diff changeset
   316
	// add one in uWorld.pas - look for "AddGoal".
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   317
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   318
	gstDrowning       = $00000001;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   319
	gstHHDriven       = $00000002;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   320
	gstMoving         = $00000004;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   321
	gstAttacked       = $00000008;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   322
	gstAttacking      = $00000010;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   323
	gstCollision      = $00000020;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   324
	gstHHChooseTarget = $00000040;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   325
	gstHHJumping      = $00000100;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   326
	gsttmpFlag        = $00000200;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   327
	gstHHThinking     = $00000800;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   328
	gstNoDamage       = $00001000;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   329
	gstHHHJump        = $00002000;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   330
	gstAnimation      = $00004000;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   331
	gstHHDeath        = $00008000;
1865
ebc6dfca60d4 - nemo's patch: some animations, zero probability for infinite weapons
unc0rr
parents: 1863
diff changeset
   332
	gstWinner         = $00010000;  // this, along with gstLoser, is good for indicating hedgies know they screwed up
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   333
	gstWait           = $00020000;
1528
3fee15104c1d More stable blowtorch:
unc0rr
parents: 1508
diff changeset
   334
	gstNotKickable    = $00040000;
1865
ebc6dfca60d4 - nemo's patch: some animations, zero probability for infinite weapons
unc0rr
parents: 1863
diff changeset
   335
	gstLoser          = $00080000;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   336
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   337
	gm_Left   = $00000001;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   338
	gm_Right  = $00000002;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   339
	gm_Up     = $00000004;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   340
	gm_Down   = $00000008;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   341
	gm_Switch = $00000010;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   342
	gm_Attack = $00000020;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   343
	gm_LJump  = $00000040;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   344
	gm_HJump  = $00000080;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   345
	gm_Destroy= $00000100;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   346
	gm_Slot   = $00000200; // with param
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   347
	gm_Weapon = $00000400; // with param
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   348
	gm_Timer  = $00000800; // with param
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   349
	gm_Animate= $00001000; // with param
1639
89b536a3cf3c Implement precise aiming when pressing left shift
unc0rr
parents: 1625
diff changeset
   350
	gm_Precise= $00002000;
89b536a3cf3c Implement precise aiming when pressing left shift
unc0rr
parents: 1625
diff changeset
   351
	gmAllStoppable = gm_Left or gm_Right or gm_Up or gm_Down or gm_Attack or gm_Precise;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   352
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   353
	cMaxSlotIndex       = 8;
2359
76d853f22afa Trying to correct prior amNothing checkin. untested.
nemo
parents: 2357
diff changeset
   354
	cMaxSlotAmmoIndex   = 5;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   355
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   356
	ammoprop_Timerable    = $00000001;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   357
	ammoprop_Power        = $00000002;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   358
	ammoprop_NeedTarget   = $00000004;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   359
	ammoprop_ForwMsgs     = $00000008;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   360
	ammoprop_AttackInMove = $00000010;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   361
	ammoprop_NoCrosshair  = $00000040;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   362
	ammoprop_AttackingPut = $00000080;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   363
	ammoprop_DontHold     = $00000100;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   364
	ammoprop_AltAttack    = $00000200;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   365
	ammoprop_AltUse       = $00000400;
1784
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
   366
	ammoprop_NotBorder    = $00000800;
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
   367
	ammoprop_Utility      = $00001000;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   368
	ammoprop_NoRoundEndHint=$10000000;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   369
	
2588
da9e986713d4 Increase AMMO_INFINITE to 100
nemo
parents: 2587
diff changeset
   370
	AMMO_INFINITE = 100;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   371
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   372
	EXPLAllDamageInRadius = $00000001;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   373
	EXPLAutoSound         = $00000002;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   374
	EXPLNoDamage          = $00000004;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   375
	EXPLDoNotTouchHH      = $00000008;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   376
	EXPLDontDraw          = $00000010;
42
72ffe21f027c - Fixed console behavior
unc0rr
parents: 39
diff changeset
   377
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   378
	posCaseAmmo    = $00000001;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   379
	posCaseHealth  = $00000002;
1861
unc0rr
parents: 1854
diff changeset
   380
	posCaseUtility = $00000004;
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   381
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   382
	NoPointX = Low(LongInt);
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   383
	cTargetPointRef	: TPoint = (X: NoPointX; Y: 0);
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   384
2568
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   385
	// hog tag mask
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   386
	htNone        = $00;
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   387
	htTeamName    = $01;
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   388
	htName        = $02;
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   389
	htHealth      = $04;
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   390
	htTransparent = $80;
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   391
	
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   392
	cHHFileName = 'Hedgehog';
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   393
	cCHFileName = 'Crosshair';
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   394
	cThemeCFGFilename = 'theme.cfg';
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   395
	
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   396
	FontBorder = 2;
2905
f3c79f7193a9 Engine:
smxx
parents: 2903
diff changeset
   397
var	PathPrefix: shortstring;
f3c79f7193a9 Engine:
smxx
parents: 2903
diff changeset
   398
	Pathz: array[TPathType] of shortstring;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   399
	CountTexz: array[1..Pred(AMMO_INFINITE)] of PTexture;
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   400
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
   401
const	cTagsMasks : array[0..7] of byte = (
2630
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   402
				htTeamName or htName or htHealth,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   403
				htName or htHealth,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   404
				htHealth,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   405
				htNone,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   406
				htTeamName or htName or htHealth or htTransparent,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   407
				htName or htHealth or htTransparent,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   408
				htHealth or htTransparent,
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   409
				htNone
079ef82eac75 revamped file access and debug display
koda
parents: 2619
diff changeset
   410
				);
2568
e654cbfb23ba Bunch of neat stuff by Smaxx. ATI check, translucent name tags to reduce terrain fail, disabling health crates on invulnerable hogs. Also tweaks to prior stuff.
nemo
parents: 2490
diff changeset
   411
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   412
	Fontz: array[THWFont] of THHFont = (
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   413
			(Handle: nil;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   414
			Height: 12;
1118
caf47265d03f - Use DejaVuSans-Bold instead of DejaVuSans+bold
unc0rr
parents: 1111
diff changeset
   415
			style: TTF_STYLE_NORMAL;
caf47265d03f - Use DejaVuSans-Bold instead of DejaVuSans+bold
unc0rr
parents: 1111
diff changeset
   416
			Name: 'DejaVuSans-Bold.ttf'),
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   417
			(Handle: nil;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   418
			Height: 24;
1118
caf47265d03f - Use DejaVuSans-Bold instead of DejaVuSans+bold
unc0rr
parents: 1111
diff changeset
   419
			style: TTF_STYLE_NORMAL;
caf47265d03f - Use DejaVuSans-Bold instead of DejaVuSans+bold
unc0rr
parents: 1111
diff changeset
   420
			Name: 'DejaVuSans-Bold.ttf'),
1033
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   421
			(Handle: nil;
622c5de38d72 Start implementing waves
unc0rr
parents: 1022
diff changeset
   422
			Height: 10;
1118
caf47265d03f - Use DejaVuSans-Bold instead of DejaVuSans+bold
unc0rr
parents: 1111
diff changeset
   423
			style: TTF_STYLE_NORMAL;
2677
83ad68ceef72 Non-hacked version of CJK handling. Should switch to CJK rendering only if a particular string needs it, instead of based on locale file.
nemo
parents: 2671
diff changeset
   424
			Name: 'DejaVuSans-Bold.ttf'),
2105
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   425
			(Handle: nil;
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   426
			Height: 12;
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   427
			style: TTF_STYLE_NORMAL;
2873
e7acb0251a22 Font switch requested by Copy Liu in issue #220 - a GPL CJK font set that includes some hand-drawn bitmaps for lower resolutions, reducing fuzziness of CJK chars in places like the ammo menu
nemo
parents: 2852
diff changeset
   428
			Name: 'wqy-zenhei.ttc'),
2105
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   429
			(Handle: nil;
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   430
			Height: 24;
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   431
			style: TTF_STYLE_NORMAL;
2873
e7acb0251a22 Font switch requested by Copy Liu in issue #220 - a GPL CJK font set that includes some hand-drawn bitmaps for lower resolutions, reducing fuzziness of CJK chars in places like the ammo menu
nemo
parents: 2852
diff changeset
   432
			Name: 'wqy-zenhei.ttc'),
2105
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   433
			(Handle: nil;
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   434
			Height: 10;
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   435
			style: TTF_STYLE_NORMAL;
2873
e7acb0251a22 Font switch requested by Copy Liu in issue #220 - a GPL CJK font set that includes some hand-drawn bitmaps for lower resolutions, reducing fuzziness of CJK chars in places like the ammo menu
nemo
parents: 2852
diff changeset
   436
			Name: 'wqy-zenhei.ttc')
2105
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   437
			);
580f7610d661 Allow CJK override for zh_CN/zh_TW/ja
nemo
parents: 2056
diff changeset
   438
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   439
	SpritesData: array[TSprite] of record
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   440
			FileName: String[14];
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   441
			Path, AltPath: TPathType;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   442
			Texture: PTexture;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   443
			Surface: PSDL_Surface;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   444
			Width, Height, imageWidth, imageHeight: LongInt;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   445
			saveSurf: boolean;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   446
			end = (
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   447
			(FileName:  'BlueWater'; Path: ptCurrTheme;AltPath: ptGraphics; Texture: nil; Surface: nil;
2292
87af4ad0ec98 New waves rendering procedure based on using texture coodrinates > 1.0
unc0rr
parents: 2262
diff changeset
   448
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWater
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   449
			(FileName:     'Clouds'; Path: ptCurrTheme;AltPath: ptGraphics; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   450
			Width: 256; Height:128; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprCloud
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   451
			(FileName:       'Bomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   452
			Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprBomb
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   453
			(FileName:  'BigDigits'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   454
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprBigDigit
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   455
			(FileName:      'Frame'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   456
			Width:   4; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprFrame
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   457
			(FileName:        'Lag'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   458
			Width:  65; Height: 65; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprLag
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   459
			(FileName:      'Arrow'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   460
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprCursor
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   461
			(FileName:    'Grenade'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   462
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprGrenade
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   463
			(FileName:    'Targetp'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   464
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprTargetP
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   465
			(FileName:        'UFO'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   466
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprUFO
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   467
			(FileName: 'SmokeTrace'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   468
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSmokeTrace
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   469
			(FileName:   'RopeHook'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   470
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprRopeHook
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   471
			(FileName:     'Expl50'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   472
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprExplosion50
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   473
			(FileName:    'MineOff'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   474
			Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprMineOff
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   475
			(FileName:     'MineOn'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   476
			Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprMineOn
2888
69d04079fb46 Graphic for dead mines
nemo
parents: 2881
diff changeset
   477
			(FileName:     'MineDead'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
69d04079fb46 Graphic for dead mines
nemo
parents: 2881
diff changeset
   478
			Width:   8; Height:  8; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprMineDead
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   479
			(FileName:       'Case'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   480
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprCase
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   481
			(FileName:   'FirstAid'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   482
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprFAid
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   483
			(FileName:   'dynamite'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   484
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprDynamite
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   485
			(FileName:      'Power'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   486
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprPower
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   487
			(FileName:     'ClBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   488
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprClusterBomb
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   489
			(FileName: 'ClParticle'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   490
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprClusterParticle
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   491
			(FileName:      'Flame'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   492
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprFlame
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   493
			(FileName:   'horizont'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   494
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHorizont
2426
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   495
			(FileName:  'horizontL'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   496
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHorizont
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   497
			(FileName:  'horizontR'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   498
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHorizont
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   499
			(FileName:        'Sky'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   500
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSky
2426
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   501
			(FileName:       'SkyL'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   502
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSky
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   503
			(FileName:       'SkyR'; Path: ptCurrTheme;AltPath: ptNone; Texture: nil; Surface: nil;
9d674c5c828d - Fix camera area with different zoom levels
unc0rr
parents: 2409
diff changeset
   504
			Width:   0; Height:  0; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSky
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   505
			(FileName:  'BrdrLines'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   506
			Width: 202; Height:  1; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAMBorders
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   507
			(FileName:       'Slot'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   508
			Width: 202; Height: 33; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAMSlot
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   509
			(FileName:   'AmmoName'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   510
			Width: 202; Height: 33; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAMSlotName
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   511
			(FileName:      'Ammos'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   512
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: true),// sprAMAmmos
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   513
			(FileName:   'SlotKeys'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   514
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAMSlotKeys
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   515
			(FileName:  'Selection'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   516
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAMSelection
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   517
			(FileName:     'Finger'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   518
			Width:  32; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprFinger
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   519
			(FileName:    'AirBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   520
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAirBomb
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   521
			(FileName:   'Airplane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   522
			Width: 254; Height: 101; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAirplane
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   523
			(FileName: 'amAirplane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   524
			Width:  64; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAmAirplane
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   525
			(FileName:   'amGirder'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   526
			Width: 160; Height:160; imageWidth: 0; imageHeight: 0; saveSurf:  true),// sprAmGirder
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   527
			(FileName:     'hhMask'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   528
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf:  true),// sprHHTelepMask
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   529
			(FileName:     'Switch'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   530
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSwitch
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   531
			(FileName:  'Parachute'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   532
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprParachute
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   533
			(FileName:     'Target'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   534
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprTarget
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   535
			(FileName:   'RopeNode'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   536
			Width:   6; Height:  6; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprRopeNode
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   537
			(FileName:   'thinking'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   538
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprQuestion
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   539
			(FileName:   'PowerBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   540
			Width: 256; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprPowerBar
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   541
			(FileName:    'WindBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   542
			Width: 151; Height: 17; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWindBar
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   543
			(FileName:      'WindL'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   544
			Width:  80; Height: 13; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWindL
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   545
			(FileName:      'WindR'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   546
			Width:  80; Height: 13; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWindR
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   547
			(FileName:      'Flake'; Path:ptCurrTheme; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   548
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprFlake
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   549
			(FileName:     'amRope'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   550
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandRope
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   551
			(FileName:  'amBazooka'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   552
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandBazooka
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   553
			(FileName:  'amShotgun'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   554
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandShotgun
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   555
			(FileName:   'amDEagle'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   556
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandDEagle
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   557
			(FileName:'amAirAttack'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   558
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandAirAttack
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   559
			(FileName: 'amBaseball'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   560
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandBaseball
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   561
			(FileName:     'Hammer'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   562
			Width:  32; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprPHammer
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   563
			(FileName: 'amBTorch_i'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   564
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandBlowTorch
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   565
			(FileName: 'amBTorch_w'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   566
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprBlowTorch
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   567
			(FileName:   'Teleport'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   568
			Width:  64; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprTeleport
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   569
			(FileName:    'HHDeath'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   570
			Width:  32; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHHDeath
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   571
			(FileName:'amShotgun_w'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   572
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprShotgun
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   573
			(FileName: 'amDEagle_w'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   574
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprDEagle
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   575
			(FileName:       'Idle'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   576
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHHIdle
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   577
			(FileName:     'Mortar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   578
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprMortar
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   579
			(FileName:  'TurnsLeft'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   580
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprTurnsLeft
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   581
			(FileName: 'amKamikaze'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   582
			Width: 256; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprKamikaze
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   583
			(FileName:     'amWhip'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   584
			Width: 128; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWhip
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   585
			(FileName:     'Kowtow'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   586
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprKowtow
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   587
			(FileName:        'Sad'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   588
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSad
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   589
			(FileName:       'Wave'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   590
			Width:  64; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWave
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   591
			(FileName:     'Hurrah'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   592
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHurrah
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   593
			(FileName:'ILoveLemonade';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   594
			Width: 128; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprLemonade
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   595
			(FileName:      'Shrug'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   596
			Width: 32;  Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprShrug
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   597
			(FileName:     'Juggle'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   598
			Width: 32;  Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprJuggle
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   599
			(FileName:   'ExplPart'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   600
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprExplPart
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   601
			(FileName:  'ExplPart2'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   602
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprExplPart2
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   603
			(FileName:  'Cake_walk'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   604
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprCakeWalk
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   605
			(FileName:  'Cake_down'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   606
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprCakeDown
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   607
			(FileName:   'Ammos_bw'; Path: ptAmmoMenu; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   608
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprAMAmmosBW
1262
e9191c693e44 Add watermelon sprite
unc0rr
parents: 1261
diff changeset
   609
			(FileName: 'Watermelon'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   610
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprWatermelon
1263
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
   611
			(FileName:  'EvilTrace'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   612
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprEvilTrace
1263
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
   613
			(FileName:'HellishBomb'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   614
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHellishBomb
1284
21916b5de218 - Update Italian translation
unc0rr
parents: 1279
diff changeset
   615
			(FileName:  'Seduction'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   616
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSeduction
1286
a02a5345b91e Seduction animation
unc0rr
parents: 1285
diff changeset
   617
			(FileName:    'HHDress'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   618
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprDress
1286
a02a5345b91e Seduction animation
unc0rr
parents: 1285
diff changeset
   619
			(FileName:   'Censored'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   620
			Width:  64; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprCensored
1580
971e7f057a86 Move sprite to where it should be
unc0rr
parents: 1573
diff changeset
   621
			(FileName:      'Drill'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   622
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprDrill
1573
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
   623
			(FileName:    'amDrill'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   624
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandDrill
1863
705c01571196 Utility icon
unc0rr
parents: 1861
diff changeset
   625
			(FileName:  'amBallgun'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   626
			Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprHandBallgun
1601
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
   627
			(FileName:      'Balls'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   628
			Width:  32; Height: 20; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprBalls
1863
705c01571196 Utility icon
unc0rr
parents: 1861
diff changeset
   629
			(FileName:    'RCPlane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   630
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprPlane
1863
705c01571196 Utility icon
unc0rr
parents: 1861
diff changeset
   631
			(FileName:  'amRCPlane'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   632
			Width:  32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprHandPlane
1863
705c01571196 Utility icon
unc0rr
parents: 1861
diff changeset
   633
			(FileName:    'Utility'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   634
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprUtility
1908
5be17e24751a Use GL_TRIANGLE_FAN instead of GL_TRIANGLES (more efficient)
unc0rr
parents: 1906
diff changeset
   635
			(FileName:'Invulnerable';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   636
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprInvulnerable
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   637
			(FileName:   'Vampiric'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   638
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprVampiric
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   639
			(FileName:   'amGirder'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   640
			Width: 512; Height:512; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprGirder
2017
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
   641
			(FileName:'SpeechCorner';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   642
			Width:  12; Height: 9; imageWidth: 0; imageHeight: 0; saveSurf:  true), // sprSpeechCorner
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   643
			(FileName: 'SpeechEdge'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   644
			Width:  25; Height: 9; imageWidth: 0; imageHeight: 0; saveSurf:  true), // sprSpeechEdge
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   645
			(FileName: 'SpeechTail'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   646
			Width:  25; Height: 26; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprSpeechTail
2017
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
   647
			(FileName:'ThoughtCorner';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   648
			Width:  49; Height: 37; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprThoughtCorner
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   649
			(FileName:'ThoughtEdge'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   650
			Width:  23; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprThoughtEdge
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   651
			(FileName:'ThoughtTail'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   652
			Width:  45; Height: 65; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprThoughtTail
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   653
			(FileName:'ShoutCorner'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   654
			Width:  34; Height: 23; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprShoutCorner
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   655
			(FileName:  'ShoutEdge'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   656
			Width:  30; Height: 20; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprShoutEdge
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   657
			(FileName:  'ShoutTail'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   658
			Width:  30; Height: 37; imageWidth: 0; imageHeight: 0; saveSurf: true), // sprShoutTail
2023
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
   659
			(FileName:'amSniperRifle';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   660
			Width: 128; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprSniperRifle
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   661
			(FileName:    'Bubbles'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2229
081081a61a16 patch for loading sprites on two columns (helps embedded and lowpower machines). must deal with amGirder.png
koda
parents: 2221
diff changeset
   662
			Width:  16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprBubbles
2292
87af4ad0ec98 New waves rendering procedure based on using texture coodrinates > 1.0
unc0rr
parents: 2262
diff changeset
   663
			(FileName:  'amJetpack'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
2428
6800f8aa0184 Huge Smaxx patch with some fixes by me:
unc0rr
parents: 2426
diff changeset
   664
			Width: 64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprJetpack
6800f8aa0184 Huge Smaxx patch with some fixes by me:
unc0rr
parents: 2426
diff changeset
   665
			(FileName:  'Health'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2457
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
   666
			Width: 16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprHealth
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
   667
			(FileName:  'amMolotov'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil; 
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
   668
			Width: 32; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false), //sprHandMolotov
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
   669
			(FileName:  'Molotov'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2713
71250942e95b Palewolf's smoke traces for fire.
nemo
parents: 2703
diff changeset
   670
			Width: 16; Height: 16; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprMolotov
71250942e95b Palewolf's smoke traces for fire.
nemo
parents: 2703
diff changeset
   671
			(FileName: 'Smoke'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2827
45817d8386c7 Engine:
smxx
parents: 2825
diff changeset
   672
			Width:  22; Height: 22; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSmoke
2941
566f967ec22f White/Black smoke, break out rolling barrel into its own routine, adjust rolling barrel impact damage. NEEDS TESTING
nemo
parents: 2933
diff changeset
   673
			(FileName: 'SmokeWhite'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
566f967ec22f White/Black smoke, break out rolling barrel into its own routine, adjust rolling barrel impact damage. NEEDS TESTING
nemo
parents: 2933
diff changeset
   674
			Width:  22; Height: 22; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprSmokeWhite
2827
45817d8386c7 Engine:
smxx
parents: 2825
diff changeset
   675
			(FileName: 'Shells'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2848
8a1725b4f724 Engine:
smxx
parents: 2827
diff changeset
   676
			Width:  8; Height: 8; imageWidth: 0; imageHeight: 0; saveSurf: false), // sprShell
8a1725b4f724 Engine:
smxx
parents: 2827
diff changeset
   677
			(FileName: 'Dust'; Path: ptCurrTheme; AltPath: ptGraphics; Texture: nil; Surface: nil;
2911
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
   678
			Width:  22; Height: 22; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprDust
cd355befa683 Engine:
smxx
parents: 2908
diff changeset
   679
			(FileName: 'Explosives'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
2921
b7a636503298 Engine:
smxx
parents: 2916
diff changeset
   680
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprExplosives
2933
02af54eb7e1e Experiment with barrels. Add rolling.
nemo
parents: 2924
diff changeset
   681
			(FileName: 'ExplosivesRoll'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
02af54eb7e1e Experiment with barrels. Add rolling.
nemo
parents: 2924
diff changeset
   682
			Width:  48; Height: 48; imageWidth: 0; imageHeight: 0; saveSurf: false),// sprExplosivesRoll
2921
b7a636503298 Engine:
smxx
parents: 2916
diff changeset
   683
			(FileName: 'amTeleport'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
b7a636503298 Engine:
smxx
parents: 2916
diff changeset
   684
			Width:  64; Height: 32; imageWidth: 0; imageHeight: 0; saveSurf: false) // sprAmTeleport
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   685
			);
688
e4d1fb310a66 Convert some stuff to sprites
unc0rr
parents: 621
diff changeset
   686
1034
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   687
	Wavez: array [TWave] of record
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   688
			Sprite: TSprite;
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   689
			FramesCount: Longword;
2056
ed8c83f1e4b0 Two new wavez - Juggle requires a different frame rate. using 38 instead of 125
nemo
parents: 2042
diff changeset
   690
			Interval: Longword;
1037
63f956a6fe7f Lemonade taunt
unc0rr
parents: 1036
diff changeset
   691
			cmd: String[20];
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   692
			Voice: TSound;
2735
f2008d0ce3f8 Engine:
smxx
parents: 2726
diff changeset
   693
			VoiceDelay: LongWord;
1034
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   694
			end = (
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   695
			(Sprite:   sprKowtow; FramesCount: 12; Interval: 125; cmd: '/rollup'; Voice: sndNone; VoiceDelay: 0),
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   696
			(Sprite:      sprSad; FramesCount: 14; Interval: 125; cmd: '/sad'; Voice: sndNone; VoiceDelay: 0),
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   697
			(Sprite:     sprWave; FramesCount: 16; Interval: 125; cmd: '/wave'; Voice: sndHello; VoiceDelay: 5),
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   698
			(Sprite:   sprHurrah; FramesCount: 14; Interval: 125; cmd: '/hurrah'; Voice: sndNone; VoiceDelay: 0),
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   699
			(Sprite: sprLemonade; FramesCount: 24; Interval: 125; cmd: '/ilovelotsoflemonade'; Voice: sndNone; VoiceDelay: 0),
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   700
			(Sprite:    sprShrug; FramesCount: 24; Interval: 125; cmd: '/shrug'; Voice: sndNone; VoiceDelay: 0),
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   701
			(Sprite:   sprJuggle; FramesCount: 49; Interval:  38; cmd: '/juggle'; Voice: sndNone; VoiceDelay: 0)
1034
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   702
			);
05f003ad3caa Further work on taunts
unc0rr
parents: 1033
diff changeset
   703
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   704
	Soundz: array[TSound] of record
1712
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   705
			FileName: String[25];
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   706
			Path    : TPathType;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   707
			end = (
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   708
			(FileName:                         ''; Path: ptNone  ),// sndNone
1712
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   709
			(FileName:        'grenadeimpact.ogg'; Path: ptSounds),// sndGrenadeImpact
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   710
			(FileName:            'explosion.ogg'; Path: ptSounds),// sndExplosion
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   711
			(FileName:         'throwpowerup.ogg'; Path: ptSounds),// sndThrowPowerUp
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   712
			(FileName:         'throwrelease.ogg'; Path: ptSounds),// sndThrowRelease
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   713
			(FileName:               'splash.ogg'; Path: ptSounds),// sndSplash
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   714
			(FileName:        'shotgunreload.ogg'; Path: ptSounds),// sndShotgunReload
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   715
			(FileName:          'shotgunfire.ogg'; Path: ptSounds),// sndShotgunFire
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   716
			(FileName:          'graveimpact.ogg'; Path: ptSounds),// sndGraveImpact
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   717
			(FileName:             'minetick.ogg'; Path: ptSounds),// sndMineTicks
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   718
			(FileName:           'pickhammer.ogg'; Path: ptSounds),// sndPickhammer
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   719
			(FileName:                  'gun.ogg'; Path: ptSounds),// sndGun
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   720
			(FileName:                  'ufo.ogg'; Path: ptSounds),// sndUFO
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   721
			(FileName:                'Jump1.ogg'; Path: ptVoices),// sndJump1
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   722
			(FileName:                'Jump2.ogg'; Path: ptVoices),// sndJump2
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   723
			(FileName:                'Jump3.ogg'; Path: ptVoices),// sndJump3
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   724
			(FileName:               'Yessir.ogg'; Path: ptVoices),// sndYesSir
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   725
			(FileName:                'Laugh.ogg'; Path: ptVoices),// sndLaugh
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   726
			(FileName:            'Illgetyou.ogg'; Path: ptVoices),// sndIllGetYou
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   727
			(FileName:             'Incoming.ogg'; Path: ptVoices),// sndIncoming
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   728
			(FileName:               'Missed.ogg'; Path: ptVoices),// sndMissed
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   729
			(FileName:               'Stupid.ogg'; Path: ptVoices),// sndStupid
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   730
			(FileName:           'Firstblood.ogg'; Path: ptVoices),// sndFirstBlood
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   731
			(FileName:               'Boring.ogg'; Path: ptVoices),// sndBoring
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   732
			(FileName:               'Byebye.ogg'; Path: ptVoices),// sndByeBye
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   733
			(FileName:             'Sameteam.ogg'; Path: ptVoices),// sndSameTeam
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   734
			(FileName:               'Nutter.ogg'; Path: ptVoices),// sndNutter
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   735
			(FileName:       'Reinforcements.ogg'; Path: ptVoices),// sndReinforce
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   736
			(FileName:              'Traitor.ogg'; Path: ptVoices),// sndTraitor
2144
c76a2f7bd452 - Fix some ugly code
unc0rr
parents: 2143
diff changeset
   737
			(FileName:      'Youllregretthat.ogg'; Path: ptVoices),// sndRegret
1712
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   738
			(FileName:            'Enemydown.ogg'; Path: ptVoices),// sndEnemyDown
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   739
			(FileName:               'Coward.ogg'; Path: ptVoices),// sndCoward
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   740
			(FileName:                'Hurry.ogg'; Path: ptVoices),// sndHurry
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   741
			(FileName:              'Watchit.ogg'; Path: ptVoices),// sndWatchIt
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   742
			(FileName:             'Kamikaze.ogg'; Path: ptVoices),// sndKamikaze
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   743
			(FileName:                'cake2.ogg'; Path: ptSounds),// sndCake
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   744
			(FileName:                  'Ow1.ogg'; Path: ptVoices),// sndOw1
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   745
			(FileName:                  'Ow4.ogg'; Path: ptVoices),// sndOw4
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   746
			(FileName:           'Firepunch1.ogg'; Path: ptVoices),// sndFirepunch1
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   747
			(FileName:           'Firepunch2.ogg'; Path: ptVoices),// sndFirepunch2
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   748
			(FileName:           'Firepunch3.ogg'; Path: ptVoices),// sndFirepunch3
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   749
			(FileName:           'Firepunch4.ogg'; Path: ptVoices),// sndFirepunch4
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   750
			(FileName:           'Firepunch5.ogg'; Path: ptVoices),// sndFirepunch5
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   751
			(FileName:           'Firepunch6.ogg'; Path: ptVoices),// sndFirepunch6
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   752
			(FileName:                'Melon.ogg'; Path: ptSounds),// sndMelon
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   753
			(FileName:              'Hellish.ogg'; Path: ptSounds),// sndHellish
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   754
			(FileName:               'Yoohoo.ogg'; Path: ptSounds),// sndYoohoo
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   755
			(FileName:              'rcplane.ogg'; Path: ptSounds),// sndRCPlane
f5b916de40f0 Patch by nemo (polished by me)
unc0rr
parents: 1708
diff changeset
   756
			(FileName:            'whipcrack.ogg'; Path: ptSounds),// sndWhipCrack
1914
aab686a4e0c5 Add sounds to girder
unc0rr
parents: 1912
diff changeset
   757
			(FileName:'ride_of_the_valkyries.ogg'; Path: ptSounds),// sndRideOfTheValkyries
aab686a4e0c5 Add sounds to girder
unc0rr
parents: 1912
diff changeset
   758
			(FileName:               'denied.ogg'; Path: ptSounds),// sndDenied
2143
ad05f6b2d1c0 New baseball bat sound, steam when fire lands on water (needs new hiss sound), bubbles when hedgehog drowns, more messages on
nemo
parents: 2142
diff changeset
   759
			(FileName:               'placed.ogg'; Path: ptSounds),// sndPlaced
ad05f6b2d1c0 New baseball bat sound, steam when fire lands on water (needs new hiss sound), bubbles when hedgehog drowns, more messages on
nemo
parents: 2142
diff changeset
   760
			(FileName:          'baseballbat.ogg'; Path: ptSounds),// sndBaseballBat
2217
458c08d74ae6 sounds for teleport and beginning of sudden death
koda
parents: 2210
diff changeset
   761
			(FileName:                'steam.ogg'; Path: ptSounds),// sndVaporize
458c08d74ae6 sounds for teleport and beginning of sudden death
koda
parents: 2210
diff changeset
   762
			(FileName:                 'warp.ogg'; Path: ptSounds),// sndWarp
2262
0dc94341bf42 sound for mortar
koda
parents: 2258
diff changeset
   763
			(FileName:          'suddendeath.ogg'; Path: ptSounds),// sndSuddenDeath
2327
4832b77ec958 restored volumen control (hoorray)
koda
parents: 2319
diff changeset
   764
			(FileName:               'mortar.ogg'; Path: ptSounds),// sndMortar
2470
44b66fbf37da molotov sound FTW
koda
parents: 2468
diff changeset
   765
			(FileName:         'shutterclick.ogg'; Path: ptSounds),// sndShutter
44b66fbf37da molotov sound FTW
koda
parents: 2468
diff changeset
   766
			(FileName:              'homerun.ogg'; Path: ptSounds),// sndHomerun
2647
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   767
			(FileName:              'molotov.ogg'; Path: ptSounds),// sndMolotov
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   768
			(FileName:            'Takecover.ogg'; Path: ptVoices),// sndCover
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   769
			(FileName:                'Uh-oh.ogg'; Path: ptVoices),// sndUhOh
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   770
			(FileName:                 'Oops.ogg'; Path: ptVoices),// sndOops
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   771
			(FileName:                 'Nooo.ogg'; Path: ptVoices),// sndNooo
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   772
			(FileName:                'Hello.ogg'; Path: ptVoices),// sndHello
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   773
			(FileName:                         ''; Path: ptSounds),// sndRopeShot
0e1208e92dfe Smaxx patch with tuning by me:
unc0rr
parents: 2630
diff changeset
   774
			(FileName:                         ''; Path: ptSounds),// sndRopeAttach
2735
f2008d0ce3f8 Engine:
smxx
parents: 2726
diff changeset
   775
			(FileName:                         ''; Path: ptSounds),// sndRopeRelease
2780
11e5e6335b17 Engine:
smxx
parents: 2762
diff changeset
   776
			(FileName:            'switchhog.ogg'; Path: ptSounds),// sndSwitchHog
2827
45817d8386c7 Engine:
smxx
parents: 2825
diff changeset
   777
			(FileName:              'victory.ogg'; Path: ptVoices),// sndVictory
2852
c6dff591f564 Engine:
smxx
parents: 2848
diff changeset
   778
			(FileName:         'sniperreload.ogg'; Path: ptSounds),// sndSniperReload
2908
bd1909984a09 Engine:
smxx
parents: 2905
diff changeset
   779
			(FileName:                'steps.ogg'; Path: ptSounds),// sndSteps
bd1909984a09 Engine:
smxx
parents: 2905
diff changeset
   780
			(FileName:           'lowgravity.ogg'; Path: ptSounds) // sndLowGravity
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   781
			);
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
   782
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   783
	Ammoz: array [TAmmoType] of record
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   784
			NameId: TAmmoStrId;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   785
			NameTex: PTexture;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   786
			Probability, NumberInCase: Longword;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   787
			Ammo: TAmmo;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   788
			Slot: 0..cMaxSlotIndex;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   789
			TimeAfterTurn: Longword;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   790
			minAngle, maxAngle: Longword;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   791
			isDamaging: boolean;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   792
			SkipTurns: Longword;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   793
			PosCount: Longword;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   794
			PosSprite: TSprite;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   795
			end = (
2357
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   796
			(NameId: sidNothing;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   797
			NameTex: nil;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   798
			Probability: 0;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   799
			NumberInCase: 0;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   800
			Ammo: (Propz: ammoprop_NoCrosshair or ammoprop_DontHold or ammoprop_Utility;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   801
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   802
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   803
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   804
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   805
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   806
				AmmoType: amNothing;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   807
				AttackVoice: sndNone);
2357
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   808
			Slot: 0;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   809
			TimeAfterTurn: 0;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   810
			minAngle: 0;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   811
			maxAngle: 0;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   812
			isDamaging: false;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   813
			SkipTurns: 9999;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   814
			PosCount: 1;
babe1a55e284 Add an empty weapon to avoid selection of weapons which aren't yet ready. Might all be useful to switch to amNothing in certain situations, like after using up all ropes, instead of bazooka.
nemo
parents: 2347
diff changeset
   815
			PosSprite: sprWater),
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   816
			(NameId: sidGrenade;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   817
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   818
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   819
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   820
			Ammo: (Propz: ammoprop_Timerable or ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   821
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   822
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   823
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   824
				Timer: 3000;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   825
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   826
				AmmoType: amGrenade;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   827
				AttackVoice: sndCover);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   828
			Slot: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   829
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   830
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   831
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   832
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   833
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   834
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   835
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   836
			(NameId: sidClusterBomb;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   837
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   838
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   839
			NumberInCase: 3;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   840
			Ammo: (Propz: ammoprop_Timerable or ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   841
				Count: 5;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   842
				InitialCount: 5;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   843
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   844
				Timer: 3000;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   845
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   846
				AmmoType: amClusterBomb;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   847
				AttackVoice: sndCover);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   848
			Slot: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   849
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   850
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   851
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   852
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   853
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   854
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   855
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   856
			(NameId: sidBazooka;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   857
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   858
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   859
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   860
			Ammo: (Propz: ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   861
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   862
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   863
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   864
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   865
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   866
				AmmoType: amBazooka;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   867
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   868
			Slot: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   869
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   870
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   871
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   872
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   873
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   874
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   875
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   876
			(NameId: sidUFO;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   877
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   878
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   879
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   880
			Ammo: (Propz: ammoprop_Power or	ammoprop_NeedTarget or ammoprop_DontHold;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   881
				Count: 2;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   882
				InitialCount: 2;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   883
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   884
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   885
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   886
				AmmoType: amUFO;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   887
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   888
			Slot: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   889
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   890
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   891
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   892
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   893
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   894
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   895
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   896
			(NameId: sidShotgun;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   897
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   898
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   899
			NumberInCase: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   900
			Ammo: (Propz: ammoprop_ForwMsgs;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   901
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   902
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   903
				NumPerTurn: 1;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   904
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   905
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   906
				AmmoType: amShotgun;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   907
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   908
			Slot: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   909
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   910
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   911
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   912
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   913
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   914
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   915
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   916
			(NameId: sidPickHammer;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   917
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   918
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   919
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   920
			Ammo: (Propz: ammoprop_ForwMsgs or ammoprop_AttackInMove or ammoprop_NoCrosshair or ammoprop_DontHold;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   921
				Count: 2;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   922
				InitialCount: 2;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   923
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   924
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   925
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   926
				AmmoType: amPickHammer;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   927
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   928
			Slot: 6;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   929
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   930
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   931
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   932
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   933
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   934
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   935
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   936
			(NameId: sidSkip;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   937
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   938
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   939
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   940
			Ammo: (Propz: ammoprop_NoCrosshair or ammoprop_DontHold;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   941
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   942
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   943
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   944
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   945
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   946
				AmmoType: amSkip;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   947
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   948
			Slot: 8;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   949
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   950
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   951
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   952
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   953
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   954
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   955
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   956
			(NameId: sidRope;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   957
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   958
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   959
			NumberInCase: 3;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   960
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   961
						  ammoprop_ForwMsgs or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   962
							ammoprop_AttackInMove or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   963
							ammoprop_AltAttack;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   964
					Count: 5;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   965
					InitialCount: 5;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   966
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   967
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   968
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   969
					AmmoType: amRope;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
   970
					AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   971
			Slot: 7;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   972
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   973
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   974
			maxAngle: cMaxAngle div 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   975
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   976
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   977
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   978
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   979
			(NameId: sidMine;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   980
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   981
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   982
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   983
			Ammo: (Propz: ammoprop_NoCrosshair or ammoprop_AttackInMove or ammoprop_DontHold or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   984
				Count: 2;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
   985
				InitialCount: 2;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   986
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   987
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   988
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   989
				AmmoType: amMine;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
   990
				AttackVoice: sndLaugh);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   991
			Slot: 4;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   992
			TimeAfterTurn: 5000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   993
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   994
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   995
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   996
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   997
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   998
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
   999
			(NameId: sidDEagle;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1000
			NameTex: nil;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1001
			Probability: 20;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1002
			NumberInCase: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1003
			Ammo: (Propz: 0;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1004
				Count: 3;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1005
				InitialCount: 3;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1006
				NumPerTurn: 3;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1007
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1008
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1009
				AmmoType: amDEagle;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1010
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1011
			Slot: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1012
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1013
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1014
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1015
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1016
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1017
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1018
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1019
			(NameId: sidDynamite;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1020
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1021
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1022
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1023
			Ammo: (Propz: ammoprop_NoCrosshair or ammoprop_AttackInMove or ammoprop_DontHold or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1024
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1025
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1026
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1027
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1028
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1029
				AmmoType: amDynamite;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1030
				AttackVoice: sndLaugh);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1031
			Slot: 4;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1032
			TimeAfterTurn: 5000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1033
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1034
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1035
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1036
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1037
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1038
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1039
			(NameId: sidFirePunch;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1040
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1041
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1042
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1043
			Ammo: (Propz: ammoprop_NoCrosshair or ammoprop_ForwMsgs or ammoprop_AttackInMove;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1044
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1045
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1046
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1047
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1048
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1049
				AmmoType: amFirePunch;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1050
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1051
			Slot: 3;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1052
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1053
			MinAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1054
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1055
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1056
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1057
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1058
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1059
			(NameId: sidWhip;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1060
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1061
			Probability: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1062
			NumberInCase: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1063
			Ammo: (Propz: ammoprop_NoCrosshair;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1064
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1065
				InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1066
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1067
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1068
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1069
				AmmoType: amWhip;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1070
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1071
			Slot: 3;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1072
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1073
			MinAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1074
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1075
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1076
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1077
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1078
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1079
			(NameId: sidBaseballBat;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1080
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1081
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1082
			NumberInCase: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1083
			Ammo: (Propz: ammoprop_DontHold;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1084
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1085
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1086
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1087
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1088
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1089
				AmmoType: amBaseballBat;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1090
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1091
			Slot: 3;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1092
			TimeAfterTurn: 5000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1093
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1094
			maxAngle: cMaxAngle div 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1095
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1096
			SkipTurns: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1097
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1098
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1099
			(NameId: sidParachute;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1100
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1101
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1102
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1103
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1104
						  ammoprop_ForwMsgs or
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1105
							ammoprop_AttackInMove or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1106
							ammoprop_NoCrosshair or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1107
							ammoprop_DontHold or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1108
							ammoprop_AltAttack;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1109
				Count: 2;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1110
				InitialCount: 2;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1111
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1112
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1113
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1114
				AmmoType: amParachute;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1115
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1116
			Slot: 7;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1117
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1118
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1119
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1120
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1121
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1122
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1123
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1124
			(NameId: sidAirAttack;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1125
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1126
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1127
			NumberInCase: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1128
			Ammo: (Propz: ammoprop_NoCrosshair or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1129
							ammoprop_NeedTarget or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1130
							ammoprop_AttackingPut or
1784
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
  1131
							ammoprop_DontHold or
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
  1132
							ammoprop_NotBorder;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1133
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1134
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1135
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1136
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1137
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1138
				AmmoType: amAirAttack;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1139
				AttackVoice: sndIncoming);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1140
			Slot: 5;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1141
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1142
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1143
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1144
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1145
			SkipTurns: 5;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1146
			PosCount: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1147
			PosSprite: sprAmAirplane),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1148
			(NameId: sidMineStrike;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1149
			NameTex: nil;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1150
			Probability: 200;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1151
			NumberInCase: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1152
			Ammo: (Propz: ammoprop_NoCrosshair or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1153
							ammoprop_NeedTarget or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1154
							ammoprop_AttackingPut or
1784
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
  1155
							ammoprop_DontHold or
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
  1156
							ammoprop_NotBorder;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1157
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1158
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1159
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1160
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1161
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1162
				AmmoType: amMineStrike;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1163
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1164
			Slot: 5;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1165
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1166
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1167
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1168
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1169
			SkipTurns: 5;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1170
			PosCount: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1171
			PosSprite: sprAmAirplane),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1172
			(NameId: sidBlowTorch;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1173
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1174
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1175
			NumberInCase: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1176
			Ammo: (Propz: ammoprop_ForwMsgs;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1177
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1178
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1179
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1180
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1181
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1182
				AmmoType: amBlowTorch;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1183
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1184
			Slot: 6;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1185
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1186
			minAngle: 768;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1187
			maxAngle: 1280;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1188
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1189
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1190
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1191
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1192
			(NameId: sidGirder;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1193
			NameTex: nil;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1194
			Probability: 150;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1195
			NumberInCase: 3;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1196
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1197
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1198
							ammoprop_NeedTarget or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1199
							ammoprop_AttackingPut;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1200
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1201
				    InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1202
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1203
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1204
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1205
					AmmoType: amGirder;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1206
					AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1207
			Slot: 6;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1208
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1209
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1210
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1211
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1212
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1213
			PosCount: 8;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1214
			PosSprite: sprAmGirder),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1215
			(NameId: sidTeleport;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1216
			NameTex: nil;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1217
			Probability: 200;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1218
			NumberInCase: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1219
			Ammo: (Propz: ammoprop_ForwMsgs or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1220
							ammoprop_NoCrosshair or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1221
							ammoprop_NeedTarget or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1222
							ammoprop_AttackingPut or
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1223
							ammoprop_DontHold;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1224
				Count: 2;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1225
				InitialCount: 2;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1226
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1227
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1228
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1229
				AmmoType: amTeleport;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1230
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1231
			Slot: 7;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1232
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1233
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1234
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1235
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1236
			SkipTurns: 0;
2921
b7a636503298 Engine:
smxx
parents: 2916
diff changeset
  1237
			PosCount: 2;
b7a636503298 Engine:
smxx
parents: 2916
diff changeset
  1238
			PosSprite: sprAmTeleport),
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1239
			(NameId: sidSwitch;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1240
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1241
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1242
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1243
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1244
						  ammoprop_ForwMsgs or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1245
							ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1246
							ammoprop_DontHold;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1247
					Count: 3;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1248
				    InitialCount: 3;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1249
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1250
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1251
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1252
					AmmoType: amSwitch;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1253
					AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1254
			Slot: 8;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1255
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1256
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1257
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1258
			isDamaging: false;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1259
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1260
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1261
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1262
			(NameId: sidMortar;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1263
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1264
			Probability: 100;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1265
			NumberInCase: 4;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1266
			Ammo: (Propz: 0;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1267
				Count: 4;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1268
				InitialCount: 4;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1269
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1270
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1271
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1272
				AmmoType: amMortar;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1273
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1274
			Slot: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1275
			TimeAfterTurn: 3000;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1276
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1277
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1278
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1279
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1280
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1281
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1282
			(NameId: sidKamikaze;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1283
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1284
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1285
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1286
			Ammo: (Propz: ammoprop_ForwMsgs or ammoprop_DontHold or ammoprop_AttackInMove;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1287
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1288
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1289
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1290
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1291
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1292
				AmmoType: amKamikaze;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1293
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1294
			Slot: 3;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1295
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1296
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1297
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1298
			isDamaging: true;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1299
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1300
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1301
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1302
			(NameId: sidCake;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1303
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1304
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1305
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1306
			Ammo: (Propz: ammoprop_ForwMsgs or ammoprop_NoCrosshair or ammoprop_DontHold;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1307
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1308
				InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1309
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1310
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1311
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1312
				AmmoType: amCake;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1313
				AttackVoice: sndLaugh);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1314
			Slot: 4;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1315
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1316
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1317
			maxAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1318
			isDamaging: true;
1445
3dcff3e1a4c9 Activate cake after 4 turns
unc0rr
parents: 1439
diff changeset
  1319
			SkipTurns: 4;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1320
			PosCount: 1;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1321
			PosSprite: sprWater),
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1322
			(NameId: sidSeduction;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1323
			NameTex: nil;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1324
			Probability: 100;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1325
			NumberInCase: 1;
1284
21916b5de218 - Update Italian translation
unc0rr
parents: 1279
diff changeset
  1326
			Ammo: (Propz: ammoprop_ForwMsgs or ammoprop_DontHold;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1327
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1328
                InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1329
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1330
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1331
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1332
				AmmoType: amSeduction;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1333
				AttackVoice: sndNone);
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1334
			Slot: 2;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1335
			TimeAfterTurn: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1336
			minAngle: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1337
			maxAngle: 0;
1508
ef093f31ced1 small fixes
unc0rr
parents: 1507
diff changeset
  1338
			isDamaging: false;
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1339
			SkipTurns: 0;
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1340
			PosCount: 1;
1261
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1341
			PosSprite: sprWater),
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1342
			(NameId: sidWatermelon;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1343
			NameTex: nil;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1344
			Probability: 400;
1261
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1345
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1346
			Ammo: (Propz: ammoprop_Timerable or ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1347
				Count: 0;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1348
                InitialCount: 0;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1349
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1350
				Timer: 3000;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1351
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1352
				AmmoType: amWatermelon;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1353
				AttackVoice: sndMelon);
1261
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1354
			Slot: 1;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1355
			TimeAfterTurn: 3000;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1356
			minAngle: 0;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1357
			maxAngle: 0;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1358
			isDamaging: true;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1359
			SkipTurns: 0;
903058d382c7 Add watermelon weapon (without proper sprites yet)
unc0rr
parents: 1259
diff changeset
  1360
			PosCount: 1;
1263
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1361
			PosSprite: sprWater),
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1362
			(NameId: sidHellishBomb;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1363
			NameTex: nil;
1430
8b192c18a584 Correct default ammo set
unc0rr
parents: 1428
diff changeset
  1364
			Probability: 400;
1263
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1365
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1366
			Ammo: (Propz:  ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1367
				Count: 0;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1368
                InitialCount: 0;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1369
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1370
				Timer: 5000;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1371
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1372
				AmmoType: amHellishBomb;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1373
				AttackVoice: sndNone);
1263
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1374
			Slot: 4;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1375
			TimeAfterTurn: 3000;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1376
			minAngle: 0;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1377
			maxAngle: 0;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1378
			isDamaging: true;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1379
			SkipTurns: 0;
24677a82531d Add Hellish bomb weapon
unc0rr
parents: 1262
diff changeset
  1380
			PosCount: 1;
1507
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1381
			PosSprite: sprWater),
1608
2631f5026714 Add napalm weapon name
unc0rr
parents: 1601
diff changeset
  1382
			(NameId: sidNapalm;
1507
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1383
			NameTex: nil;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1384
			Probability: 100;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1385
			NumberInCase: 1;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1386
			Ammo: (Propz: ammoprop_NoCrosshair or
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1387
							ammoprop_NeedTarget or
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1388
							ammoprop_AttackingPut or
1784
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
  1389
							ammoprop_DontHold or
dfe9bafb4590 Apply nemo's patch polished by me:
unc0rr
parents: 1766
diff changeset
  1390
							ammoprop_NotBorder;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1391
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1392
                InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1393
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1394
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1395
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1396
				AmmoType: amNapalm;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1397
				AttackVoice: sndNone);
1507
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1398
			Slot: 5;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1399
			TimeAfterTurn: 0;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1400
			minAngle: 0;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1401
			maxAngle: 0;
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1402
			isDamaging: true;
1608
2631f5026714 Add napalm weapon name
unc0rr
parents: 1601
diff changeset
  1403
			SkipTurns: 7;
1507
d18c67b7ad4c Quick and dirty napalm implementation
unc0rr
parents: 1505
diff changeset
  1404
			PosCount: 2;
1573
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1405
			PosSprite: sprAmAirplane),
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1406
			(NameId: sidDrill;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1407
			NameTex: nil;
1586
2c6f1d1f43c1 Adjust flame parameters to produce more damage
unc0rr
parents: 1580
diff changeset
  1408
			Probability: 300;
1573
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1409
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1410
			Ammo: (Propz: ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1411
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1412
                InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1413
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1414
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1415
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1416
				AmmoType: amDrill;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1417
				AttackVoice: sndNone);
1573
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1418
			Slot: 0;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1419
			TimeAfterTurn: 3000;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1420
			minAngle: 0;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1421
			maxAngle: 0;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1422
			isDamaging: true;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1423
			SkipTurns: 0;
cf88e0ace609 Drill rocket
unc0rr
parents: 1566
diff changeset
  1424
			PosCount: 1;
1601
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1425
			PosSprite: sprDrill),
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1426
			(NameId: sidBallgun;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1427
			NameTex: nil;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1428
			Probability: 400;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1429
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1430
			Ammo: (Propz:  ammoprop_ForwMsgs or ammoprop_DontHold;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1431
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1432
                InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1433
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1434
				Timer: 5001;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1435
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1436
				AmmoType: amBallgun;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1437
				AttackVoice: sndNone);
1601
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1438
			Slot: 2;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1439
			TimeAfterTurn: 0;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1440
			minAngle: 0;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1441
			maxAngle: 0;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1442
			isDamaging: true;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1443
			SkipTurns: 0;
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1444
			PosCount: 1;
1689
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1445
			PosSprite: sprWater),
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1446
			(NameId: sidRCPlane;
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1447
			NameTex: nil;
1721
993b17d862f8 Change rc plane options
unc0rr
parents: 1717
diff changeset
  1448
			Probability: 200;
1740
0d69ff7b5fbf Reduce number of bonus rc planes
unc0rr
parents: 1721
diff changeset
  1449
			NumberInCase: 1;
1689
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1450
			Ammo: (Propz: ammoprop_ForwMsgs{ or
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1451
							ammoprop_DontHold or
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1452
							ammoprop_AltAttack};
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1453
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1454
                InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1455
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1456
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1457
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1458
				AmmoType: amRCPlane;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1459
				AttackVoice: sndNone);
1689
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1460
			Slot: 6;
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1461
			TimeAfterTurn: 0;
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1462
			minAngle: 0;
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1463
			maxAngle: 0;
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1464
			isDamaging: true;
1721
993b17d862f8 Change rc plane options
unc0rr
parents: 1717
diff changeset
  1465
			SkipTurns: 4;
1689
3d0eee01f734 RC Plane
unc0rr
parents: 1656
diff changeset
  1466
			PosCount: 1;
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1467
			PosSprite: sprWater),
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1468
			(NameId: sidLowGravity;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1469
			NameTex: nil;
1861
unc0rr
parents: 1854
diff changeset
  1470
			Probability: 20;
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1471
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1472
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1473
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1474
						  ammoprop_DontHold or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1475
						  ammoprop_AltUse or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1476
                          ammoprop_Utility;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1477
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1478
                    InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1479
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1480
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1481
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1482
					AmmoType: amLowGravity;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1483
					AttackVoice: sndNone);
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1484
			Slot: 8;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1485
			TimeAfterTurn: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1486
			minAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1487
			maxAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1488
			isDamaging: false;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1489
			SkipTurns: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1490
			PosCount: 1;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1491
			PosSprite: sprWater),
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1492
			(NameId: sidExtraDamage;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1493
			NameTex: nil;
1861
unc0rr
parents: 1854
diff changeset
  1494
			Probability: 15;
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1495
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1496
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1497
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1498
						  ammoprop_DontHold or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1499
						  ammoprop_AltUse or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1500
                          ammoprop_Utility;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1501
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1502
                    InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1503
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1504
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1505
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1506
					AmmoType: amExtraDamage;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1507
					AttackVoice: sndNone);
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1508
			Slot: 8;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1509
			TimeAfterTurn: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1510
			minAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1511
			maxAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1512
			isDamaging: false;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1513
			SkipTurns: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1514
			PosCount: 1;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1515
			PosSprite: sprWater),
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1516
			(NameId: sidInvulnerable;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1517
			NameTex: nil;
1861
unc0rr
parents: 1854
diff changeset
  1518
			Probability: 20;
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1519
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1520
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1521
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1522
						  ammoprop_DontHold or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1523
						  ammoprop_AltUse or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1524
                          ammoprop_Utility;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1525
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1526
                    InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1527
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1528
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1529
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1530
					AmmoType: amInvulnerable;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1531
					AttackVoice: sndNone);
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1532
			Slot: 8;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1533
			TimeAfterTurn: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1534
			minAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1535
			maxAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1536
			isDamaging: false;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1537
			SkipTurns: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1538
			PosCount: 1;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1539
			PosSprite: sprWater),
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1540
			(NameId: sidExtraTime;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1541
			NameTex: nil;
1861
unc0rr
parents: 1854
diff changeset
  1542
			Probability: 30;
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1543
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1544
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1545
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1546
						  ammoprop_DontHold or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1547
						  ammoprop_AltUse or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1548
                          ammoprop_Utility;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1549
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1550
					InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1551
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1552
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1553
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1554
					AmmoType: amExtraTime;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1555
					AttackVoice: sndNone);
1849
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1556
			Slot: 7;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1557
			TimeAfterTurn: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1558
			minAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1559
			maxAngle: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1560
			isDamaging: false;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1561
			SkipTurns: 0;
2a989e5abda6 4 utilities by nemo
unc0rr
parents: 1825
diff changeset
  1562
			PosCount: 1;
1854
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1563
			PosSprite: sprWater),
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1564
			(NameId: sidLaserSight;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1565
			NameTex: nil;
1861
unc0rr
parents: 1854
diff changeset
  1566
			Probability: 15;
1854
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1567
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1568
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1569
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1570
						  ammoprop_DontHold or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1571
						  ammoprop_AltUse or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1572
                          ammoprop_Utility;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1573
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1574
                    InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1575
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1576
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1577
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1578
					AmmoType: amLaserSight;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1579
					AttackVoice: sndNone);
1854
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1580
			Slot: 7;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1581
			TimeAfterTurn: 0;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1582
			minAngle: 0;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1583
			maxAngle: 0;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1584
			isDamaging: false;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1585
			SkipTurns: 0;
6e05013899b2 laser beam by nemo reworked a bit by me
unc0rr
parents: 1849
diff changeset
  1586
			PosCount: 1;
2017
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1587
			PosSprite: sprWater),
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1588
			(NameId: sidVampiric;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1589
			NameTex: nil;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1590
			Probability: 15;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1591
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1592
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1593
						  ammoprop_NoCrosshair or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1594
						  ammoprop_DontHold or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1595
						  ammoprop_AltUse or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1596
                          ammoprop_Utility;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1597
					Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1598
                    InitialCount: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1599
					NumPerTurn: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1600
					Timer: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1601
					Pos: 0;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1602
					AmmoType: amVampiric;
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1603
					AttackVoice: sndNone);
2017
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1604
			Slot: 6;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1605
			TimeAfterTurn: 0;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1606
			minAngle: 0;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1607
			maxAngle: 0;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1608
			isDamaging: false;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1609
			SkipTurns: 0;
7845c77c8d31 nemo's great patch:
unc0rr
parents: 2005
diff changeset
  1610
			PosCount: 1;
2023
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1611
			PosSprite: sprWater),
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1612
			(NameId: sidSniperRifle;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1613
			NameTex: nil;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1614
			Probability: 20;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1615
			NumberInCase: 2;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1616
			Ammo: (Propz: 0;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1617
				Count: 2;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1618
                InitialCount: 2;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1619
				NumPerTurn: 1;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1620
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1621
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1622
				AmmoType: amSniperRifle;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1623
				AttackVoice: sndNone);
2023
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1624
			Slot: 2;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1625
			TimeAfterTurn: 3000;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1626
			minAngle: 0;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1627
			maxAngle: 0;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1628
			isDamaging: true;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1629
			SkipTurns: 0;
41d3afaa20c7 Artillery mode, sniper rifle, speech bubble tweaks, fix of rope bug introduced by enabling hats in jump
nemo
parents: 2017
diff changeset
  1630
			PosCount: 1;
2177
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1631
			PosSprite: sprWater),
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1632
			(NameId: sidJetpack;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1633
			NameTex: nil;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1634
			Probability: 20;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1635
			NumberInCase: 1;
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1636
			Ammo: (Propz: ammoprop_NoRoundEndHint or
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1637
						  ammoprop_ForwMsgs or
2177
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1638
							ammoprop_AttackInMove or
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1639
							ammoprop_NoCrosshair or
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1640
							ammoprop_DontHold or
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1641
							ammoprop_AltAttack;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1642
				Count: 1;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1643
                InitialCount: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1644
				NumPerTurn: 1;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1645
				Timer: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1646
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1647
				AmmoType: amJetpack;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1648
				AttackVoice: sndNone);
2177
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1649
			Slot: 3;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1650
			TimeAfterTurn: 3000;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1651
			minAngle: 0;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1652
			maxAngle: 0;
2179
839472821b4d Duplicate Parachute more closely :D
nemo
parents: 2177
diff changeset
  1653
			isDamaging: false;
2177
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1654
			SkipTurns: 0;
c045698e044f Initial attempt at jetpack. Pluses, more like lunar lander (takes fall damage). Minuses, can't seem to cancel it or use alt weapon
nemo
parents: 2171
diff changeset
  1655
			PosCount: 1;
2457
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1656
			PosSprite: sprWater),
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1657
			(NameId: sidMolotov;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1658
			NameTex: nil;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1659
			Probability: 0;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1660
			NumberInCase: 1;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1661
			Ammo: (Propz: ammoprop_Power or ammoprop_AltUse;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1662
				Count: AMMO_INFINITE;
2762
2fbc8d35eb52 Mode to place hogs at start of game. Will probably need a bit more testing.
nemo
parents: 2747
diff changeset
  1663
                InitialCount: AMMO_INFINITE;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1664
				NumPerTurn: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1665
				Timer: 3000;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1666
				Pos: 0;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1667
				AmmoType: amMolotov;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1668
				AttackVoice: sndNone);
2457
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1669
			Slot: 1;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1670
			TimeAfterTurn: 3000;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1671
			minAngle: 0;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1672
			maxAngle: 0;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1673
			isDamaging: true;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1674
			SkipTurns: 0;
ecf0c7e7995b Initial molotov cocktail. Still needs graphics, tweaking of fire behaviour. Also changed probabilities for default weapon sets
nemo
parents: 2428
diff changeset
  1675
			PosCount: 1;
1601
0cff69c8c4cf Ballsgun
unc0rr
parents: 1586
diff changeset
  1676
			PosSprite: sprWater)
1259
0c660c3d98a4 - Continue seduction implementation
unc0rr
parents: 1242
diff changeset
  1677
			);
37
2b7f2a43b999 - Properly get seed in net game
unc0rr
parents: 35
diff changeset
  1678
2575
d06e0e829828 update color management for new sdl_image on mac
koda
parents: 2568
diff changeset
  1679
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1680
	conversionFormat: TSDL_PixelFormat = (
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1681
		palette: nil;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1682
		BitsPerPixel : 32;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1683
		BytesPerPixel: 4;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1684
		Rloss : 0;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1685
		Gloss : 0;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1686
		Bloss : 0;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1687
		Aloss : 0;
2586
204e6b2885bc added little/big endian checks, added symbol for touch input, simplified iphoneos definitions
koda
parents: 2583
diff changeset
  1688
{$IFDEF ENDIAN_LITTLE}
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1689
		Rshift: 0;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1690
		Gshift: 8;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1691
		Bshift: 16;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1692
		Ashift: 24;
2586
204e6b2885bc added little/big endian checks, added symbol for touch input, simplified iphoneos definitions
koda
parents: 2583
diff changeset
  1693
{$ELSE}
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1694
		Rshift: 24;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1695
		Gshift: 16;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1696
		Bshift: 8;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1697
		Ashift: 0;
2586
204e6b2885bc added little/big endian checks, added symbol for touch input, simplified iphoneos definitions
koda
parents: 2583
diff changeset
  1698
{$ENDIF}
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1699
		RMask : RMask;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1700
		GMask : GMask;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1701
		BMask : BMask;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1702
		AMask : AMask;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1703
		colorkey: 0;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1704
		alpha : 255
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1705
	);
2575
d06e0e829828 update color management for new sdl_image on mac
koda
parents: 2568
diff changeset
  1706
			
d06e0e829828 update color management for new sdl_image on mac
koda
parents: 2568
diff changeset
  1707
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1708
procedure init_uConsts;
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1709
procedure free_uConsts;
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1710
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
  1711
implementation
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
  1712
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1713
procedure init_uConsts;
2905
f3c79f7193a9 Engine:
smxx
parents: 2903
diff changeset
  1714
var cPathz: array[TPathType] of shortstring = (
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1715
		'',                              // ptNone
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1716
		'',                              // ptData
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1717
		'Graphics',                      // ptGraphics
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1718
		'Themes',                        // ptThemes
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1719
		'Themes/avematan',               // ptCurrTheme
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1720
		'Teams',                         // ptTeams
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1721
		'Maps',                          // ptMaps
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1722
		'',                              // ptMapCurrent
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1723
		'Demos',                         // ptDemos
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1724
		'Sounds',                        // ptSounds
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1725
		'Graphics/Graves',               // ptGraves
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1726
		'Fonts',                         // ptFonts
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1727
		'Forts',                         // ptForts
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1728
		'Locale',                        // ptLocale
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1729
		'Graphics/AmmoMenu',             // ptAmmoMenu
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1730
		'Graphics/Hedgehog',             // ptHedgehog
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1731
		'Sounds/voices',                 // ptVoices
2747
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1732
		'Graphics/Hats',                 // ptHats
7889a3a9724f Server:
smxx
parents: 2735
diff changeset
  1733
		'Graphics/Flags'                 // ptFlags
2699
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1734
	);
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1735
begin
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1736
	PathPrefix := './';
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1737
	Pathz:= cPathz;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1738
end;
249adefa9c1c replace initialization/finalization statements with custom init functions
koda
parents: 2697
diff changeset
  1739
2716
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1740
procedure free_uConsts;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1741
begin
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1742
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1743
end;
b9ca1bfca24f complete the replacement of init/free wrappers for every unit
koda
parents: 2715
diff changeset
  1744
4
bcbd7adb4e4b - set svn:eol-style to native
unc0rr
parents: 2
diff changeset
  1745
end.