diff --git a/src/game/g_player.pas b/src/game/g_player.pas
index 92aec4017d01675a83b8b37ad0aa4a98772bf619..ebbd2043e5fc69d7784346b031c5b51d804f637c 100644 (file)
--- a/src/game/g_player.pas
+++ b/src/game/g_player.pas
procedure TPlayer.DrawAim();
procedure drawCast (sz: Integer; ax0, ay0, ax1, ay1: Integer);
-
- {
- procedure drawTileGrid ();
- var
- x, y: Integer;
- begin
- y := mapGrid.gridY0;
- while (y < mapGrid.gridY0+mapGrid.gridHeight) do
- begin
- x := mapGrid.gridX0;
- while (x < mapGrid.gridX0+mapGrid.gridWidth) do
- begin
- if (x+mapGrid.tileSize > viewPortX) and (y+mapGrid.tileSize > viewPortY) and
- (x < viewPortX+viewPortW) and (y < viewPortY+viewPortH) then
- begin
- e_DrawQuad(x, y, x+mapGrid.tileSize-1, y+mapGrid.tileSize-1, 96, 96, 96, 96);
- end;
- Inc(x, mapGrid.tileSize);
- end;
- Inc(y, mapGrid.tileSize);
- end;
- end;
- }
-
var
ex, ey: Integer;
begin
if isValidViewPort and (self = gPlayer1) then
begin
- g_Holmes_plrView(viewPortX, viewPortY, viewPortW, viewPortH);
g_Holmes_plrLaser(ax0, ay0, ax1, ay1);
end;
begin
e_DrawLine(sz, ax0, ay0, ex, ey, 0, 0, 255, 96);
end;
-
- //drawTileGrid();
end;
var