void glScalef(GLfloat x, GLfloat y, GLfloat z)
{
next_glScalef(x, y, z);
printGLError();
gr_scale(x,y,z);
debugPrint("glScalef(x= %f, y= %f, z= %f)\n", x, y, z);
}
void glScaled(GLdouble x, GLdouble y, GLdouble z)
{
next_glScaled(x, y, z);
printGLError();
gr_scale(x,y,z);
debugPrint("glScaled(x= %f, y= %f, z= %f)\n", x, y, z);
}
void gr_stepcalc(WORD orgw, WORD orgh, GRECT *pt, WORD *pcx, WORD *pcy,
WORD *pcnt, WORD *pxstep, WORD *pystep)
{
*pcx = (pt->g_w/2) - (orgw/2);
*pcy = (pt->g_h/2) - (orgh/2);
gr_scale(*pcx, *pcy, pcnt, pxstep, pystep);
*pcx += pt->g_x;
*pcy += pt->g_y;
}
void gr_movebox(WORD w, WORD h, WORD srcx, WORD srcy, WORD dstx, WORD dsty)
{
register WORD signx, signy;
WORD cnt;
WORD xstep, ystep;
GRECT t;
r_set(&t, srcx, srcy, w, h);
signx = (srcx < dstx) ? -1 : 1;
signy = (srcy < dsty) ? -1 : 1;
gr_scale(signx*(srcx-dstx), signy*(srcy-dsty), &cnt, &xstep, &ystep);
gr_2box(FALSE, cnt, &t, signx*xstep, signy*ystep, FALSE);
}
