CanvasStock.cxx

Go to the documentation of this file.

#include "CanvasStock.h"

#include "ObjectStock/THStock.h"
#include "../utils/FullName.h"
//#include <TPad.h>

//ClassDef ?? Signal Selected from TCanvas
ClassImp(CanvasStock)

//Constructor for embedded Canvas
CanvasStock::CanvasStock ( const char *name, Int_t ww, Int_t wh, Int_t winid ):
TCanvas( name, ww, wh, winid ), fcommon_xaxis_cs(0)
{
#ifdef DEBUG_CONT_FRAME
  std::cout << " Entry Constructor CanvasStock name " << name << " winid " << winid << std::endl;
#endif

  //Create the instance of CommomXAxis, maybe not good,
  // use 0 by default and will be setup later ( cannot test a wrong axis )
  //or send the size of the object !! 0 better with size apart
  fcommon_xaxis_cs = new CommonXAxis();
#ifdef DEBUG_CONT_FRAME
  std::cout << "just created axis, size " << fcommon_xaxis_cs->GetNbins() << std::endl;
#endif

  // Set the specific painter class of CanvasStock and THStock
  //std::cout << " SetPainter(THistPainterStock) " << std::endl;
  TVirtualHistPainter::SetPainter("THistPainterStock");
}

// constructor for ...
CanvasStock::CanvasStock ( const char *name, const char *title, Int_t ww, Int_t wh ):
TCanvas( name, title, ww, wh ), fcommon_xaxis_cs(0)
{
#ifdef DEBUG_CONT_FRAME
  std::cout << " Entry Constructor Not Embedded CanvasStock name " << name << std::endl;
#endif

  //Create the instance of CommomXAxis, maybe not good,
  fcommon_xaxis_cs = new CommonXAxis();
  //std::cout << "just created axis, size " << fcommon_xaxis_cs->GetNbins() << std::endl;

  // Set the specific painter class of CanvasStock and THStock
  //std::cout << " SetPainter(THistPainterStock) " << std::endl;
  TVirtualHistPainter::SetPainter("THistPainterStock");
}

// Copy Constructor, not used
// use keyword explicit or something to avoid
// missing CommonXAxis copy
/*
CanvasStock::CanvasStock( const CanvasStock & rhs ):
TCanvas( rhs.GetName(), rhs.GetName() ),
vecTHStock ( rhs.vecTHStock )
{
#ifdef DEBUG
 std::cout << "Copy Constructor CanvasStock" << std::endl;
#endif
}
*/

CanvasStock::~CanvasStock()
{
#ifdef DEBUG_CONT_FRAME
  std::cout << "Destructor default CanvasStock" << std::endl;
#endif
  delete fcommon_xaxis_cs;
  fcommon_xaxis_cs = 0;
  // call destructor of all THStock
  std::vector<THStock*>::iterator it;
  for ( it= vecTHStock.begin(); it != vecTHStock.end(); it++ ) {
      delete ( *it );
  }
 vecTHStock.clear();
 //std::cout << "size of vecTHStock " << vecTHStock.size() << std::endl;
}


// may keep, no to delete, moved to controller in a way
// need more than shortname to be sure ( SMA on Volume ) listdata would be better
/*
THStock * CanvasStock::GetTHStock ( UInt_t npad, std::string shortname )
{
  std::cout << "Entry CanvasStock::GetTHStock " << npad << " " << shortname << std::endl;

  //to develop
  //return vecTHStock[ npad-1 ]->GetTHStock( name );
  return 0;
}
*/

// new version, to keep
// oneTHStock by pad, could loop over the pads ??
UInt_t CanvasStock::GetNPadToPaint() const
{
#ifdef DEBUG_CONT_FRAME
  std::cout << "Entry CanvasStock::GetNPadToPaint() vecTHStock size " << vecTHStock.size() << std::endl;
#endif
  UInt_t nbpad_topaint = 0;
  //THStock *ths = 0;

  for ( unsigned int i=0; i < vecTHStock.size(); i++ ) {
      //std::cout << "CanvasStock::GetNPadToPaint() i "<< i << std::endl;
      //ths = vecTHStock[i];
      //if ( ths->GetNTHStockToPaint() > 0 ) {
      if ( vecTHStock[i]->GetNTHStockToPaint() > 0 ) {
          nbpad_topaint++;
          //std::cout << " increment  nbpad_topaint " << nbpad_topaint << std::endl;
      }
  }
#ifdef DEBUG_CONT_FRAME
  std::cout << " CanvasStock::GetNPadToPaint nbpad_topaint " << nbpad_topaint << std::endl;
#endif
  return nbpad_topaint;
}

