1 files changed, 73 insertions, 0 deletions

diff --git a/v4.0/src/CMD/SHARE/SHARESR.ASM b/v4.0/src/CMD/SHARE/SHARESR.ASM
new file mode 100644
index 0000000..4da66db
--- /dev/null
+++ b/v4.0/src/CMD/SHARE/SHARESR.ASM
@@ -0,0 +1,73 @@
+        Title   Sharesr -  IBM CONFIDENTIAL
+;                                  $SALUT (0,36,41,44)
+                                   include SHAREHDR.INC
+;
+;     Label: "The DOS SHARE Utility"
+;            "Version 4.00 (C) Copyright 1988 Microsoft"
+;            "Licenced Material - Program Property of Microsoft"
+;
+;******************* END OF SPECIFICATIONS *************************************
+
+                                   NAME Sharsr
+
+                                   .xlist
+                                   .xcref
+
+                                   include SYSMSG.INC
+
+                                   .cref
+                                   .list
+
+                                   MSG_UTILNAME <SHARE>
+
+Share                              SEGMENT BYTE PUBLIC 'SHARE'
+
+                                   PUBLIC SYSDISPMSG, SYSLOADMSG, SYSPARSE
+
+                                   ASSUME CS:Share,DS:nothing,ES:nothing
+
+                                           ; include Message Code
+
+
+                                   .xlist
+                                   .xcref
+
+
+                                   MSG_SERVICES <MSGDATA>
+
+                                   MSG_SERVICES <LOADmsg>
+
+                                   MSG_SERVICES <DISPLAYmsg,CHARmsg>
+
+                                   MSG_SERVICES <SHARE.CLA,SHARE.CL1,SHARE.CL2>
+
+                                   .cref
+                                   .list
+
+
+false                              =    0
+
+DateSW                             equ  false
+TimeSW                             equ  false
+CmpxSW                             equ  false
+KeySW                              equ  false
+DrvSW                              equ  false
+FileSW                             equ  false
+QusSW                              equ  false
+Val2SW                             equ  false
+Val3SW                             equ  false
+
+
+                                   ; include parse.asm
+                                   .xlist
+                                   .xcref
+                                   include parse.asm
+                                   include msgdcl.inc
+                                   .cref
+                                   .list
+
+
+
+Share                              ENDS
+END
+
\ No newline at end of file