source: sans/Analysis/branches/ajj_23APR07/IGOR_Package_Files/Put in User Procedures/SANS_Models_v4.00/SA_includes_v400.ipf @ 310

Last change on this file since 310 was 310, checked in by srkline, 15 years ago

Moved Macro menu items to a SANSModels submenu (2D Utilities)

File size: 2.1 KB
Line 
1#pragma rtGlobals=1             // Use modern global access method.
2#pragma version=4.0
3#pragma IgorVersion=6.0
4
5//*************
6// the list of files to include in the SANS reduction experiment
7//  - files must be located somewhere in the User Procedures folder
8// or sub-folders
9//
10
11//always include the picker
12#include "SANSModelPicker_v40"                  version>=4.00
13//utility procedures
14#include "GaussUtils_v40"                               version>=4.00
15#include "PlotUtilsMacro_v40"                   version>=4.00
16#include "PlotManager_v40"                              version>=4.00
17
18#include "Wrapper_v40"
19#include "PlotUtils2D_v40"
20#include "GizmoCylinder_v40"
21
22Menu "SANS Models"
23        "Fit Manager", Init_WrapperPanel()
24        "Load Model Functions",Execute/P "INSERTINCLUDE \"SANSModelPicker_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "ModelPicker_Panel()"
25        "Plot Manager", Show_Plot_Manager()
26        "Freeze Model"
27        "Write Model Data"
28        "-"
29        Submenu "Packages"
30                "Sum Two Models",Execute/P "INSERTINCLUDE \"SumSANSModels_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "Init_SumModelPanel()"
31                "Global Fitting",Execute/P "INSERTINCLUDE \"GlobalFit2_NCNR_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "WM_NewGlobalFit1#InitNewGlobalFitPanel()"
32                "Determine Invariant",Execute/P "INSERTINCLUDE \"Invariant_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "Make_Invariant_Panel()"
33                "Do Linear Fits",Execute/P "INSERTINCLUDE \"LinearizedFits_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "A_OpenFitPanel()"
34        End
35        "-"
36        Submenu "2D Utilities"
37                "Generate Fake QxQy Data",FakeQxQy()
38                "Show Cylinder Orientation"
39                "Change Angle"
40        end
41        "-"
42        "Feedback or Bug Report",OpenTracTicketPage()
43        "Open Help Movie Page",OpenHelpMoviePage()
44End
45
46Function OpenTracTicketPage()
47        DoAlert 1,"Your web browser will open to a page where you can submit your bug report or feature request. OK?"
48        if(V_flag==1)
49                BrowseURL "http://danse.chem.utk.edu/trac/newticket"
50        endif
51End
52
53Function OpenHelpMoviePage()
54        DoAlert 1,"Your web browser will open to a page where you can view help movies. OK? (You must have QuickTime installed)"
55        if(V_flag==1)
56                BrowseURL "ftp://webster.ncnr.nist.gov/pub/sans/kline/movies/"
57        endif
58End
Note: See TracBrowser for help on using the repository browser.