Extract Y Values at the cursor's X location for a bunch of plotted waves.

Function GetAllYValues()
    if(!strlen(CsrInfo(A)))
        return -1 // No cursor on the display.  
    endif
    Variable xx=xcsr(A)
    String traces=TraceNameList("",";",1)
    Variable i,numTraces=ItemsInList(traces)
    Make /o/n=(numTraces) YVals
    Make /o/T/n=(numTraces) TraceNames
    for(i=0;i<numTraces;i+=1)
        String trace=StringFromList(i,traces)
        Wave Wav=TraceNameToWaveRef("",trace)
        YVals[i]=Wav(xx)
        TraceNames[i]=trace
    endfor
    if(WinType("CsrYVals"))
        DoWindow /F CsrYVals
    else
        Edit /K=1 /N=CsrYVals TraceNames,YVals
    endif
End