isovalues = [30, 20, 10]
ivolume, /test
id = iGetCurrent(tool=tool)
volId = tool->findIdentifiers('*DATA SPACE/VOLUME*', /visualizations)
vol = tool->getByIdentifier(volId)
vol->setProperty, render_extents=0
vol->setProperty, hide=1
isoOpId = tool->findIdentifiers('*ISOSURFACE*', /operations)
isoOp = tool->getByIdentifier(isoOpId)
isoOp->setProperty, show_execution_ui=0
for i = 0, n_elements(isovalues) - 1 do begin
isoOp->setProperty, _isovalue0=isovalues[i]
result = tool->doAction(isoOpId)
tool->commitActions
vol->select
endfor
isosurfaceIds = tool->findIdentifiers('*DATA SPACE/ISOSURFACE*', /visualizations)
for i = 0, n_elements(isovalues) - 1 do begin
isosurf = tool->getByIdentifier(isosurfaceIds[i])
color = [255, 100, 100] * (- i / (n_elements(isovalues) - 1.0) + 1.0)
isosurf->setProperty, source_color=1, $
fill_color=color, $
transparency=70
tool->refreshCurrentWindow
itPropertyReport, tool, isosurfaceIds[i]
endfor
end