--- /dev/null
+.387
+ PUBLIC MXGETPALETTE
+MX_TEXT SEGMENT PARA PUBLIC USE16 'CODE'
+ ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
+MXGETPALETTE:
+ push bp
+ mov bp,sp
+ sub sp,0
+ push es
+ push di
+ les di,dword ptr 0aH[bp]
+ mov cx,word ptr 6[bp]
+ mov ax,word ptr 8[bp]
+ mov dx,3c7H
+ out dx,al
+ inc dx
+ inc dx
+ cld
+L$1:
+ in al,dx
+ stosb
+ in al,dx
+ stosb
+ in al,dx
+ stosb
+ loop L$1
+ pop di
+ pop es
+ mov sp,bp
+ pop bp
+ retf 8
+MX_TEXT ENDS
+ END