fixed an issue with EMS_INT becuase i learned there is 2 wwww

diff --git a/DEBUG.16B b/DEBUG.16B
new file mode 100755 (executable)
index 0000000..7dee836
--- /dev/null
+++ b/DEBUG.16B
@@ -0,0 +1,210 @@
+\e[0mSeg:0      Size:5360       Owner:0x0\r
+\e[41;31m+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m\e[42;32m0\r
+\e[0m\e[0mSeg:14f0       Size:256        Owner:0xed5\r
+\e[44;34m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:15f0       Size:256        Owner:0xcd6\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:16f0       Size:256        Owner:0xcd8\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:17f0       Size:256        Owner:0xcda\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:18f0       Size:256        Owner:0xcdc\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:19f0       Size:256        Owner:0xcde\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:1af0       Size:256        Owner:0xce0\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:1bf0       Size:256        Owner:0xce2\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:1cf0       Size:256        Owner:0xce4\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:1df0       Size:256        Owner:0xce6\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:1ef0       Size:256        Owner:0xce8\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:1ff0       Size:256        Owner:0xcea\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:20f0       Size:256        Owner:0xcec\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:21f0       Size:256        Owner:0xcee\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:22f0       Size:256        Owner:0xcf0\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:23f0       Size:256        Owner:0xcf2\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:24f0       Size:256        Owner:0xcf4\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:25f0       Size:256        Owner:0xcf6\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:26f0       Size:256        Owner:0xcf8\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:27f0       Size:256        Owner:0xcfa\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:28f0       Size:256        Owner:0xcfc\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:29f0       Size:256        Owner:0xcfe\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2af0       Size:256        Owner:0xd00\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2bf0       Size:256        Owner:0xd02\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2cf0       Size:256        Owner:0xd04\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2df0       Size:256        Owner:0xd06\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2ef0       Size:256        Owner:0xd08\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2ff0       Size:256        Owner:0xd0a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:30f0       Size:256        Owner:0xd0c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:31f0       Size:256        Owner:0xd0e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:32f0       Size:256        Owner:0xd10\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:33f0       Size:256        Owner:0xd12\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:34f0       Size:256        Owner:0xd14\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:35f0       Size:256        Owner:0xd16\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:36f0       Size:256        Owner:0xd18\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:37f0       Size:256        Owner:0xd1a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:38f0       Size:256        Owner:0xd1c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:39f0       Size:256        Owner:0xd1e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3af0       Size:256        Owner:0xd20\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3bf0       Size:256        Owner:0xd22\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3cf0       Size:256        Owner:0xd24\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3df0       Size:256        Owner:0xd26\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3ef0       Size:256        Owner:0xd28\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3ff0       Size:256        Owner:0xd2a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:40f0       Size:256        Owner:0xd2c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:41f0       Size:256        Owner:0xd2e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:42f0       Size:256        Owner:0xd30\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:43f0       Size:256        Owner:0xd32\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:44f0       Size:256        Owner:0xd34\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:45f0       Size:256        Owner:0xd36\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:46f0       Size:256        Owner:0xd38\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:47f0       Size:256        Owner:0xd3a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:48f0       Size:256        Owner:0xd3c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:49f0       Size:256        Owner:0xd3e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4af0       Size:256        Owner:0xd40\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4bf0       Size:256        Owner:0xd42\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4cf0       Size:256        Owner:0xd44\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4df0       Size:256        Owner:0xd46\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4ef0       Size:256        Owner:0xd48\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4ff0       Size:256        Owner:0xd4a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:50f0       Size:256        Owner:0xd4c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:51f0       Size:256        Owner:0xd4e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:52f0       Size:256        Owner:0xd50\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:53f0       Size:256        Owner:0xd52\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:54f0       Size:256        Owner:0xd54\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:55f0       Size:256        Owner:0xd56\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:56f0       Size:256        Owner:0xd58\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:57f0       Size:256        Owner:0xd5a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:58f0       Size:256        Owner:0xd5c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:59f0       Size:256        Owner:0xd5e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5af0       Size:256        Owner:0xd60\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5bf0       Size:256        Owner:0xd62\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5cf0       Size:256        Owner:0xd64\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5df0       Size:256        Owner:0xd66\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5ef0       Size:256        Owner:0xd68\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5ff0       Size:256        Owner:0xd6a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:60f0       Size:256        Owner:0xd6c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:61f0       Size:256        Owner:0xd6e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:62f0       Size:256        Owner:0xd70\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:63f0       Size:256        Owner:0xd72\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:64f0       Size:256        Owner:0xd74\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:65f0       Size:256        Owner:0xd76\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:66f0       Size:256        Owner:0xd78\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:67f0       Size:256        Owner:0xd7a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:68f0       Size:256        Owner:0xd7c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:69f0       Size:256        Owner:0xd7e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6af0       Size:256        Owner:0xd80\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6bf0       Size:256        Owner:0xd82\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6cf0       Size:256        Owner:0xd84\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6df0       Size:256        Owner:0xd86\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6ef0       Size:256        Owner:0xd88\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6ff0       Size:256        Owner:0xd8a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:70f0       Size:256        Owner:0xd8c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:71f0       Size:256        Owner:0xd8e\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:72f0       Size:256        Owner:0xd90\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:73f0       Size:256        Owner:0xd92\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:74f0       Size:256        Owner:0xd94\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:75f0       Size:256        Owner:0xd96\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:76f0       Size:256        Owner:0xd98\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:77f0       Size:256        Owner:0xd9a\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:78f0       Size:256        Owner:0xd9c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:79f0       Size:273        Owner:0xfde\r
+\e[44;34m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:9fde       Size:32802      Owner:0x0\r
+\e[41;31m\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:9ffe       Size:24577      Owner:0x0\r
+\e[41;31m+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m
\ No newline at end of file

diff --git a/DEBUG.16W b/DEBUG.16W
index 4ca891ca0eb41439e9caa96481bf1c39f66a3775..e889f155319aec85c7204ec618922f551e516241 100755 (executable)
--- a/DEBUG.16W
+++ b/DEBUG.16W
@@ -1,210 +1,210 @@
-\e[0mSeg:0      Size:10194      Owner:0x0\r
+\e[0mSeg:0      Size:10182      Owner:0x0\r
 \e[41;31m++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m\e[42;32m0\r
-\e[0m\e[0mSeg:27d2       Size:256        Owner:0x1938\r
+\e[0m\e[0mSeg:27c6       Size:256        Owner:0x1938\r
 \e[44;34m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2934       Size:44 Owner:0x0\r
+\e[0m\e[0mSeg:2928       Size:44 Owner:0x0\r
 \e[41;31m++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2960       Size:256        Owner:0x1726\r
+\e[0m\e[0mSeg:2954       Size:256        Owner:0x1726\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2a60       Size:256        Owner:0x1728\r
+\e[0m\e[0mSeg:2a54       Size:256        Owner:0x1728\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2b60       Size:256        Owner:0x172a\r
+\e[0m\e[0mSeg:2b54       Size:256        Owner:0x172a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2c60       Size:256        Owner:0x172c\r
+\e[0m\e[0mSeg:2c54       Size:256        Owner:0x172c\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:2d54       Size:256        Owner:0x172e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2d60       Size:256        Owner:0x172e\r
+\e[0m\e[0mSeg:2e54       Size:256        Owner:0x1730\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2e60       Size:256        Owner:0x1730\r
+\e[0m\e[0mSeg:2f54       Size:256        Owner:0x1732\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2f60       Size:256        Owner:0x1732\r
+\e[0m\e[0mSeg:3054       Size:256        Owner:0x1734\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3060       Size:256        Owner:0x1734\r
+\e[0m\e[0mSeg:3154       Size:256        Owner:0x1736\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3254       Size:256        Owner:0x1738\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3160       Size:256        Owner:0x1736\r
+\e[0m\e[0mSeg:3354       Size:256        Owner:0x173a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3260       Size:256        Owner:0x1738\r
+\e[0m\e[0mSeg:3454       Size:256        Owner:0x173c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3360       Size:256        Owner:0x173a\r
+\e[0m\e[0mSeg:3554       Size:256        Owner:0x173e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3460       Size:256        Owner:0x173c\r
+\e[0m\e[0mSeg:3654       Size:256        Owner:0x1740\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3754       Size:256        Owner:0x1742\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3560       Size:256        Owner:0x173e\r
+\e[0m\e[0mSeg:3854       Size:256        Owner:0x1744\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3660       Size:256        Owner:0x1740\r
+\e[0m\e[0mSeg:3954       Size:256        Owner:0x1746\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3760       Size:256        Owner:0x1742\r
+\e[0m\e[0mSeg:3a54       Size:256        Owner:0x1748\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3860       Size:256        Owner:0x1744\r
+\e[0m\e[0mSeg:3b54       Size:256        Owner:0x174a\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:3c54       Size:256        Owner:0x174c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3960       Size:256        Owner:0x1746\r
+\e[0m\e[0mSeg:3d54       Size:256        Owner:0x174e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3a60       Size:256        Owner:0x1748\r
+\e[0m\e[0mSeg:3e54       Size:256        Owner:0x1750\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3b60       Size:256        Owner:0x174a\r
+\e[0m\e[0mSeg:3f54       Size:256        Owner:0x1752\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3c60       Size:256        Owner:0x174c\r
+\e[0m\e[0mSeg:4054       Size:256        Owner:0x1754\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4154       Size:256        Owner:0x1756\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3d60       Size:256        Owner:0x174e\r
+\e[0m\e[0mSeg:4254       Size:256        Owner:0x1758\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3e60       Size:256        Owner:0x1750\r
+\e[0m\e[0mSeg:4354       Size:256        Owner:0x175a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3f60       Size:256        Owner:0x1752\r
+\e[0m\e[0mSeg:4454       Size:256        Owner:0x175c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4060       Size:256        Owner:0x1754\r
+\e[0m\e[0mSeg:4554       Size:256        Owner:0x175e\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4654       Size:256        Owner:0x1760\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4160       Size:256        Owner:0x1756\r
+\e[0m\e[0mSeg:4754       Size:256        Owner:0x1762\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4260       Size:256        Owner:0x1758\r
+\e[0m\e[0mSeg:4854       Size:256        Owner:0x1764\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4360       Size:256        Owner:0x175a\r
+\e[0m\e[0mSeg:4954       Size:256        Owner:0x1766\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4460       Size:256        Owner:0x175c\r
+\e[0m\e[0mSeg:4a54       Size:256        Owner:0x1768\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:4b54       Size:256        Owner:0x176a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4560       Size:256        Owner:0x175e\r
+\e[0m\e[0mSeg:4c54       Size:256        Owner:0x176c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4660       Size:256        Owner:0x1760\r
+\e[0m\e[0mSeg:4d54       Size:256        Owner:0x176e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4760       Size:256        Owner:0x1762\r
+\e[0m\e[0mSeg:4e54       Size:256        Owner:0x1770\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4860       Size:256        Owner:0x1764\r
+\e[0m\e[0mSeg:4f54       Size:256        Owner:0x1772\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5054       Size:256        Owner:0x1774\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4960       Size:256        Owner:0x1766\r
+\e[0m\e[0mSeg:5154       Size:256        Owner:0x1776\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4a60       Size:256        Owner:0x1768\r
+\e[0m\e[0mSeg:5254       Size:256        Owner:0x1778\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4b60       Size:256        Owner:0x176a\r
+\e[0m\e[0mSeg:5354       Size:256        Owner:0x177a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4c60       Size:256        Owner:0x176c\r
+\e[0m\e[0mSeg:5454       Size:256        Owner:0x177c\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5554       Size:256        Owner:0x177e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4d60       Size:256        Owner:0x176e\r
+\e[0m\e[0mSeg:5654       Size:256        Owner:0x1780\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4e60       Size:256        Owner:0x1770\r
+\e[0m\e[0mSeg:5754       Size:256        Owner:0x1782\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4f60       Size:256        Owner:0x1772\r
+\e[0m\e[0mSeg:5854       Size:256        Owner:0x1784\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5060       Size:256        Owner:0x1774\r
+\e[0m\e[0mSeg:5954       Size:256        Owner:0x1786\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5a54       Size:256        Owner:0x1788\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5160       Size:256        Owner:0x1776\r
+\e[0m\e[0mSeg:5b54       Size:256        Owner:0x178a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5260       Size:256        Owner:0x1778\r
+\e[0m\e[0mSeg:5c54       Size:256        Owner:0x178c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5360       Size:256        Owner:0x177a\r
+\e[0m\e[0mSeg:5d54       Size:256        Owner:0x178e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5460       Size:256        Owner:0x177c\r
+\e[0m\e[0mSeg:5e54       Size:256        Owner:0x1790\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:5f54       Size:256        Owner:0x1792\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5560       Size:256        Owner:0x177e\r
+\e[0m\e[0mSeg:6054       Size:256        Owner:0x1794\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5660       Size:256        Owner:0x1780\r
+\e[0m\e[0mSeg:6154       Size:256        Owner:0x1796\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5760       Size:256        Owner:0x1782\r
+\e[0m\e[0mSeg:6254       Size:256        Owner:0x1798\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5860       Size:256        Owner:0x1784\r
+\e[0m\e[0mSeg:6354       Size:256        Owner:0x179a\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6454       Size:256        Owner:0x179c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5960       Size:256        Owner:0x1786\r
+\e[0m\e[0mSeg:6554       Size:256        Owner:0x179e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5a60       Size:256        Owner:0x1788\r
+\e[0m\e[0mSeg:6654       Size:256        Owner:0x17a0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5b60       Size:256        Owner:0x178a\r
+\e[0m\e[0mSeg:6754       Size:256        Owner:0x17a2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5c60       Size:256        Owner:0x178c\r
+\e[0m\e[0mSeg:6854       Size:256        Owner:0x17a4\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6954       Size:256        Owner:0x17a6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5d60       Size:256        Owner:0x178e\r
+\e[0m\e[0mSeg:6a54       Size:256        Owner:0x17a8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5e60       Size:256        Owner:0x1790\r
+\e[0m\e[0mSeg:6b54       Size:256        Owner:0x17aa\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5f60       Size:256        Owner:0x1792\r
+\e[0m\e[0mSeg:6c54       Size:256        Owner:0x17ac\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6060       Size:256        Owner:0x1794\r
+\e[0m\e[0mSeg:6d54       Size:256        Owner:0x17ae\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:6e54       Size:256        Owner:0x17b0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6160       Size:256        Owner:0x1796\r
+\e[0m\e[0mSeg:6f54       Size:256        Owner:0x17b2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6260       Size:256        Owner:0x1798\r
+\e[0m\e[0mSeg:7054       Size:256        Owner:0x17b4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6360       Size:256        Owner:0x179a\r
+\e[0m\e[0mSeg:7154       Size:256        Owner:0x17b6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6460       Size:256        Owner:0x179c\r
+\e[0m\e[0mSeg:7254       Size:256        Owner:0x17b8\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:7354       Size:256        Owner:0x17ba\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6560       Size:256        Owner:0x179e\r
+\e[0m\e[0mSeg:7454       Size:256        Owner:0x17bc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6660       Size:256        Owner:0x17a0\r
+\e[0m\e[0mSeg:7554       Size:256        Owner:0x17be\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6760       Size:256        Owner:0x17a2\r
+\e[0m\e[0mSeg:7654       Size:256        Owner:0x17c0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6860       Size:256        Owner:0x17a4\r
+\e[0m\e[0mSeg:7754       Size:256        Owner:0x17c2\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:7854       Size:256        Owner:0x17c4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6960       Size:256        Owner:0x17a6\r
+\e[0m\e[0mSeg:7954       Size:256        Owner:0x17c6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6a60       Size:256        Owner:0x17a8\r
+\e[0m\e[0mSeg:7a54       Size:256        Owner:0x17c8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6b60       Size:256        Owner:0x17aa\r
+\e[0m\e[0mSeg:7b54       Size:256        Owner:0x17ca\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6c60       Size:256        Owner:0x17ac\r
+\e[0m\e[0mSeg:7c54       Size:256        Owner:0x17cc\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:7d54       Size:256        Owner:0x17ce\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6d60       Size:256        Owner:0x17ae\r
+\e[0m\e[0mSeg:7e54       Size:256        Owner:0x17d0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6e60       Size:256        Owner:0x17b0\r
+\e[0m\e[0mSeg:7f54       Size:256        Owner:0x17d2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6f60       Size:256        Owner:0x17b2\r
+\e[0m\e[0mSeg:8054       Size:256        Owner:0x17d4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7060       Size:256        Owner:0x17b4\r
+\e[0m\e[0mSeg:8154       Size:256        Owner:0x17d6\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:8254       Size:256        Owner:0x17d8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7160       Size:256        Owner:0x17b6\r
+\e[0m\e[0mSeg:8354       Size:256        Owner:0x17da\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7260       Size:256        Owner:0x17b8\r
+\e[0m\e[0mSeg:8454       Size:256        Owner:0x17dc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7360       Size:256        Owner:0x17ba\r
+\e[0m\e[0mSeg:8554       Size:256        Owner:0x17de\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7460       Size:256        Owner:0x17bc\r
+\e[0m\e[0mSeg:8654       Size:256        Owner:0x17e0\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:8754       Size:256        Owner:0x17e2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7560       Size:256        Owner:0x17be\r
+\e[0m\e[0mSeg:8854       Size:256        Owner:0x17e4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7660       Size:256        Owner:0x17c0\r
+\e[0m\e[0mSeg:8954       Size:256        Owner:0x17e6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7760       Size:256        Owner:0x17c2\r
+\e[0m\e[0mSeg:8a54       Size:256        Owner:0x17e8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7860       Size:256        Owner:0x17c4\r
+\e[0m\e[0mSeg:8b54       Size:256        Owner:0x17ea\r
+\e[45;35m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:8c54       Size:256        Owner:0x17ec\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7960       Size:256        Owner:0x17c6\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7a60       Size:256        Owner:0x17c8\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7b60       Size:256        Owner:0x17ca\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7c60       Size:256        Owner:0x17cc\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7d60       Size:256        Owner:0x17ce\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7e60       Size:256        Owner:0x17d0\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7f60       Size:256        Owner:0x17d2\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8060       Size:256        Owner:0x17d4\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8160       Size:256        Owner:0x17d6\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8260       Size:256        Owner:0x17d8\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8360       Size:256        Owner:0x17da\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8460       Size:256        Owner:0x17dc\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8560       Size:256        Owner:0x17de\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8660       Size:256        Owner:0x17e0\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8760       Size:256        Owner:0x17e2\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8860       Size:256        Owner:0x17e4\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8960       Size:256        Owner:0x17e6\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8a60       Size:256        Owner:0x17e8\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8b60       Size:256        Owner:0x17ea\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8c60       Size:256        Owner:0x17ec\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8d60       Size:273        Owner:0xe4c0\r
+\e[0m\e[0mSeg:8d54       Size:273        Owner:0xe4c0\r
 \e[44;34m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:b960       Size:18079      Owner:0x0\r
+\e[0m\e[0mSeg:b954       Size:18091      Owner:0x0\r
 \e[41;31m+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m
\ No newline at end of file

diff --git a/HEAP.16W b/HEAP.16W
index f6f9f3a26010ea989caf940d0bf8525fcec86a8f..29f7df77c9328464de9fa88abdfd931f2b69bc54 100755 (executable)
--- a/HEAP.16W
+++ b/HEAP.16W
@@ -1,35 +1,35 @@
 \r
        == default ==\r
 \r
-  USED block at 29560016 of size 66\r
-  USED block at 29560058 of size 66\r
-  FREE block at 2956009a of size 18\r
-  USED block at 295600ac of size 136\r
-  USED block at 29560134 of size 20\r
-  FREE block at 29560148 of size 7860\r
+  USED block at 294a0016 of size 66\r
+  USED block at 294a0058 of size 66\r
+  FREE block at 294a009a of size 18\r
+  USED block at 294a00ac of size 136\r
+  USED block at 294a0134 of size 20\r
+  FREE block at 294a0148 of size 7860\r
 OK - end of heap\r
 \r
        == near ==\r
 \r
-  USED block at 1955e4f6 of size 12\r
-  USED block at 1955e502 of size 530\r
-  USED block at 1955e714 of size 72\r
-  USED block at 1955e75c of size 20\r
-  USED block at 1955e770 of size 20\r
-  USED block at 1955e784 of size 20\r
-  USED block at 1955e798 of size 20\r
-  USED block at 1955e7ac of size 20\r
-  USED block at 1955e7c0 of size 6204\r
+  USED block at 1949e4f6 of size 12\r
+  USED block at 1949e502 of size 530\r
+  USED block at 1949e714 of size 72\r
+  USED block at 1949e75c of size 20\r
+  USED block at 1949e770 of size 20\r
+  USED block at 1949e784 of size 20\r
+  USED block at 1949e798 of size 20\r
+  USED block at 1949e7ac of size 20\r
+  USED block at 1949e7c0 of size 6204\r
 OK - end of heap\r
 \r
        == far ==\r
 \r
-  USED block at 29560016 of size 66\r
-  USED block at 29560058 of size 66\r
-  USED block at 2956009a of size 18\r
-  USED block at 295600ac of size 136\r
-  USED block at 29560134 of size 20\r
-  USED block at 29560148 of size 7860\r
+  USED block at 294a0016 of size 66\r
+  USED block at 294a0058 of size 66\r
+  USED block at 294a009a of size 18\r
+  USED block at 294a00ac of size 136\r
+  USED block at 294a0134 of size 20\r
+  USED block at 294a0148 of size 7860\r
 OK - end of heap\r
 \r
 Memory Type         Total      Used       Free\r

diff --git a/MMDUMP.16B b/MMDUMP.16B
index 9d3a83c8e9869fb47704f6dcc76d2adfa45d968b..f11d1f40a8f679970bc5e2d9babe0d7daf45871c 100755 (executable)
Binary files a/MMDUMP.16B and b/MMDUMP.16B differ

diff --git a/TC0001.SWP b/TC0001.SWP
new file mode 100755 (executable)
index 0000000..0ddc1c8
Binary files /dev/null and b/TC0001.SWP differ

diff --git a/bcexmm.dsk b/bcexmm.dsk
index 1fb336b1a1cdb0704999bf60511fdd3701586242..e1d0305cc01f67f39d407bd22298c5dd3ba31b23 100755 (executable)
Binary files a/bcexmm.dsk and b/bcexmm.dsk differ

diff --git a/bcexmm.exe b/bcexmm.exe
index 321b79127a061f8a754d9bf57db538784d96a7ea..c11e9410f7921c01c97e813a8f41177b1fd6478e 100755 (executable)
Binary files a/bcexmm.exe and b/bcexmm.exe differ

diff --git a/bcexmm.prj b/bcexmm.prj
index f3336226bba52291cc36249a156ed569717e27dc..bf1d7a44a098ef77eef8b89799e6e3bd54a48a64 100755 (executable)
Binary files a/bcexmm.prj and b/bcexmm.prj differ

diff --git a/src/lib/16_head.c b/src/lib/16_head.c
index 6c6eaee6689f54a36884e856ce7892dba47886e9..e56baa94bc86fb44c4efc521450b67d872afef18 100755 (executable)
--- a/src/lib/16_head.c
+++ b/src/lib/16_head.c
@@ -22,22 +22,6 @@
 \r
 #include "src/lib/16_head.h"\r
 \r
-/* Function: Wait **********************************************************\r
-*\r
-*     Parameters:    wait - time in microseconds\r
-*\r
-*     Description:    pauses for a specified number of microseconds.\r
-*\r
-*/\r
-void wait(clock_t wait){\r
-       clock_t goal;\r
-\r
-       if(!wait) return;\r
-\r
-       goal = wait + clock();\r
-       while((goal > clock()) && !kbhit()) ;\r
-} /* End of wait */\r
-\r
 long int\r
 filesize(FILE *fp)\r
 {\r
@@ -133,7 +117,9 @@ void Quit (char *error)
        {\r
          //movedata ((unsigned)screen,7,0xb800,0,7*160);\r
          //gotoxy (10,4);\r
+               printf("\n");\r
          puts(error);\r
+               printf("\n");\r
          //gotoxy (1,8);\r
          exit(1);\r
        }\r

diff --git a/src/lib/16_head.h b/src/lib/16_head.h
index aab4c0334e7a74c9e958b816d1bc5cfb4c12501d..6b189d875fcd864c0cb1107332c937739a47bd27 100755 (executable)
--- a/src/lib/16_head.h
+++ b/src/lib/16_head.h
@@ -28,8 +28,8 @@
 #error i8088 only\r
 #endif\r
 \r
-#ifndef _LIBHEAD_H_\r
-#define _LIBHEAD_H_\r
+#ifndef __16_HEAD_H__\r
+#define __16_HEAD_H__\r
 #include <dos.h>\r
 #include <stdio.h>\r
 #include <stdlib.h>\r
@@ -43,12 +43,19 @@
 #include <mem.h>\r
 #include <string.h>\r
 #include <limits.h>\r
+#include <errno.h>\r
+#include <process.h>\r
 #ifdef __WATCOMC__\r
 #include <i86.h>\r
 #include <unistd.h>\r
 #include <alloca.h>\r
 #include <stdint.h> //16_vrs.h\r
 #endif\r
+#ifdef __BORLANDC__\r
+#include <values.h>\r
+#include <dir.h>\r
+#define TILEWH 16\r
+#endif\r
 #include "src/lib/nyan/kitten.h"\r
 #include "src/lib/types.h"\r
 #include "src/lib/typdefst.h"\r
@@ -192,8 +199,6 @@ typedef union REGPACK       regs_t;
 #define INPUT_STATUS_1         0x03da\r
 \r
 /* local function */\r
-void wait(clock_t wait);\r
-\r
 long int filesize(FILE *fp);\r
 void printmeminfoline(byte *strc, const byte *pee, size_t h_total, size_t h_used, size_t h_free);\r
 int US_CheckParm(char *parm,char **strings);\r
@@ -202,4 +207,4 @@ void Quit (char *error);
 #endif\r
 byte dirchar(byte in);\r
 \r
-#endif/*_LIBHEAD_H_*/\r
+#endif/*__16_HEAD_H__*/\r

diff --git a/src/lib/16_in.c b/src/lib/16_in.c
index 8c0dbc695bd54210d249c3e8850c0b54a1c298d2..619affd827f5c5fee717577f934a40796e337df7 100755 (executable)
--- a/src/lib/16_in.c
+++ b/src/lib/16_in.c
@@ -166,6 +166,7 @@ static      Direction       DirTable[] =            // Quick lookup for total direction
 #endif\r
 \r
 //     Internal routines\r
+\r
 ///////////////////////////////////////////////////////////////////////////\r
 //\r
 //     INL_KeyService() - Handles a keyboard interrupt (key up/down)\r
@@ -245,9 +246,13 @@ static     boolean special;
 void\r
 Mouse(int x)\r
 {\r
-       union REGS CPURegs;\r
-       x = CPURegs.x.ax;\r
-       int86(MouseInt,&CPURegs,&CPURegs);\r
+       //union REGS CPURegs;\r
+       //x = CPURegs.x.ax;\r
+       __asm {\r
+               mov     ax,x\r
+               int     MouseInt\r
+       }\r
+       //int86(MouseInt,&CPURegs,&CPURegs);\r
 }\r
 \r
 ///////////////////////////////////////////////////////////////////////////\r
@@ -301,8 +306,7 @@ IN_GetJoyAbs(word joy,word *xp,word *yp)
        yb = 1 << ys;\r
 \r
 // Read the absolute joystick values\r
-       __asm\r
-       {\r
+       __asm {\r
                pushf                           // Save some registers\r
                push    si\r
                push    di\r
@@ -322,8 +326,13 @@ IN_GetJoyAbs(word joy,word *xp,word *yp)
 \r
                push    bp                      // Don't mess up stack frame\r
                mov             bp,MaxJoyValue\r
-\r
+#ifdef __BORLANDC__\r
+       }\r
+#endif\r
 loo:\r
+#ifdef __BORLANDC__\r
+       __asm {\r
+#endif\r
                in              al,dx           // Get bits indicating whether all are finished\r
 \r
                dec             bp                      // Check bounding register\r
@@ -340,8 +349,13 @@ loo:
 \r
                add             cl,bl\r
                jnz             loo             // If both bits were 0, drop out\r
-\r
+#ifdef __BORLANDC__\r
+       }\r
+#endif\r
 done:\r
+#ifdef __BORLANDC__\r
+       __asm {\r
+#endif\r
                pop             bp\r
 \r
                mov             cl,[xs]         // Get the number of bits to shift\r
@@ -639,9 +653,23 @@ IN_Startup()
 \r
        checkjoys = true;\r
        checkmouse = true;\r
-       for (i = 1;i < __argc;i++)\r
+       for (i = 1;i <\r
+#ifdef __WATCOMC__\r
+       __argc\r
+#endif\r
+#ifdef __BORLANDC__\r
+       _argc\r
+#endif\r
+       ;i++)\r
        {\r
-               switch (US_CheckParm(__argv[i],ParmStringsIN))\r
+               switch (US_CheckParm(\r
+#ifdef __WATCOMC__\r
+       __argv[i]\r
+#endif\r
+#ifdef __BORLANDC__\r
+       _argv[i]\r
+#endif\r
+               ,ParmStringsIN))\r
                {\r
                case 0:\r
                        checkjoys = false;\r

diff --git a/src/lib/16_mm.h b/src/lib/16_mm.h
index 2a344aee724eb2e6f078d79e9d3865d3a32ebcc8..b68eea9c472ba0055b8484bff1f45c5e78dddbb3 100755 (executable)
--- a/src/lib/16_mm.h
+++ b/src/lib/16_mm.h
@@ -53,6 +53,7 @@ extern boolean dbg_debugpm;
 //--------\r
 \r
 #define        EMS_INT                 0x67\r
+#define        EMM_INT                 0x21\r
 \r
 #define        EMS_STATUS              0x40\r
 #define        EMS_GETFRAME    0x41\r

diff --git a/src/lib/16_pm.c b/src/lib/16_pm.c
index ff997f7dc597232e4962f086efc3448f7f703405..0d1e2bf9a60694f9c2c145f3eb960d3a918c0194 100755 (executable)
--- a/src/lib/16_pm.c
+++ b/src/lib/16_pm.c
@@ -155,13 +155,13 @@ PML_StartupEMS(global_game_variables_t *gvar)
        __asm {\r
                mov     dx,OFFSET emmname       //fix by andrius4669\r
                mov     ax,0x3d00\r
-               int     EMS_INT         // try to open EMMXXXX0 device\r
+               int     EMM_INT         // try to open EMMXXXX0 device\r
                jc      error1\r
 \r
                mov     bx,ax\r
                mov     ax,0x4400\r
 \r
-               int     EMS_INT         // get device info\r
+               int     EMM_INT         // get device info\r
                jc      error1\r
 \r
                and     dx,0x80\r
@@ -169,13 +169,13 @@ PML_StartupEMS(global_game_variables_t *gvar)
 \r
                mov     ax,0x4407\r
 \r
-               int     EMS_INT         // get status\r
+               int     EMM_INT         // get status\r
                jc      error1\r
                or      al,al\r
                jz      error1\r
 \r
                mov     ah,0x3e\r
-               int     EMS_INT         // close handle\r
+               int     EMM_INT         // close handle\r
                jc      error1\r
 \r
                mov     ah,EMS_STATUS\r

diff --git a/src/lib/16_tail.c b/src/lib/16_tail.c
index 6d66ec1c0e39d7f85d904e1fc48f9c69a78f198f..47ef9b7b78207d90545db3c51d5d84043b386041 100755 (executable)
--- a/src/lib/16_tail.c
+++ b/src/lib/16_tail.c
@@ -37,6 +37,7 @@
 \r
 void Startup16(global_game_variables_t *gvar)\r
 {\r
+#ifdef __WATCOMC__\r
        // DOSLIB: check our environment\r
        probe_dos();\r
 \r
@@ -57,7 +58,7 @@ void Startup16(global_game_variables_t *gvar)
                printf("This program requires VGA or higher graphics hardware\n");\r
                return;\r
        }\r
-\r
+#endif\r
        gvar->mm.mmstarted=0;\r
        gvar->pm.PMStarted=0;\r
        MM_Startup(gvar);\r