0029303: Data Exchange - add RWObj_CafWriter tool for wavefront OBJ file
[occt.git] / tests / de_mesh / obj_write / ship_boat
1 puts "========"
2 puts "0029303: Data Exchange - add RWObj_CafWriter tool for wavefront OBJ file"
3 puts "Write textured boat OBJ model into OBJ file"
4 puts "========"
5
6 pload XDE OCAF MODELING VISUALIZATION
7 Close D  -silent
8 Close D1 -silent
9 ReadObj D1 [locate_data_file ship_boat.obj]
10
11 set aTmpObjBase "${imagedir}/${casename}_tmp"
12 set aTmpObj "${aTmpObjBase}.obj"
13 lappend occ_tmp_files $aTmpObj
14 lappend occ_tmp_files "${aTmpObjBase}.mtl"
15 lappend occ_tmp_files "${aTmpObjBase}_textures"
16
17 WriteObj D1 "$aTmpObj"
18
19 ReadObj D "$aTmpObj"
20 XGetOneShape s D
21 checknbshapes s -face 158 -compound 2
22 checktrinfo s -tri 27297 -nod 40496
23
24 vclear
25 vinit View1
26 XDisplay -dispMode 1 D
27 vaxo
28 vfit
29 vdump ${imagedir}/${casename}.png