% Begin UserPrep file.
%
% File : Seikover.prp
% FreeHand 7 UserPrep file.
% 
%UserPrep file for generating overprinting behavior on the 
% Seiko ColorPoint2 printer with FreeHand 7. 
% To enable this file, select it in the Print Setup dialog UserPrep popup,  
% or set the preference in the Expert Input/Output options for
% UserPrep to Seikover.prp.
% To verify that this is enabled, print to file, and look for 
% Seikover.prp in the print file. If you find this text, 
% it is enabled.
%
% This user prep file will have no effect on PostScript level 1 printers,
% and no effect on monochrome printers. It will cause incorrect colors
% on level 2 color printers that do not support overprinting.
%
% Version 1.0 Nov. 23, 1994
% John Ahlquist
% Copyright (C) Macromedia, Inc. 1995, 1996  All rights reserved.

systemdict /setoverprint known			% make sure overprint, colorspace & setcolor are known.
systemdict /setcolorspace known and
systemdict /setcolor known and 
fhnumcolors 1 gt and					% make sure device is color.

{
	
	/_myLoadColor { 
		aload length 2 eq 
		{
		% tint index 
		spots exch get	aload pop % tint c m y k sepName inkOverprintFlag
		pop pop 
		4 index 	% tint c m y k tint
		mul			% tint c m y k'
		5 1 roll	% k' tint c m y
		3 index mul	% k' tint c m y'
		5 1 roll	% y' k' tint c m
		2 index mul	% y' k' tint c m'
		5 1 roll	% y' m' k' tint c
		mul			% y' m' k' c'
		4 1 roll
		} if
	} def
	
	/setoverprint { /currentoverprint xdf } def
	/f {
		closepath
		
		% currently works only for process.  Check for spots... 
		AltsysDict /cvc get
		_myLoadColor
		exch pop exch pop exch pop %k
		1 lt currentoverprint not and % If we are not overprinting, & black is < 1, (we may be white), print normally.
		{
			F
			}
		{
			AltsysDict /cvc get
			_myLoadColor
			true systemdict /setoverprint get exec
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Black) /DeviceCMYK {0 exch 0 exch 0 exch }] setcolorspace
					setcolor	% c m y
					F
				grestore
			} {pop} ifelse
			dup 0 ne currentoverprint not or  {
				gsave
					[/Separation (Yellow) /DeviceCMYK {0 exch 0 exch 0}] setcolorspace
					setcolor	% c m
					F
				grestore
			} {pop} ifelse
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Magenta) /DeviceCMYK {0 exch 0 0}] setcolorspace
					setcolor	% c
					F
				grestore
			} {pop} ifelse
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Cyan) /DeviceCMYK {0 0 0}] setcolorspace
					setcolor	% 
					F
				grestore
			} {pop} ifelse
		} ifelse 
		false systemdict /setoverprint get exec
	} def
	
	/S {
		% currently works only for process.  Check for spots... 
		AltsysDict /cvc get
		_myLoadColor	% c m y k
		exch pop exch pop exch pop %k
		1 lt currentoverprint not and % If we are not overprinting, & black is < 1, (we may be white), print normally.
		{
			gsave {stroke} fp grestore
			}
		{
			true systemdict /setoverprint get exec
			AltsysDict /cvc get
			_myLoadColor	% c m y k
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Black) /DeviceCMYK {0 exch 0 exch 0 exch }] setcolorspace
					setcolor	% c m y
					{stroke}fp
				grestore
			} {pop} ifelse
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Yellow) /DeviceCMYK {0 exch 0 exch 0}] setcolorspace
					setcolor	% c m
					{stroke}fp
				grestore
			} {pop} ifelse
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Magenta) /DeviceCMYK {0 exch 0 0}] setcolorspace
					setcolor	% c
					{stroke}fp
				grestore
			} {pop} ifelse
			dup 0 ne currentoverprint not or {
				gsave
					[/Separation (Cyan) /DeviceCMYK {0 0 0}] setcolorspace
					setcolor	% 
					{stroke}fp
				grestore
			} {pop} ifelse
		} ifelse
		false systemdict /setoverprint get exec
	} def
	/s {closepath S}bdf
} if
% End UserPrep file