118 lines
2.4 KiB
HolyC
118 lines
2.4 KiB
HolyC
|
U0 Main()
|
|||
|
|
{
|
|||
|
|
F64 <EFBFBD>=0,<EFBFBD>=0,<EFBFBD>=0;
|
|||
|
|
CD3I32 poly[4];
|
|||
|
|
CDC *dc=DCAlias;
|
|||
|
|
DCDepthBufAlloc(dc);
|
|||
|
|
dc->flags|=DCF_TRANSFORMATION|DCF_SYMMETRY;
|
|||
|
|
try {
|
|||
|
|
while (!ScanChar) {
|
|||
|
|
DCDepthBufRst(dc);
|
|||
|
|
DCSymmetrySet(dc,Fs->pix_width/2,Fs->pix_height/2,
|
|||
|
|
ms.pos.x-Fs->pix_left-Fs->scroll_x,
|
|||
|
|
ms.pos.y-Fs->pix_top-Fs->scroll_y);
|
|||
|
|
dc->color=LTBLUE;
|
|||
|
|
GrLine(dc,Fs->pix_width/2,Fs->pix_height/2,
|
|||
|
|
ms.pos.x-Fs->pix_left-Fs->scroll_x,
|
|||
|
|
ms.pos.y-Fs->pix_top-Fs->scroll_y);
|
|||
|
|
|
|||
|
|
Mat4x4IdentEqu(dc->r);
|
|||
|
|
Mat4x4RotX(dc->r,<EFBFBD>);
|
|||
|
|
Mat4x4RotY(dc->r,<EFBFBD>);
|
|||
|
|
Mat4x4RotZ(dc->r,<EFBFBD>);
|
|||
|
|
DCMat4x4Set(dc,dc->r);
|
|||
|
|
|
|||
|
|
dc->x=Fs->pix_width/2;
|
|||
|
|
dc->y=Fs->pix_height/2;
|
|||
|
|
dc->z=500;
|
|||
|
|
|
|||
|
|
dc->color=GREEN;
|
|||
|
|
poly[0].x=50;
|
|||
|
|
poly[0].y=150;
|
|||
|
|
poly[0].z=0;
|
|||
|
|
poly[1].x=275;
|
|||
|
|
poly[1].y=100;
|
|||
|
|
poly[1].z=0;
|
|||
|
|
poly[2].x=155;
|
|||
|
|
poly[2].y=200;
|
|||
|
|
poly[2].z=0;
|
|||
|
|
poly[3].x=100;
|
|||
|
|
poly[3].y=200;
|
|||
|
|
poly[3].z=0;
|
|||
|
|
GrFillPoly3(dc,4,poly);
|
|||
|
|
|
|||
|
|
dc->color=RED;
|
|||
|
|
poly[0].x=50;
|
|||
|
|
poly[0].y=150;
|
|||
|
|
poly[0].z=50;
|
|||
|
|
poly[1].x=275;
|
|||
|
|
poly[1].y=100;
|
|||
|
|
poly[1].z=50;
|
|||
|
|
poly[2].x=155;
|
|||
|
|
poly[2].y=200;
|
|||
|
|
poly[2].z=50;
|
|||
|
|
poly[3].x=100;
|
|||
|
|
poly[3].y=200;
|
|||
|
|
poly[3].z=50;
|
|||
|
|
GrFillPoly3(dc,4,poly);
|
|||
|
|
|
|||
|
|
dc->color=BLUE;
|
|||
|
|
poly[0].x=50;
|
|||
|
|
poly[0].y=150;
|
|||
|
|
poly[0].z=-50;
|
|||
|
|
poly[1].x=275;
|
|||
|
|
poly[1].y=100;
|
|||
|
|
poly[1].z=-50;
|
|||
|
|
poly[2].x=155;
|
|||
|
|
poly[2].y=200;
|
|||
|
|
poly[2].z=-50;
|
|||
|
|
poly[3].x=100;
|
|||
|
|
poly[3].y=200;
|
|||
|
|
poly[3].z=-50;
|
|||
|
|
GrFillPoly3(dc,4,poly);
|
|||
|
|
|
|||
|
|
dc->color=RED+GREEN<<16+ROPF_DITHER;
|
|||
|
|
poly[0].x=50;
|
|||
|
|
poly[0].y=150;
|
|||
|
|
poly[0].z=50;
|
|||
|
|
poly[1].x=275;
|
|||
|
|
poly[1].y=100;
|
|||
|
|
poly[1].z=50;
|
|||
|
|
poly[2].x=275;
|
|||
|
|
poly[2].y=100;
|
|||
|
|
poly[2].z=0;
|
|||
|
|
poly[3].x=50;
|
|||
|
|
poly[3].y=150;
|
|||
|
|
poly[3].z=0;
|
|||
|
|
GrFillPoly3(dc,4,poly);
|
|||
|
|
|
|||
|
|
dc->color=BLUE+GREEN<<16+ROPF_DITHER;
|
|||
|
|
poly[0].x=100;
|
|||
|
|
poly[0].y=200;
|
|||
|
|
poly[0].z=-50;
|
|||
|
|
poly[1].x=155;
|
|||
|
|
poly[1].y=200;
|
|||
|
|
poly[1].z=-50;
|
|||
|
|
poly[2].x=155;
|
|||
|
|
poly[2].y=200;
|
|||
|
|
poly[2].z=0;
|
|||
|
|
poly[3].x=100;
|
|||
|
|
poly[3].y=200;
|
|||
|
|
poly[3].z=0;
|
|||
|
|
GrFillPoly3(dc,4,poly);
|
|||
|
|
|
|||
|
|
Refresh;
|
|||
|
|
DCFill;
|
|||
|
|
<EFBFBD>+=2.1*<EFBFBD>/180.0;
|
|||
|
|
<EFBFBD>+=1.1*<EFBFBD>/180.0;
|
|||
|
|
<EFBFBD>+=0.5*<EFBFBD>/180.0;
|
|||
|
|
}
|
|||
|
|
} catch
|
|||
|
|
PutExcept;
|
|||
|
|
|
|||
|
|
DCFill;
|
|||
|
|
DCDel(dc);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
Main;
|