51 lines
691 B
C++
51 lines
691 B
C++
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
$SP,"",BI=1,BP="::/Misc/StockSprites.TXT,TempleOSLogo"$
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
U0 Logo()
|
|
{
|
|
CDC *dc=DCAlias;
|
|
dc->flags|=DCF_TRANSFORMATION;
|
|
DocClear;
|
|
while (!ScanChar) {
|
|
dc->x=Fs->pix_width>>1;
|
|
dc->y=Fs->pix_height>>1;
|
|
|
|
//$LK,"Wrap",A="MN:Wrap"$() converts an angle to an
|
|
//equivalent angle in a range starting
|
|
//from [arg2,arg2+ã*2).
|
|
GrIdentEqu(dc->r);
|
|
GrRotYEqu(dc->r,Wrap(tS,-ã/2));
|
|
GrRotXEqu(dc->r,30.0*ã/180);
|
|
GrSetRotMat(dc,dc->r);
|
|
|
|
Sprite3(dc,0,0,0,$IB,"<1>",BI=1$);
|
|
//See also $LK,"SpriteX3B",A="MN:SpriteX3B"$(),
|
|
//$LK,"SpriteY3B",A="MN:SpriteY3B"$(),$LK,"SpriteZ3B",A="MN:SpriteZ3B"$().
|
|
|
|
WinMgrSync;
|
|
DCFill(dc);
|
|
}
|
|
DCDel(dc);
|
|
}
|
|
|
|
Logo;
|