mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
45 lines
1022 B
Plaintext
45 lines
1022 B
Plaintext
puts "========"
|
|
puts "0031080: Data Exchange, STL reader - improve API for reading multi-domain STL files"
|
|
puts "========"
|
|
puts ""
|
|
|
|
pload ALL
|
|
|
|
# create two boxes with mesh
|
|
box b1 5 5 5
|
|
box b2 5 5 5
|
|
ttranslate b2 10 10 10
|
|
incmesh b1 0.1
|
|
incmesh b2 0.1
|
|
|
|
# write each box to Ascii STL
|
|
writestl b1 $imagedir/${casename}_1.stl 0
|
|
writestl b2 $imagedir/${casename}_2.stl 0
|
|
|
|
set aTmpStl "${imagedir}/${casename}_cat.stl"
|
|
file delete $aTmpStl
|
|
set file_res [open $aTmpStl a+]
|
|
|
|
# cat each stl files content to file_res
|
|
set file_stl [open $imagedir/${casename}_1.stl r]
|
|
set buffer [read $file_stl];
|
|
puts $file_res $buffer
|
|
close $file_stl
|
|
|
|
set file_stl [open $imagedir/${casename}_2.stl r]
|
|
set buffer [read $file_stl];
|
|
puts $file_res $buffer
|
|
close $file_stl
|
|
close $file_res
|
|
|
|
# load multi-domain STL
|
|
readstl result ${imagedir}/${casename}_cat.stl -multi
|
|
|
|
vinit
|
|
vdisplay result -dispmode 1
|
|
vfit
|
|
|
|
checknbshapes result -face 2 -compound 1
|
|
checktrinfo result -tri 24 -nod 16
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|