NUTSMacro Varian HMBC, hypercomplex and magnitude

;import data before starting macro

;macro prompts for name of data set
; select translated NUTS data file (starts with $)

; window function used here is sine squared, applied with ms ms after setting s#=45
set s# 45
ask filea
ga
;working directory is now set
set filec ft1.2d
;1st dimension processing
;in Help, search on "States" for description
set sl 1
ga bc ms ms ft bc tr ia ga bc ms ms ft bc tr st in

set filec td.2d
set filea ft1.2d

;transpose data
set sl 1
ga
td

set filea td.2d
set filec ft2.2d

;2nd dimension processing
;contains Spectrum Reverse command
set sl 1
ga ms ms zf ft mc bc sc in

set filea ft2.2d
set filec final.2d
set sl 1
ga
td
set filea final.2d
ga
;Set scale
ss
set mh 5
ip
end