MZ is back!HEADmain

1 files changed, 37 insertions, 0 deletions

diff --git a/v4.0/src/CMD/FC/MAXMIN.ASM b/v4.0/src/CMD/FC/MAXMIN.ASM
new file mode 100644
index 0000000..eb9ce53
--- /dev/null
+++ b/v4.0/src/CMD/FC/MAXMIN.ASM
@@ -0,0 +1,37 @@
+;
+; maximum and minimum routines.
+;
+
+.xlist
+include version.inc
+include cmacros.inc
+.list
+
+sBegin  code
+assumes cs,code
+
+cProc   max,<PUBLIC>
+parmW   a
+parmW   b
+cBegin
+        mov     ax,a
+        cmp     ax,b
+        jg      maxdone
+        mov     ax,b
+maxdone:
+cEnd
+
+cProc   min,<PUBLIC>
+parmW   a
+parmW   b
+cBegin
+        mov     ax,a
+        cmp     ax,b
+        jl      mindone
+        mov     ax,b
+mindone:
+cEnd
+
+sEnd
+
+end