Ignore:
Timestamp:
Mar 16, 2018 3:38:18 PM (5 years ago)
Author:
srkline
Message:

a number of changes, mostly to allow everything to compile.

added conditional compile to ensure that XML code would not be compiled if VSANS was present, since it's not XML-aware.

modified V_MainPanel to avoid conflicts with the SANS version. There still may be some functions hidden in procedures that do not have the V_ prefix yet, but these are either for functions that should point to a common file, or procedures that have been hidden from the VSANS panel

modified saving of VSANS mask files so that they can still be saved from teh deom version where home path is not defined.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/trunk/NCNR_User_Procedures/Analysis/Alpha/Tinker/FFT_SuperFormula.ipf

    r1089 r1091  
    5555        SetDrawLayer UserBack 
    5656        SetVariable setvar0,pos={37.00,92.00},size={80.00,18.00},title="r",fSize=12 
    57         SetVariable setvar0,limits={-20,20,1},value= _NUM:3,disable=2 
     57        SetVariable setvar0,limits={-20,20,1},value= _NUM:3,disable=1 
    5858        SetVariable setvar1,pos={37.00,118.00},size={80.00,18.00},title="t",fSize=12 
    59         SetVariable setvar1,limits={-20,20,1},value= _NUM:2,disable=2 
     59        SetVariable setvar1,limits={-20,20,1},value= _NUM:2,disable=1 
    6060        SetVariable setvar2,pos={37.00,145.00},size={80.00,18.00},title="s",fSize=12 
    61         SetVariable setvar2,limits={-20,20,1},value= _NUM:4,disable=2 
     61        SetVariable setvar2,limits={-20,20,1},value= _NUM:4,disable=1 
    6262        SetVariable setvar3,pos={37.00,172.00},size={80.00,18.00},title="rad",fSize=12 
    63         SetVariable setvar3,limits={0,50,1},value= _NUM:15,disable=2 
     63        SetVariable setvar3,limits={0,50,1},value= _NUM:15,disable=1 
    6464         
    6565        SetVariable setvar4,pos={162.00,91.00},size={80.00,18.00},title="m",fSize=12 
     
    8888        CheckBox check3,fSize=12,value= 1,mode=1,proc=SuperCheckProc 
    8989 
    90         Button button0,pos={208.00,215.00},size={70.00,20.00},proc=SuperCalcButtonProc,title="Calculate" 
     90        Button button0,pos={190.00,215.00},size={80.00,20.00},proc=SuperCalcButtonProc,title="Calculate" 
     91        Button button1,pos={190.00,245.00},size={80.00,20.00},proc=PointCloudButtonProc,title="Point Cloud" 
     92 
    9193 
    9294End 
     
    113115                                        SetVariable setvar0 disable=0 
    114116                                        SetVariable setvar1 disable=0 
    115                                         SetVariable setvar2 disable=2 
    116                                         SetVariable setvar3 disable=2 
    117                                         SetVariable setvar4 disable=2 
    118                                         SetVariable setvar5 disable=2 
    119                                         SetVariable setvar6 disable=2 
    120                                         SetVariable setvar7 disable=2 
     117                                        SetVariable setvar2 disable=1 
     118                                        SetVariable setvar3 disable=1 
     119                                        SetVariable setvar4 disable=1 
     120                                        SetVariable setvar5 disable=1 
     121                                        SetVariable setvar6 disable=1 
     122                                        SetVariable setvar7 disable=1 
    121123                                         
    122124                                        break 
     
    125127                                        SetVariable setvar0 disable=0 
    126128                                        SetVariable setvar1 disable=0 
    127                                         SetVariable setvar2 disable=2 
     129                                        SetVariable setvar2 disable=1 
    128130                                        SetVariable setvar3 disable=0 
    129                                         SetVariable setvar4 disable=2 
    130                                         SetVariable setvar5 disable=2 
    131                                         SetVariable setvar6 disable=2 
    132                                         SetVariable setvar7 disable=2 
     131                                        SetVariable setvar4 disable=1 
     132                                        SetVariable setvar5 disable=1 
     133                                        SetVariable setvar6 disable=1 
     134                                        SetVariable setvar7 disable=1 
    133135                                        break 
    134136                                case "check2":          // Quadric 
     
    137139                                        SetVariable setvar1 disable=0 
    138140                                        SetVariable setvar2 disable=0 
    139                                         SetVariable setvar3 disable=2 
    140                                         SetVariable setvar4 disable=2 
    141                                         SetVariable setvar5 disable=2 
    142                                         SetVariable setvar6 disable=2 
    143                                         SetVariable setvar7 disable=2 
     141                                        SetVariable setvar3 disable=1 
     142                                        SetVariable setvar4 disable=1 
     143                                        SetVariable setvar5 disable=1 
     144                                        SetVariable setvar6 disable=1 
     145                                        SetVariable setvar7 disable=1 
    144146                                        break 
    145147                                case "check3":          // SuperFormula 
    146148                                        gRadioVal= 4 
    147                                         SetVariable setvar0 disable=2 
    148                                         SetVariable setvar1 disable=2 
    149                                         SetVariable setvar2 disable=2 
    150                                         SetVariable setvar3 disable=2 
     149                                        SetVariable setvar0 disable=1 
     150                                        SetVariable setvar1 disable=1 
     151                                        SetVariable setvar2 disable=1 
     152                                        SetVariable setvar3 disable=1 
    151153                                        SetVariable setvar4 disable=0 
    152154                                        SetVariable setvar5 disable=0 
     
    251253End 
    252254 
    253  
     255Function PointCloudButtonProc(ba) : ButtonControl 
     256        STRUCT WMButtonAction &ba 
     257 
     258        switch( ba.eventCode ) 
     259                case 2: // mouse up 
     260                        // click code here 
     261                        Execute "mat_as_3dCloud()" 
     262                         
     263                        break 
     264                case -1: // control being killed 
     265                        break 
     266        endswitch 
     267 
     268        return 0 
     269End 
    254270 
    255271 
     
    412428// will plot either the 2d or 3d version, whichever was most recently 
    413429// calculated -- the M_parametric wave is plotted 
    414 Window Gizmo_superSurface() : GizmoPlot 
     430Proc Gizmo_superSurface() 
    415431        PauseUpdate; Silent 1           // building window... 
    416432        // Building Gizmo 7 window... 
     
    621637// execute mat = voxW, then the voxelgram can be FFT'd, or Debye's method 
    622638// 
    623 Window Gizmo_superVox() : GizmoPlot 
     639Proc Gizmo_superVox() 
    624640        PauseUpdate; Silent 1           // building window... 
    625641        // Building Gizmo 7 window... 
     
    780796// change the isoValue to plot a different surface 
    781797// 
    782 Window Gizmo_Isosurface() : GizmoPlot 
     798Proc Gizmo_Isosurface() 
    783799        PauseUpdate; Silent 1           // building window... 
    784800        // Building Gizmo 7 window... 
     
    818834// viewed 
    819835// 
    820 Window mat_as_3dCloud() : GizmoPlot 
     836Proc mat_as_3dCloud() : GizmoPlot 
    821837        PauseUpdate; Silent 1           // building window... 
    822838        // Building Gizmo 7 window... 
Note: See TracChangeset for help on using the changeset viewer.