removed old code

This commit is contained in:
nek0 2018-02-28 21:46:16 +01:00
parent 0ba795e904
commit b7e0363647

View file

@ -251,10 +251,6 @@ drawTile row col tile = do
ctx x (y - (74 * fact - realToFrac tileHeight)) 64 74 0 ctx x (y - (74 * fact - realToFrac tileHeight)) 64 74 0
(assetImages ud Map.! img row col) (assetImages ud Map.! img row col)
fact fact
-- ( if floor pr <= row && floor pc >= col
-- then min 1 dist
-- else 1
-- )
beginPath ctx beginPath ctx
rect ctx x (y - (74 * fact - realToFrac tileHeight)) 64 74 rect ctx x (y - (74 * fact - realToFrac tileHeight)) 64 74
fillPaint ctx paint fillPaint ctx paint