install interpresstotape run producetapesimpl pinstall interpress install CalibratedColor run -a ColorPlotGamutsImpl pinstall userprofileops pinstall AIS install SampleCache run SampleRefCacheImpl run PrintColorXFormsImpl run TRCDataImpl run ImageGamutsImpl interpreter &sampledCal _ CreateCalibration.CreateSampled[CreateCalibration.GetSampledFiles[$Cromalin], $Cromalin] &rgbCal _ CreateCalibration.CreateRGB[CreateCalibration.GetRGBDataValues[$Conrac]] --&rgbtolstar _ PrintColorTransformations.RGBToLStar[] &rgbtolstar _ TRCDataImpl.RGBToLStarTRCTable[$Ideal] &rgbtolstar _ TRCDataImpl.RGBToLStarTRCTable[$FranksConrac] &rgbtolstar _ TRCDataImpl.RGBToLStarTRCTable[$FranksOldConrac] &aisRoot _ "///Users/tow.pa/images/ZebraBurlTeapot400x300" &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.05, 1.7] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.10, 1.7] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.15, 1.7] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.20, 1.7] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.05, 1.7] ImageGamuts.AdjustWithMatrix[fileStem: &aisRoot, adjusted: "///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat05/Teapot", matrixTables:&tables] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.10, 1.7] ImageGamuts.AdjustWithMatrix[fileStem: &aisRoot, adjusted: "///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat10/Teapot", matrixTables:&tables] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.15, 1.7] ImageGamuts.AdjustWithMatrix[fileStem: &aisRoot, adjusted: "///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat15/Teapot", matrixTables:&tables] &tables _ ImageGamuts.SaturationMatrix[&rgbtolstar, 0.20, 1.7] ImageGamuts.AdjustWithMatrix[fileStem: &aisRoot, adjusted: "///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat20/Teapot", matrixTables:&tables] &ipName _ "///Users/tow.pa/Chromalins/Tpot4upOldConracTRC.ip" ProduceTapesImpl.IPFromFourAIS[ipName: &ipName, aisSpecs:[["///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat05/Teapot", "Franks Old Conrac TRC, Saturation 0.5"], ["///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat10/Teapot", "Franks Old Conrac TRC, Saturation 1.0"], ["///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat15/Teapot", "Franks Old Conrac TRC, Saturation 1.5"], ["///Users/tow.pa/Chromalins/FranksOldConracTRC/Sat20/Teapot", "Franks Old Conrac TRC, Saturation 2.0"]], aisEndings: ProduceTapesImpl.redGrnBlu, onSide: FALSE, xPitch: 2.5, yPitch: 2, aisWidth: 2.5, xOffset: 0, yOffset: 0]; --&Scene4up _ ProduceTapesImpl.MakeTapeSpec[name: &ipName, fDim:2.5, sDim: 2, surfaceUnitsPerPixel: 2, colorCorrection: PrintColorTransformations.SWOPWithGCLinearLStar[]] &Scene4up _ ProduceTapesImpl.MakeIPSpec[name: &ipName, fOrg: 0, sOrg: 0, fDim: 0, sDim: 0, surfaceUnitsPerPixel: 2, colorCorrection: PrintColorTransformations.SWOPWithGCLinearLStar[], ppi: 300, achromatic: FALSE] &Scene4up.nBands _ 2 InterpressToTapeImpl.Preview[files: LIST[&Scene4up], wd: "///Users/tow.pa/Chromalins/FranksOldConracTRC/Preview/", reduceResolution: 0.1] --InterpressToTapeImpl.InterpressToCrosfield[files: LIST[&Scene4up], drive: 0, tapeName: "Scene4up", tapeNumber: 104] &tapeSpec _ InterpressToTape.DefaultTapeSpec[name: "Zebra Burl teapot", tapeNumber: 104] InterpressToTapeImpl.WriteTape[files: LIST[&Scene4up], format: crosfield, tapeSpec: &tapeSpec] 4 up Ê™™J˜J˜Jšœ˜J˜J˜J˜Jšœ˜J˜J˜Jšœ ˜ Jšœ˜Jšœ˜Jšœ˜Jšœ˜Jšœ˜J˜J˜ J˜J˜J˜gJšœR˜RJ˜Jšœ6˜6Jšœ4˜4Jšœ;˜;Jšœ>˜>J˜Jšœ:˜:J˜Jšœ>˜>Jšœ>˜>Jšœ>˜>Jšœ>˜>J˜Jšœ>˜>JšœŽ˜ŽJ˜Jšœ>˜>JšœŽ˜ŽJ˜J˜Jšœ>˜>JšœŽ˜ŽJ˜Jšœ>˜>JšœŽ˜ŽJ˜J˜J˜J˜™J˜Jšœ=˜=J˜J˜JšœÕ˜ÕJ˜J˜J˜J˜Jšœ«˜«J˜JšœÕ˜ÕJšœ˜Jšœ‰˜‰J˜Jšœu˜uJ˜J˜JšœÏnœ,˜XJ˜J˜J˜Jšœ^˜^——…— $É