From 2f523bed7d04e657b2ce4e69eaf05aee6a81fb4c Mon Sep 17 00:00:00 2001 From: Ketmar Dark Date: Sat, 19 Aug 2017 22:25:07 +0300 Subject: [PATCH] removed unused function --- src/game/g_phys.pas | 20 -------------------- 1 file changed, 20 deletions(-) diff --git a/src/game/g_phys.pas b/src/game/g_phys.pas index a3e790d..7780b3b 100644 --- a/src/game/g_phys.pas +++ b/src/game/g_phys.pas @@ -143,26 +143,6 @@ begin end; end; -function CollideMonsters(Obj: PObj; XInc, YInc: Integer): Boolean; -var - a: Integer; -begin - Result := False; - - if gMonsters = nil then - Exit; - - for a := 0 to High(gMonsters) do - if gMonsters[a] <> nil then - if gMonsters[a].Live and - gMonsters[a].Collide(Obj^.X+Obj^.Rect.X+XInc, Obj^.Y+Obj^.Rect.Y+YInc, - Obj^.Rect.Width, Obj^.Rect.Height) then - begin - Result := True; - Exit; - end; -end; - function Blocked(Obj: PObj; XInc, YInc: Integer): Boolean; begin Result := g_Map_CollidePanel(Obj^.X+Obj^.Rect.X+XInc, Obj^.Y+Obj.Rect.Y+YInc, -- 2.29.2