|
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: 762 (0x2fa)
Types: s3xseg
Names: »S$COMN«
└─⟦34f897e8c⟧ Bits:30009186 5702-sc1.V16.scp
└─⟦e1bdf435f⟧
└─⟦this⟧ »S$COMN«
MACRO 00010000
$COMN 00080000
TEXT 00090000
* COMMON LABELS FOR SYSTEM MACROS RELEASE-7 00090001
$IOB EQU 1 IOB ADDRESS 00100000
$DTF EQU 2 DTF ADDRESS 00110000
$LDADR EQU 2 LOAD ADDRESS 00120000
$PARM EQU 2 PARAMETER LIST ADDRESS 00130000
$ARR EQU 8 ADDRESS RECALL REGISTER 00140000
$IAR EQU 16 INSTRUCTION ADDRESS REGISTER 00150000
$TRU EQU X'10' TEST TRUE 00160000
$FLS EQU X'90' TEST FALSE 00170000
$HI EQU X'04' TEST HIGH 00180000
$LO EQU X'02' TEST LOW 00190000
$EQ EQU X'01' TEST EQUAL 00200000
$OVFB EQU X'20' BINARY OVERFLOW 00210000
$OVFD EQU X'08' DECIMAL OVERFLOW 00220000
MEND 00240000
'90' TEST FALSE 00170000 $HI EQU X
'04' TEST HIGH 00180000 $LO EQU X
'02' TEST LOW 00190000 $EQ EQU X
'01' TEST