void CanvasStock::DeleteOneTHStock( Int_t npad )
{
  //delete the thstock
  //std::vector<THStock *>::iterator it_vec;
  it_vthstock it_vec;
  Int_t counter = 0;

  for ( it_vec = vecTHStock.begin(); it_vec != vecTHStock.end(); it_vec++ ) {
      //if ( (*it_vec) == ths ) {
      if ( counter == npad ) {
          std::cout << "will delete thstock " << (*it_vec)->GetName() << std::endl;
          delete ( *it_vec );
          // pointer so object is not destroyed
          vecTHStock.erase ( it_vec );
          return;
      }
      counter++;
  }
  std::cout << "CanvasStock::DeleteOneTHStock nbpad not found" << std::endl;
}

// Copied to CommonXAxis, keep this version for tests
// Update after an UpdateCSV in GUI
// with new version needed ?? to do in CommonXAxis but need intermediate

void CanvasStock::UpdateTHStock()
{
#ifdef DEBUG_CONT_FRAME
    std::cout << "\n\tEntry CanvasStock:UpdateTHStock " << std::endl;
#endif

  // developed for update,
  // check the size of the first ListDataStock first
  int new_size = vecTHStock[0]-> GetFirstListData()->GetSize();
#ifdef DEBUG_CONT_FRAME
  std::cout << "new_size of the first ldata " << new_size << std::endl;
  std::cout << "size of common_axis " << fcommon_xaxis_cs->GetNbins() << std::endl;
#endif

  // here need to resize !
  // need to be done before UpdateObjectStock
  //if new_size != old_size, update CommonAxis and Size ObjectStock

  // test done in UpdateCommon. to choose only one to call
  if ( new_size > fcommon_xaxis_cs->GetNbins() ) {
     //std::cout << "new size is larger " << std::endl;

         // increase size and update the range view if modified
     UpdateCommonAxis( new_size );

     // need to resize the Object in THStock
     for ( unsigned int i = 0; i < vecTHStock.size(); i++ ) {
          vecTHStock[i]->UpdateObjectStock();
     }
  }
  // 3. setup all pad as Modified, needed ?
  // if axis extended, as well
  UpdateAllPad();
  // 4. call Paint, PaintInit & THStock::PaintObjectStock
  Update();

#ifdef DEBUG_CONT_FRAME
  std::cout << "\n\tEnd  CanvasStock::UpdateTHStock() " << std::endl;
#endif

  return;
}

// could slider directly bound to axis by Signal. better ?
void CanvasStock::SetRangeCommonAxis( Double_t MinPos, Double_t MaxPos )
{
#ifdef DEBUG_CONT_FRAME
  std::cout << " Entry CanvasStock::SetRangeCommonAxis MinPosd " << MinPos << " MaxPos " << MaxPos << std::endl;
#endif

  if ( !fcommon_xaxis_cs ) {
        std::cout << " fcommon_xaxis_cs is not found, return " << std::endl;
        return;
  }

 Int_t nbbin = fcommon_xaxis_cs->GetNbins();


 // fXaxis->GetNbins() is not not modified
#ifdef DEBUG_CONT_FRAME
         std::cout << "set integer min " << (Int_t) (MinPos * (  ((Double_t)nbbin) /100. )) <<
                 " max " << (Int_t)(MaxPos * ( ((Double_t)nbbin) /100. )) << std::endl;
#endif
 
 //SetRange expect Int_t, Set the view in modifying fFirst and fLast
 fcommon_xaxis_cs->GetXAxis()->SetRange ( (Int_t) (MinPos * (  ((Double_t)nbbin) /100. )), (Int_t)(MaxPos * ( ((Double_t)nbbin) /100. )) );
 //fcommon_xaxis_cs->GetXAxis()->SetRange ( min, (Int_t)(MaxPos * ( ((Double_t)nbbin) /100. )) );

#ifdef DEBUG_CONT_FRAME
 std::cout << "Now com. Xaxis is correctly setup ??" << std::endl;// yes !!
 std::cout << "fcommom->GetFirst/Last " << fcommon_xaxis_cs->GetXAxis()->GetFirst() << " " <<  fcommon_xaxis_cs->GetXAxis()->GetLast() << std::endl;
#endif
}

