+++ /dev/null
-.387
- PUBLIC MXCOLORTOGRAY
-MX_TEXT SEGMENT PARA PUBLIC USE16 'CODE'
- ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
-MXCOLORTOGRAY:
- push bp
- mov bp,sp
- sub sp,0
- push ds
- push si
- push es
- push di
- mov cx,word ptr 6[bp]
- jcxz L$2
- lds si,dword ptr 0cH[bp]
- les di,dword ptr 8[bp]
- cld
- mov bx,4d97H
-L$1:
- lodsb
- mul bh
- mov dx,ax
- lodsb
- mul bl
- add dx,ax
- lodsb
- mov ah,1cH
- mul ah
- add ax,dx
- mov al,ah
- stosw
- stosb
- loop L$1
-L$2:
- pop di
- pop es
- pop si
- pop ds
- mov sp,bp
- pop bp
- retf 0aH
-MX_TEXT ENDS
- END