mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
31 lines
432 B
Plaintext
Executable File
31 lines
432 B
Plaintext
Executable File
pload QAcommands
|
|
puts "================"
|
|
puts "OCC322"
|
|
puts "================"
|
|
puts ""
|
|
|
|
restore [locate_data_file OCC322.brep] a
|
|
puts [checkshape a]
|
|
|
|
sewing result a
|
|
|
|
vinit
|
|
vdisplay result
|
|
vfit
|
|
|
|
set Yellow_R 1
|
|
set Yellow_G 1
|
|
set Yellow_B 0
|
|
|
|
set x1 204
|
|
set y1 297
|
|
|
|
set x2 251
|
|
set y2 230
|
|
|
|
QAGetPixelColor $x1 $y1 $Yellow_R $Yellow_G $Yellow_B
|
|
QAGetPixelColor $x2 $y2 $Yellow_R $Yellow_G $Yellow_B
|
|
|
|
set square 20000
|
|
set only_screen 1
|