#include    "Riostream.h"
#include    "TCanvas.h"
#include    "TGraph.h"
#include    "TObjString.h"
#include    "TString.h"
Double_t *x;
Double_t *y;
void ReadFile(const char *FileName)
{
   Int_t Index = 0; char delimiters[] = " \t\n;";
   ifstream stream(FileName);
   if (!stream.good()) return;
   TString line;
   // assumes empty line at eof!
   while (!line.ReadLine(stream).eof()) { 
      Index++;
      printf("%d=%s\n",Index,line.Data());
      TObjArray* Strings = line.Tokenize(delimiters);
      printf("%i:(%i tokens) =%s\n",Index, Strings->GetEntriesFast(), line.Data());
      if(Strings->GetEntriesFast()) {
         TIter iString(Strings);
         TObjString* os=0;
         Int_t j=0;
         while ((os=(TObjString*)iString())) {
#if 1
            printf("token #%d @%x ='%s'\n",j++, os,  os->GetString().Data());
#else
            printf("token #%d @%x ='%s'\n",j, os,  os->GetString().Data());
            printf("token #%d=\n%i'%s'\n",j,os->GetString().Data(), os->GetString().Data());
            printf("token #%d: length =%d, token ='%s'\n",j++,os->GetString().Length(),os->GetString().Data());
#endif
         }
      }
      delete Strings;
   }
   printf("File ended OK\n");
   printf("ReadFile: %s contains %d lines\n",FileName, Index);
}

void ArrayTest(void)
{
   char *hello = new char(6);
   strcpy(hello,"Hello");
   printf("%s\n",hello);
   for(int k = 0; k<strlen(hello); k++);
   { printf("%c", hello[k]); }
   printf("\n");
   for(int k = 0; k<strlen(hello); k++);
   {   printf("%c", (*hello)[k]); }
   printf("\n");
}

void mydemo()
{
   TCanvas *c1 = new TCanvas("c1","A Simple Graph Example",200,10,700,500);
   ReadFile("Si_1s_3000.dat");
   x = new Double_t[100];
   y = new Double_t[100];
   for(Int_t i=0; i<100; i++)
      {
         x[i] = i;
         y[i] = i*i;
      }
   TGraph *G1 = new TGraph( 100, x, y);
   G1->Draw("AC*");
}