Ignore:
Timestamp:
Apr 22, 2016 5:02:30 PM (7 years ago)
Author:
srkline
Message:

lots of changes to plotting of q-values, generating fake data with non-linear corrections, masking of data, etc.

File:
1 edited

Legend:

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

    r992 r993  
    5454        FakeTabClick(1) 
    5555        FakeTabClick(0) 
     56         
     57        // either clear the status, or fake a click 
     58//      root:Packages:NIST:VSANS:Globals:gStatusText = "status info box" 
     59 
     60        FakeStatusButtonClick() 
     61 
     62         
    5663//      DoWindow/T VSANS_Data,type + " VSANS_Data" 
    5764 
     
    7986        String/G gCurTitle = "" 
    8087        String/G gCurDispType = "" 
     88        String/G gStatusText = "status info box" 
    8189         
    8290        SetDataFolder root: 
     
    129137 
    130138        TitleBox title_file,pos={606,178},size={76,20},variable= file_name 
    131         TitleBox title_status,pos={606,210},size={76,20},variable= root:Packages:NIST:VSANS:Globals:gCurDispFile 
     139        TitleBox title_dataPresent,pos={606,210},size={76,20},variable= root:Packages:NIST:VSANS:Globals:gCurDispFile 
     140        TitleBox title_status,pos={606,240},size={200,200},variable= root:Packages:NIST:VSANS:Globals:gStatusText 
    132141         
    133142        Button button_tagFile,pos={603,412},size={70,20},proc=TagFileButtonProc,title="Tag File" 
     
    554563End 
    555564 
     565// fake status button click 
     566Function FakeStatusButtonClick() 
     567 
     568        STRUCT WMButtonAction ba 
     569        ba.eventCode = 2 
     570        StatusButtonProc(ba) 
     571         
     572        return(0) 
     573End 
    556574 
    557575// fake click on each tab to populate the data 
     
    678696// 
    679697// gets the status of the currently displayed file and dumps it to the panel (not the cmd window) 
    680 // - lots to decide here about what is the important stuff to display. There's a lot more information now 
     698// - lots to decide here about what is the important stuff to display. There's a lot more information for VSANS 
    681699// 
    682700Function StatusButtonProc(ba) : ButtonControl 
     
    686704                case 2: // mouse up 
    687705                        // click code here 
     706                         
     707                        // figure out wether to display per carraige, or the whole file 
     708                        SVAR str = root:Packages:NIST:VSANS:Globals:gStatusText 
     709                        SVAR type = root:Packages:NIST:VSANS:Globals:gCurDispType               //what folder 
     710                        // which tab active 
     711                        ControlInfo/W=VSANS_Data tab0 
     712                        Variable curTab = V_value 
     713                         
     714                        str = "Current data is from "+ type + "\r" 
     715                        str += "Description = "+V_getSampleDescription(type) + "\r" 
     716                        str += "Wavelength is "+num2str(V_getWavelength(type)) + " A \r" 
     717                        if(curTab == 2) 
     718                                str += "SDD B = "+num2str(V_getDet_distance(type,"B")) + " cm \r"               //V_getDet_distance(fname,detStr) 
     719                        endif 
     720                        if(curTab == 1) 
     721                                str += "SDD ML = "+num2str(V_getDet_distance(type,"ML")) + " cm \r" 
     722                                str += "SDD MR = "+num2str(V_getDet_distance(type,"MR")) + " cm \r" 
     723                                str += "SDD MT = "+num2str(V_getDet_distance(type,"MT")) + " cm \r" 
     724                                str += "SDD MB = "+num2str(V_getDet_distance(type,"MB")) + " cm \r" 
     725                        endif 
     726                        if(curTab == 0) 
     727                                str += "SDD FL = "+num2str(V_getDet_distance(type,"FL")) + " cm \r" 
     728                                str += "SDD FR = "+num2str(V_getDet_distance(type,"FR")) + " cm \r" 
     729                                str += "SDD FT = "+num2str(V_getDet_distance(type,"FT")) + " cm \r" 
     730                                str += "SDD FB = "+num2str(V_getDet_distance(type,"FB")) + " cm \r" 
     731                        endif 
     732                         
     733                         
     734                         
     735                         
     736                         
    688737                        break 
    689738                case -1: // control being killed 
Note: See TracChangeset for help on using the changeset viewer.