X-Git-Url: https://deadsoftware.ru/gitweb?p=cavecraft.git;a=blobdiff_plain;f=src%2Ffunc.mpsrc;h=1edb76fff251e27bdccf396df6ba65a86fcdd230;hp=bce8640e1089e1289ecb8bfd20d74d4e988f5501;hb=bddd811f24b5890310e09e93a33600a58db39ec9;hpb=4d7cf2ab1e10d9926d03afb5a3f883bcf5312469

diff --git a/src/func.mpsrc b/src/func.mpsrc
index bce8640..1edb76f 100644
--- a/src/func.mpsrc
+++ b/src/func.mpsrc
@@ -3,8 +3,8 @@ unit func;
 interface
  function get_spawn_x:integer;//Возвращает блок по X где должен появиться игрок
  function get_spawn_y:integer;//Возвращает блок по Y где должен появиться игрок
- procedure draw_block(xx,yy:integer);
 (*
+ procedure draw_block(xx,yy:integer);
  procedure drawSmallItem(item, x, y:integer);
  procedure drawItem(item, sum, x, y:integer; indicator:boolean;);
 *)
@@ -115,6 +115,7 @@ function readstr:string;
   end;
 *)
 
+(*
  procedure draw_block(xx,yy:integer);
   begin
    if (getmap(xx,yy)=123) or (getmap(xx,yy)=124) then
@@ -169,6 +170,7 @@ function readstr:string;
    if getmap(xx,yy)<>0 then
     drawimage(tex[getBlockTex(getmap(xx,yy))],(xx*16)-camx,(yy*16)-camy);
   end;
+*)
 
 (*
  procedure drawItem(item, sum, x, y:integer; indicator:boolean;);