//--------------------------------------------------------------------------
// Copyright (C) 2004  Andrew Ross
// Copyright (C) 2004  Alan W. Irwin
//
// This file is part of PLplot.
//
// PLplot is free software; you can redistribute it and/or modify
// it under the terms of the GNU Library General Public License as published by
// the Free Software Foundation; version 2 of the License.
//
// PLplot is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU Library General Public License for more details.
//
// You should have received a copy of the GNU Library General Public License
// along with PLplot; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
//--------------------------------------------------------------------------
//
//--------------------------------------------------------------------------
// Implementation of PLplot example 12 in C++.
//--------------------------------------------------------------------------

#include "plc++demos.h"

#ifdef PL_USE_NAMESPACE
using namespace std;
#endif

class x12 {
public:
    x12( int, const char** );
    void plfbox( PLFLT, PLFLT );
private:
    plstream           *pls;

    static const PLFLT y0[];

    static PLFLT       pos[], red[], green[], blue[];
};

const PLFLT x12::y0[10] = { 5., 15., 12., 24., 28., 30., 20., 8., 12., 3. };

PLFLT       x12::      pos[] = { 0.0, 0.25, 0.5, 0.75, 1.0 };
PLFLT       x12::      red[] = { 0.0, 0.25, 0.5, 1.0, 1.0 };
PLFLT       x12::      green[] = { 1.0, 0.5, 0.5, 0.5, 1.0 };
PLFLT       x12::      blue[] = { 1.0, 1.0, 0.5, 0.25, 0.0 };

x12::x12( int argc, const char **argv )
{
    int  i;
    char string[20];

    pls = new plstream();

    // Parse and process command line arguments.

    pls->parseopts( &argc, argv, PL_PARSE_FULL );


    // Initialize plplot.

    pls->init();



    pls->adv( 0 );
    pls->vsta();
    pls->wind( 1980.0, 1990.0, 0.0, 35.0 );
    pls->box( "bc", 1.0, 0, "bcnv", 10.0, 0 );
    pls->col0( 2 );
    pls->lab( "Year", "Widget Sales (millions)", "#frPLplot Example 12" );

    pls->scmap1l( true, 5, pos, red, green, blue, NULL );

    for ( i = 0; i < 10; i++ )
    {
        //pls->col0(i + 1);
        pls->col1( i / 9.0 );
        pls->psty( 0 );
        plfbox( ( 1980. + i ), y0[i] );
        sprintf( string, "%.0f", y0[i] );
        pls->ptex( ( 1980. + i + .5 ), ( y0[i] + 1. ), 1.0, 0.0, .5, string );
        sprintf( string, "%d", 1980 + i );
        pls->mtex( "b", 1.0, ( ( i + 1 ) * .1 - .05 ), 0.5, string );
    }
    //pls->end();
    delete pls;
}

void x12::plfbox( PLFLT x0, PLFLT y0 )
{
    PLFLT *x = new PLFLT[4];
    PLFLT *y = new PLFLT[4];

    x[0] = x0;
    y[0] = 0.;
    x[1] = x0;
    y[1] = y0;
    x[2] = x0 + 1.;
    y[2] = y0;
    x[3] = x0 + 1.;
    y[3] = 0.;
    pls->fill( 4, x, y );
    pls->col0( 1 );
    pls->lsty( 1 );
    pls->line( 4, x, y );

    delete[] x;
    delete[] y;
}



int main( int argc, const char **argv )
{
    x12 *x = new x12( argc, argv );

    delete x;
}


//--------------------------------------------------------------------------
//                              End of x12.cc
//--------------------------------------------------------------------------
