blocks.cfg -> Blocks.pas

[cavecraft.git] / src / Phy.pas

diff --git a/src/Phy.pas b/src/Phy.pas
index 2b795c4d8bc3524aac4cbec37b4e4f385d3bf073..9157e68ebb025aa073ab3e110e1cd45eee63855d 100644 (file)
--- a/src/Phy.pas
+++ b/src/Phy.pas
@@ -20,7 +20,7 @@ interface
 \r
 implementation\r
 \r
-  uses items_store, maps, vars;\r
+  uses Maps, Vars, Blocks;\r
 \r
   const\r
     maxVelocity = 32;\r
@@ -58,7 +58,7 @@ implementation
 \r
   function IsSolid(x, y : integer) : boolean;\r
     begin\r
-      isSolid := GetBlockColl(getMap(x, y)) <> 0;\r
+      result := Blocks.IsSolid(getMap(x, y));\r
     end;\r
 \r
   function MapColl(x, y, w, h : integer) : boolean;\r