;4.2) Program: 1H CRAMPS after 1H CSA filter ;Description: Suppression of NH/OH signals in 1H CRAMPS spectra ;Requires: !!!!; relatively slow MAS ;Reference(s): KSR & Mao, J. Magn. Reson. 157, 210-217 (2002). ;srbr24hw8i.CH3sel (XwinNMR 2.6) ;from srbr24.ksr ;HW-8 CH3 selection by 1H CSA dephasing followed by ;program for homonuclear decoupling through a BR-24 sequence ;with 2 sampling points per cycle for quad detection ;and phase alternation. ;uses the optional 4-phase modulator ;set edscon parameter PHASPR to 0.25-0.35 usec ;program written for SADC or HADC ;set: ; l4 = td/4, e.g. 32 ;p1 = 90 degree pulse ;p11 = ~45 degree pulse to suppress zero-frequency artefact ;d4 = unblanking delay ;d3 = tau delay ;p0 = 1usec down to 0.2 usec, with cavity proton amplifier 1usec min. ;set edscon parameter BLKTR to 1-1.5 usec, check beforehand with scope ;and attenuator what preunblanking delay is necessary to get good ;pulse shape, then set p0 to get minimum transmitter noise ;aqmod = qsim ;fw = 6e6 ;pl1 to drive 1H HP transmitter define delay small "small=d3-p1" define delay acq "acq=d3+d3-p1-p0" define delay large "large=d3+d3-p1" define delay swi "swi=d13-p21" define delay swix "swix=d13-p22" define delay lwi "lwi=d13+d13-p21" define loopcounter ctd "d8=p21" ;HW-8 pulse "d2=p2" ;pseudo 180 pulse 1 ze 2 d1 10u pl1:f1 3u:f1 ph1 100u fq4:f1 ;on reson. on CH3 ;HW-8 based 1H CSA filter; pulses can all be inverted to invert field !! ; p24:f1 ph20 ;x ; p23:f1 ph23 ;-y ; p25:f1 ph21 ;y ; p26:f1 ph22 ;-x 4 p21:f1 ph22 ;-x swi p21:f1 ph21 ;y lwi p21:f1 ph23 ;-y swi p21:f1 ph22 ;-x lwi p21:f1 ph20 ;x swi p21:f1 ph23 ;-y lwi p21:f1 ph21 ;y swi p21:f1 ph20 ;x lwi lo to 4 times l2 ;tr/2 5 p21:f1 ph20 ;x invert all pulses swi p21:f1 ph23 ;-y lwi p21:f1 ph21 ;y swi p21:f1 ph20 ;x lwi p21:f1 ph22 ;-x swi p21:f1 ph21 ;y lwi p21:f1 ph23 ;-y swi p21:f1 ph22 ;-x lwi lo to 5 times l2 ;tr lo to 4 times l3 ;repeat tr-loop for ~ 1.7 ms (ca. 7 for nu_r = 4 kHz) p3:f1 ph4 ;store with 0/180 pulse p3:f1 ph5 ;store to +-z d16 fq3:f1 ;spin diffusion off reson for detection 2u adc ph31 1u:f1 ph0 13 p3:e:f1 ph1 ;first 90 for BR24 detection 1u:e:f1 ph2 ;55 -y and 45 z = 90 +y 45 +x 90 -y to rotate (1 1 1) onto z p12:e:f1 ph6 ;35 +y: combined 55 -y and 90 +y p11:e:f1 ph7 ;central 45 +x in z pulse p3:e:f1 ph8 ;90 -y from z pulse 14 acq:f1 ph2 ;BR-24 loop p0:x p1:e:f1 ph10 small p1:e:f1 ph11 ;y large:e p1:e:f1 ph13 ;my small:e p1:e:f1 ph12 ;mx large:e p1:e:f1 ph12 small:e p1:e:f1 ph11 large:e p1:e:f1 ph13 small:e p1:e:f1 ph10 large:e p1:e:f1 ph11 ;x small:e p1:e:f1 ph10 ;y large:e p1:e:f1 ph12 ;my small:e p1:e:f1 ph13 ;mx acq:f1 ph2 p0:x ;take data p1:e:f1 ph13 small:e p1:e:f1 ph10 large:e p1:e:f1 ph11 small:e p1:e:f1 ph10 large:e p1:e:f1 ph12 ;x small:e p1:e:f1 ph13 ;y large:e p1:e:f1 ph13 ;my small:e p1:e:f1 ph10 ;mx large:e p1:e:f1 ph12 small:e p1:e:f1 ph11 large:e p1:e:f1 ph12 small:e p1:e:f1 ph11 lo to 14 times l4 aq rcyc=2 15 100m wr #0 16 exit ph0=0 ph1=+x -x +y -y ph2=+x ph3= +y +y +y +y -y -y -y -y ;excitation of HW-8 ph4= +y +y +y +y -y -y -y -y ph5= -y ;finish CSA filter, to z ph6=+y ;35 pulse: y pulse and first 90 in z pulse ph7=+x ;central 45 in z pulse ph8=-y ;last 90 in z pulse ph10=-x ;not +x !! ;phases for BR24 ph11=+y ph12=+x ph13=-y ph20=+x ph21=+y ph22=-x ph23=-y ph14=-y ;180 in CSA filter ph31=0 2 1 3 2 0 3 1