--- /dev/null
+
+load Transform3Ddicom
+load vtk
+load std
+
+define MetaImageDicomInfoWriter Transform3Ddicom
+
+description "Read MHD and MHD_dicom"
+author "davila.eduardo@creatis.univ-lyon1.fr"
+category "complex box, read/write"
+
+
+new MagicBox magicboxFilename
+
+new ConcatStrings catStr
+ connect magicboxFilename.Out catStr.In1
+ set catStr.In2 "_dicominfo"
+
+new MetaImageWriter_DicomInfo writerdicominfo
+ connect catStr.Out writerdicominfo.Filename
+
+new MetaImageWriter metaimagewriter
+ connect magicboxFilename.Out metaimagewriter.Filename
+
+
+// ----Require inputs----
+ input IPP writerdicominfo.IPP "Image Position Patient"
+ input OPP writerdicominfo.IOP "Image Orienation Patient"
+ input PixelSpacing writerdicominfo.PixelSpacing "Spacing of the image"
+ input Image magicboxFilename.In "Input image"
+ input In metaimagewriter.Filename "File Name"
+
+
+// ----Optional inputs----
+// input Colour actor.Colour "Color of the surface"
+// input Opacity actor.Opacity "Opacity of the surface"
+
+// ----output----
+// output Out actor.Out "Actor vtk"
+
+endefine
+