Upload

Digital Research

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/0read.me

@@ -0,0 +1,4 @@
+PIP status: got latest from Ray			2/9/83
+PIP BUG: wrong err msg when *.$$$ exists or disk runs out of space ????
+PIP BUG: accepts 'pip a:[r]=b:*.cmd' without error (or setting SYS attr)
+

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/inpout.a86

@@ -0,0 +1,46 @@
+name inpout
+;
+;	CP/M-86 1.1 PIP Utility INP: / OUT:
+;	Interface module with separate code and data
+;	Code org'd at 080h
+;	December 18, 1981
+
+cgroup	group	code
+
+assume	cs:cgroup
+
+code	segment	public	'CODE'
+public	inploc,outloc,inpd,outd
+
+	org	00h		; for separate code and data
+inpd	proc
+    	push bp
+    	call inploc
+    	pop bp
+    	ret
+inpd	endp
+
+outd	proc
+    	push bp
+    	mov bp,sp
+    	mov al,[bp]+4
+    	call outloc
+    	pop bp
+    	ret 2
+outd	endp
+
+inploc	proc
+    	mov al,01Ah
+    	ret
+inploc	endp
+
+outloc	proc
+    	ret
+    	nop
+    	nop
+outloc	endp
+
+    	org	07fh
+    	db	0
+code	ends
+end

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/inpout.lst

@@ -0,0 +1,75 @@
+MCS-86 MACRO ASSEMBLER    INPOUT                                                                               PAGE    1
+
+
+ISIS-II MCS-86 MACRO ASSEMBLER V2.1 ASSEMBLY OF MODULE INPOUT
+OBJECT MODULE PLACED IN :F0:INPOUT.OBJ
+ASSEMBLER INVOKED BY:  :F0: INPOUT.A86 XREF
+                       
+
+LOC  OBJ                  LINE     SOURCE
+
+                             1     name inpout
+                             2     ;
+                             3     ;       CP/M-86 1.1 PIP Utility INP: / OUT:
+                             4     ;       Interface module with separate code and data
+                             5     ;       Code org'd at 080h
+                             6     ;       December 18, 1981
+                             7     
+                             8     cgroup  group   code
+                             9     
+                            10     assume  cs:cgroup
+                            11     
+----                        12     code    segment public  'CODE'
+                            13     public  inploc,outloc,inpd,outd
+                            14     
+0000                        15             org     00h             ; for separate code and data
+0000                        16     inpd    proc
+0000 55                     17             push bp
+0001 E80F00                 18             call inploc
+0004 5D                     19             pop bp
+0005 C3                     20             ret
+                            21     inpd    endp
+                            22     
+0006                        23     outd    proc
+0006 55                     24             push bp
+0007 8BEC                   25             mov bp,sp
+0009 8A4604                 26             mov al,[bp]+4
+000C E80700                 27             call outloc
+000F 5D                     28             pop bp
+0010 C20200                 29             ret 2
+                            30     outd    endp
+                            31     
+0013                        32     inploc  proc
+0013 B01A                   33             mov al,01Ah
+0015 C3                     34             ret
+                            35     inploc  endp
+                            36     
+0016                        37     outloc  proc
+0016 C3                     38             ret
+0017 90                     39             nop
+0018 90                     40             nop
+                            41     outloc  endp
+                            42     
+007F                        43             org     07fh
+007F 00                     44             db      0
+----                        45     code    ends
+                            46     end
+MCS-86 MACRO ASSEMBLER    INPOUT                                                                               PAGE    2
+
+
+XREF SYMBOL TABLE LISTING
+---- ------ ----- -------
+
+
+NAME    TYPE     VALUE  ATTRIBUTES, XREFS
+
+??SEG . SEGMENT         SIZE=0000H PARA PUBLIC 
+CGROUP. GROUP           CODE   8# 10
+CODE. . SEGMENT         SIZE=0080H PARA PUBLIC 'CODE'  8# 12 45
+INPD. . L NEAR   0000H  CODE PUBLIC  13 16# 21
+INPLOC. L NEAR   0013H  CODE PUBLIC  13 18 32# 35
+OUTD. . L NEAR   0006H  CODE PUBLIC  13 23# 30
+OUTLOC. L NEAR   0016H  CODE PUBLIC  13 27 37# 41
+
+
+ASSEMBLY COMPLETE, NO ERRORS FOUND

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/pip.com

@@ -0,0 +1,19 @@
+$ !
+$ ! Compile, link, locate and generate hex for
+$ ! 	'PIP'
+$ ! Concurrent CP/M-86
+$ !
+$ util := pip
+$ date := 2/9/83
+$ ccpmsetup	! set up environment
+$ assign 'f$directory()' f1:
+
+$ asm86 scd1.a86 xref
+$ asm86 inpout.a86 xref
+$ plm86 'util'.plm xref 'p1' optimize(3) debug date('date')
+$ link86 scd1.obj,inpout.obj,'util'.obj  to 'util'.lnk
+$ loc86 'util'.lnk od(sm(code,dats,data,stack,const)) -
+  ad(sm(code(0),dats(10000h))) ss(stack(+32)) to 'util'.
+$ h86 'util'
+$ !
+$ !pclean

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/pip.h86

