projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Adjusting bugs group for current state of OCCT
[occt.git]
/
tests
/
bugs
/
vis
/
bug281_1
1
puts "========"
2
puts "OCC281"
3
puts "========"
4
5
vinit
6
7
set x 205
8
set y 208
9
set TypeOfMarker 0
10
11
set scale 50.0521
12
set center_X 0
13
set center_Y 0
14
set proj_X 0.57735
15
set proj_Y -0.57735
16
set proj_Z 0.57735
17
set up_X -0.408248
18
set up_Y 0.408248
19
set up_Z 0.816497
20
set at_X 0
21
set at_Y 0
22
set at_Z 0
23
24
QASetViewCharac ${scale} ${center_X} ${center_Y} ${proj_X} ${proj_Y} ${proj_Z} ${up_X} ${up_Y} ${up_Z} ${at_X} ${at_Y} ${at_Z}
25
26
OCC281 ${x} ${y} ${TypeOfMarker}
27
OCC281 ${x} ${y} ${TypeOfMarker}
28
29
OCC281 200 200 0
30
OCC281 200 200 0
31
puts "Type of marker mast be blue point!"
32
33
set only_screen 1