1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
puts "================"
puts "OCC5990"
puts "================"
puts ""
#######################################################################################
# SetColor does not change color of wireframe entities in shading mode
######################################################################################
set BugNumber OCC5990
set x1 162
set y1 159
set x2 204
set y2 269
set x3 348
set y3 238
set KUB_R 0.00
set KUB_G 0.00
set KUB_B 0.83
set LINE_R 0.00
set LINE_G 0.00
set LINE_B 1.00
box b1 10 10 10
vertex v1 20 0 0
vertex v2 20 0 10
vertex v3 30 0 0
vertex v4 30 0 10
vertex v5 30 10 10
edge e1 v1 v2
edge e2 v3 v4
edge e3 v4 v5
compound e2 e3 c1
vinit
vdisplay b1 e1 c1
vsetdispmode 1
vfit
vsetcolor b1 BLUE1
vsetcolor e1 BLUE1
vsetcolor c1 BLUE1
checkcolor ${x1} ${y1} ${KUB_R} ${KUB_G} ${KUB_B}
checkcolor ${x2} ${y2} ${LINE_R} ${LINE_G} ${LINE_B}
checkcolor ${x3} ${y3} ${LINE_R} ${LINE_G} ${LINE_B}
set only_screen 1
|
