%
% \iffalse
%
%% pstcol.dtx Copyright (C) 1994--1996 David Carlisle
%%
%% This file is part of the Standard LaTeX `Graphics Bundle'.
%%
%% It should be distributed *unchanged* and together with all other
%% files in the graphics bundle. The file 00readme.txt contains a list
%% of all of these files.
%%
%% A modified version of this file may be distributed, but it should
%% be distributed with a *different* name. Changed files must be
%% distributed *together with a complete and unchanged* distribution
%% of these files.
%%
%<*dtx>
          \ProvidesFile{pstcol.dtx}
%</dtx>
%<package>\NeedsTeXFormat{LaTeX2e}
%<package>\ProvidesPackage{pstcol}
%<driver> \ProvidesFile{pstcol.drv}
% \fi
%         \ProvidesFile{pstcol.dtx}
          [1996/10/28 v1.0  PSTricks color colompatibility (DPC)]
%
% \iffalse
%<*driver>
\documentclass{ltxdoc}
\begin{document}
\DocInput{pstcol.dtx}
\end{document}
%</driver>
% \fi
%
% \CheckSum{65}
% 
% \GetFileInfo{pstcol.dtx}
%
% \changes{v0.1}{1994/10/27}
%     {Initial version}
% \changes{v1.0}{1996/10/28}
%     {Documentation improvements}
%
% \title{\textsf{pstcol} package\thanks{This file
%        has version number \fileversion, last
%        revised \filedate.}}
% \author{David Carlisle}
% \date{\filedate}
%
%
% \maketitle
%
% \begin{abstract}
% Hopefully temporary package modifying PSTricks colour interface to
% work with standard LaTeX colours.
% \end{abstract}
%
% \StopEventually{}
%
%    \begin{macrocode}
%<*package>
%    \end{macrocode}
%
% Require PSTricks
%%%%%%%%%%%%%%%%%%
%    \begin{macrocode}
\let\saved@gray\color@gray
\RequirePackage{pstricks}
\let\color@gray\saved@gray
%    \end{macrocode}
%
% Require Colour
%%%%%%%%%%%%%%%%
%    \begin{macrocode}
\DeclareOption*{\PassOptionsToPackage\CurrentOption{color}}
\ProcessOptions
\RequirePackage{color}
%    \end{macrocode}
%
% Redefine PST access functions in terms of color.sty
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%    \begin{macrocode}
\def\pst@getcolor#1#2{%
\@ifundefined{\string\color@#1}%
{\@pstrickserr{Color `#1' not defined}\@eha}%
 {\edef#2{\expandafter\expandafter\expandafter
         \c@lor@to@ps\csname\string\color @#1\endcsname\@@}}}
%    \end{macrocode}
%
%    \begin{macrocode}
\def\pst@usecolor#1{#1\space}
%    \end{macrocode}
%
% Redefine some predefined colors that are in pst but not in color.sty
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%    \begin{macrocode}
\definecolor{darkgray}{gray}{.25}
\definecolor{gray}{gray}{.5}
\definecolor{lightgray}{gray}{.75}
\definecolor{gradbegin}{rgb}{0,1,1}
\definecolor{gradend}{rgb}{0,.1,.95}
%    \end{macrocode}
%
% Redeclare the default colours with the new definitions.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%    \begin{macrocode}
\psset@bordercolor{white}
\psset@doublecolor{white}
\psset@linecolor{black}
\psset@fillcolor{white}
\psset@hatchcolor{black}
\psset@gridcolor{black}
\psset@gridlabelcolor{black}
\psset@shadowcolor{darkgray}
\psset@subgridcolor{gray}
%    \end{macrocode}
%
%
% Redefine the PST user-definition commands in terms of |\definecolor|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%    \begin{macrocode}
\def\newgray#1{%
  \definecolor{#1}{gray}}
%    \end{macrocode}
%
%    \begin{macrocode}
\def\newrgbcolor#1#2{%
  \newrgbcolorx{#1}#2\@@}
\def\newrgbcolorx#1#2 #3 #4\@@{%
  \definecolor{#1}{rgb}{#2,#3,#4}}
%    \end{macrocode}
%
%    \begin{macrocode}
\def\newcmykcolor#1#2{%
  \newcmykcolorx{#1}#2\@@}
\def\newcmykcolorx#1#2 #3 #4 #5\@@{%
  \definecolor{#1}{cmyk}{#2,#3,#4,#5}}
%    \end{macrocode}
%
%    \begin{macrocode}
%</package>
%    \end{macrocode}
%
% \Finale
%

