Load & Plot multiple .txt to Common Graph

Function RamanGraph()

       Variable refNum, k
	String message = "Select one or more files"
	String outputPaths
	String fileFilters = "Delimited Text (*.txt):.txt;"
	fileFilters += "All Files:.*;"

	Open /R/D/F=fileFilters /MULT=1 /M=message refNum 
	outputPaths = S_fileName // Stores the full file names + directories in outputPaths
	Variable/G numberOfImages = ItemsInList(outputPaths, "\r") // Finds the number of images being opened
       
	If(StrLen(outputPaths)==0)
		Print "User Cancelled"
		return -1
	Endif 
	
	String columnInfoStr = " "
	columnInfoStr +="N=Shift;"			
	columnInfoStr +="N=Intensity;"			

	For(k=0;k<NumberOfImages;k+=1)
			String path = StringFromList(k, outputPaths, "\r")
			LoadWave/Q/J/D/A/K=0/E=1/W/O path
			Wave /T imageList // Stores force curve names in ordered list
			Make /O/T/N=(numberOfImages) imageList
		      imageList[k] = path	
                   

     EndFor
End 

Function LoadOneFile(pathName, filePath)
	String pathName		// Name of Igor symbolic path or ""
	String filePath		// File name, partial path relative to symbolic path, or full path
 
	String fileName = ParseFilePath(3, filePath, ":", 0, 0)	// Get file name without extension
 
	String baseShiftName = "Shift"
	String baseIntensityName = "Intensity"
	Variable baseMaxNameLength = max(strlen(baseShiftName),strlen(baseIntensityName))
	Variable maxIgorNameLength = 31
 
	// This is to make sure that your wave names don't wind up being too long for Igor to handle
	Variable clippedFileNameLength = maxIgorNameLength - baseMaxNameLength
	String clippedFileName = fileName[0,clippedFileNameLength-1]
	// Print clippedFileName	// For debugging only
 
	String columnInfoStr = ""
	columnInfoStr += "N='" + baseShiftName + clippedFileName + "';"
	columnInfoStr += "N='" + baseIntensityName + clippedFileName + "';"
	// Print columnInfoStr	// For debugging only
 
	LoadWave/A/G/D/B=columnInfoStr/K=0/P=$pathName filePath		// You may need to tweak this
End
 
Function/S LoadFiles()
	Variable refNum
	String message = "Select one or more files"
	String outputPaths
	String fileFilters = "Data Files (*.txt,*.dat,*.csv):.txt,.dat,.csv;"
	fileFilters += "All Files:.*;"
 
	Open /D /R /MULT=1 /F=fileFilters /M=message refNum
	outputPaths = S_fileName
 
	if (strlen(outputPaths) == 0)
		Print "Cancelled"
	else
		Variable numFilesSelected = ItemsInList(outputPaths, "\r")
		Variable i
		for(i=0; i<numFilesSelected; i+=1)
			String path = StringFromList(i, outputPaths, "\r")
			Printf "%d: %s\r", i, path
			LoadOneFile("", path)
		endfor
	endif
 
	return outputPaths		// Will be empty if user canceled
End