// N.Vischer 25.02.14 11:22
// copies all unlinked results (whose titles have underscore prefix)
// as tab-delimited text with 3 digits precision
// so you can paste them to Excel


macro "Copy Unlinked Results"{
	numDigits = 3;
	clip = "";
	for(row = 0; row <= ojLastRow("*"); row++){
		rowStr = "";
		for (col = 1; col <= ojNColumns(); col++){
			title = ojGetColumnTitle(col);
			if (startsWith(title, "_")){
				if (row == 0 )
					rowStr = rowStr + title + "\t" ;
				else {
					val = NaN;
					if (row <= ojLastRow(title))
						val = ojResult(title, row);
					if (isNaN(val))
						val = "";
					else 
						val = d2s(val, numDigits);
					rowStr = rowStr + val+ "\t" ;
				}	
			}
		}
		clip = clip + rowStr + "\n";
	}
	String.copy(clip); 
}