Changeset 4191 for trunk/gui/scripts
- Timestamp:
- Feb 21, 2014 3:57:25 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/nanovisviewer.tcl
r4188 r4191 225 225 -diffuse 40 226 226 -light2side 1 227 -opacity 100 227 -opacity 50 228 -outlinevisible 0 228 229 -qw 0.853553 229 230 -qx -0.353553 … … 233 234 -specularlevel 30 234 235 -thickness 350 235 -opacity 50236 236 -volume 1 237 237 -volumevisible 1 … … 558 558 -color BCGYR 559 559 -levels 6 560 -opacity 1.0561 560 -markers "" 562 561 } … … 1264 1263 } 1265 1264 "-ambient" { 1265 # Other parts of the code use the ambient setting to 1266 # tell if the component settings have been initialized 1267 if { ![info exists _settings($_current${what})] } { 1268 InitComponentSettings $_current 1269 } 1270 set _settings($_current${what}) $_settings($what) 1266 1271 set val $_settings($what) 1267 1272 set val [expr {0.01*$val}] … … 1271 1276 } 1272 1277 "-diffuse" { 1278 set _settings($_current${what}) $_settings($what) 1273 1279 set val $_settings($what) 1274 1280 set val [expr {0.01*$val}] … … 1278 1284 } 1279 1285 "-specularlevel" { 1286 set _settings($_current${what}) $_settings($what) 1280 1287 set val $_settings($what) 1281 1288 set val [expr {0.01*$val}] … … 1285 1292 } 1286 1293 "-specularexponent" { 1294 set _settings($_current${what}) $_settings($what) 1287 1295 set val $_settings($what) 1288 1296 foreach tag [GetDatasetsWithComponent $_current] { … … 1421 1429 -color BCGYR 1422 1430 -levels 6 1423 -opacity 1.01424 1431 -markers "" 1425 1432 } … … 1468 1475 -color BCGYR 1469 1476 -levels 6 1470 -opacity 1.01471 1477 -markers "" 1472 1478 } … … 2216 2222 $cname-diffuse 40 2217 2223 $cname-light2side 1 2218 $cname-opacity 100 2219 $cname-outline 0 2224 $cname-opacity 50 2220 2225 $cname-specularexponent 90 2221 2226 $cname-specularlevel 30 2222 2227 $cname-thickness 350 2223 $cname-opacity 502224 2228 $cname-volumevisible 1 2225 2229 }] … … 2243 2247 set _settings(-light2side) $_settings($cname-light2side) 2244 2248 set _settings(-opacity) $_settings($cname-opacity) 2245 set _settings(-outline) $_settings($cname-outline)2246 2249 set _settings(-specularexponent) $_settings($cname-specularexponent) 2247 2250 set _settings(-specularlevel) $_settings($cname-specularlevel) 2248 2251 set _settings(-thickness) $_settings($cname-thickness) 2249 set _settings(-opacity) $_settings($cname-opacity)2250 2252 set _settings(-volumevisible) $_settings($cname-volumevisible) 2251 2253 $itk_component(colormap) value $_settings($cname-colormap) … … 2352 2354 InitComponentSettings $cname 2353 2355 } 2354 set max 1.0 ; #$_settings($tag-opacity)2355 2356 2356 2357 set isovalues [$_transferFunctionEditors($cname) values] 2357 2358 2358 # Ensure that the global opacity and thickness settings (in the slider 2359 # settings widgets) are used for the active transfer-function. Update 2360 # the values in the _settings varible. 2361 set opacity [expr { double($_settings($cname-opacity)) * 0.01 }] 2362 2359 # Currently using volume shading opacity to scale opacity in 2360 # the volume shader. The transfer function always sets full 2361 # opacity 2362 set max 1.0 2363 2364 # Use the component-wise thickness setting from the slider 2365 # settings widget 2363 2366 # Scale values between 0.00001 and 0.01000 2364 2367 set delta [expr {double($_settings($cname-thickness)) * 0.0001}] … … 2573 2576 } 2574 2577 } 2575 # Multiply each component by the global opacity value.2576 2578 return "" 2577 2579 }
Note: See TracChangeset
for help on using the changeset viewer.