// new version need to called again for sure
void CanvasStock::UpdateCommonAxis( int new_size)
{

#ifdef DEBUG_CONT_FRAME
  std::cout << "CanvasStock::UpdateCommonAxis" << std::endl;
  std::cout << "prev size " << fcommon_xaxis_cs->GetNbins() << std::endl;
  std::cout << "new_size " << new_size << std::endl;
  std::cout << "previous last " << fcommon_xaxis_cs->GetLast() << std::endl;
#endif

  // previous range values
  Int_t max = fcommon_xaxis_cs->GetLast();
  Int_t min = fcommon_xaxis_cs->GetFirst();

  int old_size = fcommon_xaxis_cs->GetNbins();

  // test done before in update THStock?? not needed ??
  // increase the size of the axis, default range always 0 to 1
  if ( old_size != new_size ) {
    //std::cout << "size Has Changed set new size " << new_size << std::endl;
    fcommon_xaxis_cs->GetXAxis()->Set( new_size, (Double_t)0.0, (Double_t)1.0 );

    // previous slider was at the maximum, need to reset fLast with SetRange
    if ( max == old_size )
        fcommon_xaxis_cs->GetXAxis()->SetRange ( min, new_size );
    // not needed if not changed
    //else
    //  fcommon_xaxis_cs->GetXAxis()->SetRange ( min, max );
  }
  return;
}


void CanvasStock::ShowListData ( std::string fullname, Int_t npad )
{
#ifdef DEBUG_CONT_FRAME
    std::cout << "CanvasStock::ShowListData" << fullname << std::endl;
#endif
  THStock *ths = 0;
  bool toRecreate = false;
  //std::cout << " Entry ShowListData " << p_listdata->GetName() << " " << npad << std::endl;

  ths = vecTHStock[ npad - 1 ];
  //std::cout << " ths " << ths << std::endl;

  // if 0, need to recreate the pad
  if ( ths->GetNTHStockToPaint() == 0 ) {
      toRecreate = true;
  }

  ths->ShowNameListData( fullname );

  if ( toRecreate ) {
      std::cout << "GetNTHStockToPaint nb_topaint == 0 recreate pad" << std::endl;
      CreateNPad();
  } else {
      GetPad( npad )->Modified();
  }
}

void CanvasStock::HideListData ( std::string fullname, Int_t npad, bool toDelete )
{
#ifdef DEBUG_CONT_FRAME
  //std::cout << " Entry CanvasStock::HideListData " << p_listdata->GetName() << " " << npad << " bAll " << bAll << " toDelete " << toDelete << std::endl;
  //std::cout << " Entry CanvasStock::HideListData " << p_listdata->GetFullName() << std::endl;
  std::cout << " Entry CanvasStock::HideListData  " << fullname << " npad " << npad << " toDelete " << toDelete << std::endl;
#endif
  THStock *ths = 0;
  // need to be sure here
  ths = vecTHStock[ npad - 1 ];

  // delete done in THStock
  ths->HideNameListData( fullname, toDelete );

  //if hide Volume need to delete the pad but keep the canvas
  // could make the same with first...
  UInt_t nb_topaint = ths->GetNTHStockToPaint();
#ifdef DEBUG_CONT_FRAME
  std::cout << " nb_topaint " << nb_topaint << std::endl;
#endif

  //if ( ( nb_topaint == 0 ) || toDelete  ) {
  if ( nb_topaint == 0) {
#ifdef DEBUG_CONT_FRAME
      std::cout << "nb_topaint == 0 or to delete " << std::endl;
#endif

      // force deleting all, delete the THStock and all data
      if ( toDelete ) {
          //delete the thstock
          DeleteOneTHStock ( npad - 1 );
      }
      //both case need to recreate the pad, because geometric changes
#ifdef DEBUG_CONT_FRAME
      // more a work from the controller, but more convenient here ??
      std::cout << "Need to recreate the pad " << std::endl;
#endif
      CreateNPad();
  }

  else {
      //works
#ifdef DEBUG_CONT_FRAME
      std::cout << "nothing to delete and nb_topaint > 0, just call pad->Modified() " << std::endl;
#endif
      GetPad( npad )->Modified();
  }

}

