2 puts "========================"
4 puts "========================"
5 ###############################################################
8 #MIT010717 : 3D selection management
9 #>>> MIT010717 : Selection management
11 # * Package OpenGl (OpenGl_execstruct.c)
13 # @ Avoid drawing quality problem on selected face,
14 # enable/disable Z offset on highlighted faces.
16 #>>> MIT010717 : drawing management
18 # * Package OpenGl (OpenGl_indexpolygon.c, ...)
20 # @ Avoid to undraw faces with confused points
21 ###############################################################
22 puts "========================"
30 puts "Only top face should be highlighted."
39 vmoveto $x_coord $y_coord
41 checkcolor $x_coord $y_coord 0 1 1
46 checkcolor $x_coord $y_coord 0.78 0.54 0.09