diff -r 622c5de38d72 -r 05f003ad3caa hedgewars/uConsts.pas --- a/hedgewars/uConsts.pas Thu Jun 26 19:39:26 2008 +0000 +++ b/hedgewars/uConsts.pas Fri Jun 27 17:22:15 2008 +0000 @@ -45,7 +45,7 @@ sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer, sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath, sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft, - sprHat, sprKamikaze, sprWhip, sprKowtow); + sprHat, sprKamikaze, sprWhip, sprKowtow, sprSad); TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, @@ -79,6 +79,8 @@ TStatInfoType = (siGameResult, siMaxStepDamage, siMaxStepKills, siKilledHHs); + TWave = (waveRollup, waveSad); + THHFont = record Handle: PTTF_Font; Height: LongInt; @@ -400,9 +402,20 @@ (FileName: 'amWhip'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil; Width: 128; Height: 32; saveSurf: false),// sprWhip (FileName: 'Kowtow'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil; - Width: 32; Height: 32; saveSurf: false) // sprWhip + Width: 32; Height: 32; saveSurf: false),// sprKowtow + (FileName: 'Sad'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil; + Width: 32; Height: 32; saveSurf: false) // sprSad ); + Wavez: array [TWave] of record + Sprite: TSprite; + FramesCount: Longword; + cmd: String[10]; + end = ( + (Sprite: sprKowtow; FramesCount: 12; cmd: '/rollup'), + (Sprite: sprSad; FramesCount: 14; cmd: '/sad') + ); + Soundz: array[TSound] of record FileName: String[19]; Path : TPathType;