Int_t CanvasStock::AddListDataStockToMap( ListDataStockBase *p_listdata, Int_t forcepad )
{
#ifdef DEBUG_CONT_FRAME
    std::cout << "\n\tCanvasStock::AddListDataStockToMap" << std::endl;
#endif
  std::string name_listdata = p_listdata->GetName();
  // tricky to deal if it is the first pad for the common axis
  bool first_pad = false;
  bool create_ths = false;

#ifdef DEBUG_CONT_FRAME
  std::cout << "name list_data " << name_listdata << std::endl;
  std::cout << "name canvas stock " << GetName() << std::endl; //name CanvasStock CStock_CAC40_DAY
#endif

  // default set up nb_pad to original for incrementing
  // get the number of pad in the canvas stock, before adding, for first ( no THStock) it is 0
  Int_t nb_pad = vecTHStock.size();
#ifdef DEBUG_CONT_FRAME
  std::cout << "original GetNbPad() nb_pad " << nb_pad << std::endl;
#endif

  // will extract namestock and indicator from canvas stock name
  std::vector <std::string> split_string;
  std::string title_canvas;

  THStock *ths = 0;

  // better use shortname namespace
  // framename to use
  // to check if still needed, now with controller nb_pad = 0 may not be anymore
  // if it is the first pad, set up first pad
  if ( nb_pad == 0 ) {
      Utils::splitline ( GetName(), "_", split_string );
      // delete the "CStock_" then namestock, timescale
      title_canvas = split_string[1] + " " + split_string[2];
#ifdef DEBUG_CONT_FRAME
      std::cout << " nb_pad==0 title_canvas " << title_canvas << std::endl;
#endif
      // first_pad is true in this case, will use this axis as common axis
      first_pad = true;
      create_ths = true;
  }
  // if SMA compute title even if not needed, maybe title to do after
  // SMA studpid ?? no title ?? not used !! for Volume ok...
  // can use ShortName now
  else {
      Utils::splitline ( name_listdata, "_", split_string );
      // cut the name of the indicator, or of the StockCSV... need better
      title_canvas = split_string[0];
      if ( title_canvas.size() > 4 ) {

          title_canvas.erase( 4, title_canvas.size()-4 );
          title_canvas.replace( 3, 1, "." );
#ifdef DEBUG_CONT_FRAME
          std::cout << " size " << title_canvas.size() << std::endl;
          std::cout << " nb_pad >= 1, title_canvas " << title_canvas << std::endl;
#endif
      }
  }
      
  // default force pad 0, no need 0 not a canvas
  // used only for SHOW at the moment 
  if ( forcepad !=0 ) {
#ifdef DEBUG_CONT_FRAME
      std::cout << "forcepad to pad " << forcepad << std::endl;
#endif
      nb_pad = forcepad;
  }
  // default, send by Validation
  // else decide which nb_pad to add
  else {
      // get the selected pad
      // really need better
      std::string indic_str = ShortName::GetIndicator ( p_listdata->GetName() ).label();
      //std::cout << "Indicator string " << indic_str << std::endl;

      //here test is working, should copy to Stock.cpp ComputeTA
      if ( (indic_str.compare(1,2,"MA",0,2)==0) || ( indic_str.compare("BOLL")==0) ) {
#ifdef DEBUG_CONT_FRAME
          std::cout << "Will add *MA/BOLL to selected pad" << std::endl;
#endif
          // why in fact
          SetSelectedPad( ( (TPad*) gPad ) ) ;
          //std::cout << " After SetSelectedPad " << std::endl;
          // set the pad to draw 
          nb_pad = gPad->GetSelectedPad()->GetNumber();
#ifdef DEBUG_CONT_FRAME
          std::cout << " gPad name " << gPad->GetName() << std::endl;
          std::cout << " selcted name " << gPad->GetSelectedPad()->GetName() << std::endl;
          std::cout << " gPad number " << gPad->GetNumber() << std::endl;
          std::cout << " selected number " << gPad->GetSelectedPad()->GetNumber() << std::endl;
#endif
      }
      
      // will create a new Pad in Canvas, by default add one to map
      else {
          // here increment nb_pad, never draw in pad 0, first is always the first subpad one
          nb_pad += 1;
#ifdef DEBUG_CONT_FRAME
          std::cout << "nbpad default New nb_pad " << nb_pad << std::endl;
#endif
          // here need to create a new THSock
          create_ths = true;
      }
  }

  // whatever before, create a new THstock, why to force ListDataStock ??? to test !!!
  //std::cout << "Will create a new  THStock " << std::endl;
  // to be replaced, Add ( ObjectStock,..option); depending first or not
  //ths = new THStock( name_listdata.c_str(), title_canvas.c_str(), (ListDataStock<DataCSV> *)p_listdata );
  //
  if ( create_ths ) {
#ifdef DEBUG_CONT_FRAME
      std::cout << "Will create a new THStock " << std::endl;
      std::cout << "fcommon_xaxis_cs " << fcommon_xaxis_cs << std::endl;
      std::cout << "name THStock " << name_listdata << std::endl;
#endif
      // add all in once, need to set up the commmon_xaxis

      // problem with name, only StockCSV or Volume
      //std::string name_thstock = "THStock" + nb_pad + name_listdata +
      // can use full name, really strange output !! delete some letters !
      //std::string name_thstock = "THStock" + nb_pad + p_listdata->GetFullName();
      //std::cout << "new name_thstock " << name_thstock << std::endl;

      // here create empty object, but need the size for Axis, which may become common
      ths = new THStock( name_listdata.c_str(), title_canvas.c_str(), p_listdata->GetSize() );
      //ths = new THStock( name_thstock.c_str(), title_canvas.c_str(), p_listdata->GetSize() );
      //std::cout << "THStock created " << std::endl;
      if ( nb_pad > 1 ) {
#ifdef DEBUG_CONT_FRAME
          std::cout << "\nnot the first pad, set commonaxis right now!\n " << std::endl;
#endif
          ths->SetCommonXAxis( fcommon_xaxis_cs );
      }
      // not clear what i mean here
      //else { //may here set up the common_xaxis
      //    std::cout << "Achtung some indicator may work or not "<< std::endl;
      //}
      //once ceated, can add object and will be created
      ths->Add ( p_listdata );
      
      // bug CommonAxis, not needed before ?? but why , should be set up at a point !!
      // to do in THStock creation
      // should be done in CanvasStock when created, maybe later and does not exist yet ...
      ths->GetXaxis()->Set ( p_listdata->GetSize(), (Double_t)0.0, (Double_t)1.0 );

#ifdef DEBUG_CONT_FRAME
      std::cout << "p_lisdata size " << p_listdata->GetSize() << std::endl;
      std::cout << "ths get axis size " << ths->GetXaxis()->GetNbins() << std::endl;
#endif
      //
      //already done before maybe a trick somewhere..., yes trick problem with STOCHF which has ObjectLine
      //ths = new THStock ( name_listdata.c_str(), title_canvas.c_str(), p_listdata );

      vecTHStock.push_back( ths );
      
      if ( first_pad ) {
          ths->SetSizeTitle ( 0. );
          ths->GetYaxis()->SetLabelSize(0.05);
          ths->GetXaxis()->SetLabelSize(0.06);
          //std::cout << " first pad axis of canvas " << fcommon_xaxis_cs << " size " << fcommon_xaxis_cs->GetNbins() << std::endl;
          //std::cout << " first pad axis of ths " << ths->GetXaxis() << " size " << ths->GetXaxis()->GetNbins() << std::endl;
          fcommon_xaxis_cs->SetCommonXAxis( ths->GetXaxis() );
          //std::cout << "first_pad, get common_axis from ths " << ths->GetXaxis() << " size " << ths->GetXaxis()->GetNbins() << std::endl;
          //std::cout << "first_pad, new common_axis of canvas " << fcommon_xaxis_cs << " fcom->GetXasis() " << fcommon_xaxis_cs->GetXAxis() << " size " << fcommon_xaxis_cs->GetNbins() << std::endl;
          //std::cout << "first_pad, get common_axis from ths " << ths->GetXaxis() << std::endl;
      }
      else {
#ifdef DEBUG_CONT_FRAME
          std::cout << "not a new first pad " << std::endl;
#endif
          ths->SetSizeTitle ( 0.1 );
          ths->GetYaxis()->SetLabelSize ( 0.12 );
          //before deleted, make it again
          //fcommon_xaxis_cs->SetCommonXAxis( ths->GetXaxis() );
      }
  }

  else {
#ifdef DEBUG_CONT_FRAME
      std::cout << "Add to existing THStock" << std::endl;
#endif
      //see later do not want to modify nb_pad
      int nb_pad2 = gPad->GetSelectedPad()->GetNumber();
#ifdef DEBUG_CONT_FRAME
      std::cout << "Add nb_pad2 " << nb_pad2 << std::endl;
#endif
      ths = vecTHStock [ nb_pad2-1 ];
#ifdef DEBUG_CONT_FRAME
      std::cout << "ths GetName() " << ths->GetName() << std::endl;
#endif
      ths->Add ( p_listdata );
  }

  // if new or old should set the CommonAxis of THStock, in all case need to point of the new CommonXaxis
  // cannot keep the original axis as reference, but always refer to CommonAxis
  //std::cout << "fcommon_xaxis_cs " << fcommon_xaxis_cs << std::endl;
  if ( ths ) {
      //set axis of ths to the commonaxis
#ifdef DEBUG_CONT_FRAME
      std::cout << "SetAxis of ths " << std::endl;
#endif
      ths->SetCommonXAxis( fcommon_xaxis_cs );
  } else {
#ifdef DEBUG_CONT_FRAME
      std::cout << "ths false, no axis to assign " << std::endl;
#endif
  }
  // anyway, call CreateNPad, certainly not the best..for sure now
  //no need if add SMA
  CreateNPad();
#ifdef DEBUG_CONT_FRAME
  std::cout << "Return CreateNPad and CanvasStock::AddListDataStokpMap nb_pad " << nb_pad << std::endl;
#endif
  return nb_pad;
}
// similar function has been implemented in ControllerIndicTHStock, certainly a better one
// here it is a work done done by a view
/*
unsigned int CanvasStock::GetPadNumber( std::string fullname)
{
    unsigned int nb_pad = 0;
    //nb_pad = FindPadNb( fullname );
    std::string shortname = FullName::GetShortName( fullname );
    ListDataStockBase *ldata;

#ifdef DEBUG_CONT_FRAME
    std::cout << "shortname " << shortname << std::endl;
    std::cout << "frame_name " << FullName::GetFrameName( fullname ) << std::endl;
#endif

    for ( it_vthstock it = vecTHStock.begin(); it != vecTHStock.end(); it++ ) {
        nb_pad += 1;
        std::cout << "Name of THStock " << (*it)->GetName() << std::endl;
        ldata = (*it)->GetListDataStock( shortname );
        // even do not check name, but only if return value is not zero !
        // controller version is much better
        if ( !ldata ) {
            //if ( ldata->GetName() == shortname ) {
            std::cout << "Found it" << std::endl;
            //}
        }
        //nb_pad += 1;
    }
    return nb_pad;
}
*/

