Changeset 240


Ignore:
Timestamp:
Jan 15, 2008 10:46:43 AM (13 years ago)
Author:
srkline
Message:

added /W=SASCALC flags to ControlInfo? statements to make sure it's working on the right window, if SASCALC is not on the top.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/SASCalc/trunk/SASCALC.ipf

    r233 r240  
    333333        //poll the controls on the panel, and change needed values 
    334334        Variable isNG3,Ng,mode 
    335         ControlInfo checkNG3 
     335        ControlInfo/W=SASCALC checkNG3 
    336336        isNG3=V_value 
    337         ControlInfo SC_slider 
     337        ControlInfo/W=SASCALC SC_slider 
    338338        Ng=V_value 
    339339        SVAR A1str= root:Packages:NIST:SAS:gSourceApString// = "1.43 cm;2.54 cm;3.81 cm;" 
     
    342342                switch(ng)       
    343343                        case 0: 
    344                                 ControlInfo popup0 
     344                                ControlInfo/W=SASCALC popup0 
    345345                                mode=V_value 
    346346                                A1str="1.43 cm;2.54 cm;3.81 cm;" 
     
    373373                switch(ng)       
    374374                        case 0: 
    375                                 ControlInfo popup0 
     375                                ControlInfo/W=SASCALC popup0 
    376376                                mode=V_value 
    377377                                A1str="1.43 cm;2.22 cm;3.81 cm;" 
     
    389389        ControlUpdate popup0 
    390390        PopupMenu popup0,mode=mode              //source Ap 
    391         ControlInfo popup0 
     391        ControlInfo/W=SASCALC popup0 
    392392        SourceAperturePopMenuProc("",0,S_Value)                 //send popNum==0 so recalculation won't be done 
    393393         
    394394        ControlUpdate popup0_2          // delta lambda pop 
    395         ControlInfo popup0_2 
     395        ControlInfo/W=SASCALC popup0_2 
    396396        DeltaLambdaPopMenuProc("",0,S_Value)            //sets the global and the wave 
    397397End 
     
    597597 
    598598 
    599 Proc DoTest() 
    600  
     599Proc DoTest(nCts) 
     600        variable nCts = 1e6 
     601         
     602        test2DSphere(nCts) 
     603         
     604        root:Packages:NIST:SAS:linear_data = root:sim_lin 
     605         
    601606        S_CircularAverageTo1D("Packages:NIST:SAS") 
    602607         
     
    605610         
    606611        //root:Packages:NIST:SAS:aveint = S_SphereForm(1,80,1e-6,0,root:Packages:NIST:SAS:qval) 
    607         root:Packages:NIST:SAS:aveint = S_Debye(1000,100,0,qval) 
     612        //root:Packages:NIST:SAS:aveint = S_Debye(1000,100,0,qval) 
    608613         
    609614        // multiply by beamstop shadowing 
    610         root:Packages:NIST:SAS:aveint *= root:Packages:NIST:SAS:fSubS 
     615        //root:Packages:NIST:SAS:aveint *= root:Packages:NIST:SAS:fSubS 
    611616         
    612617        //multiply by current offset (>=1) 
    613         root:Packages:NIST:SAS:aveint *= root:Packages:NIST:SAS:gModelOffsetFactor 
     618        //root:Packages:NIST:SAS:aveint *= root:Packages:NIST:SAS:gModelOffsetFactor 
    614619         
    615620End 
     
    13531358// updates the wave 
    13541359Function sourceApertureDiam() 
    1355         ControlInfo popup0 
     1360        ControlInfo/W=SASCALC popup0 
    13561361        Variable diam 
    13571362        sscanf S_Value, "%g cm", diam 
     
    13781383// returns a2 in cm 
    13791384Function sampleApertureDiam() 
    1380         ControlInfo popup0_1 
     1385        ControlInfo/W=SASCALC popup0_1 
    13811386         
    13821387//      Print "In sampleApertureDiam()" 
     
    14031408//1=huber 2=chamber 
    14041409Function tableposition() 
    1405         ControlInfo checkHuber 
     1410        ControlInfo/W=SASCALC checkHuber 
    14061411        if(V_Value) 
    14071412                return(1)               //huber 
Note: See TracChangeset for help on using the changeset viewer.