- glMatrixMode(GL_PROJECTION);
 - gltranslatef(0,0,-P1.D);
 - glrotatef(P1.AX,1,0,0);
 - glrotatef(P1.AY,0,1,0);
 - gltranslatef(-P1.X,-P1.Y,-P1.Z);
 - glMatrixMode(GL_MODELVIEW);
 - Models.SetLightPosition(1,-1000,750, 1000,1);
 - Models.SetLightPosition(2,-1000,750,-1000,1);
 - Models.SetLightPosition(3, 1000,750, 1000,1);
 - Models.SetLightPosition(4, 1000,750,-1000,1);
 - Models.BeginRenderModels;
 - glpushmatrix;
 - glscalef(1600/100,1600/100,1600/100);
 - glrotatef(90,0,1,0);
 - Models.RenderModel(13,0);
 - glpopmatrix;
 - for i := 1 to 8 do begin
 - for i2 := 1 to 8 do begin
 - if Chess.GetFieldFigure(i,i2)<>0 then begin
 - glpushmatrix;
 - gltranslatef(-180+i*40,0,+180-i2*40);
 - glscalef(97/100,97/100,97/100);
 - if (Chess.GetField(i,i2)=11) or (Chess.GetField(i,i2)=30) then glrotatef(-90,0,1,0);
 - if (Chess.GetField(i,i2)=12) or (Chess.GetField(i,i2)=29) then glrotatef( 90,0,1,0);
 - Models.RenderModel(Chess.GetFieldFigure(i,i2)+Chess.GetFieldColor(i,i2)*6-6,1);
 - glpopmatrix;
 - end;
 - end;
 - end;
 - Models.EndRenderModels;
 
