index 9b67c0033f19a42d0fff2d793356da90851090f5..b5978c926654f1c705cede3e42f2b2d7c1bf55e0 100644 (file)
end
else
begin
- if (Level in [2, 3]) and (FSlopSound > 0) then
+ if (Level in [2, 3, 5]) and (FSlopSound > 0) then
begin
g_Sound_PlayExAt('SOUND_MONSTER_SLOP', X, Y);
if FSlopSound = 1 then
SetLength(TempArray, Length(TempArray)+1);
TempArray[High(TempArray)] := FDieSounds[a].ID;
end;
+ if (TempArray = nil) and (Level = 5) then
+ begin
+ g_Sound_PlayExAt('SOUND_MONSTER_SLOP', X, Y);
+ Result := True;
+ Exit;
+ end;
end;
if TempArray = nil then Exit;