-  feld:=glGenLists(1);
 -  glNewList(feld,GL_COMPILE);
 -    glPushMatrix;
 -    for i:=2 to 10 do begin
 -      glBindTexture(GL_TEXTURE_2D,tex[i]);
 -      glColor3f(1,1,1);
 -      glBegin(GL_QUADS);
 -        glTexCoord2f(0,0); glVertex2d(x,y);
 -        glTexCoord2f(0,1); glVertex2d(x,y1);
 -        glTexCoord2f(1,1); glVertex2d(x1,y1);
 -        glTexCoord2f(1,0); glVertex2d(x1,y);
 -      glEnd;
 -      glTranslatef(-66,0,0);
 -    end;
 -    glPopMatrix;
 -  glEndList;
 

