X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_basic.pas;h=2c540aad0a617fc7c2c51f3bc8060e7e4d057861;hb=51343dcc874e5db55f029b0750892ca2da971c24;hp=67285caa60e8cb5349cdd9f606ca1a66dc7f70ca;hpb=081ca9c0120de313aae7a94d1fe50b275cf2176d;p=d2df-sdl.git diff --git a/src/game/g_basic.pas b/src/game/g_basic.pas index 67285ca..2c540aa 100644 --- a/src/game/g_basic.pas +++ b/src/game/g_basic.pas @@ -102,6 +102,10 @@ begin end; function g_CollideLevel(X, Y: Integer; Width, Height: Word): Boolean; +begin + result := g_Map_CollidePanel(X, Y, Width, Height, (PANEL_WALL or PANEL_CLOSEDOOR or PANEL_OPENDOOR), false); +end; +(* var a: Integer; begin @@ -121,6 +125,7 @@ begin Exit; end; end; +*) function g_CollidePlayer(X, Y: Integer; Width, Height: Word): Boolean; var