0030523: Visualization - Highlighting does not work anymore
[occt.git] / tests / v3d / manipulator / scale
1 puts "================================="
2 puts "AIS_Manipulator - scale an object"
3 puts "================================="
4
5 set anImage1 $imagedir/${casename}_1.png
6 set anImage2 $imagedir/${casename}_2.png
7
8 # -------------------------------------
9 # create manipulated and helper objects
10 # -------------------------------------
11
12 pcylinder c1_1  5 10
13 pcylinder c1_2  3 10
14 pcylinder c2 10 20
15 ttranslate c1_1 100 0 20
16 ttranslate c1_2 100 0 20
17 trotate c1_2 100 0 25 0 1 0 90
18 trotate c1_2 100 0 25 0 0 1 10
19 ttranslate c2 100 0 0
20
21 compound c1_1 c1_2 c1
22
23 # ------------------------------------
24 # display manipulated objects (test 1)
25 # ------------------------------------
26
27 vdisplay c1
28 vdisplay c2
29 vsetdispmode 1
30 vaxo
31 vfit
32
33 # ------------------
34 # attach manipulator
35 # ------------------
36
37 vmanipulator m -attach c1 -adjustPosition 1 -adjustSize 0 -enableModes 1 -size 40
38
39 # --------------------------
40 # test hilight and detection
41 # --------------------------
42
43 set mouse_pick {229 137}
44
45 vmoveto {*}$mouse_pick
46 vdump $anImage1
47
48 # -------------------------
49 # test scaling of an object
50 # -------------------------
51
52 set mouse_pick {229 137}
53 set mouse_drag {210 127}
54
55 vmoveto {*}$mouse_pick
56 vselect {*}$mouse_pick
57 vmanipulator m -startTransform {*}$mouse_pick
58 vmanipulator m -transform {*}$mouse_drag
59 vmanipulator m -stopTransform
60 vselect 0 0
61 vdump $anImage2
62
63 set to_dump_screen 0