-- 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[]