<<-- CDPDPlotColorSeparationExampleCMosB.cm>> <<-- Christian Jacobi, July 29, 1986 2:21:50 pm PDT>> <<-- Last Edited by: Christian Jacobi, June 10, 1987 6:12:23 pm PDT>> -- Set up ChipNDale for color separated plotting CMosB on raven; metal only <<-->> CD &CommandFileDirectory Install ChipNDale Install CDPDPlot -- this number X001 is used to make this a unique key; -- if you make a new unique key on edits you can get less confusions if layers hang around... _ &d _ $CDxX001 _ &b _ $CDxX001CMosBBlack _ CDPDPlot.Start[$cmosB, &d, &b, NIL, NIL, NIL, "color separation example X001; on raven; cmos b; metal 1 only; fixed scale: lambda -> 1 cm"] _ CDPDPlot.fiddleDevice _ CDPDPlot.MakeDevice[$Raven384] _ CDPDPlot.fiddleDevice.stippleKey _ &d -- this line between Start and End -- making fixed scale: lambda get 1 cm _ CDProperties.PutAtomProp[&d, $CDxPDPlotScale, NEW[REAL _ 10000]] _ CDPDPlot.LayerNumber[6] _ CDPDPlot.LayerNumber[5] _ CDPDPlot.LayerNumber[4] _ CDPDPlot.LayerNumber[3] _ CDPDPlot.LayerNumber[2] _ CDPDPlot.LayerNumber[1] _ CDPDPlot.LayerNumber[0] _ CDPDPlot.Layer[$ndif] _ CDPDPlot.Layer[$pdif] _ CDPDPlot.Layer[$pwelCont] _ CDPDPlot.Layer[$nwelCont] _ CDPDPlot.Layer[$pol] _ CDPDPlot.Layer[$met] _ CDPDPlot.Color1[&b] _ CDPDPlot.Layer[$cut] _ CDPDPlot.Layer[$met2] _ CDPDPlot.Layer[$cut2] _ CDPDPlot.Layer[$ovg] _ CDPDPlot.Layer[$bur] _ CDPDPlot.Layer[$imp] _ CDPDPlot.End[]