hedgewars/uConsts.pas
changeset 2056 ed8c83f1e4b0
parent 2042 905c554d62e6
child 2105 580f7610d661
equal deleted inserted replaced
2055:2099307d3071 2056:ed8c83f1e4b0
    53 			sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun,
    53 			sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun,
    54 			sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer,
    54 			sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer,
    55 			sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath,
    55 			sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath,
    56 			sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft,
    56 			sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft,
    57 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
    57 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
    58 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
    58 			sprHurrah, sprLemonade, sprShrug, sprJuggle, 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, sprVampiric, sprGirder, 
    62 			sprPlane, sprHandPlane, sprUtility, sprInvulnerable, sprVampiric, sprGirder, 
    63             sprSpeechCorner, sprSpeechEdge, sprSpeechTail, 
    63             sprSpeechCorner, sprSpeechEdge, sprSpeechTail, 
   105 	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
   105 	TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
   106 
   106 
   107 	TStatInfoType = (siGameResult, siMaxStepDamage, siMaxStepKills, siKilledHHs,
   107 	TStatInfoType = (siGameResult, siMaxStepDamage, siMaxStepKills, siKilledHHs,
   108 			siClanHealth);
   108 			siClanHealth);
   109 
   109 
   110 	TWave = (waveRollup, waveSad,waveWave, waveHurrah, waveLemonade);
   110 	TWave = (waveRollup, waveSad,waveWave, waveHurrah, waveLemonade, waveShrug, waveJuggle);
   111 
   111 
   112 	THHFont = record
   112 	THHFont = record
   113 			Handle: PTTF_Font;
   113 			Handle: PTTF_Font;
   114 			Height: LongInt;
   114 			Height: LongInt;
   115 			style: LongInt;
   115 			style: LongInt;
   465 			Width:  64; Height: 32; saveSurf: false),// sprWave
   465 			Width:  64; Height: 32; saveSurf: false),// sprWave
   466 			(FileName:     'Hurrah'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   466 			(FileName:     'Hurrah'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   467 			Width:  32; Height: 32; saveSurf: false),// sprHurrah
   467 			Width:  32; Height: 32; saveSurf: false),// sprHurrah
   468 			(FileName:'ILoveLemonade';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   468 			(FileName:'ILoveLemonade';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   469 			Width: 128; Height: 32; saveSurf: false),// sprLemonade
   469 			Width: 128; Height: 32; saveSurf: false),// sprLemonade
       
   470 			(FileName:'Shrug';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
       
   471 			Width: 32;  Height: 32; saveSurf: false),// sprShrug
       
   472 			(FileName:'Juggle';Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
       
   473 			Width: 32;  Height: 32; saveSurf: false),// sprJuggle
   470 			(FileName:   'ExplPart'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   474 			(FileName:   'ExplPart'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   471 			Width:  32; Height: 32; saveSurf: false),// sprExplPart
   475 			Width:  32; Height: 32; saveSurf: false),// sprExplPart
   472 			(FileName:  'ExplPart2'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   476 			(FileName:  'ExplPart2'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   473 			Width:  32; Height: 32; saveSurf: false),// sprExplPart2
   477 			Width:  32; Height: 32; saveSurf: false),// sprExplPart2
   474 			(FileName:  'Cake_walk'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   478 			(FileName:  'Cake_walk'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   532 			);
   536 			);
   533 
   537 
   534 	Wavez: array [TWave] of record
   538 	Wavez: array [TWave] of record
   535 			Sprite: TSprite;
   539 			Sprite: TSprite;
   536 			FramesCount: Longword;
   540 			FramesCount: Longword;
       
   541 			Interval: Longword;
   537 			cmd: String[20];
   542 			cmd: String[20];
   538 			end = (
   543 			end = (
   539 			(Sprite:   sprKowtow; FramesCount: 12; cmd: '/rollup'),
   544 			(Sprite:   sprKowtow; FramesCount: 12; Interval: 125; cmd: '/rollup'),
   540 			(Sprite:      sprSad; FramesCount: 14; cmd: '/sad'),
   545 			(Sprite:      sprSad; FramesCount: 14; Interval: 125; cmd: '/sad'),
   541 			(Sprite:     sprWave; FramesCount: 16; cmd: '/wave'),
   546 			(Sprite:     sprWave; FramesCount: 16; Interval: 125; cmd: '/wave'),
   542 			(Sprite:   sprHurrah; FramesCount: 14; cmd: '/hurrah'),
   547 			(Sprite:   sprHurrah; FramesCount: 14; Interval: 125; cmd: '/hurrah'),
   543 			(Sprite: sprLemonade; FramesCount: 24; cmd: '/ilovelotsoflemonade')
   548 			(Sprite: sprLemonade; FramesCount: 24; Interval: 125; cmd: '/ilovelotsoflemonade'),
       
   549 			(Sprite:    sprShrug; FramesCount: 24; Interval: 125; cmd: '/shrug'),
       
   550 			(Sprite:   sprJuggle; FramesCount: 49; Interval: 38; cmd: '/juggle')
   544 			);
   551 			);
   545 
   552 
   546 	Soundz: array[TSound] of record
   553 	Soundz: array[TSound] of record
   547 			FileName: String[25];
   554 			FileName: String[25];
   548 			Path    : TPathType;
   555 			Path    : TPathType;