hedgewars/uConsts.pas
changeset 5 0dafbd19a04c
parent 4 bcbd7adb4e4b
child 6 9c1f00e7b43e
--- a/hedgewars/uConsts.pas	Tue Aug 23 16:17:53 2005 +0000
+++ b/hedgewars/uConsts.pas	Thu Aug 25 16:45:58 2005 +0000
@@ -35,7 +35,8 @@
 interface
 uses SDLh;
 {$INCLUDE options.inc}
-type TStuff     = (sHorizont, sSky, sConsoleBG, sPowerBar, sQuestion);
+type TStuff     = (sHorizont, sSky, sConsoleBG, sPowerBar, sQuestion, sWindBar,
+                   sWindL, sWindR);
      TGameState = (gsLandGen, gsStart, gsGame, gsConsole, gsExit);
      TGameType  = (gmtLocal, gmtDemo, gmtNet);
      TPathType  = (ptData, ptGraphics, ptThemes, ptThemeCurrent, ptTeams, ptMaps,
@@ -186,14 +187,20 @@
                                      (FileName:      'Sky.png'; Path: ptThemeCurrent ),    // sSky
                                      (FileName:  'Console.png'; Path: ptGraphics     ),    // sConsoleBG
                                      (FileName: 'PowerBar.png'; Path: ptGraphics     ),    // sPowerBar
-                                     (FileName: 'thinking.png'; Path: ptGraphics     )     // sQuestion
+                                     (FileName: 'thinking.png'; Path: ptGraphics     ),    // sQuestion
+                                     (FileName:  'WindBar.png'; Path: ptGraphics     ),    // sWindBar
+                                     (FileName:    'WindL.png'; Path: ptGraphics     ),    // sWindL
+                                     (FileName:    'WindR.png'; Path: ptGraphics     )     // sWindR
                                      );
       StuffPoz: array[TStuff] of TSDL_Rect = (
                                       (x:   0; y:   0; w: 512; h: 256), // sHorizont
                                       (x: 512; y:   0; w:  64; h:1024), // sSky
                                       (x: 256; y: 256; w: 256; h: 256), // sConsoleBG
                                       (x: 256; y: 768; w: 256; h:  32), // sPowerBar
-                                      (x: 256; y: 512; w:  32; h:  32)  // sQuestion
+                                      (x: 256; y: 512; w:  32; h:  32), // sQuestion
+                                      (x: 256; y: 800; w: 151; h:  17), // sWindBar
+                                      (x: 256; y: 817; w:  80; h:  13), // sWindL
+                                      (x: 336; y: 817; w:  80; h:  13)  // sWindR
                                       );
       SpritesData: array[TSprite] of record
                                          FileName: String[31];