X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2F16_mm.c;h=1ae9e65ab9f94e24f706f0eded02541424963b6a;hb=8d1c541aafd07bb04574041ddcc6e96a10d3eac9;hp=7b8dfec921cb94ad430771410c71477c641a4fa5;hpb=bc3244976f5e812c6f1ce9ed31847e89dd322bd9;p=16.git

diff --git a/src/lib/16_mm.c b/src/lib/16_mm.c
index 7b8dfec9..1ae9e65a 100644
--- a/src/lib/16_mm.c
+++ b/src/lib/16_mm.c
@@ -300,6 +300,36 @@ unsigned MM_MapEMS(mminfo_t *mm)
 	return 0;
 }
 
+/*
+SUB EMS.MapXPages (PhysicalStart, LogicalStart, NumPages, Handle)
+
+  'Maps up to 4 logical EMS pages to physical pages in the page frame, where:
+  '
+  'PhysicalStart = Physical page first logical page is mapped to
+  'LogicalStart  = First logical page to map
+  'NumPages      = Number of pages to map (1 to 4)
+  'Handle        = EMS handle logical pages are allocated to
+
+  'Create a buffer containing the page information
+  FOR x = 0 TO NumPages - 1
+    MapInfo$ = MapInfo$ + MKI$(LogicalStart + x) + MKI$(PhysicalStart + x)
+  NEXT
+
+  Regs.ax = &H5000                           'Map the pages in the buffer
+  Regs.cx = NumPages                         'to the pageframe
+  Regs.dx = Handle
+  Regs.ds = VARSEG(MapInfo$)
+  Regs.si = SADD(MapInfo$)
+  InterruptX &H67, Regs, Regs
+  EMS.Error = (Regs.ax AND &HFF00&) \ &H100  'Store the status code
+
+END SUB
+*/
+void MM_MapXEMS(mminfo_t *mm)
+{
+
+}
+
 //==========================================================================
 
 /*