roo_e/thirdparty/grx249/test/pcirctst.c
2022-05-16 17:59:47 -05:00

109 lines
2.4 KiB
C

/**
** pcirctst.c ---- test custom circle and ellipse rendering
**
** Copyright (c) 1995 Csaba Biegl, 820 Stirrup Dr, Nashville, TN 37221
** [e-mail: csaba@vuse.vanderbilt.edu]
**
** This is a test/demo file of the GRX graphics library.
** You can use GRX test/demo files as you want.
**
** The GRX graphics library is free software; you can redistribute it
** and/or modify it under some conditions; see the "copying.grx" file
** for details.
**
** This library is distributed in the hope that it will be useful,
** but WITHOUT ANY WARRANTY; without even the implied warranty of
** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**
**/
#include "test.h"
#include <math.h>
static int stop = 0;
static int widths[] = { 1, 2, 5, 10, 20, 50, 0 };
static GrLineOption Solid = { 0, 1, 0, NULL }; /* normal solid */
static GrLineOption *Patterns[] = {
&Solid, NULL
};
void drawellip(int xc,int yc,int xa,int ya,GrColor c1,GrColor c2,GrColor c3)
{
double ddx = (double)xa;
double ddy = (double)ya;
double R2 = ddx*ddx*ddy*ddy;
double SQ;
int x1,x2,y1,y2;
int dx,dy;
int *wdt, idx;
GrLineOption *l;
for (idx = 0, l = *Patterns; l != NULL; l = Patterns[++idx])
for (wdt=widths; *wdt != 0; ++wdt) {
GrClearScreen(GrBlack());
GrFilledBox(xc-xa,yc-ya,xc+xa,yc+ya,c1);
dx = xa;
dy = 0;
GrPlot(xc-dx,yc,c3);
GrPlot(xc+dx,yc,c3);
while(++dy <= ya) {
SQ = R2 - (double)dy * (double)dy * ddx * ddx;
dx = (int)(sqrt(SQ)/ddy + 0.5);
x1 = xc - dx;
x2 = xc + dx;
y1 = yc - dy;
y2 = yc + dy;
GrPlot(x1,y1,c3);
GrPlot(x2,y1,c3);
GrPlot(x1,y2,c3);
GrPlot(x2,y2,c3);
}
l->lno_color = c2;
l->lno_width = *wdt;
GrCustomEllipse(xc,yc,xa,ya,l);
if(GrKeyRead() == 'q') {
stop = 1;
return;
}
}
}
TESTFUNC(circtest)
{
int xc,yc;
int xr,yr;
GrColor c1,c2,c3;
c1 = GrAllocColor(64,64,255);
c2 = GrAllocColor(255,255,64);
c3 = GrAllocColor(255,64,64);
xc = GrSizeX() / 2;
yc = GrSizeY() / 2;
xr = 1;
yr = 1;
while(!stop && ((xr < 1000) || (yr < 1000))) {
drawellip(xc,yc,xr,yr,c1,c2,c3);
xr += xr/4+1;
yr += yr/4+1;
}
xr = 4;
yr = 1;
while(!stop && ((xr < 1000) || (yr < 1000))) {
drawellip(xc,yc,xr,yr,c1,c2,c3);
yr += yr/4+1;
xr = yr * 4;
}
xr = 1;
yr = 4;
while(!stop && ((xr < 1000) || (yr < 1000))) {
drawellip(xc,yc,xr,yr,c1,c2,c3);
xr += xr/4+1;
yr = xr * 4;
}
}