GLfloat mnit_opengles_vertices[6][3] =
{
- {0.0f, 0.0f, 0.0f},
{0.0f, 1.0f, 0.0f},
{1.0f, 1.0f, 0.0f},
{0.0f, 0.0f, 0.0f},
- {1.0f, 1.0f, 0.0f},
{1.0f, 0.0f, 0.0f},
};
GLfloat mnit_opengles_texture[6][2] =
`}
redef fun blit( image, x, y ) is extern `{
- GLfloat texture_coord[6][2] =
+ GLfloat texture_coord[4][2] =
{
- {image->src_xo, image->src_yo},
{image->src_xo, image->src_yi},
{image->src_xi, image->src_yi},
{image->src_xo, image->src_yo},
- {image->src_xi, image->src_yi},
{image->src_xi, image->src_yo}
};
glDisable(GL_DEPTH_TEST);
glVertexPointer(3, GL_FLOAT, 0, mnit_opengles_vertices);
- glTexCoordPointer(2, GL_FLOAT, 0, texture_coord ); /* mnit_opengles_texture); */
+ glTexCoordPointer(2, GL_FLOAT, 0, texture_coord );
- glDrawArrays(GL_TRIANGLE_STRIP, 0, 6);
+ glDrawArrays(GL_TRIANGLE_STRIP, 0, 4);
glDisableClientState(GL_VERTEX_ARRAY);
glDisableClientState(GL_TEXTURE_COORD_ARRAY);
end
redef fun blit_rotated( image, x, y, angle ) is extern `{
- GLfloat texture_coord[6][2] =
+ GLfloat texture_coord[4][2] =
{
- {image->src_xo, image->src_yo},
{image->src_xo, image->src_yi},
{image->src_xi, image->src_yi},
{image->src_xo, image->src_yo},
- {image->src_xi, image->src_yi},
{image->src_xi, image->src_yo}
};
glVertexPointer(3, GL_FLOAT, 0, mnit_opengles_vertices);
glTexCoordPointer(2, GL_FLOAT, 0, texture_coord );
- glDrawArrays(GL_TRIANGLE_STRIP, 0, 6);
+ glDrawArrays(GL_TRIANGLE_STRIP, 0, 4);
glDisableClientState(GL_VERTEX_ARRAY);
glDisableClientState(GL_TEXTURE_COORD_ARRAY);
glVertexPointer(3, GL_FLOAT, 0, mnit_opengles_vertices_stretched);
glTexCoordPointer(2, GL_FLOAT, 0, texture_coord );
- glDrawArrays(GL_TRIANGLE_STRIP, 0, 6);
+ glDrawArrays(GL_TRIANGLE_STRIP, 0, 4);
glDisableClientState(GL_VERTEX_ARRAY);
glDisableClientState(GL_TEXTURE_COORD_ARRAY);
image->src_xo = ((float)x)/recv->width;
image->src_yo = ((float)y)/recv->height;
- image->src_xi = ((float)w+w)/recv->width;
- image->src_yi = ((float)x+h)/recv->height;
+ image->src_xi = ((float)x+w)/recv->width;
+ image->src_yi = ((float)y+h)/recv->height;
return Opengles1Image_as_Image( image );
`}