OSDN Git Service

fixed an issue with EMS_INT becuase i learned there is 2 wwww
authorsparky4 <sparky4@cock.li>
Wed, 12 Oct 2016 16:36:58 +0000 (11:36 -0500)
committersparky4 <sparky4@cock.li>
Wed, 12 Oct 2016 16:36:58 +0000 (11:36 -0500)
14 files changed:
DEBUG.16B [new file with mode: 0755]
DEBUG.16W
HEAP.16W
MMDUMP.16B
TC0001.SWP [new file with mode: 0755]
bcexmm.dsk
bcexmm.exe
bcexmm.prj
src/lib/16_head.c
src/lib/16_head.h
src/lib/16_in.c
src/lib/16_mm.h
src/lib/16_pm.c
src/lib/16_tail.c

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
index 4ca891c..e889f15 100755 (executable)
--- a/DEBUG.16W
+++ b/DEBUG.16W
-\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
index f6f9f3a..29f7df7 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
index 9d3a83c..f11d1f4 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
index 1fb336b..e1d0305 100755 (executable)
Binary files a/bcexmm.dsk and b/bcexmm.dsk differ
index 321b791..c11e941 100755 (executable)
Binary files a/bcexmm.exe and b/bcexmm.exe differ
index f333622..bf1d7a4 100755 (executable)
Binary files a/bcexmm.prj and b/bcexmm.prj differ
index 6c6eaee..e56baa9 100755 (executable)
 \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
index aab4c03..6b189d8 100755 (executable)
@@ -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
 #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
index 8c0dbc6..619affd 100755 (executable)
@@ -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
index 2a344ae..b68eea9 100755 (executable)
@@ -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
index ff997f7..0d1e2bf 100755 (executable)
@@ -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
index 6d66ec1..47ef9b7 100755 (executable)
@@ -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