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