;nopephs3d.bv
;MANUFACTURER: Bruker
;MODEL: AMX version
;DESCRIPTION: 3D NOESY-HSQC with SE
;uses only SL pulses for solvent suppr.
;two experiments, due to echo-antiecho
;15N evolution phases
;derived from pep_z_hsqc.bv 1/27/95
;Sensitivity-enhanced HSQC
;Arthur G. Palmer III et al., JMR (1994), v. 104, 298-302.
;sequence by Brian Volkman, volkman@nmrfam.wisc.edu
;* see also pep_z_hsqc.bv - 2D HSQC analog*
;BMRB Pulse Sequence Accession Number: 21

d6=3u
d8=aq
d11=50m
d12=5m
d25=p3-p1
d10=(in0/2)-p1*2-d6-(p3*2/3.14159)

1 ze
;*************** first experiment ************
;**********************************************
2 d12*5
3 d12*3
4 10u hl2
5 d12
  p18 ph0
  10u hl1
  p1 ph10
  d0
  (p3*2 ph1):f3
  d0
  p1 ph6
  d3
  p8:h
  d3
  p1 ph7
  p21 ph4       ;Messerle pulse 0.5-1.5ms
  d4 dbhi
  (d25 p1*2 ph2) (p3*2 ph5):f3
  d4
  p22 ph1	  ;Messerle pulse = 0.5-1.5 msec
  (d25 p1 ph2) (p3 ph9):f3	  ;1H 90, X 90 (w/quad. inc.)
  d10
  (p1 ph2 d6 p1*2 ph1 d6 p1 ph2)	  ;refocusing composite 180 1H
  d10
  (d25 p1 ph11) (p3 ph14):f3
  d4
  (d25 p1*2 ph12) (p3*2 ph14):f3
  d4
  (d25 p1 ph12) (p3 ph15):f3
  d4
  (d25 p1*2 ph12) (p3*2 ph15):f3
  d4 dblo
  p1 ph13
  go=2 ph31 cpdb	
d11 dbo wr #0 if #0 zd  	  ;write to disk
d12 ip10
d12 ip10
lo to 3 times 2
d12 id0
d12 ip31
d12 ip31
lo to 4 times l0
d12 rd0
d12 rp10
;*************** second experiment ************
;**********************************************
6 d12*5
7 d12*3
8 10u hl2
  p18 ph0
  10u hl1
  p1 ph10
  d0
  (p3*2 ph1):f3
  d0
  p1 ph6
  d3
  p8:h
  d3
  p1 ph7
  p21 ph4       ;Messerle pulse 0.5-1.5ms
  d4 dbhi
  (d25 p1*2 ph2) (p3*2 ph5):f3
  d4
  p22 ph1	  ;Messerle pulse = 0.5-1.5 msec
  (d25 p1 ph2) (p3 ph9):f3	  ;1H 90, X 90 (w/quad. inc.)
  d10
  (p1 ph2 d6 p1*2 ph1 d6 p1 ph2)	  ;refocusing composite 180 1H
  d10
  (d25 p1 ph11) (p3 ph24):f3
  d4
  (d25 p1*2 ph12) (p3*2 ph24):f3
  d4
  (d25 p1 ph12) (p3 ph25):f3
  d4
  (d25 p1*2 ph12) (p3*2 ph25):f3
  d4 dblo
  p1 ph13
  go=6 ph31 cpdb	
d11 dbo wr #0 if #0 zd  	  ;write to disk
d12 ip10
d12 ip10
lo to 7 times 2
d12 id0
d12 ip31
d12 ip31
lo to 8 times l0
d12 rd0
d12 rp10
d12 id10
d12 ip9
d12 ip9
d12 ip31
d12 ip31
lo to 5 times l10


;x=0, y=1, -x=2, -y=3
  ph0=1
  ph1=0
  ph2=3
  ph3=0 2
  ph4=1
  ph5=0
  ph6=0 2 0 2 0 2 0 2
  ph7=0 0 2 2 0 0 2 2
  ph9=0
  ph10=(8) 1
  ph11=1 1 1 1 0 0 0 0
  ph12=0 0 0 0 3 3 3 3
  ph13=1 1 1 1 0 0 0 0
  ph14=0 0 0 0 1 1 1 1
  ph24=2 2 2 2 1 1 1 1
  ph15=1 1 1 1 2 2 2 2
  ph25=1 1 1 1 0 0 0 0
  ph31=0 2 2 0 2 0 0 2