diff -r 2e40893e6034 -r d72c2219595d hedgewars/uStore.pas --- a/hedgewars/uStore.pas Wed Jun 16 15:20:18 2010 +0200 +++ b/hedgewars/uStore.pas Thu Jun 17 11:41:38 2010 -0400 @@ -51,7 +51,7 @@ procedure DrawSprite (Sprite: TSprite; X, Y, Frame: LongInt); procedure DrawSprite2(Sprite: TSprite; X, Y, FrameX, FrameY: LongInt); procedure DrawSpriteClipped(Sprite: TSprite; X, Y, TopY, RightX, BottomY, LeftX: LongInt); -procedure DrawTexture(X, Y: LongInt; Texture: PTexture); +procedure DrawTexture(X, Y: LongInt; Texture: PTexture; Scale: GLfloat = 1.0); procedure DrawTextureF(Texture: PTexture; Scale: GLfloat; X, Y, Frame, Dir, w, h: LongInt); procedure DrawRotatedTextureF(Texture: PTexture; Scale, OffsetX, OffsetY: GLfloat; X, Y, Frame, Dir, w, h: LongInt; Angle: real); procedure DrawRotated(Sprite: TSprite; X, Y, Dir: LongInt; Angle: real); @@ -524,10 +524,11 @@ glDisableClientState(GL_VERTEX_ARRAY) end; -procedure DrawTexture(X, Y: LongInt; Texture: PTexture); +procedure DrawTexture(X, Y: LongInt; Texture: PTexture; Scale: GLfloat); begin glPushMatrix; glTranslatef(X, Y, 0); +glScalef(Scale, Scale, 1); glBindTexture(GL_TEXTURE_2D, Texture^.id);