puts "============"
-puts "OCC25723"
-puts "Calculate the center of rotation taking into account structure visibility"
+puts "OCC25723 Calculate the center of rotation taking into account structure visibility"
puts "============"
puts ""
-set x_start_sel_coord 100
-set y_start_sel_coord 104
-
-set x_end_sel_coord 400
-set y_end_sel_coord 400
-
-set x_mouse_start_coord 100
-set y_mouse_start_coord 100
-
-set x_mouse_move_coord 300
-set y_mouse_move_coord 300
-
-set x_check_coord 220
-set y_check_coord 50
-
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
-vinit View1
vclear
+vinit View1
vaxo
vsetdispmode 1
vdisplay b1 b2 b3 b4
vfit
-# select solid
-vselect ${x_start_sel_coord} ${y_start_sel_coord} ${x_end_sel_coord} ${y_end_sel_coord}
-
-# hide selected solids
+# select and hide boxes b2 b3 b4
+vselect 100 100 400 410
verase
# rotation
-vrotate -mouseStart ${x_mouse_start_coord} ${y_mouse_start_coord} -mouseMove ${x_mouse_move_coord} ${y_mouse_move_coord}
-
-if {"[vreadpixel ${x_check_coord} ${y_check_coord} rgb name]" != "GOLDENROD2"} {
- puts "Error: Rotation is not correct"
-}
+vrotate -mouseStart 100 100 -mouseMove 300 300
+if {"[vreadpixel 220 50 rgb name]" != "GOLDENROD2"} { puts "Error: Rotation is not correct" }
-checkview -screenshot -3d -path ${imagedir}/${test_image}.png
+vdump ${imagedir}/${casename}.png