X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_player.pas;h=f644d6b7d863fc2d2f59a7f25da74670f9762c59;hb=843ef00143d2dd922eaa56362d4afbeb41aa54bf;hp=9605c6de6e1a3c9c97b6b14165941b866023fb87;hpb=8bc91b0c803ac0934ca9e32ca05d9294d7b2a913;p=d2df-sdl.git

diff --git a/src/game/g_player.pas b/src/game/g_player.pas
index 9605c6d..f644d6b 100644
--- a/src/game/g_player.pas
+++ b/src/game/g_player.pas
@@ -3717,7 +3717,7 @@ begin
       // i found her!
       result := Byte(i);
       resetWeaponQueue();
-      FNextWeapDelay := WEAPON_DELAY; // anyway, 'cause why not
+      FNextWeapDelay := WEAPON_DELAY * 2; // anyway, 'cause why not
       exit;
     end;
   end;
@@ -5788,6 +5788,11 @@ end;
 
 procedure TPlayer.GetSecret();
 begin
+  if (self = gPlayer1) or (self = gPlayer2) then
+  begin
+    g_Console_Add(Format(_lc[I_PLAYER_SECRET], [FName]), True);
+    g_Sound_PlayEx('SOUND_GAME_SECRET');
+  end;
   Inc(FSecrets);
 end;