/
adaptive_hsqcphpr.cw
148 lines (124 loc) · 2.49 KB
/
adaptive_hsqcphpr.cw
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
;adaptive_hsqcphpr
;
; d0 = evolution time
; ;;ph6 = excitation phase (adjust with phcor[6])
; ph7 = detection phase (adjust with phcor[7])
;
;
;based on hsqcphpr
;avance-version (07/04/04)
;HSQC
;2D H-1/X correlation via double inept transfer
;phase sensitive
;with decoupling during acquisition
;
;G. Bodenhausen & D.J. Ruben, Chem. Phys. Lett. 69, 185 (1980)
;
;$CLASS=HighRes
;$DIM=1D
;$TYPE=
;$SUBTYPE=
;$COMMENT=
#include <Avance.incl>
#include <Delay.incl>
#include <Grad.incl>
"p2=p1*2"
"p4=p3*2"
"d11=30m"
"d12=20u"
"d13=4u"
"d20=d0-2*0.6366*p3" ; evolution time, compensating for 13C pulse durations
"d4=1s/(cnst2*4)"
"DELTA2=d4-larger(p2,p4)/2-p16-d16-4u"
"acqt0=0.6366*p1"
1 ze
d11 pl12:f2
2 d11 do:f2
3 d12
; off-resonance presat
30u pl9:f1
30u fq=cnst21(bf hz):f1
d1 cw:f1 ph1
4u do:f1
4u fq=0:f1
d12 pl1:f1 pl2:f2 UNBLKGRAD
; purge 13C equilibrium magnetisation
(p3 ph1):f2
4u
p16:gp5
d16
4u
; INEPT
p1 ph1
4u
p16:gp1
d16
DELTA2 pl2:f2
(center (p2 ph1) (p4 ph1):f2 )
DELTA2 pl2:f2
p16:gp1
d16
4u
(p1 ph2)
; zz-filter
4u
p16:gp2
d16
(p3 ph6):f2
d20 ; 13C evolution
(p3 ph7:r):f2
; zz-filter
4u
p16:gp3
d16
; retro-INEPT
(p1 ph2)
4u
p16:gp4
d16
DELTA2 pl2:f2
(center (p2 ph1) (p4 ph1):f2 )
DELTA2 pl12:f2
p16:gp4
d16 BLKGRAD
4u
go=2 ph31 cpd2:f2
d11 do:f2 mc #0 to 2 F0(zd)
exit
ph1=0
ph2=1
ph6=0 2
ph7=0 0 2 2
ph31=0 2 2 0
;pl1 : f1 channel - power level for pulse (default)
;pl2 : f2 channel - power level for pulse (default)
;pl9 : f1 channel - power level for presaturation
;pl12: f2 channel - power level for CPD/BB decoupling
;p1 : f1 channel - 90 degree high power pulse
;p2 : f1 channel - 180 degree high power pulse
;p3 : f2 channel - 90 degree high power pulse
;p4 : f2 channel - 180 degree high power pulse
;d0 : total evolution period (>0.6366*p4)
;d1 : relaxation delay; 1-5 * T1
;d4 : 1/(4J)XH
;d11: delay for disk I/O [30 msec]
;d12: delay for power switching [20 usec]
;d13: short delay [4 usec]
;d20: evolution period, compensating for 13C pulses
;cnst2: = J(XH)
;NS: 4 * n
;DS: 16
;cpd2: decoupling according to sequence defined by cpdprg2
;pcpd2: f2 channel - 90 degree pulse for decoupling sequence
;for z-only gradients:
;gpz1: 7 %
;gpz2: 50 %
;gpz3: 35 %
;gpz4: 13 %
;gpz5: 17 %
;use gradient files:
;gpnam1: SMSQ10.100
;gpnam2: SMSQ10.100
;gpnam3: SMSQ10.100
;gpnam4: SMSQ10.100
;gpnam5: SMSQ10.100