Run PressReaderImpl Run ShowPressPackage Run ImagerToJaMImpl Run PressImageImpl Run SirPressImpl Run ImagerPressFontSubstImpl Run ImagerPressImpl _ &c _ ImagerPress.SimpleCreate["test.press"] _ Imager.MaskRectangle[&c, [0.1, 0.1, 0.05, 0.03]] _ Imager.ScaleT[&c, 0.8] _ Imager.MaskRectangle[&c, [0.1, 0.1, 0.05, 0.03]] _ Imager.ScaleT[&c, 0.8] _ Imager.SetGray[&c, 0.3] _ Imager.MaskRectangle[&c, [0.1, 0.1, 0.05, 0.03]] _ Imager.SetGray[&c, 1] _ Imager.RotateT[&c, 22.5] _ Imager.MaskRectangle[&c, [0.1, 0.1, 0.05, 0.03]] _ ImagerPress.Close[&c] _ &s _ ShowPress.Open["test.press"] _ &v _ ViewerIO.CreateViewerStreams["test.press viewer"] _ &c _ ImagerToJaM.Create[&v.out] _ ShowPress.DrawPressPage[&c, &s, 1] TSetter Stinger Test.press _ &c _ ImagerPress.SimpleCreate["flamingos.press"] _ &s _ ShowPress.Open["[ivy]print>fourflamingos.press"] _ Imager.ScaleT[&c, 1.0e-5] _ Imager.TranslateT[&c, [8.5*2540/2, 11*2540/2]] _ Imager.ScaleT[&c, 0.5] _ ShowPress.DrawPressPage[&c, &s, 1] _ Imager.RotateT[&c, 180-30] _ ShowPress.DrawPressPage[&c, &s, 1] _ ImagerPress.Close[&c] TSetter Stinger flamingos.press _ &s _ ShowPress.Open["ImagerPressTest.cm.press"] _ &c _ ImagerPress.SimpleCreate["text.press"] _ Imager.ScaleT[&c, 1.0e-5] _ ShowPress.DrawPressPage[&c, &s, 1] _ ImagerPress.Close[&c] ͺImagerPressTest.cm Copyright c 1985 by Xerox Corporation. All rights reserved. Michael Plass, June 11, 1985 4:37:56 pm PDT Tim Diebert May 16, 1985 8:44:48 am PDT ΚH˜™Icodešœ Οmœ1™˜>J˜J˜0J˜Jšœ$˜$J˜Jšœ$˜$Jšœ˜J˜Jšœ˜J˜Jšœ1˜1Jšœ-˜-J˜Jšœ$˜$Jšœ˜—…—