0029303: Data Exchange - add RWObj_CafWriter tool for wavefront OBJ file

[occt.git] / tests / de_mesh / obj_write / ship_boat

diff --git a/tests/de_mesh/obj_write/ship_boat b/tests/de_mesh/obj_write/ship_boat
new file mode 100644 (file)
index 0000000..efce97c
--- /dev/null
+++ b/tests/de_mesh/obj_write/ship_boat
@@ -0,0 +1,29 @@
+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