changeset 2567 | 02ff5f9510b5 |
parent 2565 | 54296af65fe9 |
child 2568 | e654cbfb23ba |
--- a/hedgewars/uStore.pas Tue Oct 20 11:49:10 2009 +0000 +++ b/hedgewars/uStore.pas Tue Oct 20 17:55:11 2009 +0000 @@ -589,7 +589,7 @@ procedure DrawCentered(X, Top: LongInt; Source: PTexture); begin -DrawTexture(X - Source^.w div 2, Top, Source) +DrawTexture(X - Source^.w shr 1, Top, Source) end; procedure DrawHedgehog(X, Y: LongInt; Dir: LongInt; Pos, Step: LongWord; Angle: real);