245cbf94 |
1 | puts "=============" |
2 | puts "0030669: Visualization - AIS_Manipulator ignores parent transformation" |
3 | puts "=============" |
4 | |
5 | pload MODELING VISUALIZATION |
6 | box b1 0 0 0 1 2 3 |
7 | box b2 2 0 0 2 1 3 |
8 | vclear |
9 | vinit View1 |
10 | vpoint p0 0 0 0 |
11 | vdisplay -dispMode 1 b1 b2 |
12 | vchild b1 -add b2 |
13 | vlocation b1 -setRotation 1 0 0 1 -setLocation 4 -2 0 |
14 | vfit |
15 | vmanipulator m -attach b2 |
16 | |
17 | set mouse_pick {265 265} |
18 | set mouse_drag {265 200} |
19 | |
20 | vmoveto {*}$mouse_pick |
21 | vselect {*}$mouse_pick |
22 | vmanipulator m -startTransform {*}$mouse_pick |
23 | vmanipulator m -transform {*}$mouse_drag |
24 | vmanipulator m -stopTransform |
25 | vselect 0 0 |
26 | |
27 | if { [string trim [vlocation b2 -location]] != "0 1.80711 0" } { puts "Error: wrong location" } |
28 | vdump $imagedir/${casename}.png |