hedgewars/uStore.pas
changeset 2258 3dd028604cfd
parent 2254 bb68e5a5be56
child 2284 bd091b6b128d
equal deleted inserted replaced
2257:7eb31efcfb9b 2258:3dd028604cfd
   978 glLoadIdentity;
   978 glLoadIdentity;
   979 glViewport(0, 0, cScreenWidth, cScreenHeight);
   979 glViewport(0, 0, cScreenWidth, cScreenHeight);
   980 glScalef(f / cScreenWidth, -f / cScreenHeight, 1.0);
   980 glScalef(f / cScreenWidth, -f / cScreenHeight, 1.0);
   981 //glTranslatef(-cScreenWidth / 2, -cScreenHeight / 2, 0);
   981 //glTranslatef(-cScreenWidth / 2, -cScreenHeight / 2, 0);
   982 glTranslatef(0, -cScreenHeight / 2, 0);
   982 glTranslatef(0, -cScreenHeight / 2, 0);
       
   983 
       
   984 // glTranslatex(320, 0, 0);
       
   985 // glRotatef(90.0, 0.0, 0.0, 1.0);
   983 end;
   986 end;
   984 
   987 
   985 ////////////////////////////////////////////////////////////////////////////////
   988 ////////////////////////////////////////////////////////////////////////////////
   986 var ProgrTex: PTexture = nil;
   989 var ProgrTex: PTexture = nil;
   987     Step: integer = 0;
   990     Step: integer = 0;