#pragma rtGlobals=1 // Use modern global access method. DefaultFont "Palatino" MoveWindow/P 57,42,633,477 MoveWindow/C 5,383,563,475 Table0() Table1() Isotropic_Example() Powder_Example() OpenNotebook/N=Notebook1/W=(43,247,557,391)/J=52768 "More Help" OpenNotebook/N=Notebook0/W=(40,43,569,225)/J=31079 "EPRSim Demo Help" Window Powder_Example() : Graph PauseUpdate; Silent 1 | building window... Display /W=(128,42,632,426) phm382,sim1 as "phm382_simulation" ModifyGraph lSize=0.5 ModifyGraph rgb(phm382)=(1,4,52428),rgb(sim1)=(52428,1,1) ModifyGraph mirror=2 ModifyGraph fSize=14 ModifyGraph lblMargin(left)=6 ModifyGraph axOffset(left)=-1 Label left "\\F'Palatino'\\Z14\\f01Intensity (arbitrary units)" Label bottom "\\F'Palatino'\\Z14\\f01Field (Gauss)" Legend/J/N=text0/S=3/H=36/A=MC/X=-22.76/Y=39.50 "\\s(phm382) PHM (Type II Cu protein)\r\\s(sim1) Simulation via XOP" EndMacro Window Isotropic_Example() : Graph PauseUpdate; Silent 1 | building window... Display /W=(82,49,560,473) IsoWave as "Isotropic Simulation Example" ModifyGraph lSize=0.5 ModifyGraph rgb=(52428,1,1) ModifyGraph tick=3 ModifyGraph mirror=2 ModifyGraph noLabel=2 ModifyGraph axOffset(left)=-6.5,axOffset(bottom)=-2 Label left "\\F'Palatino'\\Z12Intensity (arbitrary units)" Label bottom "\\F'Palatino'\\Z12Field (Gauss)" SetAxis left -146.149,146.149 SetAxis bottom -17.9307692307692,635.261538461538 Textbox/N=text0/F=0/S=3/H=36/G=(0,0,65535)/B=1/A=MC/X=-2.56/Y=45.29 "Isotropic simulation of DMPO-S (thiyl) radical" AppendText "\\JCvia SimulateIso() function" EndMacro Window Table1() : Table PauseUpdate; Silent 1 | building window... Edit/W=(201,42,393,291) paramsIso EndMacro Window Table0() : Table PauseUpdate; Silent 1 | building window... Edit/W=(5,42,197,291) params EndMacro