#
# HELP: SYNOPSIS:
# HELP:     voxren/menu/load
# HELP:
# HELP: DESCRIPTION:
# HELP:     Ask for a volume file and load it. Reorganize display for new
# HELP:     geometry.
#
CECHO ${$root.func.var.new("string","tmp")}
CECHO ${$root.func.var.new("string","dir")}
VARFROMPROCESS tmp eccet_openfile load ${$root.func.strings.quote($root.application.voxren.datapath)}
IF ${$tmp=="."} QUIT
LOAD ${$root.func.strings.quote($tmp)}    
IF ${$root.rc!=0} ! generic/info/show_error ${$root.rc}
CECHO ${$dir=$root.func.file.getdir($tmp)}
CECHO ${$root.application.voxren.datapath=$dir}
CECHO ${$root.func.file.chdir($dir)}
CECHO ${$root.func.file.mkdir("pictures")}
! generic/multivol/forallvol generic/convert/allocall
POS ${$root.vol[current].size.x/2} ${-$root.vol[current].size.y} ${$root.vol[current].size.z/2}
DIR 0 1 0 1 0 0
VIEW_REORIENT
ZOOM 120
LAYER 0-255 0
LAYER 0-31 1
ECHO Load complete