// new version
void CanvasStock::CreateNPad() {
#ifdef DEBUG_CONT_FRAME
    std::cout << "Entry CanvasStock::CreateNPad" << std::endl;
    std::cout << " name " << gPad->GetName() << std::endl;
    std::cout << " classname " << gPad->ClassName() << std::endl;
    std::cout << " nbpad " << vecTHStock.size() << std::endl;
    std::cout << " nb_padtopaint " << GetNPadToPaint() << std::endl;
#endif

  TPadStock *pad;

  Int_t nchname  = strlen(GetName())+6;
  char *name  = new char [nchname];

  UInt_t nbpad = vecTHStock.size();
  UInt_t nb_padtopaint = GetNPadToPaint();
  

  Double_t x1,y1,x2,y2;
  Double_t dy=0;
  Double_t rest=0;
  Double_t margin = 0.001;
  x1 = margin;
  x2 = 1 - margin;
  y1 = 0; y2 = 0;

  //std::cout << " nbpad " << nbpad << std::endl;
  nb_padtopaint = GetNPadToPaint();
#ifdef DEBUG_CONT_FRAME
  std::cout << " nbpad (vecTHStock.size()) " << nbpad << std::endl;
  std::cout << " nb_padtopaint " << nb_padtopaint << std::endl;
  PrintVector();
#endif

  THStock * ths = 0;
  // updated only if drawn
  UInt_t count = 0;

  //Clear everything and redraw
  //needed if add or remove a pad
  //Is THStock deleted ?? seems not...almost sure
  // All pad correclty deleted ?
  Clear();
 
  //std::cout << "CreateNPad " << nb_pad << std::endl;
  // loop over the subpad
  // only if they must be printed
  for ( UInt_t i = 1; i <= nbpad; i++ ) {

      ths = vecTHStock [ i-1 ];

      //nb_topaint = ths->GetNTHStockToPaint();
      //std::cout << "nb_topaint " << nb_topaint << std::endl;
      if ( ths->GetNTHStockToPaint () == 0 ) {
#ifdef DEBUG_CONT_FRAME
          std::cout << " GetNTHStockToPaint == 0, continue " << std::endl;
#endif
          continue;
      }
      //std::cout << "normal " << std::endl;
      count++;

      // if nbpad=1, StockCSV 100%
      //if ( (i==1) && (nb_padtopaint == 1) ) {
      if ( (count==1) && (nb_padtopaint == 1) ) {
          y2 = 1. - margin;
          y1 = margin;
          rest=0.;
          dy = 0.;
      }
      // if nbpad=2, StockCSV 75%
      //if ( (i==1) && (nbpad==2) ) {
      //need else ??
      //else if ( (i==1) && (nb_padtopaint==2) ) {
      else if ( (count==1) && (nb_padtopaint==2) ) {
      //else if ( (i==1) && (nbpad==2) ) {
          y2 = 1. - margin;
          y1 = 0.25 + margin;
          rest=0.25;
          dy = 0.25;
      }
      //if nbpad=3, StockCSV 60%
      //else if ( (i==1) && (nbpad==3) ) {
      //else if ( (i==1) && (nb_padtopaint==3) ) {
      else if ( (count==1) && (nb_padtopaint==3) ) {
          y2 = 1. - margin;
          y1 = 0.40 + margin;
          rest=0.40;
          dy = rest / 2.;
      }
      //else keep 50 %
      //else if ( (i==1) && (nbpad>3))  {
      //else if ( (i==1) && (nb_padtopaint >3))  {
      else if ( (count==1) && (nb_padtopaint >3))  {
          y2 = 1. - margin;
          y1 = 0.50 + margin;
          rest = 0.50;
          // may be changed, try
          //dy =  rest / (nbpad-1);
          dy = rest / ( nb_padtopaint - 1 );
      }
      // other than 0 and more than 3
      // could be else
      //else if ( i > 1 ) {
      else if ( count > 1 ) {
          //y2 = rest - (i-2)*dy - margin;
          y2 = rest - (count-2)*dy - margin;
          y1 = y2 - dy + 2*margin;
      }
  
      //Always placed at origin before creating a pad
      this ->cd( 0 );
      //std::cout << "cd(0) gPad " << gPad << std::endl;

      //create name for pad, will need to extend if more than 1 CanvasStock
      //snprintf(name,nchname,"%s_%d",GetName(),i);
      snprintf(name,nchname,"%s_%d",GetName(),count);
      //std::cout << "Will create new pad with name " << name << std::endl;
      //std::cout << "x1,y1 " << x1 << " " << y1 << std::endl;
      pad = new TPadStock( name, name, x1, y1, x2, y2, -1);

      // necessary ??
      //pad->SetNumber(i);
      pad->SetNumber(count);
      //ok, apply for all pads, could be done in a Style
      pad->SetRightMargin(0.02);
      // Draw, do not paint, necessary
      pad->Draw();
      //this->cd(i);
      this->cd(count);
      //std::cout << "cd(i) gPad " << i << " " << gPad << std::endl;
  
      //std::cout << "loop " << i << std::endl;
      //std::cout << " NbTHStock " << GetNbTHStock(i+1) << std::endl;
    
      // setup style for a THSTock, can be in Style
      // done when created
      //ths = vecTHStock [ i-1 ];
      //std::cout << " Get ths " << ths << std::endl;
      //std::cout << " Before Draw " << std::endl;
      ths->Draw();

  }//end loop for nbpad

  //reset gpad to main, seem more flexible, ...but lose gPad to a Pad...
  //cd(0);
  cd(1);

#ifdef DEBUG_CONT_FRAME
  std::cout << "Exit CanvasStock::CreateNPad() count " << count << std::endl;
#endif
  return;
}

