DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/36

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

See our Wiki for more about IBM System/36

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦ab425c38f⟧ 

    Length: 768 (0x300)
    Notes: MEMBER_P, Member_Text
    Names: »DFUILOD «

Derivation

└─⟦14ba21fd6⟧ Bits:30009812 REF.NO PWD34 PGM 5727-UT6 FEAT9074 UTILITIES US Z250-0041-2 REV/LEV 05.01 SEQ. 1/2 DISKET 2S 96TPI INTERNAL 88.03.04 31
    └─⟦41ed29fcc⟧ 
        └─⟦this⟧ ».DFUILOD «

Text Member

// IFF DATAF1-#DFULIB GOTO BLDLIB                                               
DELETE #DFULIB,F1,REMOVE,,LIBR                                                  
// TAG BLDLIB                                                                   
// LOAD $CNKAN                                                                  
// RUN                                                                          
// LOCAL AREA-SYSTEM                                                            
// IFF ?L'230,1'?/1 GOTO CHKKANJI                                               
// ELSE BLDLIBR #DFULIB,180,20,?2?,DFULIB,I1,,?1?,NOAUTO                        
// GOTO LOADFILE                                                                
// TAG CHKKANJI                                                                 
// IF ?L'67,1'?/1 BLDLIBR #DFULIB,240,25,?2?,DFULIB,I1,,?1?,NOAUTO              
// ELSE BLDLIBR #DFULIB,150,15,?2?,DFULIB,I1,,?1?,NOAUTO                        
// IFF ?CD?/0000 RETURN                                                         
// TAG LOADFILE                                                                 
LOGPLD LOAD,DFU,'#DFEX,#DFULIB',,'0001,##MSGPL2',,'#LIBRARY,#DFULIB'            
// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'DFUILOD 40'                                 
// LOAD $CNAD                                                                   
// RUN

OctetView - MemberText

0x000…001 0xa1
0x001…022 »// IFF DATAF1-#DFULIB GOTO BLDLIB«
0x022…023 0x2f
0x023…024 0x9e
0x024…042 »DELETE #DFULIB,F1,REMOVE,,LIBR«
0x042…043 0x32
0x043…044 0x8d
0x044…051 »// TAG BLDLIB«
0x051…052 0x43
0x052…053 0x8e
0x053…061 »// LOAD $CNKAN«
0x061…062 0x42
0x062…063 0x86
0x063…069 »// RUN«
0x069…06a 0x4a
0x06a…06b 0x94
0x06b…07f »// LOCAL AREA-SYSTEM«
0x07f…080 0x3c
0x080…081 0xa1
0x081…0a2 »// IFF ?L'230,1'?/1 GOTO CHKKANJI«
0x0a2…0a3 0x2f
0x0a3…0a4 0xb8
0x0a4…0dc »// ELSE BLDLIBR #DFULIB,180,20,?2?,DFULIB,I1,,?1?,NOAUTO«
0x0dc…0dd 0x18
0x0dd…0de 0x90
0x0de…0ee »// GOTO LOADFILE«
0x0ee…0ef 0x40
0x0ef…0f0 0x8f
0x0f0…0ff »// TAG CHKKANJI«
0x0ff…100 0x41
0x100…101 0xc2
0x101…143 »// IF ?L'67,1'?/1 BLDLIBR #DFULIB,240,25,?2?,DFULIB,I1,,?1?,NOAUTO«
0x143…144 0x0e
0x144…145 0xb8
0x145…17d »// ELSE BLDLIBR #DFULIB,150,15,?2?,DFULIB,I1,,?1?,NOAUTO«
0x17d…17e 0x18
0x17e…17f 0x97
0x17f…196 »// IFF ?CD?/0000 RETURN«
0x196…197 0x39
0x197…198 0x8f
0x198…1a7 »// TAG LOADFILE«
0x1a7…1a8 0x41
0x1a8…1a9 0xc4
0x1a9…1ed »LOGPLD LOAD,DFU,'#DFEX,#DFULIB',,'0001,##MSGPL2',,'#LIBRARY,#DFULIB'«
0x1ed…1ee 0x0c
0x1ee…1ef 0xaf
0x1ef…21e »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'DFUILOD 40'«
0x21e…21f 0x21
0x21f…220 0x8d
0x220…22d »// LOAD $CNAD«
0x22d…22e 0x43
0x22e…22f 0x86
0x22f…235 »// RUN«
0x235…236 0x4a
0x236…237 0x00
0x237…240 ff ff ff ff ff ff ff ff ff                                                                        ┆         ┆
0x240…260 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff   ┆                                ┆
          […0x5…]

Reduced view