====PM WORKS! XMS PORTING IS NEXT! BCEXMM is broke====

diff --git a/DEBUG.16W b/DEBUG.16W
index 0ef4489..a55c6fa 100755 (executable)
--- a/DEBUG.16W
+++ b/DEBUG.16W
@@ -1,210 +1,210 @@
-\e[0mSeg:0      Size:9817       Owner:0x0\r
+\e[0mSeg:0      Size:9834       Owner:0x0\r
 \e[41;31m+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m\e[42;32m0\r
-\e[0m\e[0mSeg:2659       Size:256        Owner:0x18a8\r
-\e[44;34m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:27d5       Size:53 Owner:0x0\r
+\e[0m\e[0mSeg:266a       Size:256        Owner:0x18a8\r
+\e[44;34m+++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:27e7       Size:53 Owner:0x0\r
 \e[41;31m++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:280a       Size:256        Owner:0x1696\r
-\e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:290a       Size:256        Owner:0x1698\r
+\e[0m\e[0mSeg:281c       Size:256        Owner:0x1696\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2a0a       Size:256        Owner:0x169a\r
+\e[0m\e[0mSeg:291c       Size:256        Owner:0x1698\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2b0a       Size:256        Owner:0x169c\r
+\e[0m\e[0mSeg:2a1c       Size:256        Owner:0x169a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2c0a       Size:256        Owner:0x169e\r
+\e[0m\e[0mSeg:2b1c       Size:256        Owner:0x169c\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2d0a       Size:256        Owner:0x16a0\r
+\e[0m\e[0mSeg:2c1c       Size:256        Owner:0x169e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2e0a       Size:256        Owner:0x16a2\r
+\e[0m\e[0mSeg:2d1c       Size:256        Owner:0x16a0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:2f0a       Size:256        Owner:0x16a4\r
+\e[0m\e[0mSeg:2e1c       Size:256        Owner:0x16a2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:300a       Size:256        Owner:0x16a6\r
+\e[0m\e[0mSeg:2f1c       Size:256        Owner:0x16a4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:310a       Size:256        Owner:0x16a8\r
+\e[0m\e[0mSeg:301c       Size:256        Owner:0x16a6\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:320a       Size:256        Owner:0x16aa\r
+\e[0m\e[0mSeg:311c       Size:256        Owner:0x16a8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:330a       Size:256        Owner:0x16ac\r
+\e[0m\e[0mSeg:321c       Size:256        Owner:0x16aa\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:340a       Size:256        Owner:0x16ae\r
+\e[0m\e[0mSeg:331c       Size:256        Owner:0x16ac\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:350a       Size:256        Owner:0x16b0\r
+\e[0m\e[0mSeg:341c       Size:256        Owner:0x16ae\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:360a       Size:256        Owner:0x16b2\r
+\e[0m\e[0mSeg:351c       Size:256        Owner:0x16b0\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:370a       Size:256        Owner:0x16b4\r
+\e[0m\e[0mSeg:361c       Size:256        Owner:0x16b2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:380a       Size:256        Owner:0x16b6\r
+\e[0m\e[0mSeg:371c       Size:256        Owner:0x16b4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:390a       Size:256        Owner:0x16b8\r
+\e[0m\e[0mSeg:381c       Size:256        Owner:0x16b6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3a0a       Size:256        Owner:0x16ba\r
+\e[0m\e[0mSeg:391c       Size:256        Owner:0x16b8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3b0a       Size:256        Owner:0x16bc\r
+\e[0m\e[0mSeg:3a1c       Size:256        Owner:0x16ba\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3c0a       Size:256        Owner:0x16be\r
+\e[0m\e[0mSeg:3b1c       Size:256        Owner:0x16bc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3d0a       Size:256        Owner:0x16c0\r
+\e[0m\e[0mSeg:3c1c       Size:256        Owner:0x16be\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3e0a       Size:256        Owner:0x16c2\r
+\e[0m\e[0mSeg:3d1c       Size:256        Owner:0x16c0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:3f0a       Size:256        Owner:0x16c4\r
+\e[0m\e[0mSeg:3e1c       Size:256        Owner:0x16c2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:400a       Size:256        Owner:0x16c6\r
+\e[0m\e[0mSeg:3f1c       Size:256        Owner:0x16c4\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:410a       Size:256        Owner:0x16c8\r
+\e[0m\e[0mSeg:401c       Size:256        Owner:0x16c6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:420a       Size:256        Owner:0x16ca\r
+\e[0m\e[0mSeg:411c       Size:256        Owner:0x16c8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:430a       Size:256        Owner:0x16cc\r
+\e[0m\e[0mSeg:421c       Size:256        Owner:0x16ca\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:440a       Size:256        Owner:0x16ce\r
+\e[0m\e[0mSeg:431c       Size:256        Owner:0x16cc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:450a       Size:256        Owner:0x16d0\r
+\e[0m\e[0mSeg:441c       Size:256        Owner:0x16ce\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:460a       Size:256        Owner:0x16d2\r
+\e[0m\e[0mSeg:451c       Size:256        Owner:0x16d0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:470a       Size:256        Owner:0x16d4\r
+\e[0m\e[0mSeg:461c       Size:256        Owner:0x16d2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:480a       Size:256        Owner:0x16d6\r
+\e[0m\e[0mSeg:471c       Size:256        Owner:0x16d4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:490a       Size:256        Owner:0x16d8\r
+\e[0m\e[0mSeg:481c       Size:256        Owner:0x16d6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4a0a       Size:256        Owner:0x16da\r
+\e[0m\e[0mSeg:491c       Size:256        Owner:0x16d8\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4b0a       Size:256        Owner:0x16dc\r
+\e[0m\e[0mSeg:4a1c       Size:256        Owner:0x16da\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4c0a       Size:256        Owner:0x16de\r
+\e[0m\e[0mSeg:4b1c       Size:256        Owner:0x16dc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4d0a       Size:256        Owner:0x16e0\r
+\e[0m\e[0mSeg:4c1c       Size:256        Owner:0x16de\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4e0a       Size:256        Owner:0x16e2\r
+\e[0m\e[0mSeg:4d1c       Size:256        Owner:0x16e0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:4f0a       Size:256        Owner:0x16e4\r
+\e[0m\e[0mSeg:4e1c       Size:256        Owner:0x16e2\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:500a       Size:256        Owner:0x16e6\r
+\e[0m\e[0mSeg:4f1c       Size:256        Owner:0x16e4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:510a       Size:256        Owner:0x16e8\r
+\e[0m\e[0mSeg:501c       Size:256        Owner:0x16e6\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:520a       Size:256        Owner:0x16ea\r
+\e[0m\e[0mSeg:511c       Size:256        Owner:0x16e8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:530a       Size:256        Owner:0x16ec\r
+\e[0m\e[0mSeg:521c       Size:256        Owner:0x16ea\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:540a       Size:256        Owner:0x16ee\r
+\e[0m\e[0mSeg:531c       Size:256        Owner:0x16ec\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:550a       Size:256        Owner:0x16f0\r
+\e[0m\e[0mSeg:541c       Size:256        Owner:0x16ee\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:560a       Size:256        Owner:0x16f2\r
+\e[0m\e[0mSeg:551c       Size:256        Owner:0x16f0\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:570a       Size:256        Owner:0x16f4\r
+\e[0m\e[0mSeg:561c       Size:256        Owner:0x16f2\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:580a       Size:256        Owner:0x16f6\r
+\e[0m\e[0mSeg:571c       Size:256        Owner:0x16f4\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:590a       Size:256        Owner:0x16f8\r
+\e[0m\e[0mSeg:581c       Size:256        Owner:0x16f6\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5a0a       Size:256        Owner:0x16fa\r
+\e[0m\e[0mSeg:591c       Size:256        Owner:0x16f8\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5b0a       Size:256        Owner:0x16fc\r
+\e[0m\e[0mSeg:5a1c       Size:256        Owner:0x16fa\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5c0a       Size:256        Owner:0x16fe\r
+\e[0m\e[0mSeg:5b1c       Size:256        Owner:0x16fc\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5d0a       Size:256        Owner:0x1700\r
+\e[0m\e[0mSeg:5c1c       Size:256        Owner:0x16fe\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5e0a       Size:256        Owner:0x1702\r
+\e[0m\e[0mSeg:5d1c       Size:256        Owner:0x1700\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:5f0a       Size:256        Owner:0x1704\r
+\e[0m\e[0mSeg:5e1c       Size:256        Owner:0x1702\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:600a       Size:256        Owner:0x1706\r
+\e[0m\e[0mSeg:5f1c       Size:256        Owner:0x1704\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:610a       Size:256        Owner:0x1708\r
+\e[0m\e[0mSeg:601c       Size:256        Owner:0x1706\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:620a       Size:256        Owner:0x170a\r
+\e[0m\e[0mSeg:611c       Size:256        Owner:0x1708\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:630a       Size:256        Owner:0x170c\r
+\e[0m\e[0mSeg:621c       Size:256        Owner:0x170a\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:640a       Size:256        Owner:0x170e\r
+\e[0m\e[0mSeg:631c       Size:256        Owner:0x170c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:650a       Size:256        Owner:0x1710\r
+\e[0m\e[0mSeg:641c       Size:256        Owner:0x170e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:660a       Size:256        Owner:0x1712\r
+\e[0m\e[0mSeg:651c       Size:256        Owner:0x1710\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:670a       Size:256        Owner:0x1714\r
+\e[0m\e[0mSeg:661c       Size:256        Owner:0x1712\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:680a       Size:256        Owner:0x1716\r
+\e[0m\e[0mSeg:671c       Size:256        Owner:0x1714\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:690a       Size:256        Owner:0x1718\r
+\e[0m\e[0mSeg:681c       Size:256        Owner:0x1716\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6a0a       Size:256        Owner:0x171a\r
+\e[0m\e[0mSeg:691c       Size:256        Owner:0x1718\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6b0a       Size:256        Owner:0x171c\r
+\e[0m\e[0mSeg:6a1c       Size:256        Owner:0x171a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6c0a       Size:256        Owner:0x171e\r
+\e[0m\e[0mSeg:6b1c       Size:256        Owner:0x171c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6d0a       Size:256        Owner:0x1720\r
+\e[0m\e[0mSeg:6c1c       Size:256        Owner:0x171e\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6e0a       Size:256        Owner:0x1722\r
+\e[0m\e[0mSeg:6d1c       Size:256        Owner:0x1720\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:6f0a       Size:256        Owner:0x1724\r
+\e[0m\e[0mSeg:6e1c       Size:256        Owner:0x1722\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:700a       Size:256        Owner:0x1726\r
+\e[0m\e[0mSeg:6f1c       Size:256        Owner:0x1724\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:710a       Size:256        Owner:0x1728\r
+\e[0m\e[0mSeg:701c       Size:256        Owner:0x1726\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:720a       Size:256        Owner:0x172a\r
+\e[0m\e[0mSeg:711c       Size:256        Owner:0x1728\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:730a       Size:256        Owner:0x172c\r
+\e[0m\e[0mSeg:721c       Size:256        Owner:0x172a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:740a       Size:256        Owner:0x172e\r
+\e[0m\e[0mSeg:731c       Size:256        Owner:0x172c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:750a       Size:256        Owner:0x1730\r
+\e[0m\e[0mSeg:741c       Size:256        Owner:0x172e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:760a       Size:256        Owner:0x1732\r
+\e[0m\e[0mSeg:751c       Size:256        Owner:0x1730\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:770a       Size:256        Owner:0x1734\r
+\e[0m\e[0mSeg:761c       Size:256        Owner:0x1732\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:780a       Size:256        Owner:0x1736\r
+\e[0m\e[0mSeg:771c       Size:256        Owner:0x1734\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:790a       Size:256        Owner:0x1738\r
+\e[0m\e[0mSeg:781c       Size:256        Owner:0x1736\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7a0a       Size:256        Owner:0x173a\r
+\e[0m\e[0mSeg:791c       Size:256        Owner:0x1738\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7b0a       Size:256        Owner:0x173c\r
+\e[0m\e[0mSeg:7a1c       Size:256        Owner:0x173a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7c0a       Size:256        Owner:0x173e\r
+\e[0m\e[0mSeg:7b1c       Size:256        Owner:0x173c\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7d0a       Size:256        Owner:0x1740\r
+\e[0m\e[0mSeg:7c1c       Size:256        Owner:0x173e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7e0a       Size:256        Owner:0x1742\r
+\e[0m\e[0mSeg:7d1c       Size:256        Owner:0x1740\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:7f0a       Size:256        Owner:0x1744\r
+\e[0m\e[0mSeg:7e1c       Size:256        Owner:0x1742\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:800a       Size:256        Owner:0x1746\r
+\e[0m\e[0mSeg:7f1c       Size:256        Owner:0x1744\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:810a       Size:256        Owner:0x1748\r
+\e[0m\e[0mSeg:801c       Size:256        Owner:0x1746\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:820a       Size:256        Owner:0x174a\r
+\e[0m\e[0mSeg:811c       Size:256        Owner:0x1748\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:830a       Size:256        Owner:0x174c\r
+\e[0m\e[0mSeg:821c       Size:256        Owner:0x174a\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:840a       Size:256        Owner:0x174e\r
+\e[0m\e[0mSeg:831c       Size:256        Owner:0x174c\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:850a       Size:256        Owner:0x1750\r
+\e[0m\e[0mSeg:841c       Size:256        Owner:0x174e\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:860a       Size:256        Owner:0x1752\r
+\e[0m\e[0mSeg:851c       Size:256        Owner:0x1750\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:870a       Size:256        Owner:0x1754\r
+\e[0m\e[0mSeg:861c       Size:256        Owner:0x1752\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:880a       Size:256        Owner:0x1756\r
+\e[0m\e[0mSeg:871c       Size:256        Owner:0x1754\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:890a       Size:256        Owner:0x1758\r
+\e[0m\e[0mSeg:881c       Size:256        Owner:0x1756\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8a0a       Size:256        Owner:0x175a\r
+\e[0m\e[0mSeg:891c       Size:256        Owner:0x1758\r
 \e[45;35m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8b0a       Size:256        Owner:0x175c\r
+\e[0m\e[0mSeg:8a1c       Size:256        Owner:0x175a\r
 \e[45;35m+++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:8c0a       Size:273        Owner:0xe400\r
+\e[0m\e[0mSeg:8b1c       Size:256        Owner:0x175c\r
+\e[45;35m++++\e[0m\e[42;32m\r
+\e[0m\e[0mSeg:8c1c       Size:273        Owner:0xe3f0\r
 \e[44;34m++++\e[0m\e[42;32m\r
-\e[0m\e[0mSeg:b80a       Size:18421      Owner:0x0\r
-\e[41;31m++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m
\ No newline at end of file
+\e[0m\e[0mSeg:b81c       Size:18403      Owner:0x0\r
+\e[41;31m+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\e[0m
\ No newline at end of file

diff --git a/HEAP.16W b/HEAP.16W
index 0c3d344..b3a1984 100755 (executable)
--- a/HEAP.16W
+++ b/HEAP.16W
@@ -1,47 +1,47 @@
 \r
        == default ==\r
 \r
-  USED block at 27f70016 of size 66\r
-  USED block at 27f70058 of size 66\r
-  USED block at 27f7009a of size 136\r
-  FREE block at 27f70122 of size 18\r
-  USED block at 27f70134 of size 20\r
-  FREE block at 27f70148 of size 7860\r
+  USED block at 28090016 of size 66\r
+  USED block at 28090058 of size 66\r
+  USED block at 2809009a of size 136\r
+  FREE block at 28090122 of size 18\r
+  USED block at 28090134 of size 20\r
+  FREE block at 28090148 of size 7860\r
 OK - end of heap\r
 \r
        == near ==\r
 \r
-  USED block at 17f6e436 of size 12\r
-  USED block at 17f6e442 of size 332\r
-  USED block at 17f6e58e of size 52\r
-  USED block at 17f6e5c2 of size 20\r
-  USED block at 17f6e5d6 of size 20\r
-  USED block at 17f6e5ea of size 20\r
-  USED block at 17f6e5fe of size 20\r
-  USED block at 17f6e612 of size 20\r
-  USED block at 17f6e626 of size 6614\r
+  USED block at 1808e426 of size 12\r
+  USED block at 1808e432 of size 332\r
+  USED block at 1808e57e of size 52\r
+  USED block at 1808e5b2 of size 20\r
+  USED block at 1808e5c6 of size 20\r
+  USED block at 1808e5da of size 20\r
+  USED block at 1808e5ee of size 20\r
+  USED block at 1808e602 of size 20\r
+  USED block at 1808e616 of size 6630\r
 OK - end of heap\r
 \r
        == far ==\r
 \r
-  USED block at 27f70016 of size 66\r
-  USED block at 27f70058 of size 66\r
-  USED block at 27f7009a of size 136\r
-  USED block at 27f70122 of size 18\r
-  USED block at 27f70134 of size 20\r
-  USED block at 27f70148 of size 7860\r
+  USED block at 28090016 of size 66\r
+  USED block at 28090058 of size 66\r
+  USED block at 2809009a of size 136\r
+  USED block at 28090122 of size 18\r
+  USED block at 28090134 of size 20\r
+  USED block at 28090148 of size 7860\r
 OK - end of heap\r
 \r
 Memory Type         Total      Used       Free\r
 ----------------  --------   --------   --------\r
 Default                   8166         288       7878\r
-Near              7110         496       6614\r
+Near              7126         496       6630\r
 Far               8166         0         7878\r
 ----------------  --------   --------   --------\r
-coreleft = 6612\r
-farcoreleft = 30720\r
+coreleft = 6628\r
+farcoreleft = 30736\r
 GetFreeSize = 24128\r
-GetNearFreeSize = 6614\r
+GetNearFreeSize = 6630\r
 GetFarFreeSize = 24128\r
-memavl = 6612\r
+memavl = 6628\r
 stackavail = 31588\r

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

diff --git a/bcexmm.dsk b/bcexmm.dsk
index 5e23aec..2bd2d3e 100755 (executable)
Binary files a/bcexmm.dsk and b/bcexmm.dsk differ

diff --git a/bcexmm.exe b/bcexmm.exe
index 9f778fa..47d175b 100755 (executable)
Binary files a/bcexmm.exe and b/bcexmm.exe differ

diff --git a/bcexmm.prj b/bcexmm.prj
index 8e4e273..2abea17 100755 (executable)
Binary files a/bcexmm.prj and b/bcexmm.prj differ

diff --git a/src/exmmtest.c b/src/exmmtest.c
index 3da6f44..b57a6f0 100755 (executable)
--- a/src/exmmtest.c
+++ b/src/exmmtest.c
@@ -62,12 +62,12 @@ void segatesuto()
 //     getch();\r
 }\r
 #endif\r
-global_game_variables_t gvar;\r
+\r
 void\r
 main(int argc, char *argv[])\r
 {\r
        byte w=1;\r
-       //static global_game_variables_t gvar;\r
+       static global_game_variables_t gvar;\r
 #ifdef __WATCOMC__\r
        __segment sega;\r
 #endif\r

diff --git a/src/lib/16_pm.c b/src/lib/16_pm.c
index 82f45db..848af9c 100755 (executable)
--- a/src/lib/16_pm.c
+++ b/src/lib/16_pm.c
@@ -34,19 +34,19 @@ boolean debugpm=0;
 #endif\r
 \r
 //     Main Mem specific variables\r
-       boolean                 MainPresent;\r
+       //boolean                       MainPresent;\r
 /*     memptr                  MainMemPages[PMMaxMainMem];\r
        PMBlockAttr             gvar->pm.mm.MainMemUsed[PMMaxMainMem];\r
        int                             gvar->pm.mm.MainPagesAvail;*/\r
 \r
 //     EMS specific variables\r
-       boolean                 EMSPresent;\r
+       //boolean                       EMSPresent;\r
 /*     word                    gvar->pm.emm.EMSAvail,gvar->pm.emm.EMSPagesAvail,gvar->pm.emm.EMSHandle,\r
                                        gvar->pm.emm.EMSPageFrame,gvar->pm.emm.EMSPhysicalPage;\r
        gvar->pm.emm.EMSListStruct      gvar->pm.emm.EMSList[EMSFrameCount];*/\r
 \r
 //     XMS specific variables\r
-       boolean                 XMSPresent;\r
+       //boolean                       XMSPresent;\r
        //word                  gvar->pm.xmm.XMSAvail,gvar->pm.xmm.XMSPagesAvail,gvar->pm.xmm.XMSHandle;\r
        word            XMSDriver;\r
 /*     int                             gvar->pm.xmm.XMSProtectPage = -1;\r
@@ -58,7 +58,7 @@ boolean debugpm=0;
        word                    PMSpriteStart,PMSoundStart;*/\r
 \r
 //     General usage variables\r
-       boolean                 PMStarted;/*,\r
+/*     boolean                 PMStarted,\r
                                        gvar->pm.PMPanicMode,\r
                                        gvar->pm.PMThrashing;\r
        word                    gvar->pm.XMSPagesUsed,\r
@@ -148,7 +148,7 @@ PML_StartupEMS(global_game_variables_t *gvar)
        unsigned int EMSVer = 0;\r
        unsigned        totalEMSpages,freeEMSpages,EMSPageFrame,EMSHandle,EMSAvail;\r
        totalEMSpages = freeEMSpages = EMSPageFrame = 0;\r
-       EMSPresent = false;                     // Assume that we'll fail\r
+       gvar->pm.emm.EMSPresent = false;                        // Assume that we'll fail\r
        gvar->pm.emm.EMSAvail = 0;\r
 \r
        __asm {\r
@@ -277,10 +277,10 @@ End2:
                strcpy(str,"PML_StartupEMS: EMS error ");\r
                MM_EMSerr(str, err);\r
                printf("%s\n",str);\r
-               return(EMSPresent);\r
+               return(gvar->pm.emm.EMSPresent);\r
        }\r
 \r
-       EMSPresent = true;                      // We have EMS\r
+       gvar->pm.emm.EMSPresent = true;                 // We have EMS\r
        gvar->pm.emm.EMSPageFrame = EMSPageFrame;\r
        gvar->pm.emm.EMSAvail = EMSAvail;\r
        gvar->pm.emm.EMSVer = EMSVer;\r
@@ -288,7 +288,7 @@ End2:
        gvar->pm.emm.freeEMSpages = freeEMSpages;\r
        gvar->pm.emm.totalEMSpages = totalEMSpages;\r
 \r
-       return(EMSPresent);\r
+       return(gvar->pm.emm.EMSPresent);\r
 }\r
 \r
 //\r
@@ -304,7 +304,7 @@ PML_ShutdownEMS(global_game_variables_t *gvar)
 \r
        EMSHandle=gvar->pm.emm.EMSHandle;\r
 \r
-       if (EMSPresent)\r
+       if (gvar->pm.emm.EMSPresent)\r
        {\r
                __asm {\r
                        mov     ah,EMS_FREEPAGES\r
@@ -355,7 +355,7 @@ PML_ShutdownEMS(global_game_variables_t *gvar)
 boolean\r
 PML_StartupXMS(global_game_variables_t *gvar)\r
 {\r
-       XMSPresent = false;                                     // Assume failure\r
+       gvar->pm.xmm.XMSPresent = false;                                        // Assume failure\r
        gvar->pm.xmm.XMSAvail = 0;\r
 \r
        _AX=0x4300;\r
@@ -392,9 +392,9 @@ PML_StartupXMS(global_game_variables_t *gvar)
 \r
        gvar->mmi.XMSmem += gvar->pm.xmm.XMSAvail * 1024;\r
 \r
-       XMSPresent = true;\r
+       gvar->pm.xmm.XMSPresent = true;\r
 error:\r
-       return(XMSPresent);\r
+       return(gvar->pm.xmm.XMSPresent);\r
 }\r
 \r
 //\r
@@ -474,7 +474,7 @@ PML_CopyFromXMS(byte far *target,int sourcepage,word length, global_game_variabl
 void\r
 PML_ShutdownXMS(global_game_variables_t *gvar)\r
 {\r
-       if (XMSPresent)\r
+       if (gvar->pm.xmm.XMSPresent)\r
        {\r
                _DX = gvar->pm.xmm.XMSHandle;\r
                XMS_CALL(XMS_FREE);\r
@@ -502,7 +502,7 @@ PM_SetMainMemPurge(int level, global_game_variables_t *gvar)
 {\r
        int     i;\r
 \r
-       if(MainPresent)\r
+       if(gvar->pm.mm.MainPresent)\r
        for (i = 0;i < PMMaxMainMem;i++)\r
        {\r
 #ifdef __DEBUG_PM__\r
@@ -541,7 +541,7 @@ PM_CheckMainMem(global_game_variables_t *gvar)
        PMBlockAttr             *used;\r
        PageListStruct  far *page;\r
 \r
-       if (!MainPresent)\r
+       if (!gvar->pm.mm.MainPresent)\r
                return;\r
 \r
        for (i = 0,page = gvar->pm.PMPages;i < gvar->pm.fi.ChunksInFile;i++,page++)\r
@@ -608,7 +608,7 @@ PML_StartupMainMem(global_game_variables_t *gvar)
        memptr  *p;\r
 \r
        gvar->pm.mm.MainPagesAvail = 0;\r
-       MainPresent = false;\r
+       gvar->pm.mm.MainPresent = false;\r
        MM_BombOnError(false, gvar);\r
        printf("PML_StartupMainMem()\n");\r
        printf("        p=%04x  MainMemPages=%04x\n", p, gvar->pm.mm.MainMemPages);\r
@@ -630,7 +630,7 @@ PML_StartupMainMem(global_game_variables_t *gvar)
                Quit("PM_SetupMainMem: Not enough main memory");\r
                //return;\r
        }\r
-       MainPresent = true;\r
+       gvar->pm.mm.MainPresent = true;\r
 }\r
 \r
 //\r
@@ -922,7 +922,7 @@ PML_PutPageInXMS(int pagenum, global_game_variables_t *gvar)
        int                             usexms;\r
        PageListStruct  far *page;\r
 \r
-       if (!XMSPresent)\r
+       if (!gvar->pm.xmm.XMSPresent)\r
                return;\r
 \r
        page = &gvar->pm.PMPages[pagenum];\r
@@ -1051,7 +1051,7 @@ PML_GetPageFromXMS(int pagenum,boolean mainonly, global_game_variables_t *gvar)
        PageListStruct  far *page;\r
 \r
        page = &gvar->pm.PMPages[pagenum];\r
-       if (XMSPresent && (page->xmsPage != -1))\r
+       if (gvar->pm.xmm.XMSPresent && (page->xmsPage != -1))\r
        {\r
                gvar->pm.xmm.XMSProtectPage = pagenum;\r
                checkaddr = PML_GetAPageBuffer(pagenum,mainonly, gvar);\r
@@ -1365,7 +1365,7 @@ PM_Startup(global_game_variables_t *gvar)
        boolean nomain,noems,noxms;\r
        int             i;\r
 \r
-       if (PMStarted)\r
+       if (gvar->pm.PMStarted)\r
                return;\r
 \r
        //strcpy(&(gvar->pm.fi.PageFileName), "VSWAP.");\r
@@ -1408,7 +1408,7 @@ PM_Startup(global_game_variables_t *gvar)
        if (!noxms)\r
                //++++PML_StartupXMS(gvar);     //TODO: convert\r
 \r
-       if (!nomain && !EMSPresent)\r
+       if (!nomain && !gvar->pm.emm.EMSPresent)\r
        {\r
                Quit("PM_Startup: No main or EMS\n");\r
                //return;\r
@@ -1417,7 +1417,7 @@ PM_Startup(global_game_variables_t *gvar)
 \r
        PM_Reset(gvar);\r
 \r
-       PMStarted = true;\r
+       gvar->pm.PMStarted = true;\r
 }\r
 \r
 //\r
@@ -1429,7 +1429,7 @@ PM_Shutdown(global_game_variables_t *gvar)
        PML_ShutdownXMS(gvar);\r
        PML_ShutdownEMS(gvar);\r
 \r
-       if (!PMStarted)\r
+       if (!gvar->pm.PMStarted)\r
                return;\r
 \r
        PML_ClosePageFile(gvar);\r