Changeset 187


Ignore:
Timestamp:
Oct 25, 2007 4:38:44 PM (15 years ago)
Author:
srkline
Message:

Added offset of models for better display in plotting

File:
1 edited

Legend:

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

    r148 r187  
    9494        Variable/G root:SAS:gSamApOther = 10            //non-standard aperture diameter, in mm 
    9595        Variable/G root:SAS:gUsingLenses = 0            //0=no lenses, 1=lenses(or prisms) 
     96        Variable/G root:SAS:gModelOffsetFactor = 1 
    9697         
    9798        //tick labels for SDD slider 
     
    283284        Slider SC_Slider_2,pos={394,21},size={47,65},proc=OffsetSliderProc,live=0,ticks=4 
    284285        Slider SC_Slider_2,limits={0,25,1},variable= root:SAS:gOffset,thumbColor= (1,16019,65535) 
    285         CheckBox checkNG3,pos={20,18},size={36,14},proc=SelectInstrumentCheckProc,title="NG3" 
     286        CheckBox checkNG3,pos={20,19},size={36,14},proc=SelectInstrumentCheckProc,title="NG3" 
    286287        CheckBox checkNG3,value=1,mode=1 
    287         CheckBox checkNG7,pos={66,18},size={36,14},proc=SelectInstrumentCheckProc,title="NG7" 
     288        CheckBox checkNG7,pos={66,19},size={36,14},proc=SelectInstrumentCheckProc,title="NG7" 
    288289        CheckBox checkNG7,value=0,mode=1 
    289290        CheckBox checkChamber,pos={172,48},size={57,14},proc=TableCheckProc,title="Chamber" 
     
    300301        SetVariable setvar0_1,limits={0,25,1},value= root:SAS:gOffset 
    301302        SetVariable setvar0_2,pos={6,130},size={90,15},title="Lambda",proc=LambdaSetVarProc 
    302         SetVariable setvar0_2,limits={5,20,0.1},value= root:SAS:gLambda 
     303        SetVariable setvar0_2,limits={4,20,0.1},value= root:SAS:gLambda 
    303304        PopupMenu popup0_2,pos={108,127},size={55,20},proc=DeltaLambdaPopMenuProc 
    304305        PopupMenu popup0_2,mode=1,popvalue="0.15",value= root:SAS:gDeltaLambdaStr 
     
    307308        Button ClearButton title="Clear",size={60,20},pos={377,166} 
    308309        Button ClearButton proc=ClearButtonProc 
    309         GroupBox group0,pos={6,1},size={108,33},title="Instrument" 
     310        GroupBox group0,pos={6,1},size={108,36},title="Instrument" 
    310311        SetDataFolder fldrSav0 
    311312         
     
    605606        root:SAS:aveint *= root:SAS:fSubS 
    606607         
     608        //multiply by current offset (>=1) 
     609        root:SAS:aveint *= root:SAS:gModelOffsetFactor 
     610         
    607611End 
    608612 
     
    648652        String str="" 
    649653        NVAR ct=root:SAS:gFreezeCount 
     654         
     655         
    650656        SetDataFolder root:SAS 
    651657         
     
    688694        endswitch 
    689695         
     696        NVAR offset = root:SAS:gModelOffsetFactor 
     697        offset = 2^ct 
     698        //multiply by current offset (>=1) 
     699        Wave inten = $("aveint_"+num2str(ct)) 
     700        inten *= offset 
     701        Print "new offset = ",offset 
     702         
    690703        ct +=1 
    691704        SetDataFolder root: 
     
    726739        endif 
    727740         
     741        //reset offset value 
     742        NVAR offset = root:SAS:gModelOffsetFactor 
     743        offset = 1 
     744        ReCalculateInten(1) 
    728745        return(0) 
    729746End 
Note: See TracChangeset for help on using the changeset viewer.