Ignore:
Timestamp:
May 2, 2017 1:09:17 PM (6 years ago)
Author:
srkline
Message:

changes to streamline the data plotting of 1D data, in preparation for different modes of combining detector panels. Also will allow better integration with protocols to combine 1D data, which can now be part of the protocol.

Other changes, but I can't remember whtat they were...

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/trunk/NCNR_User_Procedures/Reduction/VSANS/V_DataPlotting.ipf

    r1031 r1035  
    4141//  otherwise, assume that a proper value has been passed in, say from the reduction protocol 
    4242// 
    43 Function V_PlotData_Panel(binType) 
    44         Variable binType 
     43Function V_PlotData_Panel() 
     44//      Variable binType 
    4545 
    4646        DoWindow/F V_1D_Data 
     
    6161                PopupMenu popup0,pos={16,5},size={71,20},title="Bin Type" 
    6262                PopupMenu popup0,help={"This popup selects how the y-axis will be linearized based on the chosen data"} 
    63                 PopupMenu popup0,value= "One;Two;Four;Slit Mode;" 
     63                PopupMenu popup0,value= ksBinTypeStr 
    6464                PopupMenu popup0,mode=1,proc=V_BinningModePopup 
    6565                 
     
    9696                 
    9797         
    98         SVAR workType = root:Packages:NIST:VSANS:Globals:gCurDispType 
    99  
    100         if(binType == -9999) 
    101                 binType = V_GetBinningPopMode()         //dummy passed in, replace with value from panel 
    102         endif 
    103         V_QBinAllPanels(workType,binType) 
    104  
    105 // TODO: 
     98//      SVAR workType = root:Packages:NIST:VSANS:Globals:gCurDispType 
     99// 
     100//      if(binType == -9999) 
     101//              binType = V_GetBinningPopMode()         //dummy passed in, replace with value from panel 
     102//      endif 
     103//       
     104//       
     105//      V_QBinAllPanels(workType,binType) 
     106 
     107 
     108         
     109End 
     110 
     111// TODO 
     112// -- winStr is currently hard-wired, but this may not be an issue 
     113Function V_Update1D_Graph(workType,binType) 
     114        String workType 
     115        Variable binType 
     116         
     117        // TODO: 
    106118// x- "B" detector is currently skipped - Q is not yet calculated 
    107119        String str,winStr="V_1D_Data" 
     
    114126 
    115127         
    116 End 
     128        return(0) 
     129end 
    117130 
    118131Function V_Plot1D_LogCheckProc(cba) : CheckBoxControl 
     
    419432         
    420433        ControlInfo/W=V_1D_Data popup0 
    421         strswitch(S_Value)      // string switch 
    422                 case "One": 
    423                         binType = 1 
    424                         break           // exit from switch 
    425                 case "Two": 
    426                         binType = 2 
    427                         break           // exit from switch 
    428                 case "Four": 
    429                         binType = 3 
    430                         break           // exit from switch 
    431                 case "Slit Mode": 
    432                         binType = 4 
    433                         break           // exit from switch 
    434  
    435                 default:                        // optional default expression executed 
    436                         binType = 0 
    437                         Abort "Binning mode not found in V_GetBinningPopMode() "// when no case matches 
    438         endswitch 
     434        binType = V_BinTypeStr2Num(S_Value) 
    439435         
    440436        return(binType) 
     
    486482                        AppendToGraph/W=$winNameStr iBin_qxqy_MT vs qBin_qxqy_MT 
    487483                        AppendToGraph/W=$winNameStr iBin_qxqy_MB vs qBin_qxqy_MB 
     484                        ErrorBars/T=0 iBin_qxqy_ML Y,wave=(:eBin_qxqy_ML,:eBin_qxqy_ML) 
     485                        ErrorBars/T=0 iBin_qxqy_MR Y,wave=(:eBin_qxqy_MR,:eBin_qxqy_MR) 
     486                        ErrorBars/T=0 iBin_qxqy_MT Y,wave=(:eBin_qxqy_MT,:eBin_qxqy_MT) 
     487                        ErrorBars/T=0 iBin_qxqy_MB Y,wave=(:eBin_qxqy_MB,:eBin_qxqy_MB) 
     488                         
    488489                        ModifyGraph/W=$winNameStr mode=4 
    489490                        ModifyGraph/W=$winNameStr marker=19 
     
    520521                        AppendtoGraph/W=$winNameStr iBin_qxqy_MLR vs qBin_qxqy_MLR 
    521522                        AppendToGraph/W=$winNameStr iBin_qxqy_MTB vs qBin_qxqy_MTB 
     523                        ErrorBars/T=0 iBin_qxqy_MLR Y,wave=(:eBin_qxqy_MLR,:eBin_qxqy_MLR) 
     524                        ErrorBars/T=0 iBin_qxqy_MTB Y,wave=(:eBin_qxqy_MTB,:eBin_qxqy_MTB) 
     525                         
    522526                        ModifyGraph/W=$winNameStr mode=4 
    523527                        ModifyGraph/W=$winNameStr marker=19 
     
    556560                if(V_flag==0) 
    557561                        AppendtoGraph/W=$winNameStr iBin_qxqy_MLRTB vs qBin_qxqy_MLRTB 
     562                        ErrorBars/T=0 iBin_qxqy_MLRTB Y,wave=(:eBin_qxqy_MLRTB,:eBin_qxqy_MLRTB) 
     563                         
    558564                        ModifyGraph/W=$winNameStr mode=4 
    559565                        ModifyGraph/W=$winNameStr marker=19 
     
    592598                        AppendToGraph/W=$winNameStr iBin_qxqy_MT vs qBin_qxqy_MT 
    593599                        AppendToGraph/W=$winNameStr iBin_qxqy_MB vs qBin_qxqy_MB 
     600                        ErrorBars/T=0 iBin_qxqy_ML Y,wave=(:eBin_qxqy_ML,:eBin_qxqy_ML) 
     601                        ErrorBars/T=0 iBin_qxqy_MR Y,wave=(:eBin_qxqy_MR,:eBin_qxqy_MR) 
     602                        ErrorBars/T=0 iBin_qxqy_MT Y,wave=(:eBin_qxqy_MT,:eBin_qxqy_MT) 
     603                        ErrorBars/T=0 iBin_qxqy_MB Y,wave=(:eBin_qxqy_MB,:eBin_qxqy_MB) 
     604                         
    594605                        ModifyGraph/W=$winNameStr mode=4 
    595606                        ModifyGraph/W=$winNameStr marker=19 
     
    616627// x- need to set binType 
    617628// x- currently  hard-wired == 1 
    618 // 
     629// x- error bars on the data 
    619630// 
    620631Proc V_Front_IQ_Graph(type,binType,winNameStr)  
     
    657668                        AppendToGraph/W=$winNameStr iBin_qxqy_FT vs qBin_qxqy_FT 
    658669                        AppendToGraph/W=$winNameStr iBin_qxqy_FB vs qBin_qxqy_FB 
     670                        ErrorBars/T=0 iBin_qxqy_FL Y,wave=(:eBin_qxqy_FL,:eBin_qxqy_FL) 
     671                        ErrorBars/T=0 iBin_qxqy_FR Y,wave=(:eBin_qxqy_FR,:eBin_qxqy_FR) 
     672                        ErrorBars/T=0 iBin_qxqy_FT Y,wave=(:eBin_qxqy_FT,:eBin_qxqy_FT) 
     673                        ErrorBars/T=0 iBin_qxqy_FB Y,wave=(:eBin_qxqy_FB,:eBin_qxqy_FB) 
     674 
    659675                        ModifyGraph/W=$winNameStr mode=4 
    660676                        ModifyGraph/W=$winNameStr marker=19 
     
    665681                        ModifyGraph/W=$winNameStr log=1 
    666682                        ModifyGraph/W=$winNameStr mirror=2 
     683                        Label/W=$winNameStr left "Intensity (1/cm)" 
     684                        Label/W=$winNameStr bottom "Q (1/A)" 
    667685                endif            
    668686        endif 
     
    691709                        AppendtoGraph/W=$winNameStr iBin_qxqy_FLR vs qBin_qxqy_FLR 
    692710                        AppendToGraph/W=$winNameStr iBin_qxqy_FTB vs qBin_qxqy_FTB 
     711                        ErrorBars/T=0 iBin_qxqy_FLR Y,wave=(:eBin_qxqy_FLR,:eBin_qxqy_FLR) 
     712                        ErrorBars/T=0 iBin_qxqy_FTB Y,wave=(:eBin_qxqy_FTB,:eBin_qxqy_FTB) 
     713 
    693714                        ModifyGraph/W=$winNameStr mode=4 
    694715                        ModifyGraph/W=$winNameStr marker=19 
     
    699720                        ModifyGraph/W=$winNameStr log=1 
    700721                        ModifyGraph/W=$winNameStr mirror=2 
    701                         Label/W=$winNameStr left "Intensity (1/cm)" 
    702                         Label/W=$winNameStr bottom "Q (1/A)" 
     722//                      Label/W=$winNameStr left "Intensity (1/cm)" 
     723//                      Label/W=$winNameStr bottom "Q (1/A)" 
    703724                endif    
    704725                         
     
    729750                if(V_flag==0) 
    730751                        AppendtoGraph/W=$winNameStr iBin_qxqy_FLRTB vs qBin_qxqy_FLRTB 
     752                        ErrorBars/T=0 iBin_qxqy_FLRTB Y,wave=(:eBin_qxqy_FLRTB,:eBin_qxqy_FLRTB) 
     753 
    731754                        ModifyGraph/W=$winNameStr mode=4 
    732755                        ModifyGraph/W=$winNameStr marker=19 
     
    767790                        AppendToGraph/W=$winNameStr iBin_qxqy_FT vs qBin_qxqy_FT 
    768791                        AppendToGraph/W=$winNameStr iBin_qxqy_FB vs qBin_qxqy_FB 
     792                        ErrorBars/T=0 iBin_qxqy_FL Y,wave=(:eBin_qxqy_FL,:eBin_qxqy_FL) 
     793                        ErrorBars/T=0 iBin_qxqy_FR Y,wave=(:eBin_qxqy_FR,:eBin_qxqy_FR) 
     794                        ErrorBars/T=0 iBin_qxqy_FT Y,wave=(:eBin_qxqy_FT,:eBin_qxqy_FT) 
     795                        ErrorBars/T=0 iBin_qxqy_FB Y,wave=(:eBin_qxqy_FB,:eBin_qxqy_FB) 
     796                         
    769797                        ModifyGraph/W=$winNameStr mode=4 
    770798                        ModifyGraph/W=$winNameStr marker=19 
     
    786814// x- need to set binType 
    787815// x- currently  hard-wired == 1 
    788 // 
     816// x- error bars on the data 
    789817// 
    790818//      type = the data folder 
     
    816844                if(V_flag==0) 
    817845                        AppendtoGraph/W=$winNameStr iBin_qxqy_B vs qBin_qxqy_B 
    818                         ModifyGraph/W=$winNameStr mode=4 
    819                         ModifyGraph/W=$winNameStr marker=19 
     846                        ErrorBars/T=0 iBin_qxqy_B Y,wave=(:eBin_qxqy_B,:eBin_qxqy_B) 
     847                        ModifyGraph/W=$winNameStr mode=4 
     848//                      ModifyGraph/W=$winNameStr marker=19 
    820849                        ModifyGraph/W=$winNameStr rgb(iBin_qxqy_B)=(1,52428,52428) 
    821                         ModifyGraph/W=$winNameStr msize=2 
    822                         ModifyGraph/W=$winNameStr grid=1 
    823                         ModifyGraph/W=$winNameStr log=1 
    824                         ModifyGraph/W=$winNameStr mirror=2 
     850//                      ModifyGraph/W=$winNameStr msize=2 
     851                        ModifyGraph/W=$winNameStr grid=1 
     852                        ModifyGraph/W=$winNameStr log=1 
     853                        ModifyGraph/W=$winNameStr mirror=2 
     854                        ModifyGraph/W=$winNameStr msize(iBin_qxqy_B)=3,textMarker(iBin_qxqy_B)={"B","default",1,0,5,0.00,0.00} 
     855 
    825856                endif 
    826857                 
Note: See TracChangeset for help on using the changeset viewer.