@@ -0,0 +1,718 @@
+:020000021000EC
+:0100040000FB
+:020000021000EC
+:020006000000F8
+:020000021005E7
+:0700000000000000000000F9
+:020000021007E5
+:04000C0000000000F0
+:020000020000FC
+:10000000EB2C90434F5059524947485420286329BC
+:100010002031393833206279204449474954414CD2
+:1000200020524553454152434820494E432E9C5847
+:10003000FA8CD98ED18D262403509DE8C20033C995
+:100040008BD1CDE0558BEC8B56048B4E06CDE05D0D
+:03005000C20400E7
+:020000020007F5
+:01000F0000F0
+:020000020008F4
+:1000000055E80F005DC3558BEC8A4604E807005D98
+:09001000C20200B01AC3C39090B3
+:02000002000FED
+:01000F0000F0
+:020000021011DB
+:01000E0000F1
+:020000021037B5
+:10000C00202830322F30372F383329204343502FBC
+:10001C004D2D383620504950205645525320332E02
+:02002C00312081
+:020000021039B3
+:0A000E004449534B2052454144245D
+:02000002103AB2
+:0B0008004449534B20575249544524F3
+:02000002103BB1
+:0700030056455249465924FD
+:02000002103BB1
+:10000A00494E56414C49442044455354494E415463
+:04001A00494F4E24D8
+:02000002103CB0
+:0F000E00494E56414C494420534F5552434524C7
+:02000002103DAF
+:0D000D00555345522041424F525445442462
+:02000002103EAE
+:0E000A0042414420504152414D45544552243C
+:02000002103FAD
+:10000800494E56414C49442055534552204E554D72
+:0400180042455224E7
+:020000021040AC
+:0F000C00494E56414C494420464F524D415424D1
+:020000021041AB
+:10000B00484558205245434F524420434845434BA3
+:04001B0053554D24C8
+:020000021042AA
+:0F000F0046494C45204E4F5420464F554E4424F1
+:020000021043A9
+:10000E005354415254204E4F5420464F554E442483
+:020000021044A8
+:0F000E0051554954204E4F5420464F554E4424CF
+:020000021045A7
+:10000D00494E56414C49442048455820444947499A
+:02001D00542469
+:020000021046A6
+:0B000F00434C4F53452046494C45240C
+:020000021047A5
+:10000A00554E455850454354454420454E44204F8B
+:0B001A0046204845582046494C45242C
+:020000021049A3
+:10000500494E56414C494420534550415241544F65
+:02001500522473
+:02000002104AA2
+:100007004E4F204449524543544F52592053504173
+:030017004345243A
+:02000002104BA1
+:10000A00494E56414C494420464F524D415420577F
+:10001A00495448205350415243452046494C4524AF
+:02000002104D9F
+:0A000A004D414B452046494C45246A
+:02000002104E9E
+:0A0004004F50454E2046494C45245C
+:02000002104E9E
+:0D000E005052494E5445522042555359243A
+:02000002104F9D
+:10000B0043414E27542044454C4554452054454DBF
+:07001B00502046494C45242A
+:020000021032BA
+:100004009E03A803B303BA03CE03DD03EA03F80394
+:100014000C041B042F043E044E045D046F047A0494
+:0E0024009504A704BA04DA04E404EE04FB0415
+:0200000210519B
+:100002004E4F204449524543544F52592053504178
+:030012004345243F
+:0200000210529A
+:0E0005004E4F204441544120424C4F434B2467
+:02000002105399
+:1000030043414E275420434C4F53452043555252AE
+:0B001300454E5420455854454E5424DF
+:02000002105498
+:10000E005345454B20544F20554E57524954544555
+:09001E004E20455854454E54246F
+:02000002105696
+:1000070052414E444F4D205245434F5244204F5585
+:0B00170054204F462052414E47452424
+:02000002105894
+:100002005245434F52445320444F4E2754204D41B2
+:0400120054434824E7
+:02000002105993
+:0E0006005245434F5244204C4F434B45442437
+:02000002105A92
+:10000400494E56414C49442046494C454E414D4584
+:0100140024C7
+:02000002105B91
+:0D00050046434220434845434B53554D248C
+:020000021035B7
+:100002001205250533054E0512056705820596057D
+:04001200A405B50587
+:02000002105C90
+:0100020024D9
+:02000002105C90
+:0F0003004E4F4E5245434F56455241424C4524B5
+:02000002105D8F
+:09000200522F4F204449534B24B6
+:02000002105D8F
+:09000B00522F4F2046494C4524B8
+:02000002105E8E
+:10000400494E56414C4944204449534B2053454C96
+:0400140045435424E8
+:02000002105F8D
+:10000800494E434F4D50415449424C45204D4F4471
+:0200180045247D
+:0200000210608C
+:10000A00494E56414C49442050415353574F52444C
+:01001A0024C1
+:0200000210618B
+:0F000B00414C52454144592045584953545324C0
+:0200000210628A
+:0F000A004C494D495420455843454544454424ED
+:020000021036B6
+:10000600C205C305D205DB05E405F805B5050A06F4
+:060016001B06A4052A06EA
+:02000002106983
+:080002004552524F523A2024EE
+:02000002106389
+:1000090002120D0F09030A140E0A1611130001003A
+:0100190001E5
+:02000002106983
+:04000A00202D202461
+:02000002106983
+:03000E0024242483
+:02000002106A82
+:1000010044455354494E4154494F4E20495320527F
+:100011002F4F2C2044454C4554452028592F4E291B
+:030021003F202459
+:02000002106C80
+:100004002A2A4E4F542044454C455445442A2A2418
+:02000002106488
+:10000A0000000002010200010200000100020002D9
+:0A001A0002000202010000000001D4
+:02000002106D7F
+:0A000400434F5059494E47202D2468
+:02000002106D7F
+:09000E002028592F4E293F20241F
+:02000002106686
+:0C000400203D2E3A3B2C3C3E0D5F5B5D26
+:02000002106785
+:100000004F555450524E4C535441584F00000041EC
+:100010005558434F4E415849494E504E554C454F07
+:02002000460098
+:02000002106E7E
+:10000700524551554952455320434F4E435552523D
+:0C001700454E542043502F4D2D38362408
+:0200000210707C
+:10000300434F4E43555252454E542043502F4D2D8E
+:100013003836205049502056455253494F4E2033CD
+:030023002E312457
+:020000020010EC
+:03000000558BEC31
+:020000020038C4
+:10000800558BEC8B4604A2D2018B460488E0A2CF24
+:05001800015DC20200C1
+:020000020039C3
+:0E000D00558BECB000B4005050E89BFC5DC376
+:02000002003AC2
+:0F000B00558BECB00150B8000050E88CFC5DC381
+:02000002003BC1
+:10000A00558BECB002508A4604247FB40050E8793C
+:05001A00FC5DC20200C4
+:02000002003CC0
+:10000F00558BECB00D50E8E2FFB00A50E8DCFF5D15
+:01001F00C31D
+:02000002003EBE
+:10000000558BECB00950FF7604E858FC5DC2020045
+:02000002003FBD
+:10000000558BECE8D9FFFF7604E8E4FF5DC20200FF
+:020000020040BC
+:10000000558BECC606D30180B00A50B8D30150E836
+:0400100032FC5DC39E
+:020000020041BB
+:0F000400558BECB00C50B8000050E823FC5DC3E6
+:020000020042BA
+:10000300558BECB01A50FF7604E815FC5DC2020074
+:020000020043B9
+:10000300558BEC8B5E048D472450E8E3FF5DC20201
+:0100130000EC
+:020000020044B8
+:10000400558BECFF7604E8E6FFB00F50FF7604E86A
+:10001400EEFB50E82EFF803ED201FF741D8B5E0480
+:100024008A4708D0C0D0D87311B0105053E8D0FB21
+:0E003400C606D201FFC606CF01005DC2020063
+:020000020048B4
+:10000200558BECB01050FF7604E8B6FB50E8F6FED4
+:040012005DC20200C9
+:020000020049B3
+:10000600558BECB01150FF7604E8A2FB50E8E2FEF7
+:040016005DC20200C5
+:02000002004AB2
+:10000A00558BECB01250B8000050E88DFB50E8CD8B
+:03001A00FE5DC3C5
+:02000002004BB1
+:10000D00558BECFF7604E86DFFB01350FF7604E8D6
+:0A001D0075FB50E8B5FE5DC202005D
+:02000002004DAF
+:10000700558BECB01450FF7604E861FB50E8A1FE75
+:040017005DC20200C4
+:02000002004EAE
+:10000B00558BECB01550FF7604E84DFB50E88DFE98
+:04001B005DC20200C0
+:02000002004FAD
+:10000F00558BEC8B5E04827F240075068067067F1C
+:10001F00EB0E8B5E04804F06808D472450E804FF63
+:10002F00B01650FF7604E81CFB50E85CFE5DC20280
+:01003F0000C0
+:020000020053A9
+:10000000558BECFF7604E8FAFEB01750FF7604E853
+:0A00100002FB50E842FE5DC2020050
+:020000020054A8
+:0F000A00558BECB01950B8000050E8EDFA5DC30B
+:020000020055A7
+:10000900558BECB01E50FF7604E8DFFA50E81FFE6E
+:040019005DC20200C2
+:020000020056A6
+:0F000D00558BECB02050B8FF0050E8CAFA5DC325
+:020000020057A5
+:10000C00558BEC8A460438065702740CB12051A269
+:0C001C005702B40050E8B0FA5DC20200C8
+:020000020059A3
+:0C000800558BECFF365602E8DAFF5DC3B2
+:02000002005AA2
+:0C000400558BECFF36B101E8CEFF5DC368
+:02000002005BA1
+:0C000000558BECFF365301E8C2FF5DC3D6
+:02000002005BA1
+:10000C00558BECB02150FF7604E87CFA50E8BCFD2F
+:07001C00A0D2015DC2020049
+:02000002005D9F
+:10000300558BECB02250FF7604E865FA50E8A5FD65
+:07001300A0D2015DC2020052
+:02000002005E9E
+:10000A00558BECB02350FF7604E84EFA5DC202002D
+:02000002005F9D
+:10000A00558BECB02450FF7604E83EFA5DC202003C
+:0200000200609C
+:10000A00558BEC8A46043806B701740CB12C51A200
+:0C001A00B701B40050E822FA5DC20200F9
+:0200000200629A
+:0F000600558BECB03050B8FF0050E811FA5DC3D5
+:02000002006399
+:0F000500558BECB0A150B8000050E802FA5DC373
+:02000002006498
+:10000400558BEC8A4604FEC88846043CFF74128B68
+:100014005E088A078B5E068807FF4608FF4606EBE4
+:05002400E25DC20600D0
+:02000002006696
+:10000900558BECB00150E898FFC606D10100A0BF9E
+:1000190001D0D8730FE82FFFB8260150E8FAFDC6C2
+:1000290006BF0100A0BE01D0D87311E80DFFB85575
+:100039000150E8E4FDB8550150E818FEC606D401A0
+:0F00490000C6061E0101B8920650E83AFD5DC3DD
+:02000002006B91
+:10000800558BECE8ABFF8A5E04B700D1E3FFB72459
+:0A00180003E814FDE800FDE95CF9BF
+:02000002006D8F
+:10000200558BECA0D201A27802A0CF01A27902E81E
+:1000120085FF807E06067207803E7802FF7407C65F
+:1000220006790200EB05802679020F8A5E06B70088
+:100032008A9F3906B700D1E3FFB72403E8CFFC80DB
+:100042007E060C7630807E0611732A803E7802FF8F
+:100052007423803E78020A771CB02050E889FC8A1B
+:100062001E7802FECBB700D1E3FFB75203E89EFC35
+:10007200C606790200803E79020B7315B02050E863
+:1000820066FC8A1E7902B700D1E3FFB76603E87DFA
+:10009200FCB89A0650E876FC837E0400744B8B5EB3
+:1000A200048A070441FEC850E83DFCB03A50E837E4
+:1000B200FCC606770201A077023C0B772CB40089BC
+:1000C200C68B5E048A0880E17F880E760280F92062
+:1000D20074113C097506B02E50E80CFCFF3676020E
+:1000E200E805FCFE06770275CDE811FCA078023C1B
+:1000F20003740C3C0474083C0674043C087509A0A3
+:10010200BB01A2D101E954F8A079023C0374203C5E
+:1001120009771C3C04B0FF77014050803E79020908
+:10012200B0FF7201405922C1D0D87203E92DF8A064
+:08013200BB01A2D101E924F890
+:0200000200807C
+:0B000A00558BECB00850E8A5FE5DC36C
+:0200000200817B
+:10000500558BECB00B50B8000050E822F808C074CE
+:1000150014B00650B8FD0050E814F83C037506B05E
+:070025000550E87EFE5DC3FB
+:02000002008379
+:10000C00558BECA049013A06B5017224A049013A7E
+:10001C0006B501751FA048013A06B4017212A0483A
+:10002C00013A06B401750DA047013A06B3017304F9
+:08003C00B0005DC3B0015DC31B
+:02000002008775
+:10000400558BECE82AFDB8840150B8550150B02D49
+:1000140050E8BCFDB89E0650B85E0150B00350E8ED
+:10002400AEFD800E8A0180B8840150E8A2FBA0D204
+:1000340001A2D0013CFF7409B8840150E8CFFBEB66
+:1000440011F606CF010F740AB00750B8840150E8C6
+:100054000CFEB8550150E8F0FB803ED201FF75114B
+:10006400823ECF0100740AB00A50B8550150E8ED41
+:10007400FDB8550150E813FC803ED201FF7515F61A
+:1000840006CF010F7504B00BEB02B00C50B855014C
+:1000940050E8CAFDC606750100C606BE01015DC36F
+:0200000200916B
+:10000400558BECE896FC800E2C0180B8260150E854
+:100014001EFB803ED201FF7405C606BF0101A06924
+:1000240002F6D08A0E3001D0C122C1D0D87305C6E1
+:1000340006D201FF803ED201FF7515F606CF010FEF
+:100044007504B006EB02B00750B8260150E86EFD07
+:10005400A02701B18022C1A2C901A0280122C1A206
+:10006400CA01A0290122C1A2CB01A02A0122C1A256
+:10007400CC01A02F0122C1A2CD01A0300122C1A236
+:10008400CE01B8260150E84DFCA2D201B847015078
+:10009400B8B30150B00350E896FCB000A24601A2E8
+:1000A4004701A24801A24901C7060C01FFFF5DC335
+:02000002009C60
+:10000400558BECA0BE01F6D0D0D87303E8A1FEA1B5
+:100014000E012580FFA3120175025DC3C7061001FE
+:100024000000E8BBFBA0C3010A06C201A2C301D0C1
+:10003400D87329B00150E80DFC8B3610018D843043
+:100044000750E81AFAB8550150E8C3FB08C0741306
+:10005400B01050B8550150E8B4FCEB07B855015046
+:10006400E8D3FBA0B801D0D8730AC7060A01004040
+:10007400B080EB08C7060A018000B00150E8C6FB57
+:100084008B0E1201A110012BC883F97F764881F9E8
+:1000940000407315A0B801D0D8730E890E0A0189E7
+:1000A400C8B107D3E850E89DFB8B3610018D84302E
+:1000B4000750E8AAF9B8550150E86BFA823ED2011C
+:1000C40000740AB00E50B8550150E841FCA10A0171
+:1000D40001061001EBAAA06D02D0D87203E99600C4
+:1000E400E87FFBC70610010000B00150E857FBB8D9
+:1000F400800050E869F9A110013B0612017370B841
+:10010400550150E8F2FA08C0B0FF740140A27D0224
+:10011400FF0676017504FE067801C6067C0200A07F
+:100124007C023C80B0FF72014022067D02D0D8736D
+:10013400238B361001A07C02B40003F089C38A87A4
+:1001440080003A843007B0FF740140A27D02FE06AD
+:100154007C02EBCB810610018000A07D02F6D0D09A
+:10016400D87393B00050B8550150E8A1FBEB87B8A1
+:10017400550150E89DF9B8550150E8B9FA8B36108D
+:10018400018D84300750B8300750A10E012BC6A34F
+:080194000E0150E8EAFA5DC318
+:0200000200B547
+:10000C00558BECE8B3FCA0B801D0D8730AC7060A2C
+:10001C00010040B080EB08C7060A018000B0015017
+:10002C00E88BFAE82EFAA10801A30C018B0E000153
+:10003C00A108012BC883F97F7703E9D20081F9006D
+:10004C00407319A0B801D0D8731281E180FF890EDA
+:10005C000A0189C8B107D3E850E852FA8B1E060191
+:10006C008B3608018D0050E85DF8A03201A2B60174
+:10007C00B8260150E804F9823ED201007503E984E8
+:10008C0000803ED20101740AB00D50B8260150E830
+:10009C00E4FAA0B801D0D8730DA0CF01B400B10719
+:1000AC00D3E001060801A032013A06B601740C80B7
+:1000BC003E4601807505C606460100B8260150E88B
+:1000CC00DCF9E81BFCF6D0A2C201D0D87319A0B899
+:1000DC0001F6D00A06BA01D0D87318B00150B82670
+:1000EC000150E891FAEB0CB8260150E838F8C60636
+:1000FC00BF0100C606C001018B1E06018B3608012C
+:10010C00C6001A5DC3A10A0101060801E91DFF5DC5
+:01011C00C31F
+:0200000200C636
+:10000D00558BEC807E04207215A01F01FEC0A21F2F
+:10001D0001823E5B020074063A065B02776DA05CBE
+:10002D0002D0D8730CB002508A4604B40050E8A632
+:10003D00F38A1EB201B700D1E32EFFA7EA0CFF76BB
+:10004D0004E8D5F3EB45B005508A4604B40050E8FA
+:10005D0085F3EB37A10E013B0602017203E8F7FCB5
+:10006D008A46048B360E0188843007FF060E01EB9D
+:10007D001AB00350E8D4F9EB12B002EBCBAB0CB3D2
+:0F008D000CB30CDE0CC10CDE0CE60C5DC20200E5
+:0200000200CF2D
+:10000C00558BEC807E04097507823E6B02007508E7
+:10001C00FF7604E85BFFEB32A01F01A27E02A06B0F
+:10002C000238067E02720628067E02EBF1A06B02F5
+:10003C002A067E02A27E02823E7E0200740CFE0E16
+:10004C007E02B02050E829FFEBED807E040D750593
+:09005C00C6061F01005DC202008E
+:0200000200D527
+:10000500558BEC827E0400B0FF740140220672021B
+:10001500A27202D0D87304B020EB058A46040430DE
+:0800250050E883FF5DC20200F8
+:0200000200D725
+:10000D00558BEC8A4604B104D2E850E8CAFF8A4603
+:0B001D0004240F50E8C1FF5DC2020088
+:0200000200D923
+:10000800558BECB001A27F0238066502B0FF74017F
+:1000180040A27202A07502040127A27502A0740210
+:10002800140027A27402A07302140027A2730250BE
+:10003800E8B2FFFF367402E8ABFFFF367502E8A4AA
+:10004800FF803E650201750AB03A50E816FFB020FD
+:0A005800EB02B00950E80CFF5DC395
+:0200000200DF1D
+:10000200558BECA05D02D0D87306807E040C746D13
+:10001200A0C501D0D8734A807E040C7444807E044B
+:100022001A743EA06702A28002823E670200742216
+:100032003C017505C60680023CA02001FEC0A2203C
+:10004200013A068002720BC606200100B00C50E88D
+:10005200B8FE823E6502007403E84AFFC606C50187
+:1000620000807E040C7505C606200100FF7604E8B8
+:1000720098FE807E040A7505C606C501015DC202AE
+:01008200007D
+:0200000200E715
+:10000300558BEC807E0461720A807E047A770480CB
+:0A00130066045F8A46045DC2020025
+:0200000200E814
+:10000D00558BEC807E0441720A807E045A77048001
+:0A001D004E04208A46045DC2020072
+:0200000200EA12
+:10000700558BECC6068202018A1E5401B700D1E364
+:100017002EFFA7210FB00450E8F6F7EB6FA10C01F4
+:100027003B0600017228A0BC01F6D00A06B901D030
+:10003700D87308C70608010000EB10833E0C01FFC8
+:100047007409E8D8FAA10E01A30801E867FC8B1E22
+:1000570006018B360C018A00A28102FF060C01EB18
+:100067002BC606820200B00150B8000050E82DF1FF
+:10007700A28102EB17E861F1EBF6BC0EBC0EBC0ED9
+:10008700BC0EC40EBC0E080FBC0E1C0FA08202D003
+:10009700D8732AA06602D0D8730CA0C601FEC0A2EE
+:1000A700C60108C0EB05803E81020AB0FF7401401B
+:1000B700A28202A08202D0D87303E8B1F8A071022D
+:1000C700D0D87305802681027FA06C02D0D873092F
+:1000D700FF368102E8F5FE5DC3A06302D0D873093D
+:0E00E700FF368102E8FFFE5DC3A081025DC30B
+:0200000200F903
+:03000500558BEC2C
+:020000020103F8
+:10000500558BECA02301024604884604B40089C63A
+:100015008A8CD501880E840280F91A750BA083029B
+:100025008884D501B001EB16A084023A06830275D7
+:1000350006FE062301EB05C606230100B0005DC2DE
+:020045000200B7
+:0200000200F903
+:10000800823E2401007412A02401FEC8A224013CEF
+:1000180001752FB00A5DC3EB29823E2201007418D6
+:10002800FE0E2201A02101B40089C68A84D501A24E
+:100038008302FE0621015DC3E8D4FEA283023C1AB6
+:100048007504B01A5DC3823E6A02007425FF366AE1
+:1000580002E84900D0D873C1A06A02A22101C606ED
+:100068006A0200A02301FEC0A22201C606230100E5
+:10007800EBA7823E680200741BFF366802E81D0089
+:10008800D0D87310C606680200C606240102B00D57
+:0D0098005DC3EB00A083025DC3EBD55DC32B
+:020000020107F4
+:10000700558BECE818FFA2C701A06602D0D873127F
+:10001700A10C013B060801B0FF7701402206C00191
+:0E0027005DC3803EC7011AB0FF7401405DC387
+:02000002010AF1
+:03000500558BEC2C
+:020000020119E2
+:10000600558BECA085022C303C0977025DC3A08598
+:10001600022C413C05760AB00250B8260150E81B76
+:0A002600F5A085022C41040A5DC319
+:02000002011CDF
+:10000000558BECE8CFFDA2850250E825FCE8C6FF41
+:020010005DC3CE
+:02000002011DDE
+:10000200558BECE8E8FFB104D2E050E8E0FF590A72
+:0A001200C102068802A288025DC345
+:02000002011EDD
+:10000C00558BECE8E0FFB400B108D3E050E8D6FF24
+:07001C00B400590BC15DC3E4
+:02000002010AF1
+:10000800C6068A0200E8E5FEA28502803E85023A1D
+:100018007423803E85021A7513A08A02D0D8730211
+:100028005DC3B00350B8260150E8FEF5FF368502DF
+:10003800E817FDEBD0E8B5FEA28502E8B000B104F0
+:10004800D2E0A28702A08502A28602E89FFEA285CE
+:1000580002E89A0008068702823E8702007507C6F2
+:10006800068A0201EB05C6068A0200A08A02220659
+:100078006002D0D87326803E85023AB0FF750140F1
+:1000880050803E85021AB0FF7501405922C1D0D870
+:100098007357E858FEA28502EBDCEB4DB03A50E806
+:1000A800A8FCFF368602E8A1FCFF368502E89AFC28
+:1000B800A08702A28802E88B00A31401E86B00A2C3
+:1000C8008902823E870200740CFE0E8702E85A00FD
+:1000D800A28602EBEDE8520008C0740AB00450B8DA
+:0E00E800260150E844F5E91CFFE91FFF5DC347
+:020000020120DB
+:10000300558BEC823E6A02007406B00B50E8A5F4EF
+:0F001300823E6802007406B00C50E898F45DC39A
+:020000020122D9
+:10000200558BECA10E01A87F7408B01A50E8C0FB12
+:10001200EBF1E8CCFFE88AF7E867F3B8550150E85E
+:100022003EF2803ED201FF750AB00850B855015029
+:10003200E87DF4803ED001FF7476A08D01D0C0D05F
+:10004200D87355A06E02F6D0D0D8734C803ED20140
+:1000520059B0FF75014050803ED2014EB0FF75018C
+:10006200405922C1D0D87313B8A10650E85FF1E815
+:1000720017F150E8DBFBA2D201EBD1803ED201594D
+:100082007413B8C40650E845F1E821F1B85501509F
+:10009200E808F25DC3E815F180268D017F80268E87
+:1000A200017FB8840150E88EF2B8840150E8EBF188
+:1000B200B8840150B8650150B01050E864F3B855E7
+:1000C2000150E849F2A08501B17F22C10A06C901A7
+:1000D200A28501A0860122C10A06CA01A28601A048
+:1000E200870122C10A06CB01A28701A0880122C191
+:1000F2000A06CC01A28801200E8C01A08D0122C12A
+:100102000A06CD01A28D01A08E0122C10A06CE01EE
+:10011200A28E01200E8F01B8840150E819F2A05876
+:1001220002D0D87314E866F2800E310180C606321E
+:0B0132000100B8260150E8FEF15DC39B
+:020000020135C6
+:10000D00558BECA0B901F6D0D0D8731AC7060601EE
+:10001D003007A106002D30072580FF2D8000A3009D
+:10002D0001A302015DC3A106002D3007D1E8258093
+:10003D00FF2D8000A30001A30201053007058000FC
+:10004D00A30601A10E013B0602017203E818F6C7D3
+:07005D0006080100005DC36D
+:02000002013BC0
+:10000400558BEC833E080100743AA06602F6D0D00A
+:10001400D87331A108012D8000A30401C6068B0208
+:1000240000A08B023C80771CB4000306040189C63F
+:100034008B1E060180381A7505A308015DC3FE06F0
+:060044008B0275DD5DC3B7
+:02000002013FBC
+:03000A00558BEC27
+:02000002014FAC
+:10000200558BECE8B8F0B8260150E8FBF0B001508F
+:10001200E805F1B8800050E817EFB8260150E8A9CA
+:10002200F0A2D20108C0B0FF74014050E81BF3599E
+:100032000AC1D0D87313A14701A37601A04901A236
+:100042007801C606C001005DC3803ED2010175067B
+:10005200FF064701EB13803ED201047514A147014C
+:100062000580002580FFA3470175AFFE064901EB1D
+:0F007200A9B00F50B8260150E865F1EB9D5DC3B2
+:02000002013FBC
+:10000D00A0BD012206BC01A2B801B000A2C001A290
+:10001D00B901A2C301A2C201A28C02A08C023C199B
+:10002D007734B40089C382BF580200742380BF4A5D
+:10003D00060174178A1E8C02B70080BF4A0602752E
+:10004D000FA0BD012206BC01A2B901C606B8010070
+:10005D00FE068C0275C5E807FFA0BD01D0D873035D
+:10006D00E8B4F4A0B801D0D8734AA0C001F6D0D03E
+:10007D00D87376E8E9F6A0C0012206BA01D0D8738C
+:10008D0012E833FFA10801A30E01A0C101D0D8735E
+:10009D00025DC3A10801A30E01E82BF5A10E01A37A
+:1000AD000801A0C2012206C001D0D873BDE84500E9
+:1000BD00EBB8EB35A060020A065F02D0D87305E8F5
+:1000CD00E6FBEB12E8B3FBF6D0D0D87309FF36C7C9
+:1000DD0001E821F9EBEEA0C1012206BA01D0D873D7
+:1000ED0008A10E01A308015DC3A0BC01D0D8730304
+:0500FD00E832FD5DC3C7
+:020000020157A4
+:03000100558BEC30
+:02000002016B90
+:10000B00558BECE80EEDC6068D0201A08D023C0B64
+:10001B007728B40089C38A8F8401880E8E0280F9F9
+:10002B002074113C097506B02E50E8D2ECFF368EC9
+:0C003B0002E8CBECFE068D0275D15DC31F
+:02000002016F8C
+:10000700558BECA05802F6D0D0D8723BE8AAEEC6C2
+:100017000632013FB8260150E884ED803ED201FF49
+:10002700742EA0D2012403B105D2E0B400058000EC
+:100037004050B8270150B00F50E811EFA03101D060
+:10004700C0F6D0D0D87304B0015DC3E865EDEBCB43
+:04005700B0005DC3D5
+:020000020157A4
+:10000400823ED10100750CC70616010000C7061A0E
+:10001400010000E826F0B8800050E892EEC60668B9
+:100024000000B85C0050E8F9EEC706180100008033
+:100034003ED201FFB0FF7501408B0E1801503B0EFC
+:100044001601B0FF7201405922C1D0D87309FF06CE
+:100054001801E8E1EEEBD8803ED201FF751F833E24
+:100064001A0100750AB00950B85C0050E8EFF0A01E
+:100074006202F6D0D0D87303E8E0ED5DC3A11801A5
+:1000840040A31601A0D2012403B105D2E0B40005B7
+:1000940080004050B8850150B00F50E832F0B88568
+:1000A4000150B8270150B00F50E824F0E8D400D034
+:1000B400D87317C606900100C606320100A08E014F
+:1000C400D0C0F6D00A066902D0D87376A06202F6D0
+:1000D400D0D0D87353833E1A01007507B8D40650A4
+:1000E400E899EDC606D20100803ED20159B0FF75F1
+:1000F400014050803ED2014EB0FF7501405922C1EB
+:10010400D0D87324E84000A05A02D0D87313B8DEC4
+:100114000650E857EDE81FED50E8E3F7A2D201EBF3
+:10012400C7C606D20159EBC0FF061A01C606BE01B6
+:1001340000803ED201597407A06202D0D87303E84C
+:0701440044FDE9CEFE5DC39E
+:02000002017487
+:10000B00558BECA0B1013A065301750CA084013A53
+:0A001B000626017503E8A7F05DC397
+:02000002017685
+:10000500558BECA05502FEC0A255023A06D40172EA
+:1000150004B00D5DC3A05502B40089C6FFB4D50177
+:05002500E8EBF65DC3ED
+:02000002017883
+:0F000A00558BECE8D5FFA2C7013C2074F65DC30F
+:02000002017982
+:10000900558BECE8EBFF803EC7010D7403E861F006
+:020019005DC3C5
+:02000002017A81
+:09000B00598F061C0151558BECC4
+:02000002019E5D
+:10000400558BECC606910200803E91020B77198A4B
+:1000140046048A1E9102B7003A8764067504B0014B
+:0E002400EB08FE06910275E0B0005DC202001E
+:0200000201A15A
+:10000200558BECA0C801FEC0A2C801B40089C68A03
+:100012000EC7018B1E1C01880880F93F7505C606B4
+:05002200BB01015DC3FC
+:0200000201A358
+:10000700558BECC606C7013FA0C8013A46047305E5
+:09001700E8C8FFEBF35DC2020032
+:0200000201A556
+:10000000558BECE80FFDA2C701A0C7013C0DB0FF66
+:100010007401408A0EC7015080F95DB0FF74014041
+:100020005A0AC2F6D0D0D87203E9BC0080E94188F0
+:100030000E920280F919760F803EC7012074C4B079
+:100040000650E823ECEBC2803EC701537407803EA4
+:10005000C701517531A05502FEC0A29302E8B5FC5C
+:10006000A2C7013C1AB0FF74014050803EC7010D89
+:10007000B0FF740140590AC1F6D0D0D872DFE894BD
+:10008000FCA2C701EB39E88CFCA2C7012C30A2937B
+:10009000023C097607C606930201EB23E876FCA230
+:1000A000C7012C30A290023C097714A09302B10A38
+:1000B000F6E18A0E9002B50003C1A29302EBDDA027
+:1000C00093028A1E9202B7008887580280FB067549
+:1000D000143C0F7606B00750E88DEBA093028B1E00
+:1000E0001C0188472DE921FFE82AFCA2C7015DC356
+:02000002017B80
+:100004008B1E1C01C6472E0BC606C70120C606C898
+:100014000100803EC8012C731F803EC8010B750788
+:10002400C606C70100EB0C803EC801247505C60650
+:10003400C70120E82802EBDA8B1E1C01C647240006
+:10004400C6472C01A02501FEC08807A05602884798
+:100054002DC6068F0200803E8F021977118A1E8FEB
+:1000640002B700C687580200FE068F0275E8B0008A
+:10007400A22201A22301A22401E85AFFC606C80154
+:1000840000FF36C701E8A801F6D0D0D87323803E1C
+:10009400C8010872025DC3803EC7012A7508B00812
+:1000A40050E8DF01EB03E8B501E805FFA2C701EB67
+:1000B400D0803EC7013A7403E9D500803EC80101EF
+:1000C400753C8B1E1C018A47012C41FEC088073CED
+:1000D4001076025DC3E8FEFEFF36C701E85101D089
+:1000E400D87318803EC7015B7503E8AF01FE0E5557
+:1000F400028B1E1C01C6472E0D5DC3E98500803EA0
+:10010400C8010374025DC3C6069502FFC6069602C3
+:1001140000803E96020A7769C606940200A0940203
+:10012400FEC0A294023C03B0FF7601408A1E9502F1
+:10013400021E9402B7008A8F70068A169402B600D3
+:1001440089D68B1E1C01503A08B0FF740140592215
+:10015400C1D0D872C8803E940204751AA096028B4E
+:100164001E1C0188472EE848FE3C5B7503E82C0101
+:10017400FE0E55025DC38006950203FE06960275C7
+:10018400905DC3803EC7015B7503E80F01E9ECFE97
+:10019400823EC8010075025DC3C606C80108803EE0
+:1001A400C7012E752DE809FEA2C70150E88100F6AB
+:1001B400D0D0D8731D803EC8010B72025DC3803E4F
+:1001C400C7012A7508B00B50E8B800EBD8E88E00D8
+:1001D400EBD3C606C80100803EC7013B7531E8D0A9
+:1001E400FDA2C70150E84800F6D0D0D87321803E64
+:1001F400C8010872025DC3A0C801B40089C68A0E92
+:10020400C7018B1E1C01884824FE06C801EBCF8061
+:100214003EC7015B7503E88300FE0E55028B1E1C6E
+:1002240001C6472E04C64720005DC3E94EFE5DC3E8
+:020000020010EC
+:10000300A01E01F6D0D0D87360B8800050B8D401D8
+:1000130050B08050E82A05823ED40100B0FF74013D
+:1000230040A2C401E8EA023C31730AB8E70650E88B
+:10003300BB02E86502B02D50B8FF0050E802FFA0F4
+:10004300C401D0D8730AB8030750E89002E87C02D1
+:10005300E81704A25602A25702E8EB03A22501C641
+:1000630006B70101C606D10100823ED10100740921
+:10007300E8FB13A0C401A2D401B001D0D87203E9F4
+:100083000102B000A27502A27402A27302A2C60109
+:10009300A21F01B400A30E01A30801A2BB01A2BECB
+:1000A30001A2BF01A2BA01A2D101B001A2C501A25E
+:1000B300BC01A2BD01A2C101C6062001FEA0C4016C
+:1000C300D0D8730CB02A50E8ED01E83002E8FC0107
+:1000D300C6065502FF823ED401007506E8B603E862
+:1000E300B801B8840150E8BF15A0BB01D0D8730A8A
+:1000F300B00550B8840150E8D504E88A15803EC79E
+:10010300013D740A803EC7015F7403E8F905B82610
+:100113000150E89315803EB2010D753B803E5401BA
+:10012300047403E8E105E86D15E81C15C606B20181
+:1001330004A0BB01D0D87311B8260150B85C00509D
+:10014300B02450E8FB03E927FFB8270150B8850125
+:1001530050B023EB25EB39803EB201047525803E78
+:1001630054010D751EE82E15E8DD14C6065401046E
+:10017300B8850150B8270150B02C50E8C303E87686
+:1001830011EB0D803EB201067609B00350E8250459
+:10019300E9E0FE803EB201047405C606BC0100809E
+:1001A3003EB201017407803EB20102750DE882037D
+:1001B3003CFF7506B01550E8FB03A0C101D0D8730E
+:1001C300CFC606BD0101E8BE14803EC7012C740DE5
+:1001D300803EC7010D7406B01050E8D803803EC7B7
+:1001E300012CB0FF740140A2C1010806BA01803E90
+:1001F300B20101751DC606650201823E6B020075E0
+:1002030005C6066B0208823E6702007505C60667CF
+:100213000201803E540104720E803E54010A7707A6
+:10022300A0BB01D0D87306B00450E88803803E54C5
+:1002330001047405C606BD0100803E540109751A08
+:10024300C606BD0100803EBD01277720B00050E8FF
+:100253009D0AFE06BD0175EDEB12803E54010A7541
+:1002630008B01A50E8880AEB03E88B10E8910EA057
+:10027300C101D0D87307B8260150E82B14E93AFF1F
+:05028300E9F0FD5DC380
+:00000001FF

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/scd1.a86

