<> <> <> DIRECTORY CD, CDPlot, CDProperties, CMos; CDPlotPDCMosA: CEDAR PROGRAM IMPORTS CDPlot, CDProperties, CMos EXPORTS CDPlot = BEGIN OPEN CDPlot, CMos; initialized: BOOL _ FALSE; InitCMosA: PUBLIC PROC = { LTS: REF LayerTonerSipples; nofLayers: CD.Layer = CMos.cut2+1; cmosAPtrLTS: REF PrinterLTS; IF initialized THEN RETURN ELSE initialized _ TRUE; cmosAPtrLTS _ NEW[PrinterLTS _ ALL[NIL]]; CDProperties.PutProp[onto: $cmos, prop: $stipples, val: cmosAPtrLTS]; cmosAPtrLTS[colorVersatec] _ cmosAPtrLTS[c150] _ LTS _ NEWLayerTonerSipples[nofLayers]; LTS[error ][black] _ NEW8[[20H, 20H, 0FFH, 20H, 20H, 20H, 20H, 20H]]; LTS[highlight ][cyan] _ NEW8[[40H, 40H, 40H, 40H, 0FFH, 40H, 40H, 40H]]; LTS[combined ][magenta] _ NEW8[[10H, 10H, 10H, 10H, 10H, 10H, 0FFH, 10H]]; LTS[ndif ][cyan] _ NEW4[[0AH, 0, 0AH, 0]]; LTS[ndif ][yellow] _ NEW4[[0AH, 4, 0AH, 0]]; LTS[pwellCont ][magenta] _ NEW4[[2, 2, 8, 0]]; LTS[pwellCont ][cyan] _ NEW4[[0, 0, 0, 8]]; LTS[nwellCont ][cyan] _ NEW4[[2, 2, 8, 0]]; LTS[nwellCont ][yellow] _ NEW4[[2, 2, 8, 0]]; LTS[nwellCont ][magenta] _ NEW4[[0, 0, 0, 8]]; LTS[pol ][yellow] _ NEW4[[5, 0, 5, 0]]; LTS[pol ][magenta] _ NEW4[[5, 0, 5, 0]]; LTS[met ][cyan] _ NEW4[[5, 0, 5, 0]]; LTS[cut ][black] _ NEW4[[5, 0AH, 5, 0AH]]; LTS[met2 ][cyan] _ NEW8[[1, 2, 4, 8, 10H, 20H, 40H, 80H]]; LTS[cut2 ][black] _ NEW4[[0CH, 0CH, 3, 3]]; LTS[ovg ][cyan] _ NEW8[[0, 20H, 20H, 0F8H, 20H, 20H, 00H, 00H]]; LTS[nwell ][yellow] _ NEW4[[0, 6, 0, 0]]; LTS[bur ][black] _ NEW4[[2, 0, 8, 0]]; LTS[pdif ][cyan] _ NEW4[[8, 2, 4, 1]]; LTS[pdif ][yellow] _ NEW4[[8, 6, 4, 1]]; LTS[imp ][yellow] _ NEW4[[0AH, 0AH, 3, 3]]; <> LTS[pwell ][black] _ NEW4[[0FH, 0FH, 0, 0]]; <> cmosAPtrLTS[color400] _ LTS _ NEWLayerTonerSipples[nofLayers]; LTS[combined ][magenta] _ NEW8[[16, 16, 16, 16, 16, 16, 255, 16]]; LTS[highlight ][cyan] _ NEW8[[64, 64, 64, 64, 255, 64, 64, 64]]; LTS[error ][black] _ NEW8[[32, 32, 255, 32, 32, 32, 32, 32]]; LTS[error ][magenta] _ NEW8[[32, 32, 255, 32, 32, 32, 32, 32]]; LTS[error ][cyan] _ NEW8[[32, 32, 255, 32, 32, 32, 32, 32]]; LTS[error ][yellow] _ NEW8[[32, 32, 255, 32, 32, 32, 32, 32]]; LTS[ndif ][cyan] _ NEW4[[12, 9, 3, 6]]; LTS[ndif ][yellow] _ NEW4[[12+1, 9, 3+4, 6]]; LTS[pwellCont ][cyan] _ NEW4[[0, 6, 6, 0]]; LTS[pwellCont ][yellow] _ NEW4[[0, 6, 6, 0]]; LTS[pol ][yellow] _ NEW4[[9, 3, 6, 12]]; LTS[pol ][magenta] _ NEW4[[9, 3, 6, 12]]; LTS[met ][cyan] _ NEW4[[6, 12, 9, 3]]; LTS[nwell ][yellow] _ NEW4[[1, 2, 4, 8]]; LTS[pdif ][cyan] _ NEW4[[12, 9, 3, 6]]; LTS[pdif ][yellow] _ NEW4[[12, 9, 3, 6]]; LTS[imp ][yellow] _ NEW4[[15,15,15,15]]; LTS[cut ][black] _ NEW4[[15,15,15,15]]; LTS[cut ][cyan] _ NEW4[[15,15,15,15]]; LTS[cut ][yellow] _ NEW4[[15,15,15,15]]; LTS[cut ][magenta] _ NEW4[[15,15,15,15]]; LTS[cut2 ][black] _ NEW4[[3, 6, 12, 9]]; LTS[cut2 ][cyan] _ NEW4[[3, 6, 12, 9]]; LTS[cut2 ][yellow] _ NEW4[[3, 6, 12, 9]]; LTS[cut2 ][magenta] _ NEW4[[3, 6, 12, 9]]; LTS[ovg ][cyan] _ NEW8[[0, 48, 48, 252, 252, 48, 48, 0]]; LTS[met2 ][cyan] _ NEW8[[24, 48, 96, 192, 129, 3, 6, 12]]; LTS[nwellCont ][cyan] _ NEW8[[51, 51, 102, 102, 204, 204, 153, 153]]; LTS[nwellCont ][yellow] _ NEW8[[51, 51, 102, 102, 204, 204, 153, 153]]; LTS[bur ][black] _ NEW8[[0, 0, 0, 0, 0, 56, 56, 56]]; LTS[bur ][cyan] _ NEW8[[0, 0, 0, 0, 0, 56, 56, 56]]; LTS[bur ][yellow] _ NEW8[[0, 0, 0, 0, 0, 56, 56, 56]]; LTS[bur ][magenta] _ NEW8[[0, 0, 0, 0, 0, 56, 56, 56]]; LTS[pwell ][black] _ NEW8[[0, 0, 8, 4, 0, 0, 0, 0]]; LTS[pwell ][cyan] _ NEW8[[0, 0, 8, 4, 0, 0, 0, 0]]; LTS[pwell ][yellow] _ NEW8[[0, 0, 8, 4, 0, 0, 0, 0]]; LTS[pwell ][magenta] _ NEW8[[0, 0, 8, 4, 0, 0, 0, 0]]; CDPlot.SwapSipples[LTS]; -- seems to be necessary on color400 devices }; END.