//---------------------------------------------------------------------------//
// $Id: x02.cc,v 1.12 2006/05/27 21:50:26 hbabcock Exp $
//---------------------------------------------------------------------------//
//
//---------------------------------------------------------------------------//
// Copyright (C) 2004,2005  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 2 in C++.
//---------------------------------------------------------------------------//

#include "plc++demos.h"

#ifdef USE_NAMESPACE
using namespace std;
#endif

class x02 {

public:
  x02(int, char **);

private:
  void demo1();
  void demo2();
  void draw_windows(int nw, int cmap0_offset);

  // Class data
  plstream *pls;
  


};

// -------------------------------------------------------------------------
// demo1
//
// Demonstrates multiple windows and default color map 0 palette.
// -------------------------------------------------------------------------
void
x02::demo1() {

  pls->bop();

  // Divide screen into 16 regions.
  pls->ssub(4, 4);

  draw_windows(16,0);

  pls->eop();

}

// -------------------------------------------------------------------------
// demo1
//
// Demonstrates multiple windows and default color map 0 palette.
// -------------------------------------------------------------------------
void
x02::demo2() {

  // Set up cmap0
  // Use 100 custom colors in addition to base 16
  PLINT r[116], g[116], b[116];

  // Min and max lightness values
  PLFLT lmin = 0.15, lmax = 0.85;

  int i;

  pls->bop();

  // Divide screen into 100 regions.
  pls->ssub(10,10);

  for (i = 0; i <= 99; i++) {
    PLFLT h, l, s;
    PLFLT r1, g1, b1;
    
    // Bounds on HLS, from plhlsrgb() commentary --
    //	hue		[0., 360.]	degrees
    //	lightness	[0., 1.]	magnitude
    //	saturation	[0., 1.]	magnitude
    //
    
    // Vary hue uniformly from left to right
    h = (360. / 10. ) * ( i % 10 );
    // Vary lightness uniformly from top to bottom, between min & max
    l = lmin + (lmax - lmin) * (i / 10) / 9.;
    // Use max saturation
    s = 1.0;
    
    pls->hlsrgb(h, l, s, &r1, &g1, &b1);
    
    r[i+16] = (PLINT)(r1 * 255);
    g[i+16] = (PLINT)(g1 * 255);
    b[i+16] = (PLINT)(b1 * 255);
  }
  
  // Load default cmap0 colors into our custom set
  for (i = 0; i <= 15; i++)
    pls->gcol0(i, r[i], g[i], b[i]);

  // Now set cmap0 all at once (faster, since fewer driver calls)
  pls->scmap0(r, g, b, 116);
  
  draw_windows( 100, 16 );
  
  pls->eop();

}

// -------------------------------------------------------------------------
// draw_windows
//
// Draws a set of numbered boxes with colors according to cmap0 entry.
// -------------------------------------------------------------------------
void
x02::draw_windows(int nw, int cmap0_offset) {
  int i, j;
  PLFLT vmin, vmax;
  char text[3];

  pls->schr(0.0, 3.5);
  pls->font(4);

  for (i = 0; i < nw; i++) {
    pls->col0(i+cmap0_offset);

    sprintf(text, "%d", i);

    pls->adv(0);
    vmin = 0.1;
    vmax = 0.9;
    for (j = 0; j <= 2; j++) {
      pls->wid(j + 1);
      pls->vpor(vmin, vmax, vmin, vmax);
      pls->wind(0.0, 1.0, 0.0, 1.0);
      pls->box("bc", 0.0, 0, "bc", 0.0, 0);
      vmin = vmin + 0.1;
      vmax = vmax - 0.1;
    }
    pls->wid(1);
    pls->ptex(0.5, 0.5, 1.0, 0.0, 0.5, text);
  }
}

x02::x02( int argc, char ** argv ) {

  // plplot initialization

  pls = new plstream();


  // Parse and process command line arguments.
  pls->parseopts( &argc, argv, PL_PARSE_FULL );

  // Initialize PLplot.
  pls->init();

  demo1();
  demo2();

  //pls->end();
  delete pls;

}

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

  delete x;
}


//---------------------------------------------------------------------------//
//                              End of x02.cc
//---------------------------------------------------------------------------//