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