1 | #pragma rtGlobals=1 // Use modern global access method. |
---|
2 | #pragma version=5.0 |
---|
3 | #pragma IgorVersion=6.0 |
---|
4 | |
---|
5 | |
---|
6 | //************************** |
---|
7 | // Vers 1.2 091901 |
---|
8 | // |
---|
9 | // an essentially useless routine, but could be dressed up considerably |
---|
10 | // especially with more HELP for the user |
---|
11 | // |
---|
12 | // adds a "SANS" menu, with only 2 items |
---|
13 | // |
---|
14 | //**************************** |
---|
15 | // |
---|
16 | |
---|
17 | // only 2 items - almost all of the other items are woefully obsolete |
---|
18 | // and would generate errors if compiled |
---|
19 | // |
---|
20 | Menu "SANS" |
---|
21 | "Initialize" |
---|
22 | "SANS Help" |
---|
23 | "-" |
---|
24 | "Main Control Panel",DoWindow/F Main_Panel |
---|
25 | "SASCALC" |
---|
26 | "-" |
---|
27 | Submenu "Data Display" |
---|
28 | "Show 2D SANS Data",DoWindow/F SANS_Data |
---|
29 | "Show File Table",ShowCatWindow() |
---|
30 | End |
---|
31 | Submenu "Input Panels" |
---|
32 | "Calculate Transmissions",CalcTrans() |
---|
33 | "Build Reduction Protocols",ReductionProtocolPanel() |
---|
34 | "Reduce Multiple Files",ReduceMultipleFiles() |
---|
35 | "Patch Files",PatchFiles() |
---|
36 | "1D Average",ShowAveragePanel() |
---|
37 | End |
---|
38 | Submenu "1-D Processing" |
---|
39 | "Load and Plot 1D Data",Show_Plot_Manager() |
---|
40 | "Open FIT Panel",OpenFITPanel() |
---|
41 | "Sort and Combine data",ShowNSORTPanel() |
---|
42 | "Subtract 1D Data Sets",OpenSubtract1DPanel() |
---|
43 | End |
---|
44 | Submenu "2-D Processing" |
---|
45 | "2D Work file Math",Show_WorkMath_Panel() |
---|
46 | "Tile Raw 2D files",Show_Tile_2D_Panel() |
---|
47 | "Export 2D ASCII data",Export_RAW_Ascii_Panel() |
---|
48 | End |
---|
49 | "-" |
---|
50 | "Check for Updates",CheckForLatestVersion() |
---|
51 | // Submenu "Utility Routines" |
---|
52 | // "Clear Work Folders" |
---|
53 | // "Clear Root Folder" |
---|
54 | // End |
---|
55 | End |
---|
56 | |
---|
57 | Function SANSHelp() |
---|
58 | DisplayHelpTopic/Z/K=1 "SANS Data Reduction Tutorial" |
---|
59 | if(V_flag !=0) |
---|
60 | DoAlert 0,"The SANS Data Reduction Tutorial Help file could not be found" |
---|
61 | endif |
---|
62 | End |
---|
63 | |
---|