hedgewars/uRender.pas
changeset 15189 e7d7fe9f20e1
parent 15040 a315927a44b2
child 15364 c117e17b90bc
child 15366 5c0479d0ed5b
equal deleted inserted replaced
15188:7ae8ec7a9a8e 15189:e7d7fe9f20e1
  1255     begin
  1255     begin
  1256     openglTranslatef(PivotX, PivotY, 0);
  1256     openglTranslatef(PivotX, PivotY, 0);
  1257     openglRotatef(Angle, 0, 0, 1);
  1257     openglRotatef(Angle, 0, 0, 1);
  1258     openglTranslatef(-PivotX, -PivotY, 0);
  1258     openglTranslatef(-PivotX, -PivotY, 0);
  1259     end;
  1259     end;
       
  1260 
       
  1261 UpdateModelviewProjection;
  1260 
  1262 
  1261 DrawSprite(Sprite, -SpritesData[Sprite].Width div 2, -SpritesData[Sprite].Height div 2, Frame);
  1263 DrawSprite(Sprite, -SpritesData[Sprite].Width div 2, -SpritesData[Sprite].Height div 2, Frame);
  1262 
  1264 
  1263 openglPopMatrix;
  1265 openglPopMatrix;
  1264 
  1266