|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 4544 (0x11c0)
Notes: pts_type(SC)
Names: »EBCDIC.SC«
└─⟦7f25f14aa⟧ Bits:30009683 Philips computer tape "600307"
└─⟦this⟧ »M:92F4/EBCDIC.SC«
IDENT EBCDIC 9.2DK 1 79-11-16 870105040920 * ************************************************ * * PHILIPS TERMINAL SYSTEM PTS * * EBCDIC = EBCDIC/ASCII TABLE * * * * * * ************************************************* * ENTRY TASCII ENTRY TEBCDIC * * * CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) * X:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) CODE EQU X:A X:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) RCOM EQU X:B * * VERSION FOR SCAND. ALPHABET , #,$,@ CANNOT BE USED * CHANGES FROM STANDARD * E A * 4A 23 * 5B 5D * 7B 5B * 7C 5C DATA /797A,/7C2C,/255F,/3E3F A8-AF DATA /3031,/3233,/3435,/3637 B0-B7 DATA /3839,/3A23,/4027,/3D22 B8-BF DATA /2041,/4243,/4445,/4647 C0-C7 DATA /4849,/5B2E,/3C28,/2B21 C8-CF DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 DATA /5152,/5D24,/2A29,/3B5E D8-DF DATA /7F2F,/5354,/5556,/5758 E0-E7 DATA /595A,/7C2C,/255F,/3E3F E8-EF DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57 DATA /E7E8,/E97B,/7C5B,/5F6D 58-5F DATA /0081,/8283,/8485,/8687 60-67 DATA /8889,/9192,/9394,/9596 68-6F DATA /9798,/99A2,/A3A4,/A5A6 70-77 DATA /A7A8,/A91C,/0000,/00E0 78-7F DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 XIF END
0x0000…0034 (0, 0, 398) Head {h00=0x0030, h01=0x0050, text=» IDENT EBCDIC 9.2DK 1 79-11-16 870105040920«, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x0046…007e Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0000, t01=0x004a}
0x007e…0088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0082}
0x0088…00b0 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008c}
0x00b0…00ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b4}
0x00ba…00e2 Head {h00=0x0024, h01=0x0050, text=»* EBCDIC = EBCDIC/ASCII TABLE «, t00=0x0000, t01=0x00be}
0x00e2…00ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e6}
0x00ec…00f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f0}
0x00f6…0100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fa}
0x0100…010a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0104}
0x010a…0114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…011e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0158 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x0122}
0x0158…0162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015c}
0x0162…0178 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASCII «, t00=0x0000, t01=0x0166}
0x0178…018e Head {h00=0x0012, h01=0x0050, text=» ENTRY TEBCDIC«, t00=0x0000, t01=0x017c}
0x018e…0198 (1, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0004}
0x0198…01a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x01a2…01d4 Head {h00=0x002e, h01=0x0050, text=»* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15)«, t00=0x0001, t01=0x0018}
0x01d4…01de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004a}
0x01de…0214 Head {h00=0x0032, h01=0x0050, text=»X:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15)«, t00=0x0001, t01=0x0054}
0x0214…0228 Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:A«, t00=0x0001, t01=0x008a}
0x0228…0260 Head {h00=0x0034, h01=0x0050, text=»X:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15)«, t00=0x0001, t01=0x009e}
0x0260…0274 Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:B«, t00=0x0001, t01=0x00d6}
0x0274…027e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ea}
0x027e…02bc Head {h00=0x003a, h01=0x0050, text=»* VERSION FOR SCAND. ALPHABET , #,$,@ CANNOT BE USED «, t00=0x0001, t01=0x00f4}
0x02bc…02de Head {h00=0x001e, h01=0x0050, text=»* CHANGES FROM STANDARD «, t00=0x0001, t01=0x0132}
0x02de…02ec Head {h00=0x000a, h01=0x0050, text=»* E A «, t00=0x0001, t01=0x0154}
0x02ec…02fc Head {h00=0x000c, h01=0x0050, text=»* 4A 23 «, t00=0x0001, t01=0x0162}
0x02fc…030c Head {h00=0x000c, h01=0x0050, text=»* 5B 5D «, t00=0x0001, t01=0x0172}
0x030c…031c Head {h00=0x000c, h01=0x0050, text=»* 7B 5B «, t00=0x0001, t01=0x0182}
0x031c…032c (2, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* 7C 5C «, t00=0x0002, t01=0x0004}
0x032c…0358 Head {h00=0x0028, h01=0x0050, text=» DATA /797A,/7C2C,/255F,/3E3F A8-AF «, t00=0x0002, t01=0x0014}
0x0358…0384 Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 B0-B7 «, t00=0x0002, t01=0x0040}
0x0384…03b0 Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 B8-BF «, t00=0x0002, t01=0x006c}
0x03b0…03dc Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 C0-C7 «, t00=0x0002, t01=0x0098}
0x03dc…0408 Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 C8-CF «, t00=0x0002, t01=0x00c4}
0x0408…0434 Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 «, t00=0x0002, t01=0x00f0}
0x0434…0460 Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E D8-DF «, t00=0x0002, t01=0x011c}
0x0460…048c Head {h00=0x0028, h01=0x0050, text=» DATA /7F2F,/5354,/5556,/5758 E0-E7 «, t00=0x0002, t01=0x0148}
0x048c…04b8 Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F E8-EF «, t00=0x0002, t01=0x0174}
0x04b8…04e4 Head {h00=0x0028, h01=0x0050, text=» DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 «, t00=0x0003, t01=0x0010}
0x04e4…0510 Head {h00=0x0028, h01=0x0050, text=» DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F «, t00=0x0003, t01=0x003c}
0x0510…053c Head {h00=0x0028, h01=0x0050, text=» DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 «, t00=0x0003, t01=0x0068}
0x053c…0568 Head {h00=0x0028, h01=0x0050, text=» DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F «, t00=0x0003, t01=0x0094}
0x0568…0594 Head {h00=0x0028, h01=0x0050, text=» DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57 «, t00=0x0003, t01=0x00c0}
0x0594…05c0 Head {h00=0x0028, h01=0x0050, text=» DATA /E7E8,/E97B,/7C5B,/5F6D 58-5F «, t00=0x0003, t01=0x00ec}
0x05c0…05ec Head {h00=0x0028, h01=0x0050, text=» DATA /0081,/8283,/8485,/8687 60-67 «, t00=0x0003, t01=0x0118}
0x05ec…0618 Head {h00=0x0028, h01=0x0050, text=» DATA /8889,/9192,/9394,/9596 68-6F «, t00=0x0003, t01=0x0144}
0x0618…0644 Head {h00=0x0028, h01=0x0050, text=» DATA /9798,/99A2,/A3A4,/A5A6 70-77 «, t00=0x0003, t01=0x0170}
0x0644…0670 Head {h00=0x0028, h01=0x0050, text=» DATA /A7A8,/A91C,/0000,/00E0 78-7F «, t00=0x0004, t01=0x000c}
0x0670…06a8 Head {h00=0x0034, h01=0x0050, text=» DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84«, t00=0x0004, t01=0x0038}
0x06a8…06b4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0004, t01=0x0070}
0x06b4…06c0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0004, t01=0x007c}
0x06c0…06c4 Head {h00=0x4004, h01=0x0000}
0x06c4…06c8 00 04 00 88 ┆ ┆
0x06c8…06d0 (5, 1, 8) 20 04 00 00 00 05 00 04 ┆ ┆
0x06d0…0720 (6, 0, 400) 43 48 20 4b 45 59 00 15 01 7e 00 08 00 50 5c 58 49 46 00 16 00 0e 00 04 00 50 00 16 00 1a 00 10 00 50 46 44 3a 44 49 53 5c 45 51 55 5c 2a 00 16 00 22 00 1e 00 50 5c 41 42 4c 5c 44 49 53 49 4f 45 5c 52 45 51 55 45 53 54 20 45 52 52 4f 52 20 ┆CH KEY ~ P XIF P PFD:DIS EQU * " P ABL DISIOE REQUEST ERROR ┆
0x0720…0770 00 16 00 36 00 06 00 50 2a 20 00 16 00 58 00 12 00 50 5c 49 46 54 5c 4f 50 43 4c 4f 53 3d 31 20 00 16 00 62 00 0a 00 50 5c 45 4a 45 43 54 00 16 00 78 00 06 00 50 2a 20 00 16 00 86 00 0c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 00 16 00 90 00 0c 00 50 ┆ 6 P* X P IFT OPCLOS=1 b P EJECT x P* P******** P┆
0x0770…07c0 2a 20 20 20 20 20 20 2a 00 16 00 a0 00 0c 00 50 2a 20 4f 50 45 4e 20 2a 00 16 00 b0 00 0c 00 50 2a 20 20 20 20 20 20 2a 00 16 00 c0 00 0c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 00 16 00 d0 00 06 00 50 2a 20 00 16 00 e0 00 34 00 50 2a 20 20 20 20 4f ┆* * P* OPEN * P* * P******** P* 4 P* O┆
0x07c0…0810 50 45 4e 20 49 53 20 50 45 52 46 4f 52 4d 45 44 20 42 59 20 57 52 49 54 49 4e 47 20 41 20 5a 45 52 4f 20 54 4f 20 42 49 54 20 00 16 00 ea 00 32 00 50 2a 20 20 20 20 5a 45 52 4f 20 4f 46 20 54 48 45 20 53 4f 50 20 4c 49 47 48 54 53 20 45 58 ┆PEN IS PERFORMED BY WRITING A ZERO TO BIT 2 P* ZERO OF THE SOP LIGHTS EX┆
0x0810…0860 54 45 52 4e 41 4c 20 52 45 47 49 53 54 45 52 2e 00 16 01 22 00 06 00 50 2a 20 00 16 01 58 00 0e 00 50 4f 50 45 4e 5c 45 51 55 5c 2a 00 16 01 62 00 22 00 50 5c 4c 44 4b 4c 5c 41 31 2c 2f 37 46 46 46 5c 4d 41 53 4b 20 46 4f 52 20 42 49 54 20 ┆TERNAL REGISTER. " P* X POPEN EQU * b " P LDKL A1,/7FFF MASK FOR BIT ┆
0x0860…08b0 (7, 0, 400) 30 20 00 16 01 74 00 28 00 50 5c 41 4e 53 5c 41 31 2c 53 50 44 4c 43 49 5c 43 4c 45 41 52 20 4f 50 45 4e 2f 43 4c 4f 53 45 20 42 49 54 20 00 17 00 0a 00 30 00 50 5c 4c 44 5c 41 31 2c 53 50 44 4c 43 49 5c 53 4f 50 20 4c 49 47 48 54 53 20 41 ┆0 t ( P ANS A1,SPDLCI CLEAR OPEN/CLOSE BIT 0 P LD A1,SPDLCI SOP LIGHTS A┆
0x08b0…0900 4e 44 20 4f 50 45 4e 2f 43 4c 4f 53 45 20 44 41 54 41 00 17 00 36 00 22 00 50 5c 4f 54 52 5c 41 31 2c 30 2c 53 4f 50 44 41 5c 4f 50 45 4e 20 46 44 20 44 52 49 56 45 20 00 17 00 6a 00 06 00 50 2a 20 00 17 00 90 00 2a 00 50 2a 20 20 20 20 57 ┆ND OPEN/CLOSE DATA 6 " P OTR A1,0,SOPDA OPEN FD DRIVE j P* * P* W┆
0x0900…0950 41 49 54 20 46 4f 52 20 44 52 49 56 45 20 54 4f 20 42 45 43 4f 4d 45 20 4f 50 45 52 41 42 4c 45 00 17 00 9a 00 28 00 50 5c 4c 44 4b 5c 41 34 2c 44 57 54 54 50 32 5c 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 4f 46 46 53 45 54 20 00 17 00 c8 ┆AIT FOR DRIVE TO BECOME OPERABLE ( P LDK A4,DWTTP2 TIMER POINTER OFFSET ┆
0x0950…09a0 00 28 00 50 5c 41 44 52 5c 41 34 2c 41 36 5c 41 34 3a 3d 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 41 44 44 52 45 53 53 00 17 00 f4 00 1c 00 50 5c 4c 44 52 5c 41 31 2c 41 36 5c 53 41 56 45 20 44 57 54 2d 41 44 44 52 00 17 01 20 00 18 00 50 ┆ ( P ADR A4,A6 A4:=TIMER POINTER ADDRESS P LDR A1,A6 SAVE DWT-ADDR P┆
0x09a0…09f0 5c 43 46 5c 41 31 35 2c 53 45 54 49 4d 50 5c 57 41 49 54 20 00 17 01 40 00 2e 00 50 5c 44 41 54 41 5c 4f 50 45 4e 52 45 2c 4f 50 45 4e 54 49 5c 53 54 41 52 54 20 41 44 44 52 2c 20 57 41 49 54 20 54 49 4d 45 20 00 17 01 5c 00 14 00 50 5c 41 ┆ CF A15,SETIMP WAIT @ . P DATA OPENRE,OPENTI START ADDR, WAIT TIME P A┆
0x09f0…0a40 (8, 0, 400) 42 4c 5c 54 44 49 53 50 5c 45 58 49 54 20 00 17 01 8e 00 06 00 50 2a 20 00 18 00 16 00 10 00 50 4f 50 45 4e 52 45 5c 45 51 55 5c 2a 00 18 00 20 00 1a 00 50 2a 20 20 20 20 54 49 4d 45 20 48 41 53 20 45 58 50 49 52 45 44 20 00 18 00 34 00 1c ┆BL TDISP EXIT P* POPENRE EQU * P* TIME HAS EXPIRED 4 ┆
0x0a40…0a90 00 50 5c 4c 44 52 5c 41 36 2c 41 31 5c 47 45 54 20 44 57 54 2d 41 44 44 52 20 00 18 00 52 00 2c 00 50 5c 43 4d 5c 44 57 54 54 50 32 2c 41 36 5c 49 4e 44 49 43 41 54 45 20 4e 4f 20 54 49 4d 45 52 20 52 55 4e 4e 49 4e 47 20 00 18 00 72 00 26 ┆ P LDR A6,A1 GET DWT-ADDR R , P CM DWTTP2,A6 INDICATE NO TIMER RUNNING r &┆
0x0a90…0ae0 00 50 5c 52 46 5c 4f 43 4c 45 58 49 5c 43 4f 4d 4d 4f 4e 20 4f 50 45 4e 2f 43 4c 4f 53 45 20 45 58 49 54 20 00 18 00 a2 00 06 00 50 2a 20 00 18 00 cc 00 0a 00 50 5c 45 4a 45 43 54 00 18 00 d6 00 06 00 50 2a 20 00 18 00 e4 00 0e 00 50 2a 2a ┆ P RF OCLEXI COMMON OPEN/CLOSE EXIT P* P EJECT P* P**┆
0x0ae0…0b30 2a 2a 2a 2a 2a 2a 2a 20 00 18 00 ee 00 0e 00 50 2a 20 20 20 20 20 20 20 2a 20 00 18 01 00 00 0e 00 50 2a 20 43 4c 4f 53 45 20 2a 20 00 18 01 12 00 0e 00 50 2a 20 20 20 20 20 20 20 2a 20 00 18 01 24 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 ┆******* P* * P* CLOSE * P* * $ P********* ┆
0x0b30…0b80 00 18 01 36 00 06 00 50 2a 20 00 18 01 48 00 34 00 50 2a 20 20 20 20 43 4c 4f 53 45 20 49 53 20 50 45 52 46 4f 52 4d 45 44 20 42 59 20 57 52 49 54 49 4e 47 20 41 20 4f 4e 45 20 54 4f 20 42 49 54 20 00 18 01 52 00 32 00 50 2a 20 20 20 20 5a ┆ 6 P* H 4 P* CLOSE IS PERFORMED BY WRITING A ONE TO BIT R 2 P* Z┆
0x0b80…0bd0 (9, 0, 400) 45 52 4f 20 4f 46 20 54 48 45 20 53 4f 50 20 4c 49 47 48 54 53 20 45 58 54 45 52 4e 41 4c 20 52 45 47 49 53 54 45 52 20 00 18 01 8a 00 06 00 50 2a 20 00 19 00 30 00 10 00 50 43 4c 4f 53 45 5c 45 51 55 5c 2a 20 00 19 00 3a 00 22 00 50 5c 4c ┆ERO OF THE SOP LIGHTS EXTERNAL REGISTER P* 0 PCLOSE EQU * : " P L┆
0x0bd0…0c20 44 4b 4c 5c 41 31 2c 2f 38 30 30 30 5c 4d 41 53 4b 20 46 4f 52 20 42 49 54 20 30 20 00 19 00 4e 00 26 00 50 5c 4f 52 53 5c 41 31 2c 53 50 44 4c 43 49 5c 53 45 54 20 4f 50 45 4e 2f 43 4c 4f 53 45 20 42 49 54 20 00 19 00 74 00 30 00 50 5c 4c ┆DKL A1,/8000 MASK FOR BIT 0 N & P ORS A1,SPDLCI SET OPEN/CLOSE BIT t 0 P L┆
0x0c20…0c70 44 5c 41 31 2c 53 50 44 4c 43 49 5c 53 4f 50 20 4c 49 47 48 54 53 20 41 4e 44 20 4f 50 45 4e 2f 43 4c 4f 53 45 20 44 41 54 41 00 19 00 9e 00 22 00 50 5c 4f 54 52 5c 41 31 2c 30 2c 53 4f 50 44 41 5c 43 4c 4f 53 45 20 46 44 20 44 52 49 56 45 ┆D A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA " P OTR A1,0,SOPDA CLOSE FD DRIVE┆
0x0c70…0cc0 00 19 00 d2 00 06 00 50 2a 20 00 19 00 f8 00 10 00 50 4f 43 4c 45 58 49 5c 45 51 55 5c 2a 00 19 01 02 00 24 00 50 2a 20 20 20 20 43 4f 4d 4d 4f 4e 20 45 58 49 54 20 46 4f 52 20 4f 50 45 4e 2f 43 4c 4f 53 45 20 00 19 01 16 00 1a 00 50 5c 4c ┆ P* POCLEXI EQU * $ P* COMMON EXIT FOR OPEN/CLOSE P L┆
0x0cc0…0d10 44 4b 5c 41 31 2c 30 5c 52 45 54 55 52 4e 20 43 4f 44 45 20 00 19 01 3e 00 14 00 50 5c 52 46 5c 46 44 3a 30 39 30 5c 45 4e 44 49 4f 00 19 01 5c 00 06 00 50 2a 20 00 19 01 74 00 08 00 50 5c 58 49 46 00 19 01 7e 00 06 00 50 2a 20 00 19 01 8a ┆DK A1,0 RETURN CODE > P RF FD:090 ENDIO P* t P XIF ~ P* ┆
0x0d10…0d60 (10, 0, 400) 00 14 00 50 5c 45 4a 45 43 54 5c 5c 5c 44 52 46 44 30 31 20 00 1a 00 04 00 06 00 50 2a 20 00 1a 00 1c 00 14 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1a 00 26 00 14 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 1a ┆ P EJECT DRFD01 P* P*************** & P* * ┆
0x0d60…0db0 00 3e 00 14 00 50 2a 20 42 41 53 49 43 20 57 52 49 54 45 20 2a 20 00 1a 00 56 00 14 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 1a 00 6e 00 14 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1a 00 86 00 06 00 50 2a 20 ┆ > P* BASIC WRITE * V P* * n P*************** P* ┆
0x0db0…0e00 00 1a 00 9e 00 14 00 50 46 44 3a 30 31 30 5c 43 46 5c 41 35 2c 42 49 4f 00 1a 00 a8 00 0e 00 50 5c 4f 52 4b 5c 41 32 2c 31 20 00 1a 00 c0 00 10 00 50 46 44 3a 30 31 35 5c 45 51 55 5c 2a 00 1a 00 d2 00 14 00 50 5c 49 46 54 5c 54 4f 53 53 2b ┆ PFD:010 CF A5,BIO P ORK A2,1 PFD:015 EQU * P IFT TOSS+┆
0x0e00…0e50 49 42 4d 3d 32 20 00 1a 00 e6 00 14 00 50 5c 4c 44 5c 41 31 2c 44 57 54 4c 41 42 2c 41 36 00 1a 00 fe 00 14 00 50 5c 41 4e 5c 41 31 2c 44 57 54 41 33 2c 41 36 20 00 1a 01 16 00 1a 00 50 5c 52 46 28 5a 29 5c 46 44 3a 30 31 38 5c 4e 4f 54 20 ┆IBM=2 P LD A1,DWTLAB,A6 P AN A1,DWTA3,A6 P RF(Z) FD:018 NOT ┆
0x0e50…0ea0 49 42 4d 20 00 1a 01 2e 00 08 00 50 5c 58 49 46 00 1a 01 4c 00 0e 00 50 5c 49 46 54 5c 49 42 4d 3d 31 00 1a 01 58 00 2c 00 50 5c 4c 44 52 5c 41 37 2c 41 33 5c 4e 4f 20 4f 46 20 43 48 41 52 2e 20 54 4f 20 42 45 20 54 52 41 4e 53 46 4f 52 4d ┆IBM . P XIF L P IFT IBM=1 X , P LDR A7,A3 NO OF CHAR. TO BE TRANSFORM┆
0x0ea0…0ef0 (11, 0, 400) 45 44 00 1a 01 6a 00 12 00 50 5c 43 46 5c 41 35 2c 45 42 43 44 49 43 20 00 1b 00 0a 00 10 00 50 46 44 3a 30 31 38 5c 45 51 55 5c 2a 00 1b 00 20 00 08 00 50 5c 58 49 46 00 1b 00 34 00 06 00 50 2a 20 00 1b 00 40 00 14 00 50 5c 49 46 54 5c 43 ┆ED j P CF A5,EBCDIC PFD:018 EQU * P XIF 4 P* @ P IFT C┆
0x0ef0…0f40 48 41 4e 2b 54 4f 53 53 3d 32 00 1b 00 4a 00 18 00 50 5c 49 46 54 5c 4d 4d 55 50 41 47 2b 53 57 50 42 4c 4b 3d 32 00 1b 00 62 00 34 00 50 5c 4c 44 5c 41 31 2c 44 57 54 3a 4c 41 2c 41 36 5c 47 45 54 20 46 4c 41 47 2f 4c 4f 47 49 43 41 4c 20 ┆HAN+TOSS=2 J P IFT MMUPAG+SWPBLK=2 b 4 P LD A1,DWT:LA,A6 GET FLAG/LOGICAL ┆
0x0f40…0f90 42 55 46 46 45 52 20 41 44 44 52 45 53 53 00 1b 00 7e 00 28 00 50 5c 52 46 28 5a 29 5c 46 44 3a 30 31 39 5c 42 55 46 46 45 52 20 49 4e 20 53 59 53 54 45 4d 20 41 52 45 41 3f 00 1b 00 b6 00 28 00 50 5c 4c 44 5c 41 37 2c 45 43 42 52 4c 2c 41 ┆BUFFER ADDRESS ~ ( P RF(Z) FD:019 BUFFER IN SYSTEM AREA? ( P LD A7,ECBRL,A┆
0x0f90…0fe0 38 5c 47 45 54 20 52 45 51 55 45 53 54 45 44 20 4c 45 4e 47 54 48 00 1b 00 e2 00 16 00 50 5c 4c 44 52 5c 41 38 2c 41 32 5c 53 41 56 45 20 41 32 00 1b 01 0e 00 26 00 50 5c 4c 44 52 5c 41 32 2c 41 34 5c 47 45 54 20 44 57 54 20 42 55 46 46 45 ┆8 GET REQUESTED LENGTH P LDR A8,A2 SAVE A2 & P LDR A2,A4 GET DWT BUFFE┆
0x0fe0…1030 52 20 41 44 44 52 45 53 53 20 00 1b 01 28 00 26 00 50 5c 54 53 5c 2d 33 30 2c 41 31 35 5c 53 41 56 45 20 52 55 4e 4e 49 4e 47 20 54 41 53 4b 20 4d 4d 55 20 00 1b 01 52 00 28 00 50 5c 54 4c 5c 44 57 54 3a 50 41 2c 41 36 5c 4c 4f 41 44 20 50 ┆R ADDRESS ( & P TS -30,A15 SAVE RUNNING TASK MMU R ( P TL DWT:PA,A6 LOAD P┆
0x1030…1080 (12, 0, 400) 53 45 55 44 4f 20 4d 4d 55 20 54 41 42 4c 45 20 00 1b 01 7c 00 32 00 50 5c 4d 56 55 53 5c 41 37 5c 4d 4f 56 45 20 42 55 46 46 45 52 20 46 52 4f 4d 20 55 53 45 52 20 54 4f 20 53 59 53 54 45 4d 20 41 52 45 41 20 00 1c 00 18 00 26 00 50 5c 54 ┆SEUDO MMU TABLE | 2 P MVUS A7 MOVE BUFFER FROM USER TO SYSTEM AREA & P T┆
0x1080…10d0 4c 5c 2d 33 30 2c 41 31 35 5c 52 45 53 54 4f 52 45 20 4d 4d 55 20 46 52 4f 4d 20 53 54 41 43 4b 00 1c 00 4e 00 1a 00 50 5c 4c 44 52 5c 41 32 2c 41 38 5c 52 45 53 54 4f 52 45 20 41 32 20 00 1c 00 78 00 06 00 50 2a 20 00 1c 00 96 00 14 00 50 ┆L -30,A15 RESTORE MMU FROM STACK N P LDR A2,A8 RESTORE A2 x P* P┆
0x10d0…1120 5c 45 4a 45 43 54 5c 5c 5c 44 52 46 44 30 31 20 00 1c 00 a0 00 06 00 50 2a 20 00 1c 00 b8 00 06 00 50 2a 20 00 1c 00 c2 00 10 00 50 46 44 3a 30 31 39 5c 45 51 55 5c 2a 00 1c 00 cc 00 08 00 50 5c 58 49 46 00 1c 00 e0 00 06 00 50 2a 20 00 1c ┆ EJECT DRFD01 P* P* PFD:019 EQU * P XIF P* ┆
0x1120…1170 00 ec 00 22 00 50 5c 43 46 5c 41 35 2c 46 44 3a 57 52 49 54 45 5c 50 45 52 46 4f 52 4d 45 20 57 52 49 54 45 00 1c 00 f6 00 06 00 50 2a 20 00 1c 01 1c 00 14 00 50 5c 49 46 54 5c 43 48 41 4e 2b 54 4f 53 53 3d 32 00 1c 01 26 00 18 00 50 5c 49 ┆ " P CF A5,FD:WRITE PERFORME WRITE P* P IFT CHAN+TOSS=2 & P I┆
0x1170…11c0 46 54 5c 4d 4d 55 50 41 47 2b 53 57 50 42 4c 4b 3d 32 00 1c 01 3e 00 24 00 50 5c 4c 44 5c 41 31 2c 44 57 54 3a 4c 41 2c 41 36 5c 47 45 54 20 42 55 46 46 45 52 20 46 4c 41 47 00 1c 01 5a 00 2c 00 50 5c 52 46 28 5a 29 5c 46 44 3a 30 32 35 5c ┆FT MMUPAG+SWPBLK=2 > $ P LD A1,DWT:LA,A6 GET BUFFER FLAG Z , P RF(Z) FD:025 ┆