-- CDPDPlotVersatecChipNSil.cm
-- Set up ChipNDale for color plotting ChipNSil
-- Last Edited by: Christian Jacobi, December 8, 1986 6:01:14 pm PST
CDSil
Install CDPDPlot
← &d ← $CDxVersatec
← &b ← $CDxVSilB
← &c ← $CDxVSilC
← &m ← $CDxVSilM
← &y ← $CDxVSilY
← CDPDPlot.Start[$chipnsil, &d, &b, &c, &m, &y, "chipnsil, versatec or c150 standard"]
--
← CDPDPlot.LayerNumber[0]
--undefLayer
← CDPDPlot.Color8[&m, 10H, 10H, 10H, 10H, 10H, 10H, 0FFH, 10H]
← CDPDPlot.LayerNumber[1]
--shadeLayer
← CDPDPlot.Color8[&c, 40H, 40H, 40H, 40H, 0FFH, 40H, 40H, 40H]
← CDPDPlot.LayerNumber[2]
--errorLayer
← CDPDPlot.Color8[&b, 20H, 20H, 0FFH, 20H, 20H, 20H, 20H, 20H]
← CDPDPlot.LayerNumber[4]
← CDPDPlot.Color1[&b]
← CDPDPlot.LayerNumber[6]
← CDPDPlot.Color4[&b, 15, 15, 15, 15]
--
← CDPDPlot.Layer[$xgreen]
← CDPDPlot.Color4[&c, 0AH, 0, 0AH, 0]
← CDPDPlot.Color4[&y, 0AH, 4, 0AH, 0]
← CDPDPlot.Layer[$xred]
← CDPDPlot.Color4[&y, 5, 0, 5, 0]
← CDPDPlot.Color4[&m, 5, 0, 5, 0]
← CDPDPlot.Layer[$xblue]
← CDPDPlot.Color4[&c, 5, 0, 5, 0]
← CDPDPlot.Layer[$xneutral]
--black
← CDPDPlot.Color4[&b, 5, 0AH, 5, 0AH]
← CDPDPlot.Layer[$xyellow]
← CDPDPlot.Color4[&y, 0AH, 0AH, 3, 3]
← CDPDPlot.End[]