Files
Digital-Research-Source-Code/CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 2.0 SOURCE/pip/inpout.lst
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

76 lines
3.2 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

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