Changeset 469 in Sophya for trunk


Ignore:
Timestamp:
Oct 15, 1999, 3:24:20 PM (26 years ago)
Author:
ercodmgr
Message:

add loop to n/plot n/proj cmv 15/10/99

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SophyaPI/PIext/pawexecut.cc

    r466 r469  
    3434
    3535kw = "n/plot";
    36 usage = "Plot NTuple variable a la paw";
    37 usage += "\n n/plot nameobj.x_exp [cut] [w_exp] [gratt]";
    38 usage += "\n n/plot nameobj.y_exp%x_exp [cut] [w_exp] [gratt]";
    39 usage += "\n n/plot nameobj.z_exp%y_exp%x_exp [cut] [gratt]";
     36usage = "Plot NTuple variables a la paw";
     37usage += "\n n/plot nameobj.x_exp [cut] [w_exp] [loop] [gratt]";
     38usage += "\n n/plot nameobj.y_exp%x_exp [cut] [loop] [gratt]";
     39usage += "\n n/plot nameobj.z_exp%y_exp%x_exp [cut] [loop] [gratt]";
     40usage += "\n        for default use ! , loop=i1[:i2[:di]]";
    4041usage += "\n  Related commands: plot2dw plot3d"; 
    4142piac->RegisterCommand(kw,usage,this,hgrp);
     
    4344kw = "n/proj";
    4445usage = "Project NTuple in histogram (1D or 2D) a la paw";
    45 usage += "\n n/proj nameproj nameobj.x_exp [cut] [w_exp] [gratt]";
    46 usage += "\n n/proj nameproj nameobj.y_exp%x_exp [cut] [w_exp] [gratt]";
     46usage += "\n n/proj nameproj nameobj.x_exp [cut] [w_exp] [loop] [gratt]";
     47usage += "\n n/proj nameproj nameobj.y_exp%x_exp [cut] [w_exp] [loop] [gratt]";
     48usage += "\n        for default use ! , loop=i1[:i2[:di]]";
    4749usage += "\n  Related commands: projh1d projh2d projprof"; 
    4850piac->RegisterCommand(kw,usage,this,hgrp);
     
    125127{
    126128if(tokens.size() < 1)
    127   {cout<<"Usage: reset nameobj"<<endl;
    128   return;}
     129  {cout<<"Usage: reset nameobj"<<endl; return;}
    129130NamedObjMgr omg;
    130131AnyDataObj* mobj = omg.GetObj(tokens[0]);
     
    159160if(tokens.size() < 1) {
    160161  cout
    161   <<"Usage: n/plot nameobj.[z_exp%y_exp%]x_exp [cut] [w_exp] [gratt]"<<endl
    162   <<"       n/plot nameobj.z_exp%y_exp%x_exp [cut] [gratt]"<<endl;
     162  <<"Usage: n/plot nameobj.x_exp [cut] [w_exp] [loop] [gratt]"<<endl
     163  <<"       n/plot nameobj.y_exp%x_exp [cut] [loop] [gratt]"<<endl
     164  <<"       n/plot nameobj.z_exp%y_exp%x_exp [cut] [loop] [gratt]"<<endl
     165  <<"              for default use ! , loop=i1[:i2[:di]]"<<endl;
    163166  return;
    164167}
    165168string nameobj,expx,expy,expz;
    166169int nvar = decodepawstring(tokens[0],nameobj,expx,expy,expz);
    167 string expcut = "1";
    168 string expwt = "1.";
    169 string dopt = "";
    170 string loop = "";
    171 if(tokens.size()>=2) expcut = tokens[1];
    172 if(tokens.size()>=3) expwt  = tokens[2];
    173 if(tokens.size()>=4) dopt   = tokens[3];
    174 
     170string expcut = "1"; string expwt = "1."; string loop = ""; string dopt = "";
     171if(tokens.size()>=2) expcut = tokens[1]; if(expcut=="!") expcut="1";
    175172
    176173NamedObjMgr omg;
     
    180177  cout<<"PAWExecutor::n_plot Error: bad coding "<<tokens[0]<<endl;
    181178} else if(nvar==1) { // c'est un plot 1D
     179  if(tokens.size()>=3) expwt = tokens[2]; if(expwt=="!") expwt="1.";
     180  if(tokens.size()>=4) loop  = tokens[3]; if(loop=="!") loop="";
     181  if(tokens.size()>=5) dopt  = tokens[4];
    182182  string nameproj = "/autoc/paw_n_plot1D";
    183183  AnyDataObj* mobj = omg.GetObj(nameproj);
     
    185185  srvo->ProjectH1(nameobj,expx,expwt,expcut,nameproj,dopt,loop);
    186186} else if(nvar==2) { // c'est un plot 2D
    187   srvo->DisplayPoints2DW(nameobj,expx,expy,expwt,expcut,dopt,loop);
     187  if(tokens.size()>=3) loop = tokens[2]; if(loop=="!") loop="";
     188  if(tokens.size()>=4) dopt = tokens[3];
     189  string err = "";
     190  srvo->DisplayPoints2D(nameobj,expx,expy,err,err,expcut,dopt,loop);
    188191} else {             // c'est un plot 3D
     192  if(tokens.size()>=3) loop = tokens[2]; if(loop=="!") loop="";
     193  if(tokens.size()>=4) dopt = tokens[3];
    189194  srvo->DisplayPoints3D(nameobj,expx,expy,expz,expcut,dopt,loop);
    190195}
     
    203208{
    204209if(tokens.size()<2)
    205   {cout<<"Usage: n/proj nameproj nameobj.[y_exp%]x_exp [cut] [w_exp] [gratt]"<<endl;
    206   return;}
     210  {cout<<"Usage: n/proj nameproj nameobj.[y_exp%]x_exp [cut] [w_exp] [loop] [gratt]"<<endl
     211       <<"              for default use ! , loop=i1[:i2[:di]]"<<endl; return;}
    207212string nameproj = tokens[0];
    208213string nameobj,expx,expy,expz;
    209214int nvar = decodepawstring(tokens[1],nameobj,expx,expy,expz);
    210 string expcut = "1";
    211 string expwt = "1.";
    212 string dopt = "";
    213 string loop = "";
    214 if(tokens.size()>=3) expcut = tokens[2];
    215 if(tokens.size()>=4) expwt  = tokens[3];
    216 if(tokens.size()>=5) dopt   = tokens[4];
     215string expcut = "1"; string expwt = "1."; string loop = ""; string dopt = "";
     216if(tokens.size()>=3) expcut = tokens[2]; if(expcut=="!") expcut="1";
     217if(tokens.size()>=4) expwt  = tokens[3]; if(expwt=="!") expwt="1.";
     218if(tokens.size()>=5) loop   = tokens[4]; if(loop=="!") loop="";
     219if(tokens.size()>=6) dopt   = tokens[5];
    217220
    218221NamedObjMgr omg;
Note: See TracChangeset for help on using the changeset viewer.