refresh wwww

[16.git] / 16 / xw__ / mxcg.asm

diff --git a/16/xw__/mxcg.asm b/16/xw__/mxcg.asm
new file mode 100755 (executable)
index 0000000..72cd3ab
--- /dev/null
+++ b/16/xw__/mxcg.asm
@@ -0,0 +1,43 @@
+.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