====XMS MOSTLY translated but crashes EXMMTEST.EXE ====

diff --git a/DEBUG.16W b/DEBUG.16W
index 5aadb17d57b266ad92dca8c4ca937875743861ea..0d535963ac2a38fd9e11b12ff6df7b27f01385e5 100755 (executable)
--- a/DEBUG.16W
+++ b/DEBUG.16W
@@ -1,210 +1,210 @@
-\e[0mSeg:0      Size:9818       Owner:0x0\r
+\e[0mSeg:0      Size:9830       Owner:0x0\r
 \e[41;31m+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m\e[42;32m0\r
-\e[0m\e[0mSeg:265a       Size:256        Owner:0x18a8\r
-\e[44;34m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:27d7       Size:44 Owner:0x0\r
+\e[0m\e[0mSeg:2666       Size:256        Owner:0x18a8\r
+\e[44;34m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:27e2       Size:44 Owner:0x0\r
 \e[41;31m++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2803       Size:256        Owner:0x1696\r
+\e[0m\e[0mSeg:280e       Size:256        Owner:0x1696\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2903       Size:256        Owner:0x1698\r
+\e[0m\e[0mSeg:290e       Size:256        Owner:0x1698\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2a03       Size:256        Owner:0x169a\r
+\e[0m\e[0mSeg:2a0e       Size:256        Owner:0x169a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2b03       Size:256        Owner:0x169c\r
+\e[0m\e[0mSeg:2b0e       Size:256        Owner:0x169c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2c03       Size:256        Owner:0x169e\r
+\e[0m\e[0mSeg:2c0e       Size:256        Owner:0x169e\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2d03       Size:256        Owner:0x16a0\r
+\e[0m\e[0mSeg:2d0e       Size:256        Owner:0x16a0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2e03       Size:256        Owner:0x16a2\r
+\e[0m\e[0mSeg:2e0e       Size:256        Owner:0x16a2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2f03       Size:256        Owner:0x16a4\r
+\e[0m\e[0mSeg:2f0e       Size:256        Owner:0x16a4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3003       Size:256        Owner:0x16a6\r
+\e[0m\e[0mSeg:300e       Size:256        Owner:0x16a6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3103       Size:256        Owner:0x16a8\r
+\e[0m\e[0mSeg:310e       Size:256        Owner:0x16a8\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3203       Size:256        Owner:0x16aa\r
+\e[0m\e[0mSeg:320e       Size:256        Owner:0x16aa\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3303       Size:256        Owner:0x16ac\r
+\e[0m\e[0mSeg:330e       Size:256        Owner:0x16ac\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3403       Size:256        Owner:0x16ae\r
+\e[0m\e[0mSeg:340e       Size:256        Owner:0x16ae\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3503       Size:256        Owner:0x16b0\r
+\e[0m\e[0mSeg:350e       Size:256        Owner:0x16b0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3603       Size:256        Owner:0x16b2\r
+\e[0m\e[0mSeg:360e       Size:256        Owner:0x16b2\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3703       Size:256        Owner:0x16b4\r
+\e[0m\e[0mSeg:370e       Size:256        Owner:0x16b4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3803       Size:256        Owner:0x16b6\r
+\e[0m\e[0mSeg:380e       Size:256        Owner:0x16b6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3903       Size:256        Owner:0x16b8\r
+\e[0m\e[0mSeg:390e       Size:256        Owner:0x16b8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3a03       Size:256        Owner:0x16ba\r
+\e[0m\e[0mSeg:3a0e       Size:256        Owner:0x16ba\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3b03       Size:256        Owner:0x16bc\r
+\e[0m\e[0mSeg:3b0e       Size:256        Owner:0x16bc\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3c03       Size:256        Owner:0x16be\r
+\e[0m\e[0mSeg:3c0e       Size:256        Owner:0x16be\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3d03       Size:256        Owner:0x16c0\r
+\e[0m\e[0mSeg:3d0e       Size:256        Owner:0x16c0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3e03       Size:256        Owner:0x16c2\r
+\e[0m\e[0mSeg:3e0e       Size:256        Owner:0x16c2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3f03       Size:256        Owner:0x16c4\r
+\e[0m\e[0mSeg:3f0e       Size:256        Owner:0x16c4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4003       Size:256        Owner:0x16c6\r
+\e[0m\e[0mSeg:400e       Size:256        Owner:0x16c6\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4103       Size:256        Owner:0x16c8\r
+\e[0m\e[0mSeg:410e       Size:256        Owner:0x16c8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4203       Size:256        Owner:0x16ca\r
+\e[0m\e[0mSeg:420e       Size:256        Owner:0x16ca\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4303       Size:256        Owner:0x16cc\r
+\e[0m\e[0mSeg:430e       Size:256        Owner:0x16cc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4403       Size:256        Owner:0x16ce\r
+\e[0m\e[0mSeg:440e       Size:256        Owner:0x16ce\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4503       Size:256        Owner:0x16d0\r
+\e[0m\e[0mSeg:450e       Size:256        Owner:0x16d0\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4603       Size:256        Owner:0x16d2\r
+\e[0m\e[0mSeg:460e       Size:256        Owner:0x16d2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4703       Size:256        Owner:0x16d4\r
+\e[0m\e[0mSeg:470e       Size:256        Owner:0x16d4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4803       Size:256        Owner:0x16d6\r
+\e[0m\e[0mSeg:480e       Size:256        Owner:0x16d6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4903       Size:256        Owner:0x16d8\r
+\e[0m\e[0mSeg:490e       Size:256        Owner:0x16d8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4a03       Size:256        Owner:0x16da\r
+\e[0m\e[0mSeg:4a0e       Size:256        Owner:0x16da\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4b03       Size:256        Owner:0x16dc\r
+\e[0m\e[0mSeg:4b0e       Size:256        Owner:0x16dc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4c03       Size:256        Owner:0x16de\r
+\e[0m\e[0mSeg:4c0e       Size:256        Owner:0x16de\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4d03       Size:256        Owner:0x16e0\r
+\e[0m\e[0mSeg:4d0e       Size:256        Owner:0x16e0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4e03       Size:256        Owner:0x16e2\r
+\e[0m\e[0mSeg:4e0e       Size:256        Owner:0x16e2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4f03       Size:256        Owner:0x16e4\r
+\e[0m\e[0mSeg:4f0e       Size:256        Owner:0x16e4\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5003       Size:256        Owner:0x16e6\r
+\e[0m\e[0mSeg:500e       Size:256        Owner:0x16e6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5103       Size:256        Owner:0x16e8\r
+\e[0m\e[0mSeg:510e       Size:256        Owner:0x16e8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5203       Size:256        Owner:0x16ea\r
+\e[0m\e[0mSeg:520e       Size:256        Owner:0x16ea\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5303       Size:256        Owner:0x16ec\r
+\e[0m\e[0mSeg:530e       Size:256        Owner:0x16ec\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5403       Size:256        Owner:0x16ee\r
+\e[0m\e[0mSeg:540e       Size:256        Owner:0x16ee\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5503       Size:256        Owner:0x16f0\r
+\e[0m\e[0mSeg:550e       Size:256        Owner:0x16f0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5603       Size:256        Owner:0x16f2\r
+\e[0m\e[0mSeg:560e       Size:256        Owner:0x16f2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5703       Size:256        Owner:0x16f4\r
+\e[0m\e[0mSeg:570e       Size:256        Owner:0x16f4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5803       Size:256        Owner:0x16f6\r
+\e[0m\e[0mSeg:580e       Size:256        Owner:0x16f6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5903       Size:256        Owner:0x16f8\r
+\e[0m\e[0mSeg:590e       Size:256        Owner:0x16f8\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5a03       Size:256        Owner:0x16fa\r
+\e[0m\e[0mSeg:5a0e       Size:256        Owner:0x16fa\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5b03       Size:256        Owner:0x16fc\r
+\e[0m\e[0mSeg:5b0e       Size:256        Owner:0x16fc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5c03       Size:256        Owner:0x16fe\r
+\e[0m\e[0mSeg:5c0e       Size:256        Owner:0x16fe\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5d03       Size:256        Owner:0x1700\r
+\e[0m\e[0mSeg:5d0e       Size:256        Owner:0x1700\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5e03       Size:256        Owner:0x1702\r
+\e[0m\e[0mSeg:5e0e       Size:256        Owner:0x1702\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5f03       Size:256        Owner:0x1704\r
+\e[0m\e[0mSeg:5f0e       Size:256        Owner:0x1704\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6003       Size:256        Owner:0x1706\r
+\e[0m\e[0mSeg:600e       Size:256        Owner:0x1706\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6103       Size:256        Owner:0x1708\r
+\e[0m\e[0mSeg:610e       Size:256        Owner:0x1708\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6203       Size:256        Owner:0x170a\r
+\e[0m\e[0mSeg:620e       Size:256        Owner:0x170a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6303       Size:256        Owner:0x170c\r
+\e[0m\e[0mSeg:630e       Size:256        Owner:0x170c\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6403       Size:256        Owner:0x170e\r
+\e[0m\e[0mSeg:640e       Size:256        Owner:0x170e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6503       Size:256        Owner:0x1710\r
+\e[0m\e[0mSeg:650e       Size:256        Owner:0x1710\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6603       Size:256        Owner:0x1712\r
+\e[0m\e[0mSeg:660e       Size:256        Owner:0x1712\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6703       Size:256        Owner:0x1714\r
+\e[0m\e[0mSeg:670e       Size:256        Owner:0x1714\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6803       Size:256        Owner:0x1716\r
+\e[0m\e[0mSeg:680e       Size:256        Owner:0x1716\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6903       Size:256        Owner:0x1718\r
+\e[0m\e[0mSeg:690e       Size:256        Owner:0x1718\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6a03       Size:256        Owner:0x171a\r
+\e[0m\e[0mSeg:6a0e       Size:256        Owner:0x171a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6b03       Size:256        Owner:0x171c\r
+\e[0m\e[0mSeg:6b0e       Size:256        Owner:0x171c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6c03       Size:256        Owner:0x171e\r
+\e[0m\e[0mSeg:6c0e       Size:256        Owner:0x171e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6d03       Size:256        Owner:0x1720\r
+\e[0m\e[0mSeg:6d0e       Size:256        Owner:0x1720\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6e03       Size:256        Owner:0x1722\r
+\e[0m\e[0mSeg:6e0e       Size:256        Owner:0x1722\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6f03       Size:256        Owner:0x1724\r
+\e[0m\e[0mSeg:6f0e       Size:256        Owner:0x1724\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7003       Size:256        Owner:0x1726\r
+\e[0m\e[0mSeg:700e       Size:256        Owner:0x1726\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7103       Size:256        Owner:0x1728\r
+\e[0m\e[0mSeg:710e       Size:256        Owner:0x1728\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7203       Size:256        Owner:0x172a\r
+\e[0m\e[0mSeg:720e       Size:256        Owner:0x172a\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7303       Size:256        Owner:0x172c\r
+\e[0m\e[0mSeg:730e       Size:256        Owner:0x172c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7403       Size:256        Owner:0x172e\r
+\e[0m\e[0mSeg:740e       Size:256        Owner:0x172e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7503       Size:256        Owner:0x1730\r
+\e[0m\e[0mSeg:750e       Size:256        Owner:0x1730\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7603       Size:256        Owner:0x1732\r
+\e[0m\e[0mSeg:760e       Size:256        Owner:0x1732\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7703       Size:256        Owner:0x1734\r
+\e[0m\e[0mSeg:770e       Size:256        Owner:0x1734\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7803       Size:256        Owner:0x1736\r
+\e[0m\e[0mSeg:780e       Size:256        Owner:0x1736\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7903       Size:256        Owner:0x1738\r
+\e[0m\e[0mSeg:790e       Size:256        Owner:0x1738\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7a03       Size:256        Owner:0x173a\r
+\e[0m\e[0mSeg:7a0e       Size:256        Owner:0x173a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7b03       Size:256        Owner:0x173c\r
+\e[0m\e[0mSeg:7b0e       Size:256        Owner:0x173c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7c03       Size:256        Owner:0x173e\r
+\e[0m\e[0mSeg:7c0e       Size:256        Owner:0x173e\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7d03       Size:256        Owner:0x1740\r
+\e[0m\e[0mSeg:7d0e       Size:256        Owner:0x1740\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7e03       Size:256        Owner:0x1742\r
+\e[0m\e[0mSeg:7e0e       Size:256        Owner:0x1742\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7f03       Size:256        Owner:0x1744\r
+\e[0m\e[0mSeg:7f0e       Size:256        Owner:0x1744\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8003       Size:256        Owner:0x1746\r
+\e[0m\e[0mSeg:800e       Size:256        Owner:0x1746\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8103       Size:256        Owner:0x1748\r
+\e[0m\e[0mSeg:810e       Size:256        Owner:0x1748\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8203       Size:256        Owner:0x174a\r
+\e[0m\e[0mSeg:820e       Size:256        Owner:0x174a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8303       Size:256        Owner:0x174c\r
+\e[0m\e[0mSeg:830e       Size:256        Owner:0x174c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8403       Size:256        Owner:0x174e\r
+\e[0m\e[0mSeg:840e       Size:256        Owner:0x174e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8503       Size:256        Owner:0x1750\r
+\e[0m\e[0mSeg:850e       Size:256        Owner:0x1750\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8603       Size:256        Owner:0x1752\r
+\e[0m\e[0mSeg:860e       Size:256        Owner:0x1752\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8703       Size:256        Owner:0x1754\r
+\e[0m\e[0mSeg:870e       Size:256        Owner:0x1754\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8803       Size:256        Owner:0x1756\r
+\e[0m\e[0mSeg:880e       Size:256        Owner:0x1756\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8903       Size:256        Owner:0x1758\r
+\e[0m\e[0mSeg:890e       Size:256        Owner:0x1758\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8a03       Size:256        Owner:0x175a\r
+\e[0m\e[0mSeg:8a0e       Size:256        Owner:0x175a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8b03       Size:256        Owner:0x175c\r
+\e[0m\e[0mSeg:8b0e       Size:256        Owner:0x175c\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8c03       Size:273        Owner:0xe3f0\r
+\e[0m\e[0mSeg:8c0e       Size:273        Owner:0xe400\r
 \e[44;34m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:b803       Size:18428      Owner:0x0\r
+\e[0m\e[0mSeg:b80e       Size:18417      Owner:0x0\r
 \e[41;31m++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m
\ No newline at end of file

diff --git a/HEAP.16W b/HEAP.16W
index 59a1b45b9c037e3d7d9e54e4b674f5483e0ae7bf..536fe06c00e22599561a297ec24083d9f0f69806 100755 (executable)
--- a/HEAP.16W
+++ b/HEAP.16W
@@ -1,47 +1,47 @@
 \r
        == default ==\r
 \r
-  USED block at 27f90016 of size 66\r
-  USED block at 27f90058 of size 66\r
-  FREE block at 27f9009a of size 18\r
-  USED block at 27f900ac of size 136\r
-  USED block at 27f90134 of size 20\r
-  FREE block at 27f90148 of size 7860\r
+  USED block at 28040016 of size 66\r
+  USED block at 28040058 of size 66\r
+  FREE block at 2804009a of size 18\r
+  USED block at 280400ac of size 136\r
+  USED block at 28040134 of size 20\r
+  FREE block at 28040148 of size 7860\r
 OK - end of heap\r
 \r
        == near ==\r
 \r
-  USED block at 17f8e426 of size 12\r
-  USED block at 17f8e432 of size 332\r
-  USED block at 17f8e57e of size 52\r
-  USED block at 17f8e5b2 of size 20\r
-  USED block at 17f8e5c6 of size 20\r
-  USED block at 17f8e5da of size 20\r
-  USED block at 17f8e5ee of size 20\r
-  USED block at 17f8e602 of size 20\r
-  USED block at 17f8e616 of size 6630\r
+  USED block at 1803e436 of size 12\r
+  USED block at 1803e442 of size 332\r
+  USED block at 1803e58e of size 52\r
+  USED block at 1803e5c2 of size 20\r
+  USED block at 1803e5d6 of size 20\r
+  USED block at 1803e5ea of size 20\r
+  USED block at 1803e5fe of size 20\r
+  USED block at 1803e612 of size 20\r
+  USED block at 1803e626 of size 6614\r
 OK - end of heap\r
 \r
        == far ==\r
 \r
-  USED block at 27f90016 of size 66\r
-  USED block at 27f90058 of size 66\r
-  USED block at 27f9009a of size 18\r
-  USED block at 27f900ac of size 136\r
-  USED block at 27f90134 of size 20\r
-  USED block at 27f90148 of size 7860\r
+  USED block at 28040016 of size 66\r
+  USED block at 28040058 of size 66\r
+  USED block at 2804009a of size 18\r
+  USED block at 280400ac of size 136\r
+  USED block at 28040134 of size 20\r
+  USED block at 28040148 of size 7860\r
 OK - end of heap\r
 \r
 Memory Type         Total      Used       Free\r
 ----------------  --------   --------   --------\r
 Default                   8166         288       7878\r
-Near              7126         496       6630\r
+Near              7110         496       6614\r
 Far               8166         0         7878\r
 ----------------  --------   --------   --------\r
-coreleft = 6628\r
-farcoreleft = 30736\r
+coreleft = 6612\r
+farcoreleft = 30720\r
 GetFreeSize = 24128\r
-GetNearFreeSize = 6630\r
+GetNearFreeSize = 6614\r
 GetFarFreeSize = 24128\r
-memavl = 6628\r
+memavl = 6612\r
 stackavail = 31588\r

diff --git a/MMDUMP.16W b/MMDUMP.16W
index e231e3c76d962e78e7b52c5eecf0b37e13decb13..cb01f5beec81552a1dad5e9db36e08d725416db8 100755 (executable)
Binary files a/MMDUMP.16W and b/MMDUMP.16W differ

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

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

diff --git a/src/lib/16_mm.c b/src/lib/16_mm.c
index c2a966b8750fbb31e28bc2cb0b23122f79372b28..a8c07017fcd00c4d046b87bcca6cead5e407f72f 100755 (executable)
--- a/src/lib/16_mm.c
+++ b/src/lib/16_mm.c
@@ -1625,7 +1625,7 @@ void MM_Report_(global_game_variables_t *gvar)
        if(MML_CheckForXMS(gvar))
        {
                printf("        XMS\n");
-               printf("                XMSaddr:        %X\n", *XMSaddr);
+               printf("                XMSDriver:      %X\n", XMSDriver);
        }
        printf("nearheap:       %lu             ", gvar->mmi.nearheap); printf("farheap:        %lu\n", gvar->mmi.farheap);
        if(MML_CheckForEMS()) printf("EMSmem:           %lu     ", gvar->mmi.EMSmem); if(MML_CheckForXMS(gvar)) printf("XMSmem:         %lu", gvar->mmi.XMSmem); printf("\n");

diff --git a/src/lib/16_mm.h b/src/lib/16_mm.h
index e816d8854558d240e3bf93fca2611b6615ff1183..59716d499d91f413e1ab2dc950791aebf6a84d9e 100755 (executable)
--- a/src/lib/16_mm.h
+++ b/src/lib/16_mm.h
@@ -79,7 +79,7 @@ extern boolean dbg_debugpm;
 #define        XMS_GDISABLEA20 0x04\r
 #define        XMS_LENABLEA20  0x05\r
 #define        XMS_LDISABLEA20 0x06\r
-#define        XMS_QUERYA20    0x07\r
+#define        XMS_QUERYA20            0x07\r
 \r
 #define        XMS_QUERYFREE   0x08\r
 #define        XMS_ALLOC               0x09\r
@@ -106,6 +106,7 @@ extern boolean dbg_debugpm;
 extern void            (* beforesort) (void);\r
 extern void            (* aftersort) (void);\r
 extern void            (* XMSaddr) (void);             // far pointer to XMS driver\r
+extern dword   XMSDriver;\r
 \r
 //==========================================================================\r
 \r

diff --git a/src/lib/16_pm.c b/src/lib/16_pm.c
index bb08180da0aee934305632ae907157d58b8503ca..29156f92155d635feed9b7d68c0e7d60a25cf24e 100755 (executable)
--- a/src/lib/16_pm.c
+++ b/src/lib/16_pm.c
@@ -48,7 +48,7 @@ boolean dbg_debugpm=0;
 //     XMS specific variables\r
        //boolean                       XMSPresent;\r
        //word                  gvar->pm.xmm.XMSAvail,gvar->pm.xmm.XMSPagesAvail,gvar->pm.xmm.XMSHandle;\r
-       word            XMSDriver;\r
+       dword           XMSDriver;\r
 /*     int                             gvar->pm.xmm.XMSProtectPage = -1;\r
 \r
 //     File specific variables\r
@@ -92,9 +92,9 @@ PML_MapEMS(word logical, byte physical, global_game_variables_t *gvar)
 \r
        __asm {\r
                mov     ah,EMS_MAPPAGE\r
-               mov     al,physical\r
-               mov     bx,logical\r
-               mov     dx,EMShandle\r
+               mov     al,[physical]\r
+               mov     bx,[logical]\r
+               mov     dx,[EMShandle]\r
                int     EMS_INT\r
                or      ah,ah\r
                jnz     error\r
@@ -240,7 +240,7 @@ PML_StartupEMS(global_game_variables_t *gvar)
 */\r
        __asm {\r
                mov     ah,EMS_ALLOCPAGES\r
-               mov     bx,[EMSAvail];\r
+               mov     bx,[EMSAvail]\r
                int     EMS_INT\r
                or      ah,ah\r
                jnz     erroreuu\r
@@ -359,7 +359,7 @@ PML_StartupXMS(global_game_variables_t *gvar)
        boolean errorflag;\r
        word XMSAvail, XMSHandle;\r
        errorflag=gvar->pm.xmm.XMSPresent = false;                                      // Assume failure\r
-       XMSAvail = gvar->pm.xmm.XMSAvail = 0;\r
+       gvar->pm.xmm.XMSAvail = gvar->mmi.XMSmem = 0;\r
 \r
        __asm {\r
                mov     ax,0x4300\r
@@ -374,7 +374,7 @@ PML_StartupXMS(global_game_variables_t *gvar)
 \r
                //XMS_CALL(XMS_QUERYFREE);                      // Find out how much XMS is available\r
                mov     ah,XMS_QUERYFREE\r
-               call    [WORD PTR XMSDriver]\r
+               call    [DWORD PTR XMSDriver]\r
                mov     [XMSAvail],ax\r
                or      ax,ax                           // AJR: bugfix 10/8/92\r
                jz      errorxu\r
@@ -396,9 +396,11 @@ PML_StartupXMS(global_game_variables_t *gvar)
 #ifdef __WATCOMC__\r
        }\r
 #endif\r
-       gvar->pm.xmm.XMSAvail &= ~(PMPageSizeKB - 1);   // Round off to nearest page size\r
-       if (gvar->pm.xmm.XMSAvail < (PMPageSizeKB * 2)) // Need at least 2 pages\r
+       XMSAvail &= ~(PMPageSizeKB - 1);        // Round off to nearest page size\r
+       if (XMSAvail < (PMPageSizeKB * 2)){     // Need at least 2 pages\r
+               printf("PISS! %u\n", XMSAvail);\r
                goto error;\r
+       }\r
 \r
        __asm {\r
                mov     dx,[XMSAvail]\r
@@ -431,11 +433,13 @@ PML_StartupXMS(global_game_variables_t *gvar)
        if(errorflag==false)\r
        {\r
                gvar->pm.xmm.XMSAvail = XMSAvail;\r
-               gvar->mmi.XMSmem += gvar->pm.xmm.XMSAvail * 1024;\r
+               gvar->mmi.XMSmem += gvar->pm.xmm.XMSAvail * (dword)1024;\r
                gvar->pm.xmm.XMSHandle = XMSHandle;\r
 \r
                gvar->pm.xmm.XMSPresent = true;\r
-       }\r
+               printf("        %u      %u      %u\n", gvar->mmi.XMSmem, gvar->pm.xmm.XMSAvail, XMSAvail);\r
+               getch();\r
+       }else printf("  errorflag\n");\r
 error:\r
        return(gvar->pm.xmm.XMSPresent);\r
 }\r
@@ -1470,17 +1474,13 @@ PM_Startup(global_game_variables_t *gvar)
 \r
        if (!noems)\r
                PML_StartupEMS(gvar);\r
-       /*if (!noxms)\r
-       {\r
-               //++++\r
-               printf("PML_StartupXMS ");\r
-               PML_StartupXMS(gvar);   //TODO: convert\r
-               printf("ok!\n");\r
-       }*/\r
+       if (!noxms)\r
+               PML_StartupXMS(gvar);\r
 \r
        if (!nomain && !gvar->pm.emm.EMSPresent)\r
        {\r
-               Quit("PM_Startup: No main or EMS\n");\r
+               printf("PM_Startup: No main or EMS\n");\r
+               exit(-5);\r
                //return;\r
        }\r
        PML_StartupMainMem(gvar);\r