5 procedure Draw(x
, y
, camx
, camy
: integer);
9 uses Vars
, Blocks
, Maps
;
11 procedure Draw(x
, y
, camx
, camy
: integer);
18 id
:= Maps
.GetMap(x
, y
);
19 texid
:= Blocks
.GetTexture(id
);
20 DrawImage(tex
[texid
], x
* tileSize
- camx
, y
* tileSize
- camy
);