DIRECTORY Containers, Graphics, Menus, Rope, SV2d, SV3d, SVModelTypes, SVInterfaceTypes, ViewerClasses; SVArtworkUser: CEDAR DEFINITIONS = BEGIN Artwork: TYPE = SVModelTypes.Artwork; MouseButton: TYPE = Menus.MouseButton; Point2d: TYPE = SV2d.Point2d; Point3d: TYPE = SV3d.Point3d; Vector: TYPE = SV3d.Vector; Viewer: TYPE = ViewerClasses.Viewer; ArtworkToolData: TYPE = SVInterfaceTypes.ArtworkToolData; UpdateHeader: PROC [assemblyName: Rope.ROPE, sceneName: Rope.ROPE, artworkToolData: ArtworkToolData]; SetArtwork: PROC [artworkTool: Viewer, artwork: Artwork, sceneName: Rope.ROPE, assemblyName: Rope.ROPE]; RotateArtwork: PROC [artworkTool: Viewer, degrees: REAL]; NormalizeArtwork: PROC [artworkTool: Viewer]; Painter: PROC [proc: PROC [dc: Graphics.Context], artworkToolData: ArtworkToolData]; ScalarSetPrompt: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; ScalarPrompt: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; DrawArtwork: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; PlaceOrigin: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; CrossHairs: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; Position: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; GetImagePointFromSurfacePoint: PROC [artwork: Artwork, surfacePt: Point3d, normal: Vector] RETURNS [imagePoint: Point2d]; SetColor: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; OpenFileButton: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; OpenFile: PROC [artworkToolData: ArtworkToolData]; CloseFileButton: PROC [parent: REF ANY, clientData: REF ANY, mouseButton: MouseButton, shift, control: BOOL]; CloseFile: PROC [artworkToolData: ArtworkToolData]; END. File: SVArtworkUser.mesa Last edited by Bier on May 2, 1984 3:54:57 pm PDT Copyright c 1984 by Xerox Corporation. All rights reserved. Author: Eric Bier on August 5, 1984 9:25:53 pm PDT Contents: Viewer for Two dimensional artwork for mappings INTERWINDOW COMMUNICATION ʘIhead1šœ™Jšœ1™1Jšœ Ïmœ1™