-- PlateCC.cm

-- Mik Lamming - May 2, 1985 4:27:26 pm PDT

-- PlateCC <instem> <outstem>

-- this next kludge just gathers up the arguments

← &arg0 ← 1

← &cmd ← List.Assoc[$CommanderHandle, ProcessProps.GetPropList[]]

← &args ← List.Assoc[$CommandFileArguments, &cmd.propertyList]

← &arg1 ← IF &args.argc > 1 THEN &args[&arg0+1] ELSE NIL

← &arg2 ← IF &args.argc > 2 THEN &args[&arg0+2] ELSE NIL

-- read in all the trc information

← &r2d ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/plateParams/RefToDens1.3.trc"]

← &cOut ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/plateParams/Platemaker-red.trc"]

← &mOut ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/plateParams/Platemaker-grn.trc"]

← &yOut ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/plateParams/Platemaker-blu.trc"]

← &kOut ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/plateParams/Platemaker-black.trc"]

← &kOut ← NIL

← &ucrOut ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/versatecParams/Platemaker-UCR.trc"]

← &ucrOut ← NIL

← &kpOut ← CCImpl.ReadTRC["/Cyan/Imaging/ColorCorrector/plateParams/Platemaker-kp.trc"]

← &kpOut ← NIL

-- read in the color correction matrix

← &m ← CCImpl.ReadMatrix["/Cyan/Imaging/ColorCorrector/versatecParams/Identity.matrix"]

-- apply above paramters to the files

← CCImpl.ApplyMatrix[&arg1, &arg2, &m, &r2d, &r2d, &r2d, &cOut, &mOut, &yOut, &kOut, &ucrOut, &kpOut, Color4]

← CCImpl.ApplyMatrix[&arg1, &arg2, &m, &r2d, &r2d, &r2d, &yOut, &yOut, &yOut, &kOut, &ucrOut, &kpOut, Color4]