Add weapbest command

[d2df-sdl.git] / src / game / g_game.pas

diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index f85024b31b0c05a68e9947476e3180b36d12469f..5f7674fad60b3b38dd537cdfe88b24c5e92ede81 100644 (file)
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
@@ -7438,6 +7438,14 @@ begin
         gSelectWeapon[b, a] := True
     end
   end
+  else if (cmd = 'p1_weapbest') or (cmd = 'p2_weapbest') then
+  begin
+    b := ord(cmd[2]) - ord('1');
+    if b = 0 then
+      gSelectWeapon[b, gPlayer1.GetMorePrefered()] := True
+    else
+      gSelectWeapon[b, gPlayer2.GetMorePrefered()] := True;
+  end
   else if (cmd = 'dropflag') then
   begin
     if g_Game_IsServer then