mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-12 02:40:22 +08:00
a15fed9b86
- Moved tcl samples to resource folder. - Clean up cmake from samples related settings. - Removed CSharp samples from the repository. - Removed MFC samples from the repository. - Removed Qt samples from the repository. - Removed Inspector samples from the repository. - Removed glwin samples from the repository. - Removed webgl samples from the repository. - Removed xaml samples from the repository. - Removed Java samples from the repository.
19 lines
534 B
Plaintext
19 lines
534 B
Plaintext
puts "============"
|
|
puts "0031279: Visualization, TKOpenGl - environment background is misplaced within Ray-Tracing"
|
|
puts "============"
|
|
puts ""
|
|
|
|
source $env(CSF_OCCTResourcePath)/samples/tcl/raytrace.tcl
|
|
vrenderparams -env
|
|
vcamera -persp
|
|
vviewparams -scale 1.3 -proj 0.57 -0.57 0.57 -up -0.4 0.4 0.8 -at -62 -111 -15
|
|
vtextureenv on 1
|
|
|
|
if { [vreadpixel 100 100 rgb name] == "BLACK" } { puts "ERROR: background is misplaced" }
|
|
|
|
vcamera -persp
|
|
vdump $imagedir/${casename}_persp.png
|
|
|
|
vcamera -ortho
|
|
vdump $imagedir/${casename}_ortho.png
|