|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/3 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/3 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1524 (0x5f4)
Types: s3xseg
Names: »S$DMLP«
└─⟦d025fa538⟧ Bits:30009183 5702-sc1.V16.2
└─⟦cfce0a73a⟧
└─⟦this⟧ »S$DMLP«
└─⟦34f897e8c⟧ Bits:30009186 5702-sc1.V16.scp
└─⟦e1bdf435f⟧
└─⟦this⟧ »S$DMLP«
* MLMP OPTIONS
LINK
$DMLP &MLMP-
GBLB &MLMPG,&BSCAG,&BING,&BSCAE
TABLE &MLMP
YES 'Y'
NO 'N'
'E'
TEXT
AIF (&BSCAG).A
MNOTE '0,'IS'
MEXIT
.A AIF (&MLMP NE 'E').B
MNOTE '0,'IR'
MEXIT
.B AIF (&MLMP EQ 'N').C
AIF (&BSCAE EQ '1').D
MNOTE '0,'IC'
MEXIT
.D ANOP
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-O,NAME-$@BC.ALL,NEWNAME-$$BS
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-R,NAME-$@BC.ALL,NEWNAME-$$BS
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-O,NAME-$@DLQ.ALL,NEWNAME-$$DLQ
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$BCPL
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$DTOB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$CANB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$DTFB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$GETB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$POLB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$PUTB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$RFT
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$CHGB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$BCSW
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$SWIB
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$RFTL
// COPY FROM-R1,TO-F1,RETAIN-P,LIBRARY-S,NAME-$LOGB
&BING SETB 1
.C ANOP
&MLMPG SETB 1
&BSCAG SETB 0
MEND