#summary: set up nmrview

proc setup {} {
nv_sread seq sac7d.seq
# hsqc window 
nv_dataset open hsqc.nv
readpks hsqclist.xpk hsqclist
NvMkSpectrum hsqc 1x1
wm geometry .hsqc 475x475+800+50
nv_win -posi 200 0
nv_win dataset hsqc.nv
nv_win displays hsqc
nv_win lvl 1.7
nv_win x 10 6.5
nv_win y 132 101
nv_win poscolor black
#nv_win negcolor red
nv_win nlvl 20
nv_win dispeaks hsqclist
nv_win draw
#
# usum window
nv_dataset open usum.nv
readpks usumlist.xpk usumlist
NvMkSpectrum usum 1x1
wm geometry .usum 475x475+10+20
nv_win -posi 200 0
nv_win dataset usum.nv
nv_win displays usum
nv_win lvl .57
nv_win x 10 6.5
nv_win y 132 101
nv_win poscolor blue
#nv_win negcolor red
nv_win -peak_col_off 4
nv_win peak_off 0
nv_win nlvl 20
nv_win dispeaks usumlist
nv_win draw
#
# udif window
nv_dataset open udif.nv
readpks udiflist.xpk udiflist
NvMkSpectrum udif 1x1
wm geometry .udif 475x475+485+20
nv_win -posi 200 0
nv_win dataset udif.nv
nv_win displays udif
nv_win lvl .57
nv_win x 10 6.5
nv_win y 132 101
nv_win poscolor red
#nv_win negcolor red
nv_win nlvl 20
nv_win -peak_col_off 4
nv_win peak_off 0
nv_win dispeaks udiflist
nv_win draw
#
# asum window
nv_dataset open asum.nv
readpks asumlist.xpk asumlist
NvMkSpectrum asum 1x1
wm geometry .asum 475x475+10+470
nv_win -posi 200 0
nv_win dataset asum.nv
nv_win displays asum
nv_win lvl 1.0
nv_win x 10 6.5
nv_win y 132 101
#nv_win z 103.8 
nv_win poscolor blue
#nv_win negcolor red
nv_win nlvl 20
nv_win -peak_col_off 4
nv_win peak_off 0
nv_win dispeaks asumlist
nv_win draw
#
# adif window
nv_dataset open adif.nv
readpks adiflist.xpk adiflist
NvMkSpectrum adif 1x1
wm geometry .adif 475x475+485+470
nv_win -posi 200 0
nv_win dataset adif.nv
nv_win displays adif
nv_win lvl 1.4
nv_win x 10 6.5
nv_win y 132 101
#nv_win z 103.8 
nv_win poscolor red
#nv_win negcolor red
nv_win nlvl 20
nv_win peak_col_off 4
nv_win peak_off 0
nv_win dispeaks adiflist
nv_win draw
#
}