@@ -0,0 +1,86 @@
+name scd1
+;
+;	CP/M 3.0 MP/M-86 2.0 (BDOS version 3.0)
+;	Interface for PLM-86 with separate code and data
+;	Code org'd at 0
+;	December 18, 1981
+
+
+dgroup	group	dats,stack
+cgroup	group	code
+
+assume	cs:cgroup, ds:dgroup, ss:dgroup
+
+stack	segment	word stack 'STACK'
+stack_base	label byte
+stack	ends
+
+dats     segment para public 'DATA'	;CP/M page 0 - LOC86'd at 0H
+
+	org	4
+bdisk	db	?
+	org	6
+maxb	dw	?
+	org	50h
+cmdrv	db	?
+pass0	dw	?
+len0	db	?
+pass1	dw	?
+len1	db	?
+	org	5ch
+fcb	db	16 dup (?)
+fcb16	db	16 dup (?)
+cr	db	?
+rr	dw	?
+ro	db	?
+buff	db	128 dup (?)
+tbuff	equ	buff
+
+	public	bdisk,maxb,cmdrv,pass0,len0
+	public	pass1,len1,fcb,fcb16,cr,rr
+	public	ro,buff,tbuff
+
+dats ends
+
+
+code	segment	public	'CODE'
+public	reset,xdos,mon1,mon2,mon3,mon4
+extrn	plm:near
+
+	org	0h		; for separate code and data
+	jmp	reset
+	db 'COPYRIGHT (c) 1983 by DIGITAL RESEARCH INC.'
+reset:
+	pushf
+	pop	ax
+	cli
+	mov	cx,ds
+	mov	ss,cx
+	lea	sp,stack_base
+	push	ax
+	popf
+	call	plm
+	xor	cx,cx
+	mov	dx,cx
+	int	224
+
+
+xdos	proc
+	push	bp
+	mov	bp,sp
+	mov	dx,[bp+4]
+	mov	cx,[bp+6]
+	int	224
+	pop	bp
+	ret	4
+xdos	endp
+
+mon1	equ	xdos		; no returned value
+mon2	equ	xdos		; returns byte in AL
+mon3	equ	xdos		; returns address or word BX
+mon4    equ     xdos		; returns pointer in BX and ES
+
+    	org	07fh		; reserve patch area
+    	db	0
+code	ends
+end

CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/scd1.lst

@@ -0,0 +1,153 @@
+MCS-86 MACRO ASSEMBLER    SCD1                                                                                 PAGE    1
+
+
+ISIS-II MCS-86 MACRO ASSEMBLER V2.1 ASSEMBLY OF MODULE SCD1
+OBJECT MODULE PLACED IN :F0:SCD1.OBJ
+ASSEMBLER INVOKED BY:  :F0: SCD1.A86 XREF
+                       
+
+LOC  OBJ                  LINE     SOURCE
+
+                             1     name scd1
+                             2     ;
+                             3     ;       CP/M 3.0 MP/M-86 2.0 (BDOS version 3.0)
+                             4     ;       Interface for PLM-86 with separate code and data
+                             5     ;       Code org'd at 0
+                             6     ;       December 18, 1981
+                             7     
+                             8     
+                             9     dgroup  group   dats,stack
+                            10     cgroup  group   code
+                            11     
+                            12     assume  cs:cgroup, ds:dgroup, ss:dgroup
+                            13     
+----                        14     stack   segment word stack 'STACK'
+0000                        15     stack_base      label byte
+----                        16     stack   ends
+                            17     
+----                        18     dats     segment para public 'DATA'     ;CP/M page 0 - LOC86'd at 0H
+                            19     
+0004                        20             org     4
+0004 ??                     21     bdisk   db      ?
+0006                        22             org     6
+0006 ????                   23     maxb    dw      ?
+0050                        24             org     50h
+0050 ??                     25     cmdrv   db      ?
+0051 ????                   26     pass0   dw      ?
+0053 ??                     27     len0    db      ?
+0054 ????                   28     pass1   dw      ?
+0056 ??                     29     len1    db      ?
+005C                        30             org     5ch
+005C (16                    31     fcb     db      16 dup (?)
+     ??
+     )
+006C (16                    32     fcb16   db      16 dup (?)
+     ??
+     )
+007C ??                     33     cr      db      ?
+007D ????                   34     rr      dw      ?
+007F ??                     35     ro      db      ?
+0080 (128                   36     buff    db      128 dup (?)
+     ??
+     )
+  0080                      37     tbuff   equ     buff
+                            38     
+                            39             public  bdisk,maxb,cmdrv,pass0,len0
+                            40             public  pass1,len1,fcb,fcb16,cr,rr
+                            41             public  ro,buff,tbuff
+                            42     
+----                        43     dats ends
+                            44     
+MCS-86 MACRO ASSEMBLER    SCD1                                                                                 PAGE    2
+
+
+LOC  OBJ                  LINE     SOURCE
+
+                            45     
+----                        46     code    segment public  'CODE'
+                            47     public  reset,xdos,mon1,mon2,mon3,mon4
+                            48     extrn   plm:near
+                            49     
+0000                        50             org     0h              ; for separate code and data
+0000 EB2C90                 51             jmp     reset
+0003 434F5059524947         52             db 'COPYRIGHT (c) 1983 by DIGITAL RESEARCH INC.'
+     48542028632920
+     31393833206279
+     20444947495441
+     4C205245534541
+     52434820494E43
+     2E
+002E                        53     reset:
+002E 9C                     54             pushf
+002F 58                     55             pop     ax
+0030 FA                     56             cli
+0031 8CD9                   57             mov     cx,ds
+0033 8ED1                   58             mov     ss,cx
+0035 8D260000       R       59             lea     sp,stack_base
+0039 50                     60             push    ax
+003A 9D                     61             popf
+003B E80000         E       62             call    plm
+003E 33C9                   63             xor     cx,cx
+0040 8BD1                   64             mov     dx,cx
+0042 CDE0                   65             int     224
+                            66     
+                            67     
+0044                        68     xdos    proc
+0044 55                     69             push    bp
+0045 8BEC                   70             mov     bp,sp
+0047 8B5604                 71             mov     dx,[bp+4]
+004A 8B4E06                 72             mov     cx,[bp+6]
+004D CDE0                   73             int     224
+004F 5D                     74             pop     bp
+0050 C20400                 75             ret     4
+                            76     xdos    endp
+                            77     
+  0044                      78     mon1    equ     xdos            ; no returned value
+  0044                      79     mon2    equ     xdos            ; returns byte in AL
+  0044                      80     mon3    equ     xdos            ; returns address or word BX
+  0044                      81     mon4    equ     xdos            ; returns pointer in BX and ES
+                            82     
+007F                        83             org     07fh            ; reserve patch area
+007F 00                     84             db      0
+----                        85     code    ends
+                            86     end
+MCS-86 MACRO ASSEMBLER    SCD1                                                                                 PAGE    3
+
+
+XREF SYMBOL TABLE LISTING
+---- ------ ----- -------
+
+
+NAME        TYPE     VALUE  ATTRIBUTES, XREFS
+
+??SEG . . . SEGMENT         SIZE=0000H PARA PUBLIC 
+BDISK . . . V BYTE   0004H  DATS PUBLIC  21# 39
+BUFF. . . . V BYTE   0080H  DATS PUBLIC  36# 37 41
+CGROUP. . . GROUP           CODE   10# 12
+CMDRV . . . V BYTE   0050H  DATS PUBLIC  25# 39
+CODE. . . . SEGMENT         SIZE=0080H PARA PUBLIC 'CODE'  10# 46 85
+CR. . . . . V BYTE   007CH  DATS PUBLIC  33# 40
+DATS. . . . SEGMENT         SIZE=0100H PARA PUBLIC 'DATA'  9# 18 43
+DGROUP. . . GROUP           DATS STACK   9# 12 12
+FCB . . . . V BYTE   005CH  DATS PUBLIC  31# 40
+FCB16 . . . V BYTE   006CH  DATS PUBLIC  32# 40
+LEN0. . . . V BYTE   0053H  DATS PUBLIC  27# 39
+LEN1. . . . V BYTE   0056H  DATS PUBLIC  29# 40
+MAXB. . . . V WORD   0006H  DATS PUBLIC  23# 39
+MON1. . . . L NEAR   0044H  CODE PUBLIC  47 78#
+MON2. . . . L NEAR   0044H  CODE PUBLIC  47 79#
+MON3. . . . L NEAR   0044H  CODE PUBLIC  47 80#
+MON4. . . . L NEAR   0044H  CODE PUBLIC  47 81#
+PASS0 . . . V WORD   0051H  DATS PUBLIC  26# 39
+PASS1 . . . V WORD   0054H  DATS PUBLIC  28# 40
+PLM . . . . L NEAR   0000H  EXTRN  48# 62
+RESET . . . L NEAR   002EH  CODE PUBLIC  47 51 53#
+RO. . . . . V BYTE   007FH  DATS PUBLIC  35# 41
+RR. . . . . V WORD   007DH  DATS PUBLIC  34# 40
+STACK . . . SEGMENT         SIZE=0000H WORD  STACK 'STACK'
+STACK_BASE. V BYTE   0000H  STACK  15# 59
+TBUFF . . . V BYTE   0080H  DATS PUBLIC  37# 41
+XDOS. . . . L NEAR   0044H  CODE PUBLIC  47 68# 76 78 79 80 81
+
+
+ASSEMBLY COMPLETE, NO ERRORS FOUND