|
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 - download
Length: 9216 (0x2400)
Types: GA21-9182-File
Names: »SEU«
└─⟦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
└─⟦this⟧
0x0000…0020 (0,) d7 e2 c5 e4 40 40 40 40 40 00 00 02 50 00 01 00 00 00 00 40 00 02 00 02 00 01 30 00 00 00 00 00 ┆PSEU & ┆
0x0020…0040 00 00 00 00 00 00 00 20 80 3d 66 00 00 00 00 00 00 00 00 00 00 00 00 00 91 7b e2 c5 e4 6b 7b e2 ┆ Ø Ã j#SEU,#S┆
0x0040…0060 c5 e4 d3 c9 c2 40 5c c1 d3 d3 3f 00 00 02 00 02 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆EULIB *ALL ┆
0x0060…0080 80 3d cc 00 00 00 00 00 00 00 00 d7 e2 c4 c1 f9 f0 40 40 40 00 0f 61 50 00 0d 00 00 00 00 40 00 ┆Ø ö PSDA90 /& ┆
0x0080…00a0 02 00 02 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3d 00 00 00 00 00 00 00 00 00 d7 e2 ┆ Ø PS┆
0x00a0…00c0 c5 e4 40 40 40 40 40 00 08 1d 50 00 03 00 00 00 00 40 00 00 00 01 00 00 30 00 00 00 00 00 00 00 ┆EU & ┆
0x00c0…00e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d7 e2 c5 e4 c4 d9 d6 d7 40 00 08 1e 50 00 12 ┆ PSEUDROP & ┆
0x00e0…0100 00 00 00 00 40 00 02 00 02 00 03 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3d 66 00 00 00 00 ┆ Ø Ã ┆
0x0100…0120 00 00 00 00 d7 e2 c5 e4 c9 d3 d6 c4 40 00 08 21 50 00 23 00 00 00 00 40 00 02 00 02 00 06 30 00 ┆ PSEUILOD & ┆
0x0120…0140 00 00 00 00 00 00 00 00 00 00 00 00 80 3d 99 00 00 00 00 00 00 00 00 ff d7 e2 c5 e4 c4 d9 d6 d7 ┆ Ø r PSEUDROP┆
0x0140…0160 40 00 00 08 50 00 15 00 00 00 00 40 00 02 00 05 00 04 30 00 00 00 00 00 00 00 00 00 00 00 00 20 ┆ & ┆
0x0160…0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 ┆ o// MEMBER USER1┆
0x0180…01a0 60 7b 7b d4 e2 c7 f2 3a ae 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 ┆-##MSG2 Þ// IF JOBQ-NO IF EVOKED┆
0x01a0…01c0 60 d5 d6 40 5c 40 7d 40 e2 c5 e4 c4 d9 d6 d7 6f d4 f5 f5 f0 f0 6f 7d 22 b3 61 61 40 c9 c6 40 c4 ┆-NO * ' SEUDROP?M5500?' ·// IF D┆
0x01c0…01e0 c1 e3 c1 c6 f1 60 7b e2 c5 e4 d3 c9 c2 40 c4 c5 d3 c5 e3 c5 40 7b e2 c5 e4 d3 c9 c2 6b c6 f1 6b ┆ATAF1-#SEULIB DELETE #SEULIB,F1,┆
0x01e0…0200 d9 c5 d4 d6 e5 c5 6b 6b d3 c9 c2 d9 1d 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 86 61 61 ┆REMOVE,,LIBR þ// LOAD $MAINTâf//┆
0x0200…0220 40 d9 e4 d5 4a b7 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d3 c9 c2 d9 d5 c1 ┆ RUN¢¼// DELETE LIBRARY-P,LIBRNA┆
0x0220…0240 d4 c5 60 7b d3 c9 c2 d9 c1 d9 e8 6b d9 c5 e3 c1 c9 d5 60 e2 6b d5 c1 d4 c5 60 e2 c5 e4 19 bb 61 ┆ME-#LIBRARY,RETAIN-S,NAME-SEU ]/┆
0x0240…0260 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 ┆/ DELETE LIBRARY-P,LIBRNAME-#LIB┆
0x0260…0280 d9 c1 d9 e8 6b d9 c5 e3 c1 c9 d5 60 e2 6b d5 c1 d4 c5 60 e2 c5 e4 c6 d4 d9 c9 15 bb 61 61 40 c4 ┆RARY,RETAIN-S,NAME-SEUFMRI ]// D┆
0x0280…02a0 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 ┆ELETE LIBRARY-P,LIBRNAME-#LIBRAR┆
0x02a0…02c0 e8 6b d9 c5 e3 c1 c9 d5 60 e2 6b d5 c1 d4 c5 60 e2 c5 e4 c9 d3 d6 c4 15 bb 61 61 40 c4 c5 d3 c5 ┆Y,RETAIN-S,NAME-SEUILOD ]// DELE┆
0x02c0…02e0 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 e8 6b d9 ┆TE LIBRARY-P,LIBRNAME-#LIBRARY,R┆
0x02e0…0300 c5 e3 c1 c9 d5 60 e2 6b d5 c1 d4 c5 60 e2 c5 e4 d3 d6 c1 c4 15 ba 61 61 40 c4 c5 d3 c5 e3 c5 40 ┆ETAIN-S,NAME-SEULOAD [// DELETE ┆
0x0300…0320 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 e8 6b d9 c5 e3 c1 ┆LIBRARY-P,LIBRNAME-#LIBRARY,RETA┆
0x0320…0340 c9 d5 60 e2 6b d5 c1 d4 c5 60 e2 c5 e4 d4 d9 c9 16 bb 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 ┆IN-S,NAME-SEUMRI ]// DELETE LIBR┆
0x0340…0360 c1 d9 e8 60 d7 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 e8 6b d9 c5 e3 c1 c9 d5 60 e2 ┆ARY-P,LIBRNAME-#LIBRARY,RETAIN-S┆
0x0360…0380 6b d5 c1 d4 c5 60 e2 c5 e4 e2 c1 e5 c5 15 bb 61 61 40 c4 c5 d3 c5 e3 c5 40 d5 c1 d4 c5 60 7b e2 ┆,NAME-SEUSAVE ]// DELETE NAME-#S┆
0x0380…03a0 c5 4b c1 d3 d3 6b d3 c9 c2 d9 c1 d9 e8 60 d6 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 ┆E.ALL,LIBRARY-O,LIBRNAME-#LIBRAR┆
0x03a0…03c0 e8 6b d9 c5 e3 c1 c9 d5 60 e2 15 bc 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b ┆Y,RETAIN-S ¯// DELETE LIBRARY-P,┆
0x03c0…03e0 d3 c9 c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 e8 6b d9 c5 e3 c1 c9 d5 60 e2 6b d5 c1 d4 c5 60 ┆LIBRNAME-#LIBRARY,RETAIN-S,NAME-┆
0x03e0…0400 e2 c5 e4 c6 c4 d9 d6 d7 14 bb 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d3 c9 ┆SEUFDROP ]// DELETE LIBRARY-P,LI┆
0x0400…0420 (1,) c2 d9 d5 c1 d4 c5 60 7b d3 c9 c2 d9 c1 d9 e8 6b d9 c5 e3 c1 c9 d5 60 e2 6b d5 c1 d4 c5 60 e2 c5 ┆BRNAME-#LIBRARY,RETAIN-S,NAME-SE┆
0x0420…0440 e4 c4 d9 d6 d7 15 c8 61 61 40 c9 c6 40 d3 d6 c1 c4 60 7d 7b e2 c5 e2 d7 c4 f0 f1 6b 7b d3 c9 c2 ┆UDROP H// IF LOAD-'#SESPD01,#LIB┆
0x0440…0460 d9 c1 d9 e8 7d 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d6 6b d5 c1 d4 c5 60 7b e2 c5 e2 ┆RARY' DELETE LIBRARY-O,NAME-#SES┆
0x0460…0480 d7 c4 4b c1 d3 d3 6b d9 c5 e3 c1 c9 d5 60 e2 08 86 61 61 40 c5 d5 c4 4a 97 61 61 40 c9 c6 c6 40 ┆PD.ALL,RETAIN-S f// END¢p// IFF ┆
0x0480…04a0 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 8f d3 d6 c7 d7 d3 c4 40 c4 d9 d6 d7 6b e2 c5 ┆?CD?/0000 RETURN ±LOGPLD DROP,SE┆
0x04a0…04c0 e4 41 af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 ┆U ®// LOCAL AREA-SYSTEM,OFFSET-1┆
0x04c0…04e0 6b c4 c1 e3 c1 60 7d e2 c5 e4 c4 d9 d6 d7 40 f4 f3 7d 21 8e 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c4 ┆,DATA-'SEUDROP 43' þ// LOAD $CND┆
0x04e0…0500 d9 d7 42 86 61 61 40 d9 e4 d5 4a 00 00 03 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f ┆RPâf// RUN¢ Ø ┆
0x0500…0520 33 00 00 00 00 00 00 00 00 d7 e2 c4 c1 f8 40 40 40 40 00 0f 06 50 00 0e 00 00 00 00 40 00 02 00 ┆ PSDA8 & ┆
0x0520…0540 02 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3d 99 00 00 00 00 00 00 00 00 d7 e2 c4 c1 ┆ Ø r PSDA┆
0x0540…0560 f9 40 40 40 40 00 0f 08 50 00 0f 00 00 00 00 40 00 02 00 02 00 02 30 00 00 00 00 00 00 00 00 00 ┆9 & ┆
0x0560…0580 00 00 00 00 80 3d cc 00 00 00 00 00 00 00 00 ff d7 e2 c5 e4 c6 c4 d9 d6 d7 00 00 06 50 00 15 00 ┆ Ø ö PSEUFDROP & ┆
0x0580…05a0 00 00 00 40 00 02 00 05 00 03 30 00 00 00 00 00 00 00 00 00 00 00 00 20 00 00 00 00 00 00 00 00 ┆ ┆
0x05a0…05c0 00 00 00 00 00 00 00 00 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 7b 7b d4 e2 c7 f2 3a ┆ o// MEMBER USER1-##MSG2 ┆
0x05c0…05e0 af 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 d5 d6 40 5c 40 7d 40 ┆®// IF JOBQ-NO IF EVOKED-NO * ' ┆
0x05e0…0600 e2 c5 e4 c6 c4 d9 d6 d7 6f d4 f5 f5 f0 f0 6f 7d 21 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 ┆SEUFDROP?M5500?' þ// LOAD $MAINT┆
0x0600…0620 42 86 61 61 40 d9 e4 d5 4a ba 61 61 40 c4 c5 d3 c5 e3 c5 40 d5 c1 d4 c5 60 7b e2 c5 4b c1 d3 d3 ┆âf// RUN¢[// DELETE NAME-#SE.ALL┆
0x0620…0640 6b d3 c9 c2 d9 c1 d9 e8 60 e2 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b e2 c5 e4 d3 c9 c2 6b d9 c5 e3 c1 ┆,LIBRARY-S,LIBRNAME-#SEULIB,RETA┆
0x0640…0660 c9 d5 60 e2 16 86 61 61 40 c5 d5 c4 4a 8e 61 61 40 d3 d6 c1 c4 40 5b c3 d5 d2 c1 d5 42 86 61 61 ┆IN-S f// END¢þ// LOAD $CNKANâf//┆
0x0660…0680 40 d9 e4 d5 4a 90 c3 d6 d5 c4 c5 d5 e2 c5 40 7b e2 c5 e4 d3 c9 c2 40 a1 61 61 40 c9 c6 c6 40 6f ┆ RUN¢°CONDENSE #SEULIB ~// IFF ?┆
0x0680…06a0 d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c7 d6 e3 d6 40 c3 c8 d2 d2 c1 d5 d1 c9 2f 9f 61 61 40 c5 d3 ┆L'230,1'?/1 GOTO CHKKANJI ¤// EL┆
0x06a0…06c0 e2 c5 40 c1 d3 d6 c3 d3 c9 c2 d9 40 7b e2 c5 e4 d3 c9 c2 6b f2 f0 f0 6b f2 f5 31 8f 61 61 40 c7 ┆SE ALOCLIBR #SEULIB,200,25 ±// G┆
0x06c0…06e0 d6 e3 d6 40 c5 d5 c4 c1 d3 d6 c3 41 8f 61 61 40 e3 c1 c7 40 c3 c8 d2 d2 c1 d5 d1 c9 41 a9 61 61 ┆OTO ENDALOC ±// TAG CHKKANJI z//┆
0x06e0…0700 40 c9 c6 40 6f d3 7d f6 f7 6b f1 7d 6f 61 f1 40 c1 d3 d6 c3 d3 c9 c2 d9 40 7b e2 c5 e4 d3 c9 c2 ┆ IF ?L'67,1'?/1 ALOCLIBR #SEULIB┆
0x0700…0720 6b f3 f5 f0 6b f2 f5 27 9f 61 61 40 c5 d3 e2 c5 40 c1 d3 d6 c3 d3 c9 c2 d9 40 7b e2 c5 e4 d3 c9 ┆,350,25 ¤// ELSE ALOCLIBR #SEULI┆
0x0720…0740 c2 6b f2 f0 f0 6b f1 f0 31 8e 61 61 40 e3 c1 c7 40 c5 d5 c4 c1 d3 d6 c3 42 97 61 61 40 c9 c6 c6 ┆B,200,10 þ// TAG ENDALOCâp// IFF┆
0x0740…0760 40 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 92 d3 d6 c7 d7 d3 c4 40 c4 d9 d6 d7 6b e2 ┆ ?CD?/0000 RETURN kLOGPLD DROP,S┆
0x0760…0780 c5 e4 c6 d4 e3 3e af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 ┆EUFMT ®// LOCAL AREA-SYSTEM,OFFS┆
0x0780…07a0 c5 e3 60 f1 6b c4 c1 e3 c1 60 7d e2 c5 e4 c6 c4 d9 d6 d7 f4 f1 7d 21 8e 61 61 40 d3 d6 c1 c4 40 ┆ET-1,DATA-'SEUFDROP41' þ// LOAD ┆
0x07a0…07c0 5b c3 d5 c4 d9 d7 42 86 61 61 40 d9 e4 d5 4a 00 d3 00 20 d0 50 00 c2 00 00 00 00 c0 00 02 00 05 ┆$CNDRPâf// RUN¢ L }& B { ┆
0x07c0…07e0 00 08 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 ff ff ff ff ff ┆ Ø Ã ┆
0x07e0…0800 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…]
0x08a0…08c0 ff ff ff ff ff ff ff ff d7 e2 c5 e4 c6 d4 d9 c9 40 00 00 0a 50 00 28 00 00 00 00 40 00 02 00 05 ┆ PSEUFMRI & ┆
0x08c0…08e0 00 05 30 00 00 00 00 00 00 00 00 00 00 00 00 20 80 3f 66 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ Ø Ã ┆
0x08e0…0900 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 7b 7b d4 e2 c7 f2 3a 94 61 61 40 d3 d6 c3 c1 ┆o// MEMBER USER1-##MSG2 m// LOCA┆
0x0900…0920 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 3c 9e 61 61 40 c9 c6 40 6f f3 6f 61 e2 c5 e4 d3 d6 c1 c4 ┆L AREA-SYSTEM Æ// IF ?3?/SEULOAD┆
0x0920…0940 40 c7 d6 e3 d6 40 c1 c4 c4 e2 c5 e4 c6 32 a0 61 61 40 c9 c6 c6 40 6f d3 7d f2 f4 f8 6b f1 7d 6f ┆ GOTO ADDSEUF µ// IFF ?L'248,1'?┆
0x0940…0960 61 f1 40 c7 d6 e3 d6 40 c1 c4 c4 e2 c5 e4 c6 30 9e 61 61 40 c9 c6 40 6f d9 7d f2 f0 f6 f0 7d 6f ┆/1 GOTO ADDSEUF Æ// IF ?R'2060'?┆
0x0960…0980 61 d5 40 c7 d6 e3 d6 40 c1 d3 d3 c4 d6 d5 c5 32 8e 61 61 40 e3 c1 c7 40 c1 c4 c4 e2 c5 e4 c6 42 ┆/N GOTO ALLDONE þ// TAG ADDSEUFâ┆
0x0980…09a0 ba 61 61 40 c9 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c9 c6 c6 40 e2 d6 e4 d9 c3 c5 60 7d ┆[// IF ?L'230,1'?/1 IFF SOURCE-'┆
0x09a0…09c0 7b e2 c5 5b c6 d6 d9 d4 6b 7b e2 c5 e4 d3 c9 c2 7d 40 c7 d6 e3 d6 40 c1 d3 d6 c3 16 9f 61 61 40 ┆#SE$FORM,#SEULIB' GOTO ALOC ¤// ┆
0x09c0…09e0 c9 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c7 d6 e3 d6 40 c4 c5 d3 c6 d4 e3 e2 31 aa 61 61 ┆IF ?L'230,1'?/1 GOTO DELFMTS ¡//┆
0x09e0…0a00 40 c9 c6 c6 40 e2 d6 e4 d9 c3 c5 60 7d 7b e2 c5 7c c6 d6 d9 d4 6b 7b e2 c5 e4 d3 c9 c2 7d 40 c7 ┆ IFF SOURCE-'#SE@FORM,#SEULIB' G┆
0x0a00…0a20 d6 e3 d6 40 c1 d3 d6 c3 26 8e 61 61 40 e3 c1 c7 40 c4 c5 d3 c6 d4 e3 e2 42 8e 61 61 40 d3 d6 c1 ┆OTO ALOC þ// TAG DELFMTSâþ// LOA┆
0x0a20…0a40 c4 40 5b d4 c1 c9 d5 e3 42 86 61 61 40 d9 e4 d5 4a 95 61 61 40 c9 c6 c6 40 6f d3 7d f2 f3 f0 6b ┆D $MAINTâf// RUN¢n// IFF ?L'230,┆
0x0a40…0a60 f1 7d 6f 61 f1 40 4e 3b 03 b8 c4 c5 d3 c5 e3 c5 40 d5 c1 d4 c5 60 7b e2 c5 7c 4b c1 d3 d3 6b d3 ┆1'?/1 + ½DELETE NAME-#SE@.ALL,L┆
0x0a60…0a80 c9 c2 d9 c1 d9 e8 60 e2 6b d3 c9 c2 d9 d5 c1 d4 c5 60 7b e2 c5 e4 d3 c9 c2 6b d9 c5 e3 c1 c9 d5 ┆IBRARY-S,LIBRNAME-#SEULIB,RETAIN┆
0x0a80…0aa0 60 e2 15 93 61 61 40 c9 c6 40 6f d3 7d f6 f7 6b f1 7d 6f 61 f1 40 4e 3d 03 b8 c4 c5 d3 c5 e3 c5 ┆-S l// IF ?L'67,1'?/1 + ½DELETE┆
0x0aa0…0ac0 40 d5 c1 d4 c5 60 7b e2 c5 5b 4b c1 d3 d3 6b d3 c9 c2 d9 c1 d9 e8 60 e2 6b d3 c9 c2 d9 d5 c1 d4 ┆ NAME-#SE$.ALL,LIBRARY-S,LIBRNAM┆
0x0ac0…0ae0 c5 60 7b e2 c5 e4 d3 c9 c2 6b d9 c5 e3 c1 c9 d5 60 e2 15 86 61 61 40 c5 d5 c4 4a 90 c3 d6 d5 c4 ┆E-#SEULIB,RETAIN-S f// END¢°COND┆
0x0ae0…0b00 c5 d5 e2 c5 40 7b e2 c5 e4 d3 c9 c2 40 8b 61 61 40 e3 c1 c7 40 c1 d3 d6 c3 45 a1 61 61 40 c9 c6 ┆ENSE #SEULIB »// TAG ALOCá~// IF┆
0x0b00…0b20 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c7 d6 e3 d6 40 c3 c8 d2 d2 c1 d5 d1 c9 2f 9f 61 61 ┆F ?L'230,1'?/1 GOTO CHKKANJI ¤//┆
0x0b20…0b40 40 c5 d3 e2 c5 40 c1 d3 d6 c3 d3 c9 c2 d9 40 7b e2 c5 e4 d3 c9 c2 6b f2 f9 f5 6b f2 f5 31 90 61 ┆ ELSE ALOCLIBR #SEULIB,295,25 °/┆
0x0b40…0b60 61 40 c7 d6 e3 d6 40 d3 d6 c1 c4 c6 c9 d3 c5 40 8f 61 61 40 e3 c1 c7 40 c3 c8 d2 d2 c1 d5 d1 c9 ┆/ GOTO LOADFILE ±// TAG CHKKANJI┆
0x0b60…0b80 41 a9 61 61 40 c9 c6 40 6f d3 7d f6 f7 6b f1 7d 6f 61 f1 40 c1 d3 d6 c3 d3 c9 c2 d9 40 7b e2 c5 ┆ z// IF ?L'67,1'?/1 ALOCLIBR #SE┆
0x0b80…0ba0 e4 d3 c9 c2 6b f4 f6 f0 6b f2 f5 27 9f 61 61 40 c5 d3 e2 c5 40 c1 d3 d6 c3 d3 c9 c2 d9 40 7b e2 ┆ULIB,460,25 ¤// ELSE ALOCLIBR #S┆
0x0ba0…0bc0 c5 e4 d3 c9 c2 6b f2 f4 f0 6b f1 f5 31 8f 61 61 40 e3 c1 c7 40 d3 d6 c1 c4 c6 c9 d3 c5 41 8e 61 ┆EULIB,240,15 ±// TAG LOADFILE þ/┆
0x0bc0…0be0 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 b6 61 61 40 c6 c9 d3 c5 40 d5 c1 d4 c5 60 e2 c5 e4 c6 ┆/ LOAD $MAINTâ¶// FILE NAME-SEUF┆
0x0be0…0c00 e2 d4 d9 c9 6b e4 d5 c9 e3 60 c9 f1 6b d3 d6 c3 c1 e3 c9 d6 d5 60 6f f1 7d e2 f1 7d 6f 6b c1 e4 ┆SMRI,UNIT-I1,LOCATION-?1'S1'?,AU┆
0x0c00…0c20 (3,) e3 d6 60 d5 d6 1a 86 61 61 40 d9 e4 d5 4a aa 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 c4 c9 e2 d2 ┆TO-NO f// RUN¢¡// COPY FROM-DISK┆
0x0c20…0c40 6b e3 d6 60 7b e2 c5 e4 d3 c9 c2 6b c6 c9 d3 c5 60 e2 c5 e4 c6 e2 d4 d9 c9 26 86 61 61 40 c5 d5 ┆,TO-#SEULIB,FILE-SEUFSMRI f// EN┆
0x0c40…0c60 c4 4a 97 61 61 40 c9 c6 c6 40 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 b1 d3 d6 c7 d7 ┆D¢p// IFF ?CD?/0000 RETURN £LOGP┆
0x0c60…0c80 d3 c4 40 d3 d6 c1 c4 6b e2 c5 e4 c6 d4 e3 6b d5 d6 d5 c5 6b 6b 7d f0 f0 f0 f4 6b 7b 7b d4 e2 c7 ┆LD LOAD,SEUFMT,NONE,,'0004,##MSG┆
0x0c80…0ca0 d7 d3 f2 7d 6b 6b 7b e2 c5 e4 d3 c9 c2 1f af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 ┆PL2',,#SEULIB ®// LOCAL AREA-SYS┆
0x0ca0…0cc0 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 7d e2 c5 e4 c6 d4 d9 c9 40 f4 f1 7d 21 8d ┆TEM,OFFSET-1,DATA-'SEUFMRI 41' ý┆
0x0cc0…0ce0 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 c4 43 86 61 61 40 d9 e4 d5 4a af 61 61 40 d3 d6 c3 c1 d3 40 ┆// LOAD $CNADäf// RUN¢®// LOCAL ┆
0x0ce0…0d00 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 7d e2 c5 e4 c6 d4 ┆AREA-SYSTEM,OFFSET-1,DATA-'SEUFM┆
0x0d00…0d20 d9 c9 40 f4 f1 7d 21 8d 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 c4 43 86 61 61 40 d9 e4 d5 4a 8e 61 ┆RI 41' ý// LOAD $CNADäf// RUN¢þ/┆
0x0d20…0d40 61 40 e3 c1 c7 40 c1 d3 d3 c4 d6 d5 c5 42 00 61 61 40 c9 c6 c6 40 6f d3 7d f2 f4 f8 6b f1 7d 6f ┆/ TAG ALLDONEâ // IFF ?L'248,1'?┆
0x0d40…0d60 61 f1 40 c7 d6 e3 d6 40 c1 c4 c4 e2 c5 e4 c6 30 9e 61 61 40 c9 c6 40 6f d9 7d f2 f0 f6 f0 7d 6f ┆/1 GOTO ADDSEUF Æ// IF ?R'2060'?┆
0x0d60…0d80 61 d5 40 c7 d6 e3 d6 40 c1 d3 d3 c4 d6 d5 c5 32 8e 61 61 40 e3 c1 c7 40 c1 c4 c4 e2 c5 e4 c6 42 ┆/N GOTO ALLDONE þ// TAG ADDSEUFâ┆
0x0d80…0da0 ba 61 61 40 c9 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c9 c6 c6 40 e2 d6 e4 d9 c3 c5 60 7d ┆[// IF ?L'230,1'?/1 IFF SOURCE-'┆
0x0da0…0dc0 7b e2 c5 5b c6 d6 d9 d4 6b 7b e2 c5 e4 d3 c9 c2 7d 40 c7 d6 e3 d6 40 c1 d3 d6 c3 16 9f 61 61 40 ┆#SE$FORM,#SEULIB' GOTO ALOC ¤// ┆
0x0dc0…0de0 c9 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c7 d6 e3 d6 40 c4 c5 d3 c6 d4 e3 e2 31 aa 61 61 ┆IF ?L'230,1'?/1 GOTO DELFMTS ¡//┆
0x0de0…0e00 d7 e2 c5 e4 c9 d3 d6 c4 40 00 00 06 50 00 17 00 00 00 00 40 00 02 00 05 00 03 30 00 00 00 00 00 ┆PSEUILOD & ┆
0x0e00…0e20 00 00 00 00 00 00 00 20 80 3f 99 00 00 00 00 00 00 00 00 00 00 00 00 00 a1 61 61 40 c9 c6 c6 40 ┆ Ø r ~// IFF ┆
0x0e20…0e40 c4 c1 e3 c1 c6 f1 60 7b e2 c5 e4 d3 c9 c2 40 c7 d6 e3 d6 40 c2 d3 c4 d3 c9 c2 2f a1 61 61 40 c4 ┆DATAF1-#SEULIB GOTO BLDLIB ~// D┆
0x0e40…0e60 c5 d3 c5 e3 c5 40 7b e2 c5 e4 d3 c9 c2 6b c6 f1 6b d9 c5 d4 d6 e5 c5 6b 6b d3 c9 c2 d9 2f 8d 61 ┆ELETE #SEULIB,F1,REMOVE,,LIBR ý/┆
0x0e60…0e80 61 40 e3 c1 c7 40 c2 d3 c4 d3 c9 c2 43 8e 61 61 40 d3 d6 c1 c4 40 5b c3 d5 d2 c1 d5 42 86 61 61 ┆/ TAG BLDLIBäþ// LOAD $CNKANâf//┆
0x0e80…0ea0 40 d9 e4 d5 4a 94 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 3c a1 61 61 40 c9 ┆ RUN¢m// LOCAL AREA-SYSTEM ~// I┆
0x0ea0…0ec0 c6 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c7 d6 e3 d6 40 c3 c8 d2 d2 c1 d5 d1 c9 2f a6 61 ┆FF ?L'230,1'?/1 GOTO CHKKANJI w/┆
0x0ec0…0ee0 61 40 c5 d3 e2 c5 40 c2 d3 c4 d3 c9 c2 d9 40 7b e2 c5 e4 d3 c9 c2 6b f2 f0 f0 6b f2 f5 6b 6f f2 ┆/ ELSE BLDLIBR #SEULIB,200,25,?2┆
0x0ee0…0f00 7d c1 f1 7d 6f 2a 90 61 61 40 c7 d6 e3 d6 40 d3 d6 c1 c4 c6 c9 d3 c5 40 8f 61 61 40 e3 c1 c7 40 ┆'A1'? °// GOTO LOADFILE ±// TAG ┆
0x0f00…0f20 c3 c8 d2 d2 c1 d5 d1 c9 41 b0 61 61 40 c9 c6 40 6f d3 7d f6 f7 6b f1 7d 6f 61 f1 40 c2 d3 c4 d3 ┆CHKKANJI ^// IF ?L'67,1'?/1 BLDL┆
0x0f20…0f40 c9 c2 d9 40 7b e2 c5 e4 d3 c9 c2 6b f3 f5 f0 6b f2 f5 6b 6f f2 7d c1 f1 7d 6f 20 a6 61 61 40 c5 ┆IBR #SEULIB,350,25,?2'A1'? w// E┆
0x0f40…0f60 d3 e2 c5 40 c2 d3 c4 d3 c9 c2 d9 40 7b e2 c5 e4 d3 c9 c2 6b f2 f0 f0 6b f1 f0 6b 6f f2 7d c1 f1 ┆LSE BLDLIBR #SEULIB,200,10,?2'A1┆
0x0f60…0f80 7d 6f 2a 8f 61 61 40 e3 c1 c7 40 d3 d6 c1 c4 c6 c9 d3 c5 41 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 ┆'? ±// TAG LOADFILE þ// LOAD $MA┆
0x0f80…0fa0 c9 d5 e3 42 bd 61 61 40 c6 c9 d3 c5 40 d5 c1 d4 c5 60 e2 c5 e4 d4 d6 c4 e2 6b e4 d5 c9 e3 60 c9 ┆INTâ¨// FILE NAME-SEUMODS,UNIT-I┆
0x0fa0…0fc0 f1 6b d7 c1 c3 d2 60 d7 d7 e4 e3 c9 d3 6b d3 d6 c3 c1 e3 c9 d6 d5 60 6f f1 6f 6b c1 e4 e3 d6 60 ┆1,PACK-PPUTIL,LOCATION-?1?,AUTO-┆
0x0fc0…0fe0 d5 d6 13 86 61 61 40 d9 e4 d5 4a a9 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 c4 c9 e2 d2 6b e3 d6 ┆NO f// RUN¢z// COPY FROM-DISK,TO┆
0x0fe0…1000 60 7b e2 c5 e4 d3 c9 c2 6b c6 c9 d3 c5 60 e2 c5 e4 d4 d6 c4 e2 27 86 61 61 40 c5 d5 c4 4a 97 61 ┆-#SEULIB,FILE-SEUMODS f// END¢p/┆
0x1000…1020 (4,) 61 40 c9 c6 c6 40 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 c3 d3 d6 c7 d7 d3 c4 40 d3 ┆/ IFF ?CD?/0000 RETURN CLOGPLD L┆
0x1020…1040 d6 c1 c4 6b e2 c5 e4 6b 7d 7b e2 c5 e4 6b 7b e2 c5 e4 d3 c9 c2 7d 6b 6b 7d f0 f0 f0 f3 6b 7b 7b ┆OAD,SEU,'#SEU,#SEULIB',,'0003,##┆
0x1040…1060 d4 e2 c7 d7 d3 f2 7d 6b 6b 7d 7b d3 c9 c2 d9 c1 d9 e8 6b 7b e2 c5 e4 d3 c9 c2 7d 0d af 61 61 40 ┆MSGPL2',,'#LIBRARY,#SEULIB' ®// ┆
0x1060…1080 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 ┆LOCAL AREA-SYSTEM,OFFSET-1,DATA-┆
0x1080…10a0 7d e2 c5 e4 c9 d3 d6 c4 40 f4 f3 7d 21 8d 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 c4 43 86 61 61 40 ┆'SEUILOD 43' ý// LOAD $CNADäf// ┆
0x10a0…10c0 d9 e4 d5 4a 00 00 80 3f 66 00 00 00 00 00 00 00 00 d7 e6 e2 e4 d3 d6 c1 c4 40 00 04 cd 50 00 16 ┆RUN¢ Ø Ã PWSULOAD ò& ┆
0x10c0…10e0 00 00 00 00 40 00 02 00 05 00 03 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 99 00 00 00 00 ┆ Ø r ┆
0x10e0…1100 00 00 00 00 d7 e6 e2 e4 d4 d9 c9 40 40 00 04 d0 50 00 0b 00 00 00 00 40 00 02 00 05 00 02 30 00 ┆ PWSUMRI }& ┆
0x1100…1120 00 00 00 00 00 00 00 00 00 00 00 00 80 3f cc 00 00 00 00 00 00 00 00 ff d7 e2 c5 e4 d3 d6 c1 c4 ┆ Ø ö PSEULOAD┆
0x1120…1140 40 00 00 0c 50 00 3f 00 00 00 00 40 00 02 00 05 00 06 30 00 00 00 00 00 00 00 00 00 00 00 00 20 ┆ & ┆
0x1140…1160 80 3f cc 00 00 00 00 00 00 00 00 00 00 00 00 00 bb 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆Ø ö ]***************┆
0x1160…1180 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆********************************┆
0x1180…11a0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 15 81 5c 39 81 5c 15 81 5c 03 87 e2 c5 e4 d3 d6 c1 c4 2f 81 ┆************ a* a* a* gSEULOAD a┆
0x11a0…11c0 5c 15 81 5c 39 81 5c 15 81 5c 03 b2 e3 c8 c9 e2 40 d7 d9 d6 c3 c5 c4 e4 d9 c5 40 c3 d6 d7 c9 c5 ┆* a* a* a* ¥THIS PROCEDURE COPIE┆
0x11c0…11e0 e2 40 e3 c8 c5 40 e2 c5 e4 40 d7 d9 d6 c7 d9 c1 d4 40 d7 d9 d6 c4 e4 c3 e3 40 c6 d9 d6 d4 04 81 ┆S THE SEU PROGRAM PRODUCT FROM a┆
0x11e0…1200 5c 15 81 5c 03 97 c4 c9 e2 d2 c5 e3 e3 c5 40 e3 d6 40 c6 c9 e7 c5 c4 40 c4 c9 e2 d2 4b 1f 81 5c ┆* a* pDISKETTE TO FIXED DISK. a*┆
0x1200…1220 15 81 5c 39 81 5c 15 81 5c 03 95 e3 c8 c5 40 c9 e3 c5 d4 e2 40 c3 d6 d7 c9 c5 c4 40 c1 d9 c5 7a ┆ a* a* a* nTHE ITEMS COPIED ARE:┆
0x1220…1240 21 81 5c 15 81 5c 39 81 5c 15 81 5c 05 b5 60 40 e2 c5 e4 40 c5 e7 c5 c3 e4 e3 c1 c2 d3 c5 40 d4 ┆ a* a* a* a* §- SEU EXECUTABLE M┆
0x1240…1260 d6 c4 e4 d3 c5 e2 6b 40 d4 c5 e2 e2 c1 c7 c5 40 c1 d5 c4 40 e2 c3 d9 c5 c5 d5 40 c6 d6 d9 d4 c1 ┆ODULES, MESSAGE AND SCREEN FORMA┆
0x1260…1280 e3 40 5c 15 81 5c 07 a6 d4 c5 d4 c2 c5 d9 e2 40 d6 d5 40 c4 c9 e2 d2 c5 e3 e3 c5 40 e3 d6 40 7b ┆T * a* wMEMBERS ON DISKETTE TO #┆
0x1280…12a0 e2 c5 e4 d3 c9 c2 40 d6 d5 40 c4 c9 e2 d2 0c 81 5c 15 81 5c 05 ae 60 40 e3 c8 c5 40 e2 c3 d9 c5 ┆SEULIB ON DISK a* a* Þ- THE SCRE┆
0x12a0…12c0 c5 d5 40 c6 d6 d9 d4 c1 e3 40 d4 c5 d4 c2 c5 d9 7a 40 7b e2 c5 7c e7 e3 d9 c1 40 c9 e2 40 c3 d6 ┆EN FORMAT MEMBER: #SE@XTRA IS CO┆
0x12c0…12e0 d7 c9 c5 c4 06 81 5c 15 81 5c 07 8b e3 d6 40 7b d3 c9 c2 d9 c1 d9 e8 27 81 5c 15 81 5c 39 81 5c ┆PIED a* a* »TO #LIBRARY a* a* a*┆
0x12e0…1300 15 81 5c 03 9d d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f1 40 60 40 c4 c9 e2 d2 40 d7 d9 c5 c6 c5 d9 c5 d5 ┆ a* ¸PARAMETER 1 - DISK PREFEREN┆
0x1300…1320 c3 c5 19 81 5c 15 81 5c 03 a1 d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f2 40 60 40 d4 c5 c4 c9 e4 d4 40 e3 ┆CE a* a* ~PARAMETER 2 - MEDIUM T┆
0x1320…1340 d6 40 c3 d6 d7 e8 40 c6 d9 d6 d4 15 81 5c 15 81 5c 03 ac d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f3 40 60 ┆O COPY FROM a* a* ÐPARAMETER 3 -┆
0x1340…1360 40 d3 d6 c1 c4 40 e2 c5 e4 40 c6 d6 d9 d4 c1 e3 40 e2 d6 e4 d9 c3 c5 40 d4 c5 d4 c2 c5 d9 e2 0a ┆ LOAD SEU FORMAT SOURCE MEMBERS ┆
0x1360…1380 81 5c 15 81 5c 39 81 5c 15 bb 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆a* a* a* ]**********************┆
0x1380…13a0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆********************************┆
0x13a0…13c0 5c 5c 5c 5c 5c 15 81 5c 4f 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 7b 7b d4 e2 c7 c3 ┆***** a*|o// MEMBER USER1-##MSGC┆
0x13c0…13e0 3a 8c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 44 81 5c 0a 81 5c 44 8c 5c 40 c3 d6 d7 e8 40 e2 c5 e4 ┆ ð************àa* a*àð* COPY SEU┆
0x13e0…1400 40 5c 44 81 5c 0a 81 5c 44 8c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 44 81 5c 4f ae 61 61 40 c9 c6 ┆ *àa* a*àð************àa*|Þ// IF┆
0x1400…1420 (5,) 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 d5 d6 40 5c 40 7d 40 e2 c5 e4 d3 d6 c1 ┆ JOBQ-NO IF EVOKED-NO * ' SEULOA┆
0x1420…1440 c4 6f d4 f3 f5 f0 f0 6f 7d 22 8e 61 61 40 e3 c1 c7 40 c3 c8 d2 c4 c9 e2 d2 42 ac 61 61 40 c9 c6 ┆D?M3500?' þ// TAG CHKDISKâÐ// IF┆
0x1440…1460 40 c4 c1 e3 c1 c9 f1 60 7d e2 c5 e4 d4 d6 c4 e2 6b 6b 6f f2 7d e2 f1 7d 6f 7d 40 c7 d6 e3 d6 40 ┆ DATAI1-'SEUMODS,,?2'S1'?' GOTO ┆
0x1460…1480 c3 c1 d3 d7 d9 d6 c3 24 89 61 61 40 5c 40 f3 f2 f9 f0 47 94 61 61 40 7b c5 d9 d9 40 f3 f2 f9 f1 ┆CALPROC i// * 3290åm// #ERR 3291┆
0x1480…14a0 6b f1 f3 6b c3 d5 c6 c7 3c 8f 61 61 40 c7 d6 e3 d6 40 c3 c8 d2 c4 c9 e2 d2 41 8e 61 61 40 e3 c1 ┆,13,CNFG ±// GOTO CHKDISK þ// TA┆
0x14a0…14c0 c7 40 c3 c1 d3 d7 d9 d6 c3 42 8f e2 c5 e4 c9 d3 d6 c4 40 6f f2 6f 6b 6f f1 6f 41 a5 61 61 40 c9 ┆G CALPROCâ±SEUILOD ?2?,?1? v// I┆
0x14c0…14e0 c6 c6 40 d3 d6 c1 c4 60 7d 7b e2 c5 7b d4 f1 6b 7b e2 c5 e4 d3 c9 c2 7d 40 c7 d6 e3 d6 40 d4 d9 ┆FF LOAD-'#SE#M1,#SEULIB' GOTO MR┆
0x14e0…1500 c9 2b af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 ┆I ®// LOCAL AREA-SYSTEM,OFFSET-1┆
0x1500…1520 6b c4 c1 e3 c1 60 7d e2 c5 e4 d3 d6 c1 c4 40 f4 f3 7d 21 8d 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 ┆,DATA-'SEULOAD 43' ý// LOAD $CNA┆
0x1520…1540 c4 43 86 61 61 40 d9 e4 d5 4a 8c 61 61 40 c7 d6 e3 d6 40 d4 d9 c9 f1 44 8a 61 61 40 e3 c1 c7 40 ┆Däf// RUN¢ð// GOTO MRI1à«// TAG ┆
0x1540…1560 d4 d9 c9 46 a0 61 61 40 d7 c1 e4 e2 c5 40 7d 6f d4 7d f3 f5 f0 f2 6b f1 6b f6 f0 7d 6f 40 d7 d7 ┆MRIãµ// PAUSE '?M'3502,1,60'? PP┆
0x1560…1580 e4 e3 c9 d3 7d 30 90 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 40 81 5c 0e 81 5c 40 90 5c ┆UTIL' °**************** a* a* °*┆
0x1580…15a0 40 c3 d6 d7 e8 40 e2 c5 e4 40 d4 d9 c9 40 5c 40 81 5c 0e 81 5c 40 90 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆ COPY SEU MRI * a* a* °*********┆
0x15a0…15c0 5c 5c 5c 5c 5c 5c 5c 40 81 5c 4f 8e e2 c5 e4 d4 d9 c9 40 6f f2 6f 6b 6f f1 6f 42 8b 61 61 40 e3 ┆******* a*|þSEUMRI ?2?,?1?â»// T┆
0x15c0…15e0 c1 c7 40 d4 d9 c9 f1 45 98 61 61 40 c9 c6 40 6f f3 6f 61 d5 40 c7 d6 e3 d6 40 c1 d3 d3 c4 d6 d5 ┆AG MRI1áq// IF ?3?/N GOTO ALLDON┆
0x15e0…1600 c5 38 98 61 61 40 c9 c6 40 6f f3 6f 61 e8 40 c7 d6 e3 d6 40 c1 c4 c4 e2 c5 e4 c6 38 8e 61 61 40 ┆E q// IF ?3?/Y GOTO ADDSEUF þ// ┆
0x1600…1620 5c 40 7d 6f d4 f3 f5 f0 f5 6f 7d 42 9e 61 61 40 c9 c6 40 6f d9 7d f3 f5 f0 f7 7d 6f 61 d5 40 c7 ┆* '?M3505?'âÆ// IF ?R'3507'?/N G┆
0x1620…1640 d6 e3 d6 40 c1 d3 d3 c4 d6 d5 c5 32 8e 61 61 40 e3 c1 c7 40 c1 c4 c4 e2 c5 e4 c6 42 a2 5c 5c 5c ┆OTO ALLDONE þ// TAG ADDSEUFâs***┆
0x1640…1660 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 2e ┆******************************* ┆
0x1660…1680 81 5c 20 81 5c 2e a2 5c 40 c3 d6 d7 e8 40 e2 c5 e4 40 c6 d6 d9 d4 c1 e3 40 e2 d6 e4 d9 c3 c5 40 ┆a* a* s* COPY SEU FORMAT SOURCE ┆
0x1680…16a0 d4 c5 d4 c2 c5 d9 e2 40 5c 2e 81 5c 20 81 5c 2e a2 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆MEMBERS * a* a* s***************┆
0x16a0…16c0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 2e 81 5c 4f 97 e2 c5 e4 c6 d4 d9 c9 40 ┆******************* a*|pSEUFMRI ┆
0x16c0…16e0 6f f2 6f 6b 6f f1 6f 6b e2 c5 e4 d3 d6 c1 c4 39 8e 61 61 40 e3 c1 c7 40 c1 d3 d3 c4 d6 d5 c5 42 ┆?2?,?1?,SEULOAD þ// TAG ALLDONEâ┆
0x16e0…1700 00 81 5c 03 9d d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f1 40 60 40 c4 c9 e2 d2 40 d7 d9 c5 c6 c5 d9 c5 d5 ┆ a* ¸PARAMETER 1 - DISK PREFEREN┆
0x1700…1720 c3 c5 19 81 5c 15 81 5c 03 a1 d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f2 40 60 40 d4 c5 c4 c9 e4 d4 40 e3 ┆CE a* a* ~PARAMETER 2 - MEDIUM T┆
0x1720…1740 d6 40 c3 d6 d7 e8 40 c6 d9 d6 d4 15 81 5c 15 81 5c 03 ac d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f3 40 60 ┆O COPY FROM a* a* ÐPARAMETER 3 -┆
0x1740…1760 40 d3 d6 c1 c4 40 e2 c5 e4 40 c6 d6 d9 d4 c1 e3 d7 e2 c5 e4 d4 d9 c9 40 40 00 00 08 50 00 28 00 ┆ LOAD SEU FORMATPSEUMRI & ┆
0x1760…1780 00 00 00 40 00 02 00 05 00 04 30 00 00 00 00 00 00 00 00 00 00 00 00 20 80 3f 00 00 00 00 00 00 ┆ Ø ┆
0x1780…17a0 00 00 00 00 00 00 00 00 c5 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆ E***********************┆
0x17a0…17c0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆********************************┆
0x17c0…17e0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 0b 81 5c 43 81 5c 0b 81 5c 02 ba e3 c8 c9 e2 40 d7 d9 ┆************** a*äa* a* [THIS PR┆
0x17e0…1800 d6 c3 c5 c4 e4 d9 c5 40 c1 c4 c4 e2 40 e3 c8 c5 40 d4 c1 c3 c8 c9 d5 c5 40 d9 c5 c1 c4 c1 c2 d3 ┆OCEDURE ADDS THE MACHINE READABL┆
0x1800…1820 (6,) c5 40 c9 d5 c6 d6 d9 d4 c1 e3 c9 d6 d5 40 4d d4 d9 c9 5d 07 81 5c 0b 81 5c 02 8b e3 d6 40 7b e2 ┆E INFORMATION (MRI) a* a* »TO #S┆
0x1820…1840 c5 e4 d3 c9 c2 4b 36 81 5c 0b 81 5c 02 a1 d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f1 40 60 40 d4 c5 c4 c9 ┆EULIB. a* a* ~PARAMETER 1 - MEDI┆
0x1840…1860 e4 d4 40 e3 d6 40 c3 d6 d7 e8 40 c6 d9 d6 d4 20 81 5c 0b 81 5c 43 81 5c 0b c5 5c 5c 5c 5c 5c 5c ┆UM TO COPY FROM a* a*äa* E******┆
0x1860…1880 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆********************************┆
0x1880…18a0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 0b ┆******************************* ┆
0x18a0…18c0 81 5c 4f 90 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 40 81 5c 0e 81 5c 40 90 5c 40 c3 d6 ┆a*|°**************** a* a* °* CO┆
0x18c0…18e0 d7 e8 40 e2 c5 e4 40 d4 d9 c9 40 5c 40 81 5c 0e 81 5c 40 90 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆PY SEU MRI * a* a* °************┆
0x18e0…1900 5c 5c 5c 5c 40 81 5c 4f 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 bc 61 61 40 c6 c9 d3 c5 ┆**** a*|þ// LOAD $MAINTâ¯// FILE┆
0x1900…1920 40 d5 c1 d4 c5 60 e2 c5 e4 d4 d9 c9 6b e4 d5 c9 e3 60 c9 f1 6b d7 c1 c3 d2 60 d7 d7 e4 e3 c9 d3 ┆ NAME-SEUMRI,UNIT-I1,PACK-PPUTIL┆
0x1920…1940 6b d3 d6 c3 c1 e3 c9 d6 d5 60 6f f1 6f 6b c1 e4 e3 d6 60 d5 d6 14 86 61 61 40 d9 e4 d5 4a a8 61 ┆,LOCATION-?1?,AUTO-NO f// RUN¢y/┆
0x1940…1960 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 c4 c9 e2 d2 6b e3 d6 60 7b e2 c5 e4 d3 c9 c2 6b c6 c9 d3 c5 ┆/ COPY FROM-DISK,TO-#SEULIB,FILE┆
0x1960…1980 60 e2 c5 e4 d4 d9 c9 28 86 61 61 40 c5 d5 c4 4a a8 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c ┆-SEUMRI f// END¢y***************┆
0x1980…19a0 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 28 81 5c 26 81 5c 28 ┆************************* a* a* ┆
[…truncated at 200 lines…]