MZ is back!HEADmain

1 files changed, 35 insertions, 0 deletions

diff --git a/v4.0/src/DOS/SHRPRINT.ASM b/v4.0/src/DOS/SHRPRINT.ASM
new file mode 100644
index 0000000..6854eca
--- /dev/null
+++ b/v4.0/src/DOS/SHRPRINT.ASM
@@ -0,0 +1,35 @@
+;       SCCSID = @(#)shrprint.asm       1.1 85/04/10
+TITLE   SHRPRINT - PRINTF at SHARE level
+NAME    SHRPRINT
+;
+;
+;   Modification history:
+;
+;       Created: MZ 16 June 1984
+;
+
+.xlist
+;
+; get the appropriate segment definitions
+;
+include dosseg.asm
+
+Share   SEGMENT PARA PUBLIC 'SHARE'
+        ASSUME  SS:DOSGROUP,CS:SHARE
+
+.xcref
+INCLUDE DOSSYM.INC
+INCLUDE DEVSYM.INC
+.cref
+.list
+.sall
+
+        I_Need  Proc_ID,WORD
+        I_Need  User_ID,WORD
+
+BREAK   <debugging output>
+
+include print.asm
+
+SHARE   ENDS
+END