Mercurial Mercurial > hedgewars / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uConsts.pas
changeset 2017 7845c77c8d31
parent 2005 aa79f631711b
child 2023 41d3afaa20c7
equal deleted inserted replaced
2016:73b0bcc4396d 2017:7845c77c8d31 
    57 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
 
    57 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
 
    58 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
 
    58 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
 
    59 			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
 
    59 			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
 
    60 			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
 
    60 			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
 
    61 			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls,
 
    61 			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls,
 
    62 			sprPlane, sprHandPlane, sprUtility, sprInvulnerable, sprGirder);
 
    62 			sprPlane, sprHandPlane, sprUtility, sprInvulnerable, sprVampiric, sprGirder, 
       
    63             sprSpeechCorner, sprSpeechEdge, sprSpeechTail, 
       
    64             sprThoughtCorner, sprThoughtEdge, sprThoughtTail, 
       
    65             sprShoutCorner, sprShoutEdge, sprShoutTail);
 
    63 
    66 
    64 	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
 
    67 	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
 
    65 			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
 
    68 			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
 
    66 			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
 
    69 			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
 
    67 			gtClusterBomb, gtCluster, gtShover, gtFlame, // 18
 
    70 			gtClusterBomb, gtCluster, gtShover, gtFlame, // 18
 
    68 			gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame, // 24
 
    71 			gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame, // 24
 
    69 			gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder, // 27
 
    72 			gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder, // 27
 
    70 			gtTeleport, gtSwitcher, gtTarget, gtMortar, // 31
 
    73 			gtTeleport, gtSwitcher, gtTarget, gtMortar, // 31
 
    71 			gtWhip, gtKamikaze, gtCake, gtSeduction, gtWatermelon, gtMelonPiece, // 37
 
    74 			gtWhip, gtKamikaze, gtCake, gtSeduction, gtWatermelon, gtMelonPiece, // 37
 
    72 			gtHellishBomb, gtEvilTrace, gtWaterUp, gtDrill, gtBallGun, gtBall,gtRCPlane);
 
    75 			gtHellishBomb, gtEvilTrace, gtWaterUp, gtDrill, gtBallGun, gtBall,gtRCPlane, gtSpeechBubble);
 
    73 
    76 
    74 	TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
 
    77 	TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
 
    75 			vgtSmallDamageTag, vgtTeamHealthSorter);
 
    78 			vgtSmallDamageTag, vgtTeamHealthSorter);
 
    76 
    79 
    77 	TGearsType = set of TGearType;
 
    80 	TGearsType = set of TGearType;
 
    91 	TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
 
    94 	TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
 
    92 			amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
 
    95 			amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
 
    93 			amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
 
    96 			amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
 
    94 			amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
 
    97 			amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
 
    95 			amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun, 
    98 			amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun, 
    96             amRCPlane, amLowGravity, amExtraDamage, amInvulnerable, amExtraTime, amLaserSight);
 
    99             amRCPlane, amLowGravity, amExtraDamage, amInvulnerable, amExtraTime, amLaserSight, amVampiric);
 
    97 
   100 
    98 	THWFont = (fnt16, fntBig, fntSmall);
 
   101 	THWFont = (fnt16, fntBig, fntSmall);
 
    99 
   102 
   100 	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
 
   103 	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
 
   101 
   104 
   201 	gfDivideTeams  = $00000010;
 
   204 	gfDivideTeams  = $00000010;
 
   202 	gfLowGravity   = $00000020;
 
   205 	gfLowGravity   = $00000020;
 
   203 	gfLaserSight   = $00000040;
 
   206 	gfLaserSight   = $00000040;
 
   204 	gfInvulnerable = $00000080;
 
   207 	gfInvulnerable = $00000080;
 
   205 	gfMines        = $00000100;
 
   208 	gfMines        = $00000100;
 
       
   209 	gfVampiric     = $00000200;
 
       
   210 	gfKarma        = $00000400;
 
   206 	gfOneClanMode  = $10000000;
 
   211 	gfOneClanMode  = $10000000;
 
   207 
   212 
   208 	gstDrowning       = $00000001;
 
   213 	gstDrowning       = $00000001;
 
   209 	gstHHDriven       = $00000002;
 
   214 	gstHHDriven       = $00000002;
 
   210 	gstMoving         = $00000004;
 
   215 	gstMoving         = $00000004;
 
   495 			Width:  32; Height: 32; saveSurf: false), // sprHandPlane
 
   500 			Width:  32; Height: 32; saveSurf: false), // sprHandPlane
 
   496 			(FileName:    'Utility'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   501 			(FileName:    'Utility'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   497 			Width:  48; Height: 48; saveSurf: false), // sprUtility
 
   502 			Width:  48; Height: 48; saveSurf: false), // sprUtility
 
   498 			(FileName:'Invulnerable';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
   503 			(FileName:'Invulnerable';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
   499 			Width:  48; Height: 48; saveSurf: false), // sprInvulnerable
 
   504 			Width:  48; Height: 48; saveSurf: false), // sprInvulnerable
 
       
   505 			(FileName:'Vampiric';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   506 			Width:  48; Height: 48; saveSurf: false), // sprVampiric
 
   500 			(FileName:    'amGirder'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
   507 			(FileName:    'amGirder'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
   501 			Width: 512; Height:512; saveSurf: false) // sprGirder
 
   508 			Width: 512; Height:512; saveSurf: false), // sprGirder
 
       
   509 			(FileName:'SpeechCorner';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   510 			Width:  12; Height: 9; saveSurf: true), // sprSpeechCorner
 
       
   511 			(FileName:'SpeechEdge';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   512 			Width:  25; Height: 9; saveSurf: true), // sprSpeechEdge
 
       
   513 			(FileName:'SpeechTail';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   514 			Width:  25; Height: 26; saveSurf: true), // sprSpeechTail
 
       
   515 			(FileName:'ThoughtCorner';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   516 			Width:  49; Height: 37; saveSurf: true), // sprThoughtCorner
 
       
   517 			(FileName:'ThoughtEdge';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   518 			Width:  23; Height: 16; saveSurf: true), // sprThoughtEdge
 
       
   519 			(FileName:'ThoughtTail';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   520 			Width:  45; Height: 65; saveSurf: true), // sprThoughtTail
 
       
   521 			(FileName:'ShoutCorner';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   522 			Width:  34; Height: 23; saveSurf: true), // sprShoutCorner
 
       
   523 			(FileName:'ShoutEdge';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   524 			Width:  30; Height: 20; saveSurf: true), // sprShoutEdge
 
       
   525 			(FileName:'ShoutTail';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   526 			Width:  30; Height: 37; saveSurf: true) // sprShoutTail
 
   502 			);
 
   527 			);
 
   503 
   528 
   504 	Wavez: array [TWave] of record
 
   529 	Wavez: array [TWave] of record
 
   505 			Sprite: TSprite;
 
   530 			Sprite: TSprite;
 
   506 			FramesCount: Longword;
 
   531 			FramesCount: Longword;
 
  1298 			minAngle: 0;
 
  1323 			minAngle: 0;
 
  1299 			maxAngle: 0;
 
  1324 			maxAngle: 0;
 
  1300 			isDamaging: false;
 
  1325 			isDamaging: false;
 
  1301 			SkipTurns: 0;
 
  1326 			SkipTurns: 0;
 
  1302 			PosCount: 1;
 
  1327 			PosCount: 1;
 
       
  1328 			PosSprite: sprWater),
 
       
  1329 			(NameId: sidVampiric;
 
       
  1330 			NameTex: nil;
 
       
  1331 			Probability: 15;
 
       
  1332 			NumberInCase: 1;
 
       
  1333 			Ammo: (Propz: ammoprop_NoCrosshair or
 
       
  1334 						  ammoprop_DontHold or
 
       
  1335 						  ammoprop_AltUse or
 
       
  1336                           ammoprop_Utility;
 
       
  1337 					Count: 1;
 
       
  1338 					NumPerTurn: 0;
 
       
  1339 					Timer: 0;
 
       
  1340 					Pos: 0;
 
       
  1341 					AmmoType: amVampiric);
 
       
  1342 			Slot: 6;
 
       
  1343 			TimeAfterTurn: 0;
 
       
  1344 			minAngle: 0;
 
       
  1345 			maxAngle: 0;
 
       
  1346 			isDamaging: false;
 
       
  1347 			SkipTurns: 0;
 
       
  1348 			PosCount: 1;
 
  1303 			PosSprite: sprWater)
 
  1349 			PosSprite: sprWater)
 
  1304 			);
 
  1350 			);
 
  1305 
  1351 
  1306 var CountTexz: array[1..9] of PTexture;
 
  1352 var CountTexz: array[1..9] of PTexture;
 
  1307 
  1353
hedgewars