<<-- DoCC.cm>> <<-- Mik Lamming - March 4, 1985 10:18:44 am PST>> <<-- DoCC >> <<>> <<-- 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["/Indigo/Cedar5.3/CC/versatecParams/RefToDens1.2.trc"] _ &cOut _ CCImpl.ReadTRC["/Indigo/Cedar5.3/CC/versatecParams/Versatec2b-red.trc"] _ &mOut _ CCImpl.ReadTRC["/Indigo/Cedar5.3/CC/versatecParams/Versatec2a-grn.trc"] _ &yOut _ CCImpl.ReadTRC["/Indigo/Cedar5.3/CC/versatecParams/Versatec2a-blu.trc"] _ &kOut _ CCImpl.ReadTRC["/Indigo/Cedar5.3/CC/versatecParams/Versatec2a-black.trc"] _ &ucrOut _ CCImpl.ReadTRC["/Indigo/Cedar5.3/CC/versatecParams/Versatec2a-UCR.trc"] _ &kpOut _ CCImpl.ReadTRC["/Indigo/Cedar5.3/CC/versatecParams/Versatec2a-kp.trc"] <<-- read in the color correction matrix>> _ &m _ CCImpl.ReadMatrix["/Indigo/Cedar5.3/CC/versatecParams/Colorchart64.matrix"] <<-- apply above paramters to the files>> _ CCImpl.ApplyMatrix[&arg1, &arg2, &m, &r2d, &r2d, &r2d, &cOut, &mOut, &yOut, &kOut, &ucrOut, &kpOut, Color4]