Changeset 1171


Ignore:
Timestamp:
Jun 14, 2019 1:46:39 PM (3 years ago)
Author:
krzywon
Message:

Add 2D NXcanSAS output as SANS reduction option.

Location:
sans/Dev/branches/nxcansas_writer/NCNR_User_Procedures
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/branches/nxcansas_writer/NCNR_User_Procedures/Common/NIST_NXcanSAS_v709.ipf

    r1170 r1171  
    268268         
    269269        // Run Name and title 
    270         NewDataFolder/O/S $(base + parentBase) 
    271         Make/O/T/N=1 $(base + parentBase + ":title") = {textw[6]} 
    272         CreateStrNxCansas(fileID,parentBase,"","title",$(base + parentBase + ":title"),empty,empty) 
    273         Make/O/T/N=1 $(base + parentBase + ":run") = {textw[0]} 
    274         CreateStrNxCansas(fileID,nxcansasBase,"","run",$(base + parentBase + ":run"),empty,empty) 
     270        NewDataFolder/O/S $(parentBase) 
     271        Make/O/T/N=1 $(parentBase + ":title") = {textw[6]} 
     272        CreateStrNxCansas(fileID,nxcansasBase,"","title",$(parentBase + ":title"),empty,empty) 
     273        Make/O/T/N=1 $(parentBase + ":run") = {textw[0]} 
     274        CreateStrNxCansas(fileID,nxcansasBase,"","run",$(parentBase + ":run"),empty,empty) 
    275275         
    276276        // SASData 
    277277        String dataParent = nxcansasBase + "sasdata/" 
    278278        // Create SASdata entry 
    279         String dataBase = base + parentBase + ":sasdata" 
     279        String dataBase = parentBase + ":sasdata" 
    280280        NewDataFolder/O/S $(dataBase) 
    281281        Make/O/T/N=5 $(dataBase + ":attr") = {"canSAS_class","signal","I_axes","NX_class","Q_indices", "timestamp"} 
  • sans/Dev/branches/nxcansas_writer/NCNR_User_Procedures/Reduction/SANS/ProtocolAsPanel.ipf

    r1165 r1171  
    969969        String av_typ,autoSave,AutoName,autoPlot,side 
    970970        Variable phi=0,dphi=10,width=10,Qctr = 0.01,qDelta=10 
    971         Prompt av_typ, "Type of Average",popup,"Circular;Sector;Rectangular;Annular;2D_ASCII;QxQy_ASCII;PNG_Graphic;Sector_PlusMinus;" 
     971        Prompt av_typ, "Type of Average",popup,"Circular;Sector;Rectangular;Annular;2D_NXcanSAS;2D_ASCII;QxQy_ASCII;PNG_Graphic;Sector_PlusMinus;" 
    972972// comment out above line in DEMO_MODIFIED version, and uncomment the line below (to disable PNG save) 
    973973//      Prompt av_typ, "Type of Average",popup,"Circular;Sector;Rectangular;Annular;2D_ASCII;QxQy_ASCII" 
     
    18391839         
    18401840        strswitch(av_type)      //dispatch to the proper routine to average to 1D data 
    1841                 case "none":             
    1842                         //still do nothing 
    1843                         break                    
    1844                 case "2D_ASCII":         
    1845                         //do nothing 
    1846                         break 
    1847                 case "QxQy_ASCII": 
    1848                         //do nothing 
    1849                         break 
    1850                 case "PNG_Graphic": 
    1851                         //do nothing 
    1852                         break 
    18531841                case "Rectangular": 
    18541842                        RectangularAverageTo1D(activeType) 
     
    18661854                        Sector_PlusMinus1D(activeType) 
    18671855                        break 
     1856                case "none":             
     1857                        //do nothing 
     1858                case "2D_ASCII":         
     1859                        //do nothing 
     1860                case "QxQy_ASCII": 
     1861                        //do nothing 
     1862                case "2D_NXcanSAS": 
     1863                        //do nothing 
     1864                case "PNG_Graphic": 
     1865                        //do nothing 
    18681866                default:         
    18691867                        //do nothing 
     
    19091907                if(cmpstr(av_type,"QxQy_ASCII") == 0) 
    19101908                        exten = "DAT" 
     1909                endif 
     1910                if(cmpstr(av_type,"2D_NXcanSAS") == 0) 
     1911                        exten = "h5" 
    19111912                endif 
    19121913                 
     
    19471948                        case "2D_ASCII": 
    19481949                                Fast2DExport(activeType,fullPath,dialog) 
     1950                                break 
     1951                        case "2D_NXcanSAS": 
     1952                                WriteNxCanSAS2D(activeType,fullPath,dialog) 
    19491953                                break 
    19501954                        case "QxQy_ASCII": 
Note: See TracChangeset for help on using the changeset viewer.