DIRECTORY Imager, Rope, GGInterfaceTypes, GGModelTypes, ViewerClasses; GGWindow: CEDAR DEFINITIONS = BEGIN Camera: TYPE = GGModelTypes.Camera; Point: TYPE = GGModelTypes.Point; Scene: TYPE = GGModelTypes.Scene; Viewer: TYPE = ViewerClasses.Viewer; GargoyleData: TYPE = GGInterfaceTypes.GargoyleData; CreateWindow: PROC [scene: Scene, iconic: BOOL, paint: BOOL, workingDirectory: Rope.ROPE] RETURNS [gargoyleData: GargoyleData]; Painter: PROC [paintAction: ATOM, gargoyleData: GargoyleData]; CameraToScreen: PROC [pointCamera: Point, camera: Camera] RETURNS [pointScreen: Point]; ScreenToCamera: PROC [pointScreen: Point, camera: Camera] RETURNS [pointCamera: Point]; ScreenToWorld: PROC [pointScreen: Point, camera: Camera] RETURNS [pointWorld: Point]; ReloadTipTable: PROC [gargoyleData: GargoyleData]; SaveCaretPos: PROC [gargoyleData: GargoyleData]; NewCaretPos: PROC [gargoyleData: GargoyleData]; END. βGGWindow.mesa Last edited by Bier on June 7, 1985 5:31:19 pm PDT Copyright c 1985 by Xerox Corporation. All rights reserved. Author: Eric Bier on August 6, 1985 5:57:44 pm PDT Contents: Code to create a gargoyle tool. Κq˜Ihead1™ Iprocšœ2™2Jšœ Οmœ1™Lš ŸœžœΟuœžœ œ˜WLš Ÿœžœ œžœ œ ˜WLš Ÿ œžœ œžœ œ ˜UL˜LšŸœžœ˜2L˜LšŸ œžœ˜0LšŸ œžœ˜/L˜Lšžœ˜—…—”η