52 lines
20 KiB
C++
52 lines
20 KiB
C++
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
$SP,"",1$
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
U0 Logo()
|
|
{
|
|
CDC *dc=DCAlias;
|
|
dc->flags|=DCF_TRANSFORMATION;
|
|
DocClear;
|
|
while (!ScanChar) {
|
|
dc->x=Fs->win_pixel_width>>1;
|
|
dc->y=Fs->win_pixel_height>>1;
|
|
|
|
//$LK,"Wrap","MN:Wrap"$() converts an angle to an
|
|
//equivalent angle in a range starting
|
|
//from [arg2,arg2+ã*2).
|
|
GrIdentEqu(dc->r);
|
|
GrRotYEqu(dc->r,Wrap(tT,-ã/2));
|
|
GrRotXEqu(dc->r,30.0*ã/180);
|
|
GrSetRotMat(dc,dc->r);
|
|
|
|
SpritePlot3(dc,0,0,0,$IB,"<1>",1$);
|
|
//See also $LK,"SpritePlotRotX3b","MN:SpritePlotRotX3b"$(),
|
|
//$LK,"SpritePlotRotY3b","MN:SpritePlotRotY3b"$(),$LK,"SpritePlotRotZ3b","MN:SpritePlotRotZ3b"$().
|
|
|
|
WinMgrSync;
|
|
DCFill(dc);
|
|
}
|
|
DCDel(dc);
|
|
}
|
|
|
|
Logo;
|
|
L € ˜ ÏÿÿÿÅÿÿÿ |