#pragma TextEncoding = "UTF-8"
#pragma rtGlobals=3				// Use modern global access method and strict wave access
#pragma DefaultTab={3,20,4}		// Set default tab width in Igor Pro 9 and later


//Commands to execute:
//Make_Graph(3)
//Trim_Traces({20, NaN, NaN, NaN})

//Makes the graph with N duplicates of a trace.  Run this first.  
FUNCTION Make_Graph(VARIABLE vNum_Duplicate_Traces)

	Make/O/D/N=100 Dummy_X=p, Dummy_Y=p^2, Dummy_Y_2=p^2+500
	
	Display/N=Dummy_Graph/K=1 Dummy_Y vs Dummy_X as "Dummy_Graph"
	
	Variable iTraceDex
	FOR(iTraceDex=0;iTraceDex<vNum_Duplicate_Traces;iTraceDex+=1)
		AppendToGraph/W=Dummy_Graph Dummy_Y vs Dummy_X
	ENDFOR
	
	AppendToGraph/W=Dummy_Graph Dummy_Y_2 vs Dummy_X
	
	Legend
	
END


//Truncates the traces
FUNCTION Trim_Traces(WAVE/Z End_Pnts)

	WAVE/Z Dummy_Y=root:Dummy_Y
	WAVE/Z Dummy_X=root:Dummy_X

	Variable iTraceDex
	FOR(iTraceDex=0;iTraceDex<numpnts(End_Pnts);iTraceDex+=1)
		Variable vEnd_Pnt=limit(End_Pnts[iTraceDex], 0, numpnts(Dummy_Y)-1)
		String strTrace_Name= "Dummy_Y"+SelectString(iTraceDex!=0, "", "#"+num2str(iTraceDex))
		
		IF(strlen(TraceInfo("Dummy_Graph",strTrace_Name, 0))!=0 && numtype(vEnd_Pnt)==0)
			ReplaceWave trace=$strTrace_Name, Dummy_Y[0,vEnd_Pnt]
			ReplaceWave/X trace=$strTrace_Name, Dummy_X[0,vEnd_Pnt]
			DoUpdate/W=Dummy_Graph
		ENDIF
	
	ENDFOR

END