changeset 7028 | 0f60591f3a16 |
parent 6999 | 486db9d26e4b |
child 7069 | bcf9d8e64e92 |
--- a/hedgewars/uRender.pas Sat May 05 18:10:41 2012 +0100 +++ b/hedgewars/uRender.pas Sat May 05 19:04:59 2012 +0100 @@ -55,6 +55,8 @@ implementation uses uVariables; +var LastTint: LongWord = 0; + procedure DrawSpriteFromRect(Sprite: TSprite; r: TSDL_Rect; X, Y, Height, Position: LongInt); begin r.y:= r.y + Height * Position;