|
|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/36 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 768 (0x300)
Notes: MEMBER_P, Member_Text
Names: »SDAILOD «
└─⟦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
└─⟦059c4c04f⟧
└─⟦this⟧ ».SDAILOD «
// IFF DATAF1-#SDALIB GOTO BLDLIB DELETE #SDALIB,F1,REMOVE,,LIBR // TAG BLDLIB // LOAD $CNKAN // RUN // LOCAL AREA-SYSTEM // IFF ?L'230,1'?/1 GOTO CHKKANJI // ELSE BLDLIBR #SDALIB,585,60,?2? // GOTO LOADFILE // TAG CHKKANJI // IF ?L'67,1'?/1 BLDLIBR #SDALIB,700,70,?2? // ELSE BLDLIBR #SDALIB,500,50,?2? // TAG LOADFILE // LOAD $MAINT // FILE NAME-SDALIB,UNIT-I1,PACK-PPUTIL,LOCATION-?1?,AUTO-NO // RUN // COPY FROM-DISK,TO-#SDALIB,FILE-SDALIB // END // IFF ?CD?/0000 RETURN LOGPLD LOAD,SDA,'#SAIN,#SDALIB',,'0005,##MSGPL2',,'#LIBRARY,#SDALIB' // LOCAL AREA-SYSTEM,OFFSET-1,DATA-'SDAILOD 44' // LOAD $CNAD // RUN
0x000…001 0xa1 0x001…022 »// IFF DATAF1-#SDALIB GOTO BLDLIB« 0x022…023 0x2f 0x023…024 0x9e 0x024…042 »DELETE #SDALIB,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 0xa2 0x0a4…0c6 »// ELSE BLDLIBR #SDALIB,585,60,?2?« 0x0c6…0c7 0x2e 0x0c7…0c8 0x90 0x0c8…0d8 »// GOTO LOADFILE« 0x0d8…0d9 0x40 0x0d9…0da 0x8f 0x0da…0e9 »// TAG CHKKANJI« 0x0e9…0ea 0x41 0x0ea…0eb 0xac 0x0eb…117 »// IF ?L'67,1'?/1 BLDLIBR #SDALIB,700,70,?2?« 0x117…118 0x24 0x118…119 0xa2 0x119…13b »// ELSE BLDLIBR #SDALIB,500,50,?2?« 0x13b…13c 0x2e 0x13c…13d 0x8f 0x13d…14c »// TAG LOADFILE« 0x14c…14d 0x41 0x14d…14e 0x8e 0x14e…15c »// LOAD $MAINT« 0x15c…15d 0x42 0x15d…15e 0xbc 0x15e…19a »// FILE NAME-SDALIB,UNIT-I1,PACK-PPUTIL,LOCATION-?1?,AUTO-NO« 0x19a…19b 0x14 0x19b…19c 0x86 0x19c…1a2 »// RUN« 0x1a2…1a3 0x4a 0x1a3…1a4 0xa8 0x1a4…1cc »// COPY FROM-DISK,TO-#SDALIB,FILE-SDALIB« 0x1cc…1cd 0x28 0x1cd…1ce 0x86 0x1ce…1d4 »// END« 0x1d4…1d5 0x4a 0x1d5…1d6 0x97 0x1d6…1ed »// IFF ?CD?/0000 RETURN« 0x1ed…1ee 0x39 0x1ee…1ef 0xc4 0x1ef…233 »LOGPLD LOAD,SDA,'#SAIN,#SDALIB',,'0005,##MSGPL2',,'#LIBRARY,#SDALIB'« 0x233…234 0x0c 0x234…235 0xaf 0x235…264 »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'SDAILOD 44'« 0x264…265 0x21 0x265…266 0x8d 0x266…273 »// LOAD $CNAD« 0x273…274 0x43 0x274…275 0x86 0x275…27b »// RUN« 0x27b…27c 0x4a 0x27c…27d 0x00 0x27d…280 05 00 05 ┆ ␣ ┆ 0x280…2a0 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 66 00 00 00 00 00 00 00 00 d7 e2 c4 c1 40 40 40 ┆ ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø Ã␣␣␣␣␣␣␣␣PSDA ┆ 0x2a0…2c0 40 40 00 0f 26 50 00 1c 00 00 00 00 40 00 02 00 02 00 06 30 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ␣ &␣ ␣␣␣␣ ␣ ␣ ␣ ␣␣␣␣␣␣␣␣␣␣␣␣┆ 0x2c0…2e0 00 80 3d 66 00 00 00 00 00 00 00 00 d7 e2 c4 c1 c9 d3 d6 c4 40 00 0f 33 50 00 1b 00 00 00 00 40 ┆␣Ø Ã␣␣␣␣␣␣␣␣PSDAILOD ␣ &␣ ␣␣␣␣ ┆ 0x2e0…300 00 02 00 05 00 04 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f cc 00 00 00 00 00 00 00 00 ff ┆␣ ␣ ␣ ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø ö␣␣␣␣␣␣␣␣ ┆