Ignore:
Timestamp:
Oct 29, 2008 1:36:20 PM (14 years ago)
Author:
srkline
Message:

Added a few more windows to the hide/show lists for the loader

Added a log/lin checkbox for the USANS graph that toggles the x-axis only. The y-axis is always log.

Added a display on the USANS graph that shows Trock/Twide?. It is calculated as UpdateTrans? is clicked. If the value is less than 0.9, the display changes to red.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/trunk/NCNR_User_Procedures/Common/NCNR_Package_Loader.ipf

    r428 r433  
    3939        SVAR gMenuStr1b = root:Packages:NCNRItemStr1b 
    4040         
     41        String SANSAna_WinList = "wrapperPanel;Procedure_List;" 
    4142        strswitch(itemStr)      // string switch 
    4243                case "Load NCNR Analysis Macros":        
     
    8283                        break 
    8384                case "Hide NCNR Analysis Macros":        
    84                         DoWindow wrapperPanel 
    85                         if(V_Flag) 
    86                                 DoWindow/HIDE=1 wrapperPanel 
    87                         endif 
    88                         DoWindow Procedure_List 
    89                         If(V_Flag) 
    90                                 DoWindow/HIDE=1 Procedure_List 
    91                         endif 
     85                        HideShowWindowsInList(SANSAna_WinList,1)         
    9286                 
    9387                        gMenuStr1a = "Show NCNR Analysis Macros" 
     
    9791                         
    9892                        break 
    99                 case "Show NCNR Analysis Macros":        
    100                         DoWindow wrapperPanel 
    101                         if(V_Flag) 
    102                                 DoWindow/HIDE=0 wrapperPanel 
    103                         endif 
    104                         DoWindow Procedure_List 
    105                         If(V_Flag) 
    106                                 DoWindow/HIDE=0 Procedure_List 
    107                         endif 
     93                case "Show NCNR Analysis Macros": 
     94                        HideShowWindowsInList(SANSAna_WinList,0)         
    10895                 
    10996                        gMenuStr1a = "Hide NCNR Analysis Macros" 
     
    134121        SVAR gMenuStr2b = root:Packages:NCNRItemStr2b 
    135122         
     123        String SANSRed_WinList = "Main_Panel;" 
    136124        strswitch(itemStr)      // string switch 
    137125                case "Load NCNR SANS Reduction Macros":  
     
    161149                         
    162150                        break 
    163                 case "Hide NCNR SANS Reduction Macros":  
    164                         DoWindow Main_Panel 
    165                         if(V_Flag) 
    166                                 DoWindow/HIDE=1 Main_Panel 
    167                         endif 
     151                case "Hide NCNR SANS Reduction Macros": 
     152                        HideShowWindowsInList(SANSRed_WinList,1) 
    168153                 
    169154                        gMenuStr2a = "Show NCNR SANS Reduction Macros" 
     
    174159                        break 
    175160                case "Show NCNR SANS Reduction Macros":  
    176                         DoWindow Main_Panel 
    177                         if(V_Flag) 
    178                                 DoWindow/HIDE=0 Main_Panel 
    179                         endif 
     161                        HideShowWindowsInList(SANSRed_WinList,0) 
    180162                 
    181163                        gMenuStr2a = "Hide NCNR SANS Reduction Macros" 
     
    205187        SVAR gMenuStr3b = root:Packages:NCNRItemStr3b 
    206188         
     189        String USANS_WinList = "USANS_Panel;COR_Graph;RawDataWin;Desmear_Graph;" 
     190         
    207191        strswitch(itemStr)      // string switch 
    208192                case "Load NCNR USANS Reduction Macros":         
     
    233217                        break 
    234218                case "Hide NCNR USANS Reduction Macros":         
    235                         DoWindow USANS_Panel 
    236                         if(V_Flag) 
    237                                 DoWindow/HIDE=1 USANS_Panel 
    238                         endif 
     219                        HideShowWindowsInList(USANS_WinList,1)   
    239220                 
    240221                        gMenuStr3a = "Show NCNR USANS Reduction Macros" 
     
    244225                         
    245226                        break 
    246                 case "Show NCNR USANS Reduction Macros":         
    247                         DoWindow USANS_Panel 
    248                         if(V_Flag) 
    249                                 DoWindow/HIDE=0 USANS_Panel 
    250                         endif 
    251                  
     227                case "Show NCNR USANS Reduction Macros": 
     228                        HideShowWindowsInList(USANS_WinList,0)   
     229                         
    252230                        gMenuStr3a = "Hide NCNR USANS Reduction Macros" 
    253231//                      gMenuStr3b = "Unload NCNR USANS Reduction Macros" 
     
    262240end 
    263241 
     242// 1 = hide, 0 = show 
     243Function HideShowWindowsInList(list,hide) 
     244        String list 
     245        Variable hide 
     246         
     247        String item 
     248        Variable ii,num=ItemsinList(list) 
     249        for(ii=0;ii<num;ii+=1) 
     250                item = StringFromList(ii, list , ";") 
     251                DoWindow $item 
     252                if(V_Flag) 
     253                        DoWindow/HIDE=(hide) $item 
     254                endif 
     255        endfor 
     256        return(0) 
     257End 
Note: See TracChangeset for help on using the changeset viewer.