File: GGFileIn.mesa
Last edited by Bier on September 16, 1987 10:42:27 pm PDT
Copyright Ó 1986, 1992 by Xerox Corporation. All rights reserved.
Contents: Recreates a gargoyle database from a text file of the sort produced by GGFileout.mesa.
Pier, January 5, 1988 6:10:26 pm PST
Bier, July 29, 1992 10:58 am PDT
DIRECTORY
GGInterfaceTypes, GGModelTypes, IO, Rope;
GGFileIn: CEDAR DEFINITIONS = BEGIN
Camera: TYPE = GGModelTypes.Camera;
GGData: TYPE = GGInterfaceTypes.GGData;
Scene: TYPE = GGModelTypes.Scene;
FileinSceneAndOptions:
PROC [f:
IO.
STREAM, ggData: GGData, alignmentsOnly:
BOOL, selectSlices:
BOOL, closeStreamWhenDone:
BOOL ←
TRUE]
RETURNS [success:
BOOL, sceneName: Rope.
ROPE];
Loads any objects in f into ggData scene. Merges any alignment line types in f into the viewer represented by ggData. Changes other control panel state variables to options found in f if NOT alignmentsOnly. Select all objects read in if selectSlices. If closeStreamWhenDone, then closes stream f once scene and options have been read.
FileinSceneOnly:
PROC [f:
IO.
STREAM, scene: Scene, selectSlices:
BOOL, camera: Camera, closeStreamWhenDone:
BOOL ←
TRUE]
RETURNS [success:
BOOL, sceneName: Rope.
ROPE];
Ignores the control panel state variables options in f. Merges any objects in f into scene. Selects all objects merged if selectSlices. If closeStreamWhenDone, then closes stream f once scene has been read.
FileinOptionsOnly:
PROC [f:
IO.
STREAM, ggData: GGData, alignmentsOnly:
BOOL, closeStreamWhenDone:
BOOL ←
TRUE]
RETURNS [success:
BOOL, sceneName: Rope.
ROPE];
Merges any alignment line types in f into the viewer represented by ggData. Changes other control panel state variables to options found in f if NOT alignmentsOnly. If closeStreamWhenDone, then closes stream f once options have been read.
END.