DYNA/ITACA read/write support

Just stumbled over this mail: http://lists.swapbytes.de/archives/obspy-users/2014-January/001164.html
Just adding these files pretty much as is to make everybody aware of this development, I hope the original authors can comment on the status.
Why not use the constants defined earlier to make these `if`s shorter?