// npad stored in controller
void CanvasStock::SetColor ( UInt_t npad, std::string fullname, unsigned long color )
{
#ifdef DEBUG_CONT_FRAME
        std::cout << "npad " << npad << std::endl;
        std::cout << "fullname " << fullname << std::endl;
        std::cout << "color " << color << std::endl;
        std::cout << "(Pixel_t)color " << (Pixel_t)color << std::endl;
#endif

  THStock *ths = 0;

  ths = vecTHStock[ npad - 1 ];
  //std::cout << " ths " << ths << " will call THStock::SetColor " << std::endl;
  //ths->SetColor ( listdata, (Pixel_t)color );
  ths->SetColor ( fullname, (Pixel_t)color );

  // important for direct update
  GetPad( npad )->Modified();
}

// Should update all Stock, belong to class TPad and the common axis
// Possible Stock change(last candle) but not the Common_axis
// used ?? not !! but idea of fPrimitvies not bad
// used yes keep output, necessary ?? to check
//  to change to ModifiedAllPad
void CanvasStock::UpdateAllPad()
{
#ifdef DEBUG_CONT_FRAME
  std::cout << " CanvasStock::UpdateAllPad(), marked as modified only, but do not update anything" << std::endl;
#endif

 TObject *obj;
 if (!fPrimitives) return ;
 //std::cout << "fPrimitives is not empty " << std::endl;

  //try second method, ok compile and work
  TObjOptLink *lnk = 0;
  lnk = (TObjOptLink*)fPrimitives->FirstLink();
  while (lnk) {
     obj = lnk->GetObject();
     //if (obj->InheritsFrom(TPad::Class()))
     //
     //std::cout << "name modified " << ((TPad*)obj)->GetName() << std::endl;
     //modified only is enough, will be redraw after
     ((TPad*)obj)->Modified();
     //try after, works here even if not redraw
     // not needed if CanvasStock::Update is called just after
     //((TPad*)obj)->Update();
     lnk = (TObjOptLink*)lnk->Next();
  }
/*
#ifdef DEBUG_CONT_FRAME
  std::cout << " Exit CanvasStock::UpdateAllPad " << std::endl;
#endif
*/
}

// look at TPad::ExcetueEvent ( overriden by TPadStock )
//   and TCanvas::ExecuteEvent, do only a few
/* do nothing to delete
void CanvasStock::ExecuteEvent(Int_t, Int_t, Int_t ) //event, px, py
{
  std::cout << " Entry  CanvasStock::ExecuteEvent,do nothing " << std::endl;
}
*/

// Print info on vector THStock
void CanvasStock::PrintVector()
{
  std::cout << "===================\nShowMap CanvasStock" << std::endl;
  std::cout << "Size " << vecTHStock.size() << std::endl;

  for ( UInt_t nb_th = 0; nb_th < vecTHStock.size(); nb_th++ ) {
      std::cout << "Name " << vecTHStock[nb_th]->GetName() << std::endl;
  }
  return;
}