Appendix A
NMR-ExecuteCt-PMODEtt)
' Switch to Process mode and
NMR.Execute("XY QUIT")
' Start XY display
NMR.Execute("XY,t)
NMR-ExecuteCt-AMODE")
' Switch to Acquisition mode and
If (choice-1.5)< O Then
NMR-ExecuteCtLOAD DIFFGP")
' and load the diffusion sequence
else
NMR-ExecuteCtLOAD DIFGPCPtt)
t and load the diffusion sequence
End If
NMR.Execute("D4 tt & s)
' set D4
Ext=1
' Reset file extension
If (s-D4ref)>0 Then
redg=sqr(s∕D4ref)
else
redg=1
End If
Setfso=CreateobjectctScripting-FiIeSystemObjecttt)
Set août = fso.CreateTextFile(current & DataName & i & ".int",true)
Do While NextListI (rfich)
' Get next value from list
NMR-ExecuteCt-AMODE")
' Go to Acquisition Mode
r=rfich∕redg
'r=rfich
NMR.Execute("G1 tt & r)
' set G1
q=-r
NMR.Execute(ttG3 " & q)
t set G3
NMR.StatusMessage(t'D4 = " & s )
NMR-StatusMessageCtGI = " & r )
NMR-Go
If (choice -1.5) > O Then
NMR-ExecuteCtROT")
End If
NMR-ExecuteCtWR " & DataName & i & "." & Ext & " Y") ' save it
Ext=Ext+1
' New extension
206
More intriguing information
1. The name is absent2. Reversal of Fortune: Macroeconomic Policy, International Finance, and Banking in Japan
3. Optimal Vehicle Size, Haulage Length, and the Structure of Transport Costs
4. On s-additive robust representation of convex risk measures for unbounded financial positions in the presence of uncertainty about the market model
5. The name is absent
6. The name is absent
7. ARE VOLATILITY EXPECTATIONS CHARACTERIZED BY REGIME SHIFTS? EVIDENCE FROM IMPLIED VOLATILITY INDICES
8. El Mercosur y la integración económica global
9. The name is absent
10. The name is absent