% Control script for PStill to remove any white fill areas during processing
% The script control supress interface is a new feature, it is not yet in the
% in the release version 1.72.14, you need the dev version

% supress pure white fills, needs PStill 1.72.15 as of 17.01.2008 or newer to run

define interceptEOFill() {
	variable colorspace;
	variable cyan, yellow, magenta, black;

	colorspace = currentColorspace();

	(cyan,magenta,yellow,black) = currentCMYKColor();
	
	if (colorspace < 4) {  	 % we check DEVICEGRAY,RGB and CMYK Colorspaces
		if ((black + cyan + magenta + yellow) < 0.001) {	% only for pure white
			suppressOutput();
		}
	}
}

define interceptFill() {
	variable colorspace;
	variable cyan, yellow, magenta, black;

	colorspace = currentColorspace();

	(cyan,magenta,yellow,black) = currentCMYKColor();
	
	if (colorspace < 4) {  	 % we check DEVICEGRAY,RGB and CMYK Colorspaces
		if ((black + cyan + magenta + yellow) < 0.001) {	% only for pure white
			suppressOutput();
		}
	}
}