DIRECTORY AIS, Imager, Rope, SV2d, SV3d, SVModelTypes; SVImage: DEFINITIONS = BEGIN BoundBox: TYPE = SVModelTypes.BoundBox; Color: TYPE = Imager.Color; Matrix4by4: TYPE = SV3d.Matrix4by4; Point2d: TYPE = SV2d.Point2d; Image: TYPE = REF ImageObj; ImageObj: TYPE = RECORD [ bAndWOnly: BOOL, redWindow, greenWindow, blueWindow, bwWindow: AIS.WRef]; OpenImage: PROC [aisRope: Rope.ROPE, bAndWOnly: BOOL, realMinX, realMinY, realMaxX, realMaxY, resolution: REAL, commentString: Rope.ROPE] RETURNS [I: Image, numberOfSamplesX, numberOfSamplesY: NAT]; PutImage: PROC [I: Image, i, j: INTEGER, color: Color, xSamples, ySamples: NAT]; CloseImage: PROC [I: Image, aisRope: Rope.ROPE]; DrawAlignedBlackAndWhiteImage: PROC [dc: Imager.Context, imageName: Rope.ROPE, resolution: REAL, screenWRTCamera: Point2d, boundBox: BoundBox]; DrawAlignedColorImage: PROC [dc: Imager.Context, imageName: Rope.ROPE, resolution: REAL, screenWRTCamera: Point2d, boundBox: BoundBox]; DrawBlackAndWhiteAtOrigin: PROC [dc: Imager.Context, imageName: Rope.ROPE, resolution: REAL _ 72.0]; DrawColorImageAtOrigin: PROC [dc: Imager.Context, imageName: Rope.ROPE, resolution: REAL _ 72.0]; END. žSVImage.mesa Author: Eric Bier Last edited by Bier on August 17, 1985 10:11:56 pm PDT Contents: Routines for manipulating 24 bit per pixel color images ΚΔ– "cedar" style˜Iheadšœ ™ Iprocšœ™Lšœ6™6LšœA™AL˜šΟk ˜ Lšœ˜Lšœ˜Lšœ˜Lšœ˜Lšœ˜Lšœ ˜ —L˜Lšœ  œ˜Lš˜˜Lšœ œ˜'Lšœœ˜Lšœ œ˜#Lšœ œ˜L˜Lšœœœ ˜šœ œœ˜Lšœ œ0œ˜IL˜——LšΟn œœœ œ6œœœœ-œ˜ΖLš žœœœœ$œ˜PLšž œœœœ˜0L˜Lšžœœ&œœ0˜Lšžœœ&œœ0˜‡L˜Lšžœœ&œœ ˜dLšžœœ&œœ ˜aL˜L˜Lšœ˜—…—’τ