+++ /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