SparrowOSTS_121127.ISO

SparrowOS/Demo/Graphics/CaptureScreen.CPP

@@ -0,0 +1,27 @@
+//See $LK,"::/SparrowOS/Demo/GameStarters/Stadium/StadiumGen.CPP.Z","FI:::/SparrowOS/Demo/GameStarters/Stadium/StadiumGen.CPP.Z"$.
+
+U0 ViewScreenCapture(U8 *filename)
+{
+  CDC	*dc=DCAlias(gr_dc2,Fs),
+	*dc2=GRARead(filename);
+  GrBlot(dc,0,0,dc2);
+  DCDel(dc2);
+  DCDel(dc);
+}
+
+
+U0 Main()
+{
+  "Capture screen...\n";
+  PressAKey;
+  GRACaptureScreen("HOME/ScreenShot.GRA.Z");
+
+  "View captured screen...\n";
+  PressAKey;
+  ViewScreenCapture("HOME/ScreenShot.GRA.Z");
+
+  PressAKey;
+  DCFill;
+}
+
+Main;