uf.cm
Last Edited by: Plass, February 25, 1983 4:06 pm
run UnifiedFontPackage UFSample UFFileWatch UFTextTest;
Open UFTextTest UFDrawCharSeqImpl
← UFTextTest.deviceType ← $Screen
← UFTextTest.fontName ← "Xerox/PressFonts/Logo/MRR"
← UFTextTest.size ← 24
← UFTextTest.text ← "XEROX"
← UFTextTest.clippedBottomLine ← FALSE
← UFTextTest.fontName ← "TimesI"
← UFTextTest.size ← 15
← UFTextTest.Load["/ivy/plass/testcases/inolden.tioga"]
← UFTextTest.clippedBottomLine ← FALSE
← UFSample
← scale ← 5.33333333
← drawingDesignBoxes ← TRUE
← drawingWidths ← TRUE
← drawingBoundingBoxes ← TRUE
← Font["TimesI",15,0]