DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/3

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about IBM System/3

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦9303db829⟧ s3xseg

    Length: 508 (0x1fc)
    Types: s3xseg
    Names: »S$DCOR«

Derivation

└─⟦d025fa538⟧ Bits:30009183 5702-sc1.V16.2
    └─⟦cfce0a73a⟧ 
        └─⟦this⟧ »S$DCOR« 
└─⟦34f897e8c⟧ Bits:30009186 5702-sc1.V16.scp
    └─⟦e1bdf435f⟧ 
        └─⟦this⟧ »S$DCOR«

TextSegment

*                               DCORE  OPTIONS                                                  
       LINK                                                                                     
       $DCOR &CORE-                                                                             
       GBLB  &COREG,&S45G,&TCORG                                                                
       GBLB  &SUPVG                                                                             
       TABLE &CORE                                                                              
12K          003000                                                                             
16K          004000                                                                             
24K          006000                                                                             
32K          008000                                                                             
48K          '00C000'                                                                           
64K          010000                                                                             
             'E'                                                                                
       TEXT                                                                                     
       AIF   (&SUPVG).C                                                                         
       MNOTE '0,'IS'                                                                            
       MEXIT                                                                                    
.C     AIF   (&CORE NE 'E').A                                                                   
       MNOTE '0,'IR'                                                                            
       MEXIT                                                                                    
.A     ANOP                                                                                     
       AIF   (&CORE NE '003000').B                                                              
&S45G  SETB  1                                                                                  
&TCORG SETB  1                                                                                  
.B     ANOP                                                                                     
&SUPVG SETB  0                                                                                  
&COREG SETB  1                                                                                  
//     CONFG M,FD,&CORE                                                                         
       MEND                                                                                     
UF+95(96),MFCURD+95    MO