DIRECTORY AtomButtonsTypes, Imager, IO, Rope, SV2d, SV3d, SVModelTypes, SVSceneTypes, ViewerClasses; SVParseIn: CEDAR DEFINITIONS = BEGIN Color: TYPE = Imager.Color; Artwork: TYPE = SVModelTypes.Artwork; CoordSysList: TYPE = SVModelTypes.CoordSysList; CoordSystem: TYPE = SVModelTypes.CoordSystem; DrawStyle: TYPE = SVModelTypes.DrawStyle; FeedbackData: TYPE = AtomButtonsTypes.FeedbackData; FileCamera: TYPE = SVSceneTypes.FileCamera; FrameBox: TYPE = SVModelTypes.FrameBox; Material: TYPE = SVModelTypes.Material; Matrix3by3: TYPE = SV2d.Matrix3by3; Matrix4by4: TYPE = SV3d.Matrix4by4; OMap: TYPE = SVModelTypes.OMap; Plane: TYPE = SV3d.Plane; Point2d: TYPE = SV2d.Point2d; Point3d: TYPE = SV3d.Point3d; Scene: TYPE = SVSceneTypes.Scene; Slice: TYPE = SVSceneTypes.Slice; SMap: TYPE = SVModelTypes.SMap; Viewer: TYPE = ViewerClasses.Viewer; FileinMatrix: PROC [f: IO.STREAM] RETURNS [mat: Matrix4by4]; FileinMatrix3by3: PROC [f: IO.STREAM] RETURNS [mat: Matrix3by3]; RopeNotOnTop: SIGNAL [position: NAT, wasThere: Rope.ROPE, notThere: Rope.ROPE]; ReadReturn: PROC [f: IO.STREAM]; ReadKeyWord: PROC [f: IO.STREAM] RETURNS [keyWord: Rope.ROPE, good: BOOL]; ReadPoint3d: PROC [f: IO.STREAM] RETURNS [point3d: Point3d]; ReadPoint2d: PROC [f: IO.STREAM] RETURNS [point2d: Point2d]; ReadPoint2dAsPoint3d: PROC [f: IO.STREAM] RETURNS [point3d: Point3d]; ReadPlane: PROC [f: IO.STREAM] RETURNS [plane: Plane]; ReadColor: PROC [f: IO.STREAM] RETURNS [color: Color]; ReadSurface: PROC [f: IO.STREAM] RETURNS [surface: REF ANY]; ReadMaterial: PROC [f: IO.STREAM] RETURNS [material: Material]; ReadSMap: PROC [f: IO.STREAM] RETURNS [sMap: SMap]; ReadOMap: PROC [f: IO.STREAM] RETURNS [oMap: OMap]; ReadCamera: PROC [f: IO.STREAM, worldCS: CoordSystem, scene: Scene, version: REAL] RETURNS [fileCamera: FileCamera]; ReadFrame: PROC [f: IO.STREAM, version: REAL] RETURNS [frame: FrameBox]; ReadClippingPlanes: PROC [f: IO.STREAM] RETURNS [clippingPlanes: LIST OF Plane]; ReadVisibleAssemblies: PROC [f: IO.STREAM, scene: Scene, feedback: FeedbackData] RETURNS [assemblyList: LIST OF Slice]; ReadStyle: PROC [f: IO.STREAM] RETURNS [style: DrawStyle]; ReadArtwork: PROC [f: IO.STREAM, csList: CoordSysList, defaultCS: CoordSystem, wdir: Rope.ROPE, version: REAL, feedback: FeedbackData] RETURNS [artwork: Artwork]; ReadListOfRope: PROC [f: IO.STREAM] RETURNS [ropeList: LIST OF Rope.ROPE]; END. œFile: SVParseIn.mesa Last edited by Bier on July 17, 1987 12:46:42 pm PDT Copyright c 1984 by Xerox Corporation. All rights reserved. Contents: convenience functions for parsing low-level parts of a 3d fileout produced by fileout3d.mesa Reads in one character from f. Complains if it is not c. Signals RopeNotOnTop if some other char is on top. Convenience function. Equivalent to ReadChar[f, IO.CR]; Reads a rope until a ':' or are encountered. If CR is encountered first, then good is FALSE since ":" is expected after a keyword. Reads a rope UNTIL is encountered. Used to read Solidviews version rope. The character is tossed out. A convenience function. Equivalent to ReadBlank[f]; n _ ReadNAT[f]; Assumes the next rope on the stream will be of the form "[,,]". Assumes the next rope on the stream will be of the form "[,]". Fills in point3d[3] with zero. Κς– "cedar" style˜Iheadšœ™Iprocšœ4™4Jšœ Οmœ1™˜ZL˜—Lšœ žœ˜L˜Lšž˜˜Lšœžœ˜Lšœ žœ˜%Lšœžœ˜/Lšœ žœ˜-Lšœ žœ˜)Jšœžœ!˜3Lšœ žœ˜+Lšœ žœ˜'Lšœ žœ˜'Lšœ žœ˜#Lšœ žœ˜#Lšœžœ˜Lšœžœ˜Lšœ žœ˜Lšœ žœ˜Lšœžœ˜!Lšœžœ˜!Lšœžœ˜Lšœžœ˜$L˜—L˜Lš Οn œžœžœžœžœ˜