equal
deleted
inserted
replaced
276 |
276 |
277 procedure drawIcePixel(y, x:Longint); |
277 procedure drawIcePixel(y, x:Longint); |
278 var |
278 var |
279 iceSurface: PSDL_Surface; |
279 iceSurface: PSDL_Surface; |
280 icePixels: PLongwordArray; |
280 icePixels: PLongwordArray; |
281 pictureX, pictureY: LongInt; |
281 //pictureX, pictureY: LongInt; |
282 w, c: LongWord; |
282 w: LongWord; |
283 weight: Longint; |
283 //weight: Longint; |
284 begin |
284 begin |
285 // So. 3 parameters here. Ice colour, Ice opacity, and a bias on the greyscaled pixel towards lightness |
285 // So. 3 parameters here. Ice colour, Ice opacity, and a bias on the greyscaled pixel towards lightness |
286 iceSurface:= SpritesData[sprIceTexture].Surface; |
286 iceSurface:= SpritesData[sprIceTexture].Surface; |
287 icePixels := iceSurface^.pixels; |
287 icePixels := iceSurface^.pixels; |
288 w:= LandPixels[y, x]; |
288 w:= LandPixels[y, x]; |