mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
30 lines
594 B
Plaintext
30 lines
594 B
Plaintext
puts "============"
|
|
puts "OCC25723 Calculate the center of rotation taking into account structure visibility"
|
|
puts "============"
|
|
puts ""
|
|
|
|
box b1 0 0 0 10 10 10
|
|
box b2 0 0 20 10 10 10
|
|
box b3 0 0 -20 10 10 10
|
|
box b4 0 0 40 10 10 10
|
|
|
|
vclear
|
|
vinit View1
|
|
vaxo
|
|
vsetdispmode 1
|
|
|
|
# turn on solid selection
|
|
vselmode 6 1
|
|
vdisplay b1 b2 b3 b4
|
|
vfit
|
|
|
|
# select and hide boxes b2 b3 b4
|
|
vselect 100 100 400 410
|
|
verase
|
|
|
|
# rotation
|
|
vrotate -mouseStart 100 100 -mouseMove 300 300
|
|
if {"[vreadpixel 220 50 rgb name]" != "GOLDENROD2"} { puts "Error: Rotation is not correct" }
|
|
|
|
vdump ${imagedir}/${casename}.png
|