diff --git a/src/game/g_shells.pas b/src/game/g_shells.pas
index de0fc86c06380e51c2092bb0449ae670515b5025..6e2e61e8f20fb689ce6daeccb7de7f5b38f16e2f 100644 (file)
--- a/src/game/g_shells.pas
+++ b/src/game/g_shells.pas
SHELL_BULLET = 0;
SHELL_SHELL = 1;
SHELL_DBLSHELL = 2;
+ SHELL_LAST = SHELL_DBLSHELL;
DefaultShellTimeout = 60000;
DefaultShellMax = 300;
function g_Shells_GetMax (): Word;
procedure g_Shells_Create (fX, fY, dX, dY: Integer; T: Byte);
+ procedure g_Shells_RemoveAll;
procedure g_Shells_Update;
implementation
end;
end;
+ procedure g_Shells_RemoveAll;
+ var i: Integer;
+ begin
+ i := g_Shells_GetMax();
+ g_Shells_SetMax(0);
+ g_Shells_SetMax(i);
+ end;
+
procedure g_Shells_SoundBounce(X, Y: Integer; T: Byte);
var k: Integer;
begin