StripView.tclの使い方

「概要」
stripInfo.tclにチャート情報を記述する。
stripView.tclを起動する。

1. stripInfo.tclにチャート情報を記述します。
書かなくてはいけないのは・・・

　（A)　環境変数ndPath

set ndPath /home/gga8/tmp/gga8

多くのNMRデータがあるディレクトリ以下にある場合はこのように環境変数を設定しておくと便利です。

　（B)　15N-HSQCのtabファイルに関する情報

# 2D Position table:
set objInfo(tab2D,name) $ndPath/3/hn.tab　　←

set objInfo(tab2D,xVar) X_PPM
set objInfo(tab2D,yVar) Y_PPM

set objInfo(data,expList) ""
set objInfo(data,expCount) 0
set objInfo(data,dx) 0.12
set objInfo(data,dy) 1.60
set objInfo(data,xTol) 0.03
set objInfo(data,yTol) 0.15
set objInfo(data,xName) HN 　　　　　　　　　　　←
set objInfo(data,yName) N 　　　　　　　　　　　　←
set objInfo(data,xVar) X_PPM
set objInfo(data,yVar) Y_PPM

←で記した箇所を修正すればOKだと思います。
objInfo(tab2D,name)にはnmrDrawでpeak detectionしたときに生成されたファイルを指定します。
objInfo(data,xName)にはfid.comの-xLABの値を指定します。

　（C)　15N-HSQCに関する情報

2D Position spectrum:

incr objInfo(data,expCount)
set i $objInfo(data,expCount)

set objInfo(data$i,type) HN
set objInfo(data$i,name) $ndPath/3/test.ft2　　　←
set objInfo(data$i,tabName) $ndPath/3/hn.tab 　　←
set objInfo(data$i,ndim) 2
set objInfo(data$i,hi) 1.6e+5 　　　　　　　　　　　　　←
set objInfo(data$i,xName) HN 　　　　　　　　　　　　←
set objInfo(data$i,yName) N 　　　　　　　　　　　　　←
set objInfo(data$i,zName) None
set objInfo(data$i,xVar) X_PPM
set objInfo(data$i,yVar) Y_PPM
set objInfo(data$i,zVar) None
set objInfo(data$i,xTol) 0.03
set objInfo(data$i,yTol) 0.15
set objInfo(data$i,zTol) 0.00
set objInfo(data$i,xRegion) 0.30
set objInfo(data$i,yRegion) 1.00
set objInfo(data$i,z1) 0%
set objInfo(data$i,zn) 100%
set objInfo(data$i,score) 1
set objInfo(data$i,nmatch) 0
set objInfo(data$i,assInit) "None"

　（D)　stripにしたい3Dの情報

# 3D Spectra:

incr objInfo(data,expCount)
set i $objInfo(data,expCount)

set objInfo(data$i,type) HNCACB
set objInfo(data$i,name) $ndPath/5/ft/hncacb%03d.DAT　←
set objInfo(data$i,tabName) $ndPath/5/test.tab 　　　　　　←
set objInfo(data$i,ndim) 3
set objInfo(data$i,hi) 1.1e+5 　　　　　　　　　　　　　　　　　　←
set objInfo(data$i,xName) HN 　　　　　　　　　　　　　　　　　　←
set objInfo(data$i,yName) N 　　　　　　　　　　　　　　　　　　　←
set objInfo(data$i,zName) CACB 　　　　　　　　　　　　　　　　←
set objInfo(data$i,xVar) Y_PPM
set objInfo(data$i,yVar) Z_PPM
set objInfo(data$i,zVar) X_PPM
set objInfo(data$i,xTol) 0.03
set objInfo(data$i,yTol) 0.15
set objInfo(data$i,zTol) 0.25
set objInfo(data$i,z1) 72.295ppm 　　　　　　　　　　　　　　　←
set objInfo(data$i,zn) 19.000ppm 　　　　　　　　　　　　　　　←
set objInfo(data$i,space) 0
set objInfo(data$i,score) 2
set objInfo(data$i,nmatch) 2
set objInfo(data$i,assInit) "CA(i)|CB(i)|CA(i-1)|CB(i-1)"

デフォルトでは色々なスペクトル用のテンプレートがあるので、必要な奴以外は削除かコメントアウトしてください。

2. nmrView.tclを起動します。

% ./stripView.tcl

fileメニューでopenをクリックするとstripInfo.tclで指定されたファイルを読み込み、stripが出来ます。