Changeset 5449 for branches/1.4/gui/scripts
- Timestamp:
- May 6, 2015, 7:38:28 PM (9 years ago)
- Location:
- branches/1.4
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.4
-
branches/1.4/gui/scripts/flowvisviewer.tcl
r5369 r5449 3 3 # COMPONENT: flowvisviewer - 3D flow rendering 4 4 # 5 # This widget performs volume and flow rendering on 3D scalar/vector datasets.6 # It connects to the Flowvis server running on a rendering farm, transmits7 # data, and displays the results.5 # This widget performs volume and flow rendering on 3D scalar/vector datasets. 6 # It connects to the Nanovis server running on a rendering farm, 7 # transmits data, and displays the results. 8 8 # ====================================================================== 9 9 # AUTHOR: Michael McLennan, Purdue University 10 10 # Copyright (c) 2004-2012 HUBzero Foundation, LLC 11 11 # 12 # See the file "license.terms" for information on usage and redistribution of13 # this file, and for a DISCLAIMER OF ALL WARRANTIES.12 # See the file "license.terms" for information on usage and 13 # redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. 14 14 # ====================================================================== 15 15 package require Itk … … 134 134 private variable _dataset2flow ;# Maps dataobj-component to a flow. 135 135 136 private variable _reset 1 ;# Connection to server has been reset 137 private variable _click ;# info used for rotate operations136 private variable _reset 1 ;# Connection to server has been reset. 137 private variable _click ;# Info used for rotate operations. 138 138 private variable _limits ;# Autoscale min/max for all axes 139 139 private variable _view ;# View params for 3D view … … 280 280 } 281 281 pack $itk_component(reset) -side top -padx 2 -pady 2 282 Rappture::Tooltip::for $itk_component(reset) "Reset the view to the default zoom level" 282 Rappture::Tooltip::for $itk_component(reset) \ 283 "Reset the view to the default zoom level" 283 284 284 285 itk_component add zoomin { … … 957 958 } 958 959 959 # Ensure that the global thickness setting (in the slider settings widget)960 # is used for the active transfer-function. Update the values in the961 # _settings varible.960 # Ensure that the global thickness setting (in the slider 961 # settings widget) is used for the active transfer-function. Update 962 # the values in the _settings varible. 962 963 963 964 set value $_settings(-thickness) … … 1075 1076 # the slave interpreter. The purpose is to collect the min/max of the 1076 1077 # volume sent to the render server. Since the client (flowvisviewer) 1077 # doesn't parse 3D data formats, we rely on the server ( flowvis) to1078 # doesn't parse 3D data formats, we rely on the server (nanovis) to 1078 1079 # tell us what the limits are. Once we've received the limits to all 1079 1080 # the data we've sent (tracked by _recvdDatasets) we can then determine 1080 # what the transfer functions are for these # volumes. 1081 # what the transfer functions are for these volumes. 1082 # 1081 1083 # 1082 1084 # Note: There is a considerable tradeoff in having the server report … … 1612 1614 # server parses the 3D data and sends back the limits via ReceiveData.] 1613 1615 # 1614 # FIXME: The current way we generate transfer-function names completely1615 # ignores the -markers option. The problem is that we are forced1616 # to compute the name from an increasing complex set of values:1617 # color, levels, marker, opacity. I think we're stuck doing it1618 # now.1619 #1620 1616 itcl::body Rappture::FlowvisViewer::NameTransferFunction { dataobj cname } { 1621 1617 array set style { … … 1659 1655 # of the volumes (the first in the list) using the transfer-function as a 1660 1656 # reference. 1661 #1662 # FIXME: The current way we generate transfer-function names completely1663 # ignores the -markers option. The problem is that we are forced1664 # to compute the name from an increasing complex set of values:1665 # color, levels, marker, opacity. I think the cow's out of the1666 # barn on this one.1667 1657 1668 1658 if { ![info exists _isomarkers($tf)] } { … … 1854 1844 } 1855 1845 1856 # ----------------------------------------------------------------------1857 # USAGE: UpdateTransferFunctions1858 # ----------------------------------------------------------------------1859 1846 itcl::body Rappture::FlowvisViewer::updateTransferFunctions {} { 1860 1847 $_dispatcher event -after 100 !send_transfunc
Note: See TracChangeset
for help on using the changeset viewer.