#Category: Visualization
#Title: Penrose triangle on perspective view
-pload MODELING VISUALIZATION
+pload MODELING VISUALIZATION
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
# procedure to define box dimensions
set scale 1.
set aBallPath [locate_data_file occ/Ball.brep]
pload MODELING VISUALIZATION
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
# Setup 3D viewer
vclear
#Title: Path tracing - Cube
pload MODELING VISUALIZATION
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
# setup 3D viewer content
vclear
set aBallPath [locate_data_file occ/Ball.brep]
pload MODELING VISUALIZATION
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
# Setup 3D viewer
vclear
#Category: Visualization
#Title: Ray tracing
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+pload VISUALIZATION
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
# make bottle by calling another script
source [file join [file dirname [info script]] bottle.tcl]
SetName D {*}[XFindComponent D tr] "Rough"
SetName D [XFindShape D tr] "Rough"
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
vclear
vinit View1 -width 768 -height 768
vfront
puts "================"
pload MODELING VISUALIZATION
+
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
box b 10 10 10
vdisplay b
vsetdispmode 1
checkcolor 205 100 0.64 0.56 0.08
puts "Check result by image: selection highlight should show only visible edges"
-checkview -screenshot -3d -path ${imagedir}/${test_image}.png
+vdump ${imagedir}/${casename}.png
pload XDE OCAF MODELING VISUALIZATION
catch { Close D }
+# PBR requires OpenGL 3.0+ on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
pload XDE OCAF MODELING VISUALIZATION
catch { Close D }
+# PBR requires OpenGL 3.0+ on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
pload XDE OCAF MODELING VISUALIZATION
catch { Close D }
+# PBR requires OpenGL 3.0+ on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
source $env(CSF_OCCTSamplesPath)/tcl/dimensions.tcl
vcaps -ffp 0
+# PBR requires OpenGL 3.0+ on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
vrenderparams -shadingModel pbr
vlight -clear
vlight -add ambient -intensity 1
set aFile ${imagedir}/propeller.mkv
file delete -force ${aFile}
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+pload VISUALIZATION
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
source $env(CSF_OCCTTestsPath)/v3d/anim/propeller
vraytrace 1
vrenderparams -msaa 8
vrenderparams -fsaa 1
XProgress +g
-vanimation anim -play -record ${aFile} 1920 1080 -vcodec ffv1 -fps 30 -speed 0.5
\ No newline at end of file
+vanimation anim -play -record ${aFile} 1920 1080 -vcodec ffv1 -fps 30 -speed 0.5
puts "============"
puts ""
+# PBR doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
set aCubeMapPNG [locate_data_file cubemap_labels.png]
set aCubeMapDDS [locate_data_file cubemap_labels.dds]
puts "========"
pload XDE OCAF VISUALIZATION MODELING
+
+# PBR doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
catch { Close D }
vclear
puts "Spheres grid with different roughness values"
puts "========"
+# PBR doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
vclear
vclose ALL
source $env(CSF_OCCTSamplesPath)/tcl/vis_pbr_spheres.tcl
pload XDE OCAF MODELING VISUALIZATION
+# PBR doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
vclear
vclose ALL
puts "Test various Shading Models assigned per-object"
puts "========"
+# PBR doesn't work with Compatible Profile on macOS
+#if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
# setup viewer
vclear
vclose ALL
puts "Test various Shading Models assigned per-object with transparency"
puts "========"
+# PBR doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
# setup viewer
vclear
vclose ALL
puts "0024855: Revision of parameters of standard materials"
puts "========"
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
# custom shapes
set aShape [locate_data_file occ/Top.brep]
puts "========"
pload MODELING XDE OCAF VISUALIZATION
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
box b 0.5 1.0 -0.5 3 1 1
psphere s1 0.5
psphere s2 0.5
+# PBR requires OpenGL 3.0+ on macOS
+pload VISUALIZATION
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
source $env(CSF_OCCTSamplesPath)/tcl/materials.tcl
vlight -change 0 -intensity 5
vrenderparams -shadingModel PBR -msaa 0
puts "========="
puts ""
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+pload VISUALIZATION
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
source $env(CSF_OCCTSamplesPath)/tcl/materials.tcl
vrenderparams -raytrace -msaa 0
set subgroup "raytrace"
-vinit View1
\ No newline at end of file
+
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
+vinit View1
puts "Spheres grid with different roughness values"
puts "========"
+cpulimit 600
+
vclear
vclose ALL
source $env(CSF_OCCTSamplesPath)/tcl/vis_pbr_spheres.tcl