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

⟦8bc587b4c⟧ s3xseg

    Length: 762 (0x2fa)
    Types: s3xseg
    Names: »S$DDPF«

Derivation

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

TextSegment

*                               DDPF OPTIONS                                                    
       LINK                                                                                     
       $DDPF &DPF-                                                                              
       GBLB  &DPFG,&DPFYS,&COREG,&S45G,&TCORG                                                   
       TABLE &DPF                                                                               
NO           00                                                                                 
YES          20                                                                                 
             'E'                                                                                
       TEXT                                                                                     
       AIF   (&COREG).C                                                                         
       MNOTE '0,'IS'                                                                            
       MEXIT                                                                                    
.C     AIF   (&DPF NE 'E').A                                                                    
       MNOTE '0,'IR'                                                                            
       MEXIT                                                                                    
.A     ANOP                                                                                     
&COREG SETB  0                                                                                  
&DPFG  SETB  1                                                                                  
//     CONFG N,FA,&DPF                                                                          
       AIF   (&DPF EQ '00').B                                                                   
//     COPY FROM-R1,TO-F1,LIBRARY-O,RETAIN-P,NAME-$@TMS.ALL,NEWNAME-$$TMS                       
       INCLD $@SPV2                                                                             
&DPFYS SETB  1                                                                                  
       MEXIT                                                                                    
.B     ANOP                                                                                     
&S45G  SETB  0                                                                                  
&TCORG SETB  0                                                                                  
       INCLD $@SPV1                                                                             
       MEND                                                                                     
::h@..................................KKe{ggggggggg{ggggggggggggg'   2aaaaaaaaaBBBBBBBBBBBBBBBBB
BBBBBBBBBBB}gaÅBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
BBBBBBBBBBBBBBBBBBBBBBBBôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôô2a
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅ
ÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅ@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}ØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØl@ÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅ
ÅÅÅÅÅÅ}}}}}}}}}}}}}¯¯¯¯¯¯¯¯¯¯¯¯þþþþþþþþþþþþþþþþþþþþþþþþþþÑ2gggggggggggggggggggggggggg'-Ú22222222
22222¯¯¯¯¯¯¯¯¯¯¯¯¯þþþþþþþþþþþþþþþþþþþþþþþþþþ¦2ggggggggg¯¯¯¯¯¯¯¯¯¯¯¯¯¯þþþþþþþþþþþþþþþþþþþþþþþþþþ,
BBBBBBBBBBBBBBBBBBBBBBBGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
GGB{ggggggggggggggggggggg))))))))))))))))))))))))))){aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaêêêêêêêêêêêêêêêêêêBBBBBBBBBBBBBBBB
BBBBBB|:::::{ggggggggggggggggggggÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃÃô
ôôôôôôôôôôôôôôôôôôôôôµ2aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
aaaÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅŵ2aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
ááááááááááááááááááááááµ2222222222222222222222222222222222222222222222222222222222222222222222222
22222222222B{ggggggggggggggg····································································
········································r{gggggggggggggggggggg""""""""""""""""""""""""""""""""""
""""""""""""""""""""""""""""""""""""""""""""""Ì{ggggggggg{ggggggggggggg'   {aaaaaaaaaaaaaaaaaa¥¥
¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥
¥¥¥¥¥¥¥¥¥¥¸BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB{gggggeBBBBBBBBB
BBBBBBBBBBBBBj{gggggéO