DEADSOFTWARE

Player: Twice delay for weapon switch by number
[d2df-sdl.git] / src / game / g_player.pas
index 5d1f863faa686c667ec21470ffed524e700c4778..4d87ded9c0e2f69978cb5a35c296e3b8c9cffbab 100644 (file)
@@ -3163,6 +3163,8 @@ end;
 
 procedure TPlayer.CatchFire(Attacker: Word);
 begin
+  if FFireTime <= 0 then
+    g_Sound_PlayExAt('SOUND_IGNITE', FObj.X, FObj.Y);
   FFireTime := 100;
   FFireAttacker := Attacker;
   if g_Game_IsNet and g_Game_IsServer then
@@ -3715,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;