X-Git-Url: http://4ch.mooo.com/gitweb/?p=16.git;a=blobdiff_plain;f=src%2Flib%2F16_head.h;h=3b0322b05dac6d72da4d91e8f2cfb6d4199618af;hp=888773b93a617fe1d5fbd3d5e245bd53fac0684e;hb=932bccfc5b5fbfcc4cd6040cd7ef76f90cb9c1ea;hpb=f888d29c0ceaa48568b15f3269df70e6498c9dbc

diff --git a/src/lib/16_head.h b/src/lib/16_head.h
index 888773b9..3b0322b0 100755
--- a/src/lib/16_head.h
+++ b/src/lib/16_head.h
@@ -217,12 +217,35 @@ void regidump();
 	(byte & 0x02 ? '1' : '0'), \
 	(byte & 0x01 ? '1' : '0')
 
+#define WORD_TO_BINARY_PATTERN "%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c"
+#define WORD_TO_BINARY(word)  \
+	(word & 0x8000 ? '1' : '0'), \
+	(word & 0x4000 ? '1' : '0'), \
+	(word & 0x2000 ? '1' : '0'), \
+	(word & 0x1000 ? '1' : '0'), \
+	(word & 0x0800 ? '1' : '0'), \
+	(word & 0x0400 ? '1' : '0'), \
+	(word & 0x0200 ? '1' : '0'), \
+	(word & 0x0100 ? '1' : '0'), \
+	(word & 0x0080 ? '1' : '0'), \
+	(word & 0x0040 ? '1' : '0'), \
+	(word & 0x0020 ? '1' : '0'), \
+	(word & 0x0010 ? '1' : '0'), \
+	(word & 0x0008 ? '1' : '0'), \
+	(word & 0x0004 ? '1' : '0'), \
+	(word & 0x0002 ? '1' : '0'), \
+	(word & 0x0001 ? '1' : '0')
+
 #define NIBBLE_TO_BINARY_PATTERN "%c%c%c%c"
-#define NIBBLE_TO_BINARY(byte)  \
-	(byte & 0x08 ? '1' : '0'), \
-	(byte & 0x04 ? '1' : '0'), \
-	(byte & 0x02 ? '1' : '0'), \
-	(byte & 0x01 ? '1' : '0')
+#define NIBBLE_TO_BINARY(nibble)  \
+	(nibble & 0x08 ? '1' : '0'), \
+	(nibble & 0x04 ? '1' : '0'), \
+	(nibble & 0x02 ? '1' : '0'), \
+	(nibble & 0x01 ? '1' : '0')
+
+#define BOOLEAN_TO_BINARY_PATTERN "%c"
+#define BOOLEAN_TO_BINARY(boolean)  \
+	(boolean & 0x01 ? '1' : '0')
 
 #define PRINT_OPAQUE_STRUCT(p)  print_mem((p), sizeof(*(p)))