hedgewars/uConsts.pas
changeset 1034 05f003ad3caa
parent 1033 622c5de38d72
child 1036 551af2411980
--- 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;