mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
30 lines
706 B
Plaintext
30 lines
706 B
Plaintext
puts "========"
|
|
puts "0029303: Data Exchange - add RWObj_CafWriter tool for wavefront OBJ file"
|
|
puts "Write textured boat OBJ model into OBJ file"
|
|
puts "========"
|
|
|
|
pload XDE OCAF MODELING VISUALIZATION
|
|
Close D -silent
|
|
Close D1 -silent
|
|
ReadObj D1 [locate_data_file ship_boat.obj]
|
|
|
|
set aTmpObjBase "${imagedir}/${casename}_tmp"
|
|
set aTmpObj "${aTmpObjBase}.obj"
|
|
lappend occ_tmp_files $aTmpObj
|
|
lappend occ_tmp_files "${aTmpObjBase}.mtl"
|
|
lappend occ_tmp_files "${aTmpObjBase}_textures"
|
|
|
|
WriteObj D1 "$aTmpObj"
|
|
|
|
ReadObj D "$aTmpObj"
|
|
XGetOneShape s D
|
|
checknbshapes s -face 158 -compound 2
|
|
checktrinfo s -tri 27297 -nod 40496
|
|
|
|
vclear
|
|
vinit View1
|
|
XDisplay -dispMode 1 D
|
|
vaxo
|
|
vfit
|
|
vdump ${imagedir}/${casename}.png
|