X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_options.pas;h=a2624391c73f16f38161db5094764afa8e7a8d40;hb=7292fe409145dfcbb2776e34bb64d56e32985b9d;hp=5caaf40f9520fe1659381f53515e480b10f11934;hpb=7cd1c130359bef86087eaefe317526775e8ad4f8;p=d2df-sdl.git

diff --git a/src/game/g_options.pas b/src/game/g_options.pas
index 5caaf40..a262439 100644
--- a/src/game/g_options.pas
+++ b/src/game/g_options.pas
@@ -13,13 +13,13 @@
  * You should have received a copy of the GNU General Public License
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  *)
-{$MODE DELPHI}
+{$INCLUDE g_amodes.inc}
 unit g_options;
 
 interface
 
 uses
-  g_language;
+  g_language, g_weapons;
 
 type
   TPlayerControl = record
@@ -33,7 +33,7 @@ type
     KeyPrevWeapon: Word;
     KeyOpen:       Word;
     KeyStrafe:     Word;
-    KeyWeapon:     array [0..9] of Word;
+    KeyWeapon:     array [WP_FIRST..WP_LAST] of Word;
 
     KeyRight2:      Word;
     KeyLeft2:       Word;
@@ -45,7 +45,7 @@ type
     KeyPrevWeapon2: Word;
     KeyOpen2:       Word;
     KeyStrafe2:     Word;
-    KeyWeapon2:     array [0..9] of Word;
+    KeyWeapon2:     array [WP_FIRST..WP_LAST] of Word;
   end;
 
   TGameControls = record