src/GamIO/XWin1D.cc
// ____________________________________________________________________________
// F              XWinNMR 1D Data Set Interactive Functions
// ____________________________________________________________________________
F              XWinNMR 1D Data Set Interactive Functions
F XWinNMR 1D Data Set Interactive Functions
string XWin1D::ask_read(int argc, char* argv[], int& argn, int aidx, int pidx)
  {
  string dirname;				
  query_parameter(argc, argv, argn,             
       "\n\tXWinNMR 1D Directory? ", dirname); 	
  if(aidx<1 || aidx>5000)
    {
    argn++;
    query_parameter(argc, argv, argn,
       "\n\tXWinNMR 1D Experiment SubDirectory Index? ", aidx);
    }
  if(pidx<1 || pidx>5000)
    {
    argn++;
    query_parameter(argc, argv, argn,
       "\n\tXWinNMR 1D Processing SubDirectory Index? ", pidx);
    }
  read(dirname, aidx, pidx);			
  return dirname;				
  }
string XWin1D :: ask_read ( int argc , char * argv [ ] , int & argn , int aidx , int pidx ) { string dirname ; query_parameter ( argc , argv , argn , " \n \t " , dirname ) ; if ( aidx < 1 || aidx > 5000 ) { argn ++ ; query_parameter ( argc , argv , argn , " \n \t " , aidx ) ; } if ( pidx < 1 || pidx > 5000 ) { argn ++ ; query_parameter ( argc , argv , argn , " \n \t " , pidx ) ; } read ( dirname , aidx , pidx ) ; return dirname ; }
____________________________________________________________________________
F              XWinNMR 1D Data Set Interactive Functions
____________________________________________________________________________
____________________________________________________________________________ F XWinNMR 1D Data Set Interactive Functions ____________________________________________________________________________
// Input                XW1D : An XWinNMR 1D data set //                      argc    : Number of arguments //                      argv    : Vector of argc arguments //                      argn    : Argument index //			aidx	: Flag to request experiment # //			           aidx < 1: Ask for it //			           aidx >=1: Use aidx itself def (1) //			pidx	: Flag to request processing # //			           pidx < 1: Ask for it //			           pidx >=1: Use pidx itself def (1) // Output               dirname : The parameter argn of array argc //                                is used to supply a directory name //                                from which the 1d data set resides //                                If the argument argn is not in argv, //                                the user is asked to supply a name //				  and experiment number //                                The directory is returned // Note                         : The directory should contain an //				  XWinNMR 1D data set. // Name of base directory // Get directory from command // Or ask for it // Read data set from filename // Give back the directory