hedgewars/uConsts.pas
changeset 70 82d93eeecebe
parent 64 9df467527ae5
child 72 aeb2ac1878dc
--- a/hedgewars/uConsts.pas	Tue Jun 20 21:22:15 2006 +0000
+++ b/hedgewars/uConsts.pas	Fri Jun 23 20:02:41 2006 +0000
@@ -71,7 +71,6 @@
 
 resourcestring
       errmsgCreateSurface   = 'Error creating SDL surface';
-      errmsgNoDesc          = 'Unknown error';
       errmsgTransparentSet  = 'Error setting transparent color';
       errmsgUnknownCommand  = 'Unknown command';
       errmsgUnknownVariable = 'Unknown variable';
@@ -103,11 +102,12 @@
       cMaxHHs          = 20;
       cMaxSpawnPoints  = 1024;
       cHHSurfaceWidth     = 512;
-      cHHSurfaceHeigth    = 256;
+     // cHHSurfaceHeigth    = 256;
 
       cMaxEdgePoints = 16384;
 
       cHHRadius = 9;
+      cHHStepTicks = 38;
 
       cKeyMaxIndex = 322;
 
@@ -166,11 +166,8 @@
       posCaseAmmo    = $00000001;
       posCaseHealth  = $00000002;
 
-      cToggleConsoleKey     = 39;
-
       NoPointX = Low(Integer); // константа для TargetPoint, показывает, что цель не указана
 
-      cLandFileName = 'Land.bmp';
       cHHFileName   = 'Hedgehog.png';
       cCHFileName   = 'Crosshair.png';
       cThemeCFGFilename = 'theme.cfg';
@@ -351,16 +348,6 @@
                                     Slot: 3;
                                     TimeAfterTurn: 5000));
 
-
-
-
-      Resolutions: array[0..3] of String = (
-                                           '640 480',
-                                           '800 600',
-                                           '1024 768',
-                                           '1280 1024'
-                                           );
-
 implementation
 
 end.