mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
108 lines
1.3 KiB
Plaintext
Executable File
108 lines
1.3 KiB
Plaintext
Executable File
puts "============"
|
|
puts "OCC23253"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Additional viewer 3d draw-commands vleft, vfront, ...
|
|
#######################################################################
|
|
|
|
set BugNumber OCC23253
|
|
|
|
box b 10 20 30
|
|
ptorus t 50 10
|
|
|
|
vinit
|
|
vsetdispmode 1
|
|
|
|
vdisplay b
|
|
vdisplay t
|
|
vfit
|
|
|
|
set status 0
|
|
|
|
#####
|
|
vaxo
|
|
#####
|
|
|
|
set x1 120
|
|
set y1 260
|
|
checkcolor $x1 $y1 0.91 0.64 0.11
|
|
|
|
set x2 120
|
|
set y2 260
|
|
checkcolor $x2 $y2 0.91 0.64 0.11
|
|
|
|
#####
|
|
vtop
|
|
#####
|
|
|
|
set x1 125
|
|
set y1 135
|
|
checkcolor $x1 $y1 1 1 0.92
|
|
|
|
set x2 220
|
|
set y2 200
|
|
checkcolor $x2 $y2 1 1 0.94
|
|
|
|
#####
|
|
vleft
|
|
#####
|
|
|
|
set x1 120
|
|
set y1 230
|
|
checkcolor $x1 $y1 0.92 0.66 0.11
|
|
|
|
set x2 190
|
|
set y2 170
|
|
checkcolor $x2 $y2 1 1 0.94
|
|
|
|
#####
|
|
vright
|
|
#####
|
|
|
|
set x1 120
|
|
set y1 230
|
|
checkcolor $x1 $y1 0.93 0.66 0.11
|
|
|
|
set x2 220
|
|
set y2 170
|
|
checkcolor $x2 $y2 1 1 0.94
|
|
|
|
#####
|
|
vfront
|
|
#####
|
|
|
|
set x1 120
|
|
set y1 230
|
|
checkcolor $x1 $y1 0.92 0.66 0.11
|
|
|
|
set x2 240
|
|
set y2 170
|
|
checkcolor $x2 $y2 1 1 0.94
|
|
|
|
#####
|
|
vback
|
|
#####
|
|
|
|
set x1 120
|
|
set y1 230
|
|
checkcolor $x1 $y1 0.93 0.66 0.11
|
|
|
|
set x2 170
|
|
set y2 170
|
|
checkcolor $x2 $y2 1 1 0.94
|
|
|
|
#####
|
|
vbottom
|
|
#####
|
|
|
|
set x1 90
|
|
set y1 300
|
|
checkcolor $x1 $y1 0.81 0.58 0.09
|
|
|
|
set x2 220
|
|
set y2 250
|
|
checkcolor $x2 $y2 1 1 0.94
|
|
|
|
set only_screen 1
|