X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=pc-tools%2Fldc2%2Fsrc%2Fdata_block.cpp;fp=pc-tools%2Fldc2%2Fsrc%2Fdata_block.cpp;h=15702b56661acf21752c8287ddbda36175496ab8;hb=97b26985c0190e2fded0f098819a23e892b381f0;hp=0000000000000000000000000000000000000000;hpb=70896a91a15781c49bce37b0101466c83c51dd24;p=h316.git

diff --git a/pc-tools/ldc2/src/data_block.cpp b/pc-tools/ldc2/src/data_block.cpp
new file mode 100644
index 0000000..15702b5
--- /dev/null
+++ b/pc-tools/ldc2/src/data_block.cpp
@@ -0,0 +1,27 @@
+#include <stdlib.h>
+#include <string.h>
+
+#include "data_block.hh"
+#include "data_block_0.hh"
+
+
+data_block::data_block(tape_block& idol)
+  :tape_block(idol)
+{
+}
+
+data_block::~data_block(){
+}
+
+int data_block::get_type(){
+  if ((init_state==TBS_OK)&&word_data)
+    return (word_data[0]&0xf000)>>12;
+  else
+ return block_type;
+}
+
+int data_block::get_subtype(){
+  if (get_type()==0)
+    return (new data_block_0(*this))->get_subtype();
+  else return 0;
+}