From f4092abdf94af6a99aff944d6264bc1284e8bdd4 Mon Sep 17 00:00:00 2001 From: Reinhard Tartler Date: Mon, 10 Oct 2011 17:43:39 +0200 Subject: Imported nx-X11-3.1.0-1.tar.gz Summary: Imported nx-X11-3.1.0-1.tar.gz Keywords: Imported nx-X11-3.1.0-1.tar.gz into Git repository --- nx-X11/lib/dpstk/CSBwraps.psw | 343 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 343 insertions(+) create mode 100644 nx-X11/lib/dpstk/CSBwraps.psw (limited to 'nx-X11/lib/dpstk/CSBwraps.psw') diff --git a/nx-X11/lib/dpstk/CSBwraps.psw b/nx-X11/lib/dpstk/CSBwraps.psw new file mode 100644 index 000000000..02a2041ee --- /dev/null +++ b/nx-X11/lib/dpstk/CSBwraps.psw @@ -0,0 +1,343 @@ +/* + * CSBwraps.psw + * + * (c) Copyright 1993-1994 Adobe Systems Incorporated. + * All rights reserved. + * + * Permission to use, copy, modify, distribute, and sublicense this software + * and its documentation for any purpose and without fee is hereby granted, + * provided that the above copyright notices appear in all copies and that + * both those copyright notices and this permission notice appear in + * supporting documentation and that the name of Adobe Systems Incorporated + * not be used in advertising or publicity pertaining to distribution of the + * software without specific, written prior permission. No trademark license + * to use the Adobe trademarks is hereby granted. If the Adobe trademark + * "Display PostScript"(tm) is used to describe this software, its + * functionality or for any other purpose, such use shall be limited to a + * statement that this software works in conjunction with the Display + * PostScript system. Proper trademark attribution to reflect Adobe's + * ownership of the trademark shall be given whenever any such reference to + * the Display PostScript system is made. + * + * ADOBE MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THE SOFTWARE FOR + * ANY PURPOSE. IT IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY. + * ADOBE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL + * IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + * NON- INFRINGEMENT OF THIRD PARTY RIGHTS. IN NO EVENT SHALL ADOBE BE LIABLE + * TO YOU OR ANY OTHER PARTY FOR ANY SPECIAL, INDIRECT, OR CONSEQUENTIAL + * DAMAGES OR ANY DAMAGES WHATSOEVER WHETHER IN AN ACTION OF CONTRACT, + * NEGLIGENCE, STRICT LIABILITY OR ANY OTHER ACTION ARISING OUT OF OR IN + * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ADOBE WILL NOT + * PROVIDE ANY TRAINING OR OTHER SUPPORT FOR THE SOFTWARE. + * + * Adobe, PostScript, and Display PostScript are trademarks of Adobe Systems + * Incorporated which may be registered in certain jurisdictions + * + * Author: Adobe Systems Incorporated + */ + +defineps _DPSCColormapMatch(DPSContext ctxt; int colormap | boolean *match) + currentXgcdrawablecolor % gc draw x y [....colormap...] + 10 get colormap eq match % gc draw x y + pop pop pop pop +endps + +defineps _DPSCTriangle(DPSContext ctxt; double h, w) + newpath + 0 0 moveto + w 0 rlineto + 0 h rlineto + closepath + fill +endps + +defineps _DPSCShowFillMe(DPSContext ctxt; char *str) + /Helvetica-Bold 12 selectfont + 2 5 moveto + 0 setgray + (str) show +endps + +defineps _DPSCShowMessage(DPSContext ctxt; char *str) + 1 setgray + 0 0 1000 1000 rectfill + /Helvetica-Bold 12 selectfont + 10 2 moveto + 0 setgray + (str) show +endps + +defineps _DPSCRGBBlend(DPSContext ctxt; double x, y, width, height; + char *function; int steps) + gsave + x y translate + width steps div + 0 1 steps 1 sub { + steps div (function) cvx exec setrgbcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore +endps + +defineps _DPSCHSBBlend(DPSContext ctxt; double x, y, width, height; + char *function; int steps) + gsave + x y translate + width steps div + 0 1 steps 1 sub { + steps div (function) cvx exec sethsbcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore +endps + +defineps _DPSCCMYKBlend(DPSContext ctxt; double x, y, width, height; + char *function; int steps) + gsave + x y translate + width steps div + 0 1 steps 1 sub { + steps div (function) cvx exec setcmykcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore +endps + +defineps _DPSCGrayBlend(DPSContext ctxt; double x, y, width, height; + char *function; int steps) + gsave + x y translate + width steps div + 0 1 steps 1 sub { + steps div (function) cvx exec setgray + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore +endps + +defineps _DPSCGetInvCTM(DPSContext ctxt; | float invctm[6]) + matrix currentmatrix matrix invertmatrix invctm +endps + +defineps _DPSCDoRGBColorPalette(DPSContext ctxt; char *func; + double red, green, blue; double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div red green blue 4 -1 roll func setrgbcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCDoCMYKColorPalette(DPSContext ctxt; char *func; + double cyan, magenta, yellow, black; + double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div cyan magenta yellow black 5 -1 roll func setcmykcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCDoHSBColorPalette(DPSContext ctxt; char *func; + double hue, sat, bright; + double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div hue sat bright 4 -1 roll func sethsbcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCDoGrayColorPalette(DPSContext ctxt; char *func; + double gray; double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div gray exch func setgray + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + + +defineps _DPSCDoRGBPalette(DPSContext ctxt; char *func; + double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div func setrgbcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCDoCMYKPalette(DPSContext ctxt; char *func; + double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div func setcmykcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCDoHSBPalette(DPSContext ctxt; char *func; + double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div func sethsbcolor + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCDoGrayPalette(DPSContext ctxt; char *func; + double width, height; + int steps | boolean *success) + mark { + gsave + 0 0 translate + width steps div + 0 1 steps 1 sub { + steps div func setgray + dup 0 0 3 -1 roll height rectfill + dup 0 translate + } for + pop + grestore + } stopped not success cleartomark +endps + +defineps _DPSCQueryRGBColorPalette(DPSContext ctxt; char *func; + double pct, red, green, blue; | + float *redOut, *greenOut, *blueOut; + boolean *success) + mark { + red green blue pct func + } stopped dup not success {0 0 0} if + blueOut greenOut redOut cleartomark +endps + +defineps _DPSCQueryCMYKColorPalette(DPSContext ctxt; char *func; + double pct, cyan, magenta, yellow, black; | + float *cyanOut, *magentaOut, *yellowOut, + *blackOut; boolean *success) + mark { + cyan magenta yellow black pct func + } stopped dup not success {0 0 0 0} if + blackOut yellowOut magentaOut cyanOut cleartomark +endps + +defineps _DPSCQueryHSBColorPalette(DPSContext ctxt; char *func; + double pct, hue, sat, bright; | + float *hueOut, *satOut, *brightOut; + boolean *success) + mark { + hue sat bright pct func + } stopped dup not success {0 0 0} if + brightOut satOut hueOut cleartomark +endps + +defineps _DPSCQueryGrayColorPalette(DPSContext ctxt; char *func; + double pct, gray; | + float *grayOut; boolean *success) + mark { + gray pct func + } stopped dup not success {0} if + grayOut cleartomark +endps + + +defineps _DPSCQueryRGBPalette(DPSContext ctxt; char *func; double pct; | + float *redOut, *greenOut, *blueOut; + boolean *success) + mark { + pct func + } stopped dup not success {0 0 0} if + blueOut greenOut redOut cleartomark +endps + +defineps _DPSCQueryCMYKPalette(DPSContext ctxt; char *func; double pct; | + float *cyanOut, *magentaOut, *yellowOut, + *blackOut; boolean *success) + mark { + pct func + } stopped dup not success {0 0 0 0} if + blackOut yellowOut magentaOut cyanOut cleartomark +endps + +defineps _DPSCQueryHSBPalette(DPSContext ctxt; char *func; double pct; | + float *hueOut, *satOut, *brightOut; + boolean *success) + mark { + pct func + } stopped dup not success {0 0 0} if + brightOut satOut hueOut cleartomark +endps + +defineps _DPSCQueryGrayPalette(DPSContext ctxt; char *func; double pct; | + float *grayOut; boolean *success) + mark { + pct func + } stopped dup not success {0} if + grayOut cleartomark +endps + -- cgit v1.2.3