TempleOSTS_140317.ISO

Demo/Graphics/Logo.CPP

@@ -0,0 +1,50 @@
+
+
+
+
+
+
+
+
+
+
+		$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;