/*****************************************************************************
*                                                                            *
*   ROWSHADER.SPL Copyright (C) 2011 DSP Development Corporation             *
*                               All Rights Reserved                          *
*                                                                            *
*   Author:      Randy Race                                                  *
*                                                                            *
*   Synopsis:    Shades 3D data based on columns                             *
*                                                                            *
*   Revisions:   20 Jan 2011  RRR  Creation                                  *
*                                                                            *
*****************************************************************************/

#include 

#if @HELP_ROWSHADER

    ROWSHADER

    Purpose: Shades 3D data on a column basis.

    Syntax:  ROWSHADER(win)

                    win - A window, the target window to shade.

    Returns: A series, the shading data used to shade the target.

    Example:
             W1: rand(4, 10);bar3d();setpmap(lred, yellow, lgreen, lblue)
             W2: rowshader(w1)

             W1 contains a 4x10 array that is displayed as 3D bars with
             no gaps. W2 contains shading data that shades each column of
             W1. The SETPMAP functions specifies the column colors as
             lred, yellow, lgreen and lblue.

    Remarks:
             ROWSHADER automatically shades the target window with the
             current color palette.

    See Also:
             Colshader
             Mappalette
             Setpmap
             Shadewith
#endif


/* uniformally shade data based on rows */
rowshader(w)
{
        shader(w, 1);
}