hedgewars/uConsts.pas
changeset 1689 3d0eee01f734
parent 1656 209cf0e2fc36
child 1708 62e1d9af1dd9
equal deleted inserted replaced
1688:d94ac781a8e3 1689:3d0eee01f734
    47 			sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft,
    47 			sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft,
    48 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
    48 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
    49 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
    49 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
    50 			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
    50 			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
    51 			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
    51 			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
    52 			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls);
    52 			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls, sprPlane);
    53 
    53 
    54 	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
    54 	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
    55 			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
    55 			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
    56 			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
    56 			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
    57 			gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame, // 19
    57 			gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame, // 19
    58 			gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame, // 23
    58 			gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame, // 23
    59 			gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder, // 28
    59 			gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder, // 28
    60 			gtTeleport, gtSwitcher, gtTarget, gtMortar, // 32
    60 			gtTeleport, gtSwitcher, gtTarget, gtMortar, // 32
    61 			gtWhip, gtKamikaze, gtCake, gtSeduction, gtWatermelon, gtMelonPiece, // 38
    61 			gtWhip, gtKamikaze, gtCake, gtSeduction, gtWatermelon, gtMelonPiece, // 38
    62 			gtHellishBomb, gtEvilTrace, gtWaterUp, gtDrill, gtBallGun, gtBall);
    62 			gtHellishBomb, gtEvilTrace, gtWaterUp, gtDrill, gtBallGun, gtBall,gtRCPlane);
    63 
    63 
    64 	TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
    64 	TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
    65 			vgtSmallDamageTag);
    65 			vgtSmallDamageTag);
    66 
    66 
    67 	TGearsType = set of TGearType;
    67 	TGearsType = set of TGearType;
    79 
    79 
    80 	TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    80 	TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    81 			amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
    81 			amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
    82 			amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    82 			amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    83 			amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
    83 			amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
    84 			amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun);
    84 			amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun, amRCPlane);
    85 
    85 
    86 	THWFont = (fnt16, fntBig, fntSmall);
    86 	THWFont = (fnt16, fntBig, fntSmall);
    87 
    87 
    88 	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    88 	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    89 
    89 
   453 			(FileName:    'amDrill'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   453 			(FileName:    'amDrill'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   454 			Width:  32; Height: 32; saveSurf: false),// sprHandDrill
   454 			Width:  32; Height: 32; saveSurf: false),// sprHandDrill
   455 			(FileName:    'amBallgun'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   455 			(FileName:    'amBallgun'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   456 			Width:  64; Height: 64; saveSurf: false),// sprHandBallgun
   456 			Width:  64; Height: 64; saveSurf: false),// sprHandBallgun
   457 			(FileName:      'Balls'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   457 			(FileName:      'Balls'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   458 			Width:  32; Height: 20; saveSurf: false)// sprBalls
   458 			Width:  32; Height: 20; saveSurf: false),// sprBalls
       
   459 			(FileName:      'RCPlane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
       
   460 			Width:  32; Height: 32; saveSurf: false)// sprPlane
   459 			);
   461 			);
   460 
   462 
   461 	Wavez: array [TWave] of record
   463 	Wavez: array [TWave] of record
   462 			Sprite: TSprite;
   464 			Sprite: TSprite;
   463 			FramesCount: Longword;
   465 			FramesCount: Longword;
  1123 			minAngle: 0;
  1125 			minAngle: 0;
  1124 			maxAngle: 0;
  1126 			maxAngle: 0;
  1125 			isDamaging: true;
  1127 			isDamaging: true;
  1126 			SkipTurns: 0;
  1128 			SkipTurns: 0;
  1127 			PosCount: 1;
  1129 			PosCount: 1;
       
  1130 			PosSprite: sprWater),
       
  1131 			(NameId: sidRCPlane;
       
  1132 			NameTex: nil;
       
  1133 			Probability: 100;
       
  1134 			NumberInCase: 2;
       
  1135 			Ammo: (Propz: ammoprop_ForwMsgs{ or
       
  1136 							ammoprop_DontHold or
       
  1137 							ammoprop_AltAttack};
       
  1138 					Count: 1;
       
  1139 					NumPerTurn: 0;
       
  1140 					Timer: 0;
       
  1141 					Pos: 0;
       
  1142 					AmmoType: amRCPlane);
       
  1143 			Slot: 6;
       
  1144 			TimeAfterTurn: 0;
       
  1145 			minAngle: 0;
       
  1146 			maxAngle: 0;
       
  1147 			isDamaging: true;
       
  1148 			SkipTurns: 0;
       
  1149 			PosCount: 1;
  1128 			PosSprite: sprWater)
  1150 			PosSprite: sprWater)
  1129 			);
  1151 			);
  1130 
  1152 
  1131 var CountTexz: array[1..9] of PTexture;
  1153 var CountTexz: array[1..9] of PTexture;
  1132 
  1154