|
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: 106882 (0x1a182)
Notes: pts_type(SC)
Names: »SYSLCR.SC«
└─⟦a16d9b08d⟧ Bits:30009712 Philips computer tape "TOSS11"
└─⟦this⟧ »UPD2/SYSLCR.SC«
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
└─⟦this⟧ »TOSSWORK/SYSLCR.SC«
IDENT SYSLCR REL 11.0 81-10-06 870105041100 =5,NOT CORRECT CHANGE IN REL 11.0 81-09-16 =4,T:A FOR TRABUG COMMON FOR ALL TASKS REL 11.0 81-05-19 =3,WHEN MMUPAG=1 APPLICATION CODE IS OVERWRITTEN IF P:MTAB STARTS ON 4K BOUNDARY REL 11.0 81-01-26 =2,UPDATE SCTSFA WHEN ALLOCATING BUFFERS FROM TOP PRR 11.0 80-12-03 =1,APPLICATION CONTROL BLOCK IS EXTENDED WITH 1 WORD PRR 11.0 80-11-19 ********************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * SYSLCR = SYSTEM LOAD - CREDIT APPLICATION CONFIGURATION PART * * * * * * ********************************************************** * * CREDIT APPLICATION: * SYSLCR READS CONFIGURATION FILE (ALREADY IN CORE) AND BUILD * SHADOW-TABLES (TABLES CONTAINING NUMBER OF REAL TASKS & * NUMBER OF USER WORK-BLOCK COPIES). * SYSLCR THEN MOVES ITSELF TO FOLLOW MONITOR AND WILL ALSO MOVE * DDIV-PROTOTYPE . * * APPLICATION WORKBLOCKS, DESCRIPTORS, STACK AND TABLES ARE NOW * BUILT FROM 'BOTTOM' (HIGHEST FREE ADDRESS) OF MEMORY. BUFFERS * ARE, IN CASE OF MMU IN SYSTEM, ALSO ALLOCATED AT 'BOTTOM' OF
0x00000…00036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT SYSLCR REL 11.0 81-10-06 870105041100 «, t00=0x0000, t01=0x0004}
0x00036…0003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x0003e…00062 Head {h00=0x0020, h01=0x0050, text=» =5,NOT CORRECT CHANGE IN «, t00=0x0000, t01=0x0042}
0x00062…00082 Head {h00=0x001c, h01=0x0050, text=» REL 11.0 81-09-16 «, t00=0x0000, t01=0x0066}
0x00082…000b4 Head {h00=0x002e, h01=0x0050, text=» =4,T:A FOR TRABUG COMMON FOR ALL TASKS «, t00=0x0000, t01=0x0086}
0x000b4…000d4 Head {h00=0x001c, h01=0x0050, text=» REL 11.0 81-05-19 «, t00=0x0000, t01=0x00b8}
0x000d4…00104 Head {h00=0x002c, h01=0x0050, text=» =3,WHEN MMUPAG=1 APPLICATION CODE IS «, t00=0x0000, t01=0x00d8}
0x00104…00132 Head {h00=0x002a, h01=0x0050, text=» OVERWRITTEN IF P:MTAB STARTS ON «, t00=0x0000, t01=0x0108}
0x00132…0014c Head {h00=0x0016, h01=0x0050, text=» 4K BOUNDARY «, t00=0x0000, t01=0x0136}
0x0014c…0016c Head {h00=0x001c, h01=0x0050, text=» REL 11.0 81-01-26 «, t00=0x0000, t01=0x0150}
0x0016c…001a0 Head {h00=0x0030, h01=0x0050, text=» =2,UPDATE SCTSFA WHEN ALLOCATING BUFFERS «, t00=0x0000, t01=0x0170}
0x001a0…001b6 Head {h00=0x0012, h01=0x0050, text=» FROM TOP«, t00=0x0001, t01=0x0014}
0x001b6…001d6 Head {h00=0x001c, h01=0x0050, text=» PRR 11.0 80-12-03 «, t00=0x0001, t01=0x002a}
0x001d6…0020a Head {h00=0x0030, h01=0x0050, text=» =1,APPLICATION CONTROL BLOCK IS EXTENDED «, t00=0x0001, t01=0x004a}
0x0020a…00224 Head {h00=0x0016, h01=0x0050, text=» WITH 1 WORD «, t00=0x0001, t01=0x007e}
0x00224…00244 Head {h00=0x001c, h01=0x0050, text=» PRR 11.0 80-11-19 «, t00=0x0001, t01=0x0098}
0x00244…00250 Head {h00=0x0008, h01=0x0050, text=» «, t00=0x0001, t01=0x00b8}
0x00250…0025c Head {h00=0x0008, h01=0x0050, text=» «, t00=0x0001, t01=0x00c4}
0x0025c…0029e Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0001, t01=0x00d0}
0x0029e…002a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0112}
0x002a8…002d0 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x011c}
0x002d0…002da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0144}
0x002da…00322 Head {h00=0x0044, h01=0x0050, text=»* SYSLCR = SYSTEM LOAD - CREDIT APPLICATION CONFIGURATION PART«, t00=0x0001, t01=0x014e}
0x00322…0032c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0008}
0x0032c…00336 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x00336…00340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x00340…0034a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0026}
0x0034a…00354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0030}
0x00354…0035e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003a}
0x0035e…003a0 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0002, t01=0x0044}
0x003a0…003aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0086}
0x003aa…003ca Head {h00=0x001c, h01=0x0050, text=»* CREDIT APPLICATION: «, t00=0x0002, t01=0x0090}
0x003ca…00414 Head {h00=0x0046, h01=0x0050, text=»* SYSLCR READS CONFIGURATION FILE (ALREADY IN CORE) AND BUILD«, t00=0x0002, t01=0x00b0}
0x00414…0045a Head {h00=0x0042, h01=0x0050, text=»* SHADOW-TABLES (TABLES CONTAINING NUMBER OF REAL TASKS &«, t00=0x0002, t01=0x00fa}
0x0045a…0048c Head {h00=0x002e, h01=0x0050, text=»* NUMBER OF USER WORK-BLOCK COPIES). «, t00=0x0002, t01=0x0140}
0x0048c…004d8 Head {h00=0x0048, h01=0x0050, text=»* SYSLCR THEN MOVES ITSELF TO FOLLOW MONITOR AND WILL ALSO MOVE«, t00=0x0002, t01=0x0172}
0x004d8…004f8 Head {h00=0x001c, h01=0x0050, text=»* DDIV-PROTOTYPE . «, t00=0x0003, t01=0x002e}
0x004f8…00502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004e}
0x00502…0054e Head {h00=0x0048, h01=0x0050, text=»* APPLICATION WORKBLOCKS, DESCRIPTORS, STACK AND TABLES ARE NOW«, t00=0x0003, t01=0x0058}
0x0054e…0059a Head {h00=0x0048, h01=0x0050, text=»* BUILT FROM 'BOTTOM' (HIGHEST FREE ADDRESS) OF MEMORY. BUFFERS«, t00=0x0003, t01=0x00a4}
0x0059a…005e6 Head {h00=0x0048, h01=0x0050, text=»* ARE, IN CASE OF MMU IN SYSTEM, ALSO ALLOCATED AT 'BOTTOM' OF «, t00=0x0003, t01=0x00f0}
0x005e6…005ea Head {h00=0x0054, h01=0x0050}
0x005ea…005ee Head {h00=0x2a20, h01=0x2020}
0x005ee…005f0 20 20 ┆ ┆
0x005f0…0063e 20 4d 45 4d 4f 52 59 3b 20 45 4c 53 45 2c 20 49 46 20 4e 4f 20 4d 4d 55 20 41 4e 44 20 4e 4f 20 50 41 47 49 4e 47 2c 42 55 46 46 45 52 20 41 52 45 20 41 4c 4c 4f 43 41 54 45 44 20 41 46 54 45 52 20 4d 4f 4e 49 54 4f 52 20 00 03 01 3c ┆ MEMORY; ELSE, IF NO MMU AND NO PAGING,BUFFER ARE ALLOCATED AFTER MONITOR <┆
0x0063e…0068e (4, 0, 398) 00 1a 00 50 2a 20 20 20 20 20 20 27 4f 56 45 52 27 20 53 59 53 4c 43 52 2e 20 00 04 00 04 00 0a 00 50 5c 45 4a 45 43 54 00 04 00 22 00 08 00 50 5c 5c 5c 5c 00 04 00 30 00 20 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ P* 'OVER' SYSLCR. P EJECT " P 0 P********************┆
0x0068e…006de 2a 2a 2a 2a 2a 2a 2a 20 00 04 00 3c 00 20 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 04 00 60 00 20 00 50 2a 20 20 45 4e 54 52 49 45 53 20 41 4e 44 20 45 58 54 45 52 4e 41 4c 53 20 20 2a 20 ┆******* < P* * ` P* ENTRIES AND EXTERNALS * ┆
0x006de…0072e 00 04 00 84 00 20 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 04 00 a8 00 20 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 04 00 cc 00 08 00 50 ┆ P* * P*************************** P┆
0x0072e…0077e 5c 5c 5c 20 00 04 00 f0 00 14 00 50 2a 20 4c 41 42 45 4c 20 45 4e 54 52 49 45 53 20 00 04 00 fc 00 12 00 50 5c 45 4e 54 52 59 5c 53 59 53 4c 43 52 20 00 04 01 14 00 04 00 50 00 04 01 2a 00 1c 00 50 2a 20 45 58 54 45 52 4e 41 4c 53 20 53 55 ┆ P* LABEL ENTRIES P ENTRY SYSLCR P * P* EXTERNALS SU┆
0x0077e…007cc 42 52 4f 55 54 49 4e 45 53 20 00 04 01 32 00 2a 00 50 5c 45 58 54 52 4e 5c 4d 4f 56 45 5c 4d 4f 56 45 20 42 4c 4f 43 4b 53 20 49 4e 53 49 44 45 20 4d 45 4d 4f 52 59 20 00 04 01 52 00 12 00 50 5c 45 58 54 52 4e 5c 4d 4f 56 49 4e 47 20 ┆BROUTINES 2 * P EXTRN MOVE MOVE BLOCKS INSIDE MEMORY R P EXTRN MOVING ┆
0x007cc…0081c (5, 0, 400) 00 04 01 80 00 32 00 50 5c 45 58 54 52 4e 5c 58 4d 4f 56 45 5c 4d 4f 56 45 20 42 4c 4f 43 4b 53 20 49 4e 53 49 44 45 20 4d 45 4d 4f 52 59 20 56 49 41 20 4d 4d 55 00 05 00 08 00 20 00 50 5c 45 58 54 52 4e 5c 4d 4f 56 4d 4d 54 5c 4d 4f 56 45 ┆ 2 P EXTRN XMOVE MOVE BLOCKS INSIDE MEMORY VIA MMU P EXTRN MOVMMT MOVE┆
0x0081c…0086c 20 4d 4d 2d 54 41 42 4c 45 20 00 05 00 3e 00 24 00 50 5c 45 58 54 52 4e 5c 47 45 54 54 41 42 5c 46 49 4e 44 20 54 54 41 42 2d 41 44 44 52 45 53 53 20 00 05 00 62 00 24 00 50 5c 45 58 54 52 4e 5c 47 45 54 54 54 42 5c 46 49 4e 44 20 54 54 41 ┆ MM-TABLE > $ P EXTRN GETTAB FIND TTAB-ADDRESS b $ P EXTRN GETTTB FIND TTA┆
0x0086c…008bc 42 2d 41 44 44 52 45 53 53 20 00 05 00 8a 00 30 00 50 5c 45 58 54 52 4e 5c 4d 4d 45 4e 54 5c 46 49 4e 44 20 4c 41 53 54 20 55 53 45 44 20 45 4e 54 52 59 20 49 4e 20 4d 4d 2d 54 41 42 20 00 05 00 b2 00 28 00 50 5c 45 58 54 52 4e 5c 45 52 52 ┆B-ADDRESS 0 P EXTRN MMENT FIND LAST USED ENTRY IN MM-TAB ( P EXTRN ERR┆
0x008bc…0090c 4f 52 5c 45 52 52 4f 52 20 48 41 4e 44 4c 49 4e 47 20 52 4f 55 54 49 4e 45 20 00 05 00 e6 00 24 00 50 5c 45 58 54 52 4e 5c 43 4d 50 41 44 52 5c 43 4f 4d 50 41 52 45 20 41 44 44 52 45 53 53 45 53 20 00 05 01 12 00 32 00 50 5c 45 58 54 52 4e ┆OR ERROR HANDLING ROUTINE $ P EXTRN CMPADR COMPARE ADDRESSES 2 P EXTRN┆
0x0090c…0095c 5c 4e 58 54 42 4c 4b 5c 53 4b 49 50 20 54 4f 20 4e 45 58 54 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 42 4c 4f 43 4b 00 05 01 3a 00 34 00 50 5c 45 58 54 52 4e 5c 4e 58 54 43 4f 4d 5c 53 4b 49 50 20 43 4f 4d 4d 4f 4e 44 45 56 49 43 45 20 ┆ NXTBLK SKIP TO NEXT CONFIGURATION BLOCK : 4 P EXTRN NXTCOM SKIP COMMONDEVICE ┆
0x0095c…009ac (6, 0, 400) 44 45 46 49 4e 49 54 49 4f 4e 20 42 4c 4f 43 4b 00 05 01 70 00 2a 00 50 5c 45 58 54 52 4e 5c 43 4f 4e 56 52 54 5c 43 4f 4e 56 45 52 53 49 4f 4e 20 41 53 43 49 49 2d 42 49 4e 41 52 59 20 00 06 00 18 00 32 00 50 5c 45 58 54 52 4e 5c 47 45 54 ┆DEFINITION BLOCK p * P EXTRN CONVRT CONVERSION ASCII-BINARY 2 P EXTRN GET┆
0x009ac…009fc 4e 55 4d 5c 43 4f 4e 56 45 52 54 20 33 20 41 53 43 49 49 2d 44 49 47 49 54 53 20 54 4f 20 42 49 4e 41 52 59 00 06 00 46 00 26 00 50 5c 45 58 54 52 4e 5c 4d 55 4c 54 5c 4d 55 4c 54 49 50 4c 49 43 41 54 49 4f 4e 20 52 4f 55 54 49 4e 45 00 06 ┆NUM CONVERT 3 ASCII-DIGITS TO BINARY F & P EXTRN MULT MULTIPLICATION ROUTINE ┆
0x009fc…00a4c 00 7c 00 34 00 50 5c 45 58 54 52 4e 5c 47 45 54 41 50 50 5c 46 49 4e 44 20 41 50 50 4c 49 43 41 54 49 4f 4e 20 41 4e 44 20 49 54 53 20 43 4f 4e 46 2e 46 49 4c 45 00 06 00 a6 00 1c 00 50 5c 45 58 54 52 4e 5c 51 55 45 4a 4f 42 5c 51 55 45 55 ┆ | 4 P EXTRN GETAPP FIND APPLICATION AND ITS CONF.FILE P EXTRN QUEJOB QUEU┆
0x00a4c…00a9c 45 20 54 41 53 4b 00 06 00 de 00 04 00 50 00 06 00 fe 00 22 00 50 2a 20 53 41 56 45 20 41 4e 44 20 57 4f 52 4b 20 41 52 45 41 20 45 58 54 45 52 4e 41 4c 53 00 06 01 06 00 22 00 50 5c 45 58 54 52 4e 5c 4d 4d 54 41 42 5c 57 4f 52 4b 2d 54 41 ┆E TASK P " P* SAVE AND WORK AREA EXTERNALS " P EXTRN MMTAB WORK-TA┆
0x00a9c…00aec 42 4c 45 20 31 20 28 4d 4d 55 00 06 01 2c 00 36 00 50 5c 45 58 54 52 4e 5c 54 41 42 42 45 5c 41 42 53 4f 4c 55 54 45 20 53 54 41 52 54 20 41 44 44 52 45 53 53 20 4f 46 20 57 4f 52 4b 2d 54 41 42 20 31 20 00 06 01 52 00 34 00 50 5c 45 58 54 ┆BLE 1 (MMU , 6 P EXTRN TABBE ABSOLUTE START ADDRESS OF WORK-TAB 1 R 4 P EXT┆
0x00aec…00b3c (7, 0, 400) 52 4e 5c 4d 4d 45 4e 44 5c 41 42 53 4f 4c 55 54 45 20 45 4e 44 20 41 44 44 52 45 53 53 20 4f 46 20 57 4f 52 4b 2d 54 41 42 20 31 20 00 06 01 8c 00 32 00 50 5c 45 58 54 52 4e 5c 4d 4d 44 44 49 56 5c 57 4f 52 4b 2d 54 41 42 4c 45 20 32 20 28 ┆RN MMEND ABSOLUTE END ADDRESS OF WORK-TAB 1 2 P EXTRN MMDDIV WORK-TABLE 2 (┆
0x00b3c…00b8c 4d 4d 29 20 52 45 4c 41 54 49 56 45 20 27 52 45 4c 27 00 07 00 34 00 0e 00 50 5c 45 58 54 52 4e 5c 50 53 57 00 07 00 6a 00 22 00 50 5c 45 58 54 52 4e 5c 49 4e 49 4c 45 4e 5c 4c 45 4e 47 54 48 20 4f 46 20 53 59 53 49 4e 49 00 07 00 7c 00 2c ┆MM) RELATIVE 'REL' 4 P EXTRN PSW j " P EXTRN INILEN LENGTH OF SYSINI | ,┆
0x00b8c…00bdc 00 50 5c 45 58 54 52 4e 5c 4c 53 54 50 41 47 5c 44 49 53 50 4c 2e 20 54 4f 20 27 45 4e 54 52 59 2d 50 4f 49 4e 54 45 52 27 20 00 07 00 a2 00 10 00 50 5c 45 58 54 52 4e 5c 4d 4d 42 45 47 00 07 00 d2 00 04 00 50 00 07 00 e6 00 0a 00 50 5c 45 ┆ P EXTRN LSTPAG DISPL. TO 'ENTRY-POINTER' P EXTRN MMBEG P P E┆
0x00bdc…00c2c 4a 45 43 54 00 07 00 ee 00 24 00 50 2a 20 53 59 53 54 45 4d 20 43 4f 4e 54 52 4f 4c 20 54 41 42 4c 45 20 45 58 54 45 52 4e 41 4c 53 00 07 00 fc 00 24 00 50 5c 45 58 54 52 4e 5c 53 43 54 53 46 41 5c 53 54 41 52 54 20 4f 46 20 46 52 45 45 20 ┆JECT $ P* SYSTEM CONTROL TABLE EXTERNALS $ P EXTRN SCTSFA START OF FREE ┆
0x00c2c…00c7c 41 52 45 41 00 07 01 24 00 20 00 50 5c 45 58 54 52 4e 5c 53 43 54 54 43 54 5c 54 43 3a 54 41 42 20 41 44 44 52 45 53 53 00 07 01 4c 00 20 00 50 5c 45 58 54 52 4e 5c 53 43 54 53 54 42 5c 41 31 35 20 53 54 41 43 4b 2d 42 41 53 45 00 07 01 70 ┆AREA $ P EXTRN SCTTCT TC:TAB ADDRESS L P EXTRN SCTSTB A15 STACK-BASE p┆
0x00c7c…00ccc (8, 0, 400) 00 22 00 50 5c 45 58 54 52 4e 5c 53 43 54 45 46 41 5c 45 4e 44 20 4f 46 20 46 52 45 45 20 41 52 45 41 00 08 00 04 00 22 00 50 5c 45 58 54 52 4e 5c 53 43 54 4e 4f 50 5c 4e 55 4d 42 45 52 20 4f 46 20 50 41 47 45 53 20 00 08 00 2a 00 1c 00 50 ┆ " P EXTRN SCTEFA END OF FREE AREA " P EXTRN SCTNOP NUMBER OF PAGES * P┆
0x00ccc…00d1c 5c 45 58 54 52 4e 5c 53 43 54 50 53 5a 5c 50 41 47 45 20 53 49 5a 45 20 00 08 00 50 00 20 00 50 5c 45 58 54 52 4e 5c 53 43 54 4f 50 54 5c 53 59 53 54 45 4d 20 4f 50 54 49 4f 4e 20 00 08 00 70 00 24 00 50 5c 45 58 54 52 4e 5c 53 43 54 50 41 ┆ EXTRN SCTPSZ PAGE SIZE P P EXTRN SCTOPT SYSTEM OPTION p $ P EXTRN SCTPA┆
0x00d1c…00d6c 47 5c 50 41 47 45 20 54 41 42 4c 45 20 41 44 44 52 45 53 53 00 08 00 94 00 34 00 50 5c 45 58 54 52 4e 5c 53 43 54 53 57 42 5c 41 44 44 52 45 53 53 20 54 4f 20 53 57 42 20 43 4f 4e 54 52 4f 4c 20 42 4c 4f 43 4b 20 54 41 42 4c 45 00 08 00 bc ┆G PAGE TABLE ADDRESS 4 P EXTRN SCTSWB ADDRESS TO SWB CONTROL BLOCK TABLE ┆
0x00d6c…00dbc 00 20 00 50 5c 45 58 54 52 4e 5c 53 43 54 42 55 47 5c 42 55 47 47 45 52 20 41 44 44 52 45 53 53 00 08 00 f4 00 2c 00 50 5c 45 58 54 52 4e 5c 53 54 4b 45 4e 44 5c 53 54 41 52 54 20 4f 46 20 53 43 52 41 54 43 48 2d 50 41 44 20 41 52 45 41 20 ┆ P EXTRN SCTBUG BUGGER ADDRESS , P EXTRN STKEND START OF SCRATCH-PAD AREA ┆
0x00dbc…00e0c 00 08 01 18 00 30 00 50 5c 45 58 54 52 4e 5c 53 54 4b 4d 4f 56 5c 53 54 41 52 54 20 4f 46 20 4d 4f 56 45 2d 52 4f 55 54 49 4e 45 20 49 4e 20 53 54 41 43 4b 00 08 01 48 00 2a 00 50 5c 45 58 54 52 4e 5c 53 54 4b 43 4f 4d 5c 53 54 41 52 54 20 ┆ 0 P EXTRN STKMOV START OF MOVE-ROUTINE IN STACK H * P EXTRN STKCOM START ┆
0x00e0c…00e5c (9, 0, 400) 4f 46 20 43 4f 4d 4d 4f 4e 2d 50 41 44 20 41 52 45 41 00 08 01 7c 00 04 00 50 00 09 00 1a 00 16 00 50 2a 20 45 58 54 45 52 4e 41 4c 20 4c 41 42 45 4c 53 20 00 09 00 22 00 04 00 50 00 09 00 3c 00 06 00 50 2a 20 00 09 00 44 00 2c 00 50 5c 45 ┆OF COMMON-PAD AREA | P P* EXTERNAL LABELS " P < P* D , P E┆
0x00e5c…00eac 58 54 52 4e 5c 54 54 42 3a 53 41 5c 53 54 41 52 54 20 4f 46 20 53 41 56 45 20 41 52 45 41 20 49 4e 20 54 54 41 42 00 09 00 4e 00 38 00 50 5c 45 58 54 52 4e 5c 54 54 42 3a 43 42 5c 44 49 53 50 4c 2e 20 54 4f 20 43 55 52 52 45 4e 54 20 53 45 ┆XTRN TTB:SA START OF SAVE AREA IN TTAB N 8 P EXTRN TTB:CB DISPL. TO CURRENT SE┆
0x00eac…00efc 47 4d 45 4e 54 20 42 41 53 45 20 41 44 44 52 45 53 53 00 09 00 7e 00 26 00 50 5c 45 58 54 52 4e 5c 54 54 42 3a 4d 54 5c 44 49 53 50 4c 2e 20 54 4f 20 4d 4d 55 20 54 41 42 4c 45 20 00 09 00 ba 00 24 00 50 5c 45 58 54 52 4e 5c 54 54 42 3a 49 ┆GMENT BASE ADDRESS ~ & P EXTRN TTB:MT DISPL. TO MMU TABLE $ P EXTRN TTB:I┆
0x00efc…00f4c 44 5c 44 49 53 50 4c 2e 20 54 4f 20 54 41 53 4b 20 49 44 20 00 09 00 e4 00 2c 00 50 5c 45 58 54 52 4e 5c 54 54 42 3a 53 42 5c 44 49 53 50 4c 2e 20 54 4f 20 53 45 47 4d 2e 20 42 4c 4f 43 4b 20 50 54 52 20 00 09 01 0c 00 2c 00 50 5c 45 58 54 ┆D DISPL. TO TASK ID , P EXTRN TTB:SB DISPL. TO SEGM. BLOCK PTR , P EXT┆
0x00f4c…00f9c 52 4e 5c 54 54 42 3a 50 50 5c 44 49 53 4c 4c 2e 20 54 4f 20 50 45 4e 44 49 4e 47 20 50 4f 49 4e 54 45 52 20 00 09 01 3c 00 0a 00 50 5c 45 4a 45 43 54 00 09 01 6c 00 04 00 50 00 09 01 7a 00 04 00 50 00 09 01 82 00 2c 00 50 2a 2a 2a 2a 2a 2a ┆RN TTB:PP DISLL. TO PENDING POINTER < P EJECT l P z P , P******┆
0x00f9c…00fec (10, 0, 398) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 09 01 8a 00 2c 00 50 2a 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆********************************* , P* CONDITIONAL ASSEMBLY ┆
0x00fec…0103c 2a 20 00 0a 00 2a 00 2c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0a 00 5a 00 04 00 50 00 0a 00 8a 00 1c 00 50 4d 4d 55 50 41 47 5c 45 51 55 5c 30 5c 30 ┆* * , P*************************************** Z P PMMUPAG EQU 0 0┆
0x0103c…0108c 20 3d 20 4e 4f 20 4d 4d 55 20 00 0a 00 92 00 04 00 50 00 0a 00 b2 00 2e 00 50 53 57 50 42 4c 4b 5c 45 51 55 5c 30 5c 30 20 3d 20 4e 4f 20 53 57 41 50 50 41 42 4c 45 20 57 4f 52 4b 20 42 4c 4f 43 4b 53 20 00 0a 00 ba 00 04 00 50 00 0a 00 ec ┆ = NO MMU P . PSWPBLK EQU 0 0 = NO SWAPPABLE WORK BLOCKS P ┆
0x0108c…010dc 00 32 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0a 00 f4 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 P********************************************* 2 P* ┆
0x010dc…0112a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 0a 01 2a 00 32 00 50 2a 20 20 20 20 41 50 43 54 41 42 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 ┆ * * 2 P* APCTAB DISPLACEMENTS * ┆
0x0112a…0117a (11, 0, 400) 00 0a 01 60 00 32 00 50 2a 20 20 20 20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 0b 00 08 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ` 2 P* ==================== * 2 P* ┆
0x0117a…011ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 0b 00 3e 00 32 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ * > 2 P********************************************┆
0x011ca…0121a 2a 20 00 0b 00 74 00 04 00 50 00 0b 00 aa 00 34 00 50 41 50 4c 41 44 41 5c 45 51 55 5c 32 32 5c 41 50 50 4c 2e 20 44 49 53 43 20 46 49 4c 45 20 41 44 44 52 2e 20 28 32 20 57 4f 52 44 53 29 5c 3d 31 00 0b 00 b2 00 28 00 50 41 50 4c 52 45 4c ┆* t P 4 PAPLADA EQU 22 APPL. DISC FILE ADDR. (2 WORDS) =1 ( PAPLREL┆
0x0121a…0126a 5c 45 51 55 5c 31 38 5c 41 50 50 4c 2e 20 52 45 4c 4f 43 41 54 49 4f 4e 20 42 41 53 45 20 00 0b 00 ea 00 2c 00 50 41 50 4c 49 4f 45 5c 45 51 55 5c 30 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 52 45 53 54 41 52 54 20 41 44 44 52 45 53 53 00 0b ┆ EQU 18 APPL. RELOCATION BASE , PAPLIOE EQU 0 APPLICATION RESTART ADDRESS ┆
0x0126a…012ba 01 16 00 38 00 50 41 50 4c 44 41 44 5c 45 51 55 5c 30 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 46 49 4c 45 20 44 49 53 43 20 41 44 44 52 2e 20 28 42 49 54 20 30 2d 31 35 29 20 00 0b 01 46 00 38 00 50 41 50 4c 4c 41 43 5c 45 51 55 5c 31 34 5c ┆ 8 PAPLDAD EQU 0 APPLICATION FILE DISC ADDR. (BIT 0-15) F 8 PAPLLAC EQU 14 ┆
0x012ba…0130a (12, 0, 400) 41 50 50 4c 49 43 41 54 49 4f 4e 20 4c 4f 41 44 20 41 44 44 52 2e 20 28 4c 4f 47 49 43 41 4c 20 41 44 44 52 2e 29 00 0b 01 82 00 26 00 50 41 50 4c 4c 41 50 5c 45 51 55 5c 31 32 5c 4c 4f 47 49 43 41 4c 20 50 41 47 45 20 41 44 44 52 45 53 53 ┆APPLICATION LOAD ADDR. (LOGICAL ADDR.) & PAPLLAP EQU 12 LOGICAL PAGE ADDRESS┆
0x0130a…0135a 00 0c 00 2e 00 38 00 50 41 50 4c 4c 44 41 5c 45 51 55 5c 30 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 4c 4f 41 44 20 41 44 44 52 2e 20 28 50 48 59 53 49 43 41 4c 20 41 44 44 52 2e 29 00 0c 00 58 00 2e 00 50 41 50 4c 4d 4d 43 5c 45 51 55 5c 31 ┆ . 8 PAPLLDA EQU 0 APPLICATION LOAD ADDR. (PHYSICAL ADDR.) X . PAPLMMC EQU 1┆
0x0135a…013aa 30 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 4d 4d 55 20 53 54 41 52 54 20 45 4e 54 52 59 20 00 0c 00 94 00 28 00 50 41 50 4c 4d 4d 50 5c 45 51 55 5c 38 5c 53 45 47 4d 45 4e 54 20 53 54 41 52 54 20 4d 4d 55 20 45 4e 54 52 59 00 0c 00 c6 00 2e ┆0 APPLICATION MMU START ENTRY ( PAPLMMP EQU 8 SEGMENT START MMU ENTRY .┆
0x013aa…013fa 00 50 41 50 4c 53 45 47 5c 45 51 55 5c 34 5c 50 48 59 53 49 43 41 4c 20 53 54 41 52 54 20 4f 46 20 31 53 54 20 53 45 47 4d 45 4e 54 00 0c 00 f2 00 2e 00 50 41 50 4c 4e 50 45 5c 45 51 55 5c 36 5c 4e 55 4d 42 45 52 20 4f 46 20 50 41 47 45 20 ┆ PAPLSEG EQU 4 PHYSICAL START OF 1ST SEGMENT . PAPLNPE EQU 6 NUMBER OF PAGE ┆
0x013fa…0144a 45 4e 54 52 49 45 53 20 49 4e 20 4d 4d 55 00 0c 01 24 00 20 00 50 41 50 4c 53 57 42 5c 45 51 55 5c 32 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 53 57 42 00 0c 01 56 00 2a 00 50 41 50 4c 53 54 41 5c 45 51 55 5c 31 36 5c 41 50 50 4c 2e 20 50 47 ┆ENTRIES IN MMU $ PAPLSWB EQU 2 APPLICATION SWB V * PAPLSTA EQU 16 APPL. PG┆
0x0144a…0149a (13, 0, 398) 4d 20 53 54 41 52 54 20 41 44 44 52 45 53 53 20 00 0c 01 7a 00 22 00 50 41 50 4c 54 59 50 5c 45 51 55 5c 38 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 54 59 50 45 20 00 0d 00 18 00 2e 00 50 41 50 4c 50 53 5a 5c 45 51 55 5c 32 30 5c 41 50 50 4c ┆M START ADDRESS z " PAPLTYP EQU 8 APPLICATION TYPE . PAPLPSZ EQU 20 APPL┆
0x0149a…014ea 49 43 41 54 49 4f 4e 20 53 45 47 4d 45 4e 54 20 53 49 5a 45 5c 3d 31 20 00 0d 00 3e 00 0a 00 50 5c 45 4a 45 43 54 00 0d 00 70 00 04 00 50 00 0d 00 7e 00 1a 00 50 5c 20 20 50 52 4f 47 52 41 4d 20 53 54 52 55 43 54 55 52 45 3a 20 00 0d 00 86 ┆ICATION SEGMENT SIZE =1 > P EJECT p P ~ P PROGRAM STRUCTURE: ┆
0x014ea…0153a 00 04 00 50 00 0d 00 a4 00 46 00 50 2a 20 20 45 4e 54 52 59 20 2d 3e 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 53 59 53 4c 43 52 20 45 4e 54 52 59 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 21 00 0d ┆ P F P* ENTRY ->! * SYSLCR ENTRY * ! ┆
0x0153a…0158a 00 ac 00 4e 00 50 2a 20 20 20 20 20 20 20 20 20 20 21 20 20 52 45 41 44 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 46 49 4c 45 20 41 4e 44 20 42 55 49 4c 44 20 53 48 41 44 4f 57 2d 54 41 42 4c 45 53 20 20 20 20 21 20 20 50 41 52 54 20 31 ┆ N P* ! READ CONFIGURATION FILE AND BUILD SHADOW-TABLES ! PART 1┆
0x0158a…015d8 00 0d 00 f6 00 46 00 50 2a 20 20 20 20 20 20 20 20 20 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 21 00 0d 01 48 ┆ F P* ! ! H┆
0x015d8…015e0 (14, 0, 400) 00 46 00 50 2a 20 20 20 ┆ F P* ┆
0x015e0…015ee 20 20 20 20 20 20 20 21 20 20 54 3a 41 54 ┆ ! T:AT┆
0x015ee…19182 […elided…]
0x19182…19190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19190…191e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 01 00 22 00 42 00 50 2a 20 20 42 3a 52 53 57 54 20 2d 20 42 55 49 4c 44 20 52 45 41 4c 20 53 57 42 20 43 4f 4e 54 52 4f 4c 20 54 41 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * " B P* B:RSWT - BUILD REAL SWB CONTROL TABLE ┆
0x191e0…19230 20 20 20 20 20 20 20 20 20 2a 01 01 00 68 00 42 00 50 2a 20 20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ * h B P* ===================================== *┆
0x19230…19280 01 01 00 ae 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 01 00 f4 00 42 00 50 2a 20 ┆ B P* * B P* ┆
0x19280…192d0 20 52 45 46 45 52 45 4e 43 45 44 20 49 4e 3a 20 20 53 59 53 4c 44 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 01 01 3a 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 ┆ REFERENCED IN: SYSLDA * : B P* ┆
0x192d0…192d4 20 20 20 20 ┆ ┆
0x192d4…19324 (258, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 01 01 80 00 42 00 50 2a 20 20 45 4e 54 52 59 3a 20 20 41 32 20 2d 20 50 4f 49 4e 54 45 52 20 54 4f ┆ * B P* ENTRY: A2 - POINTER TO┆
0x19324…19374 20 46 49 52 53 54 20 52 45 43 4f 52 44 20 49 4e 20 52 45 41 4c 20 53 3a 42 54 41 42 20 20 20 20 20 20 20 2a 01 02 00 36 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 41 35 20 2d 20 4c 45 4e 47 54 48 20 4f 46 20 52 45 41 4c 20 53 3a 42 54 41 ┆ FIRST RECORD IN REAL S:BTAB * 6 B P* A5 - LENGTH OF REAL S:BTA┆
0x19374…193c4 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 02 00 7c 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆B * | B P* ┆
0x193c4…19414 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 02 00 c2 00 42 00 50 2a 20 20 45 58 49 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * B P* EXIT: ┆
0x19414…19464 20 20 20 20 20 2a 01 02 01 08 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 02 01 4e ┆ * B P* * N┆
0x19464…194b4 (259, 0, 400) 00 42 00 50 2a 20 20 57 4f 52 4b 20 52 45 47 49 53 54 45 52 53 3a 20 20 41 31 2d 41 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 03 00 04 00 42 00 50 2a 20 20 20 20 20 ┆ B P* WORK REGISTERS: A1-A7 * B P* ┆
0x194b4…19504 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 03 00 4a 00 42 00 50 2a 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 20 ┆ * J B P* SUBROUTINES: ┆
0x19504…19554 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 03 00 90 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * B P* ┆
0x19554…195a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 01 03 00 d6 00 42 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ * B P************************************┆
0x195a4…195f4 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 01 03 01 1c 00 0a 00 50 5c 45 4a 45 43 54 01 03 01 62 00 10 00 50 42 3a 52 53 57 54 5c 45 51 55 5c 2a 01 03 01 70 00 2a 00 50 5c 4c 44 52 5c 41 38 2c 41 32 5c 53 ┆************************** P EJECT b PB:RSWT EQU * p * P LDR A8,A2 S┆
0x195f4…19644 (260, 0, 400) 41 56 45 20 50 4f 49 4e 54 45 52 20 54 4f 20 46 49 52 53 54 20 42 4c 4f 43 4b 01 03 01 84 00 38 00 50 5c 4c 44 5c 41 31 2c 41 50 43 42 4c 4b 2b 53 54 4b 45 4e 44 5c 47 45 54 20 53 54 41 52 54 20 4f 46 20 41 50 4c 2e 43 4f 4e 54 52 4f 4c 20 ┆AVE POINTER TO FIRST BLOCK 8 P LD A1,APCBLK+STKEND GET START OF APL.CONTROL ┆
0x19644…19694 54 41 42 4c 45 20 01 04 00 22 00 30 00 50 5c 4c 44 5c 41 31 2c 41 50 4c 53 57 42 2c 41 31 5c 50 4f 49 4e 54 45 52 20 54 4f 20 53 57 42 20 42 4c 4f 43 4b 20 54 41 42 4c 45 20 01 04 00 5e 00 2a 00 50 5c 52 46 28 5a 29 5c 52 53 57 42 45 58 5c ┆TABLE " 0 P LD A1,APLSWB,A1 POINTER TO SWB BLOCK TABLE ^ * P RF(Z) RSWBEX ┆
0x19694…196e4 4e 4f 20 53 57 42 3a 53 20 49 4e 20 41 50 50 4c 49 43 41 54 49 4f 4e 20 01 04 00 92 00 20 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 31 5c 4e 55 4d 42 45 52 20 4f 46 20 54 59 50 45 53 20 01 04 00 c0 00 1a 00 50 5c 52 46 28 5a 29 5c 52 53 57 42 45 ┆NO SWB:S IN APPLICATION P LDR* A3,A1 NUMBER OF TYPES P RF(Z) RSWBE┆
0x196e4…19734 58 5c 4e 4f 20 4d 4f 4f 52 45 01 04 00 e4 00 0e 00 50 5c 4c 44 4b 5c 41 36 2c 30 20 01 04 01 02 00 1e 00 50 5c 53 55 4b 5c 41 35 2c 32 5c 53 4b 49 50 20 4c 45 4e 47 54 48 20 57 4f 52 44 01 04 01 14 00 1e 00 50 52 53 57 42 31 30 5c 41 44 4b ┆X NO MOORE P LDK A6,0 P SUK A5,2 SKIP LENGTH WORD PRSWB10 ADK┆
0x19734…19784 5c 41 31 2c 32 5c 4e 45 58 54 20 54 59 50 45 20 01 04 01 36 00 20 00 50 5c 4c 44 52 2a 5c 41 34 2c 41 31 5c 50 4f 49 4e 54 45 52 20 54 4f 20 42 4c 4f 43 4b 01 04 01 58 00 20 00 50 5c 4c 43 52 5c 41 36 2c 41 34 5c 4e 55 4d 42 45 52 20 4f 46 ┆ A1,2 NEXT TYPE 6 P LDR* A4,A1 POINTER TO BLOCK X P LCR A6,A4 NUMBER OF┆
0x19784…197d4 (261, 0, 400) 20 43 4f 50 49 45 53 20 01 04 01 7c 00 24 00 50 5c 4c 44 5c 41 37 2c 53 57 42 4c 45 4e 2c 41 34 5c 4c 45 4e 47 54 48 20 49 4e 20 42 59 54 45 53 01 05 00 10 00 08 00 50 5c 58 49 46 01 05 00 38 00 18 00 50 5c 49 46 54 5c 4d 4d 55 50 41 47 2b ┆ COPIES | $ P LD A7,SWBLEN,A4 LENGTH IN BYTES P XIF 8 P IFT MMUPAG+┆
0x197d4…19824 53 57 50 42 4c 4b 3d 32 01 05 00 44 00 26 00 50 5c 45 53 5c 41 36 2c 32 2c 41 32 5c 53 54 4f 52 45 20 4e 55 4d 42 45 52 20 4f 46 20 43 4f 50 49 45 53 01 05 00 60 00 2c 00 50 5c 45 53 5c 41 37 2c 34 2c 41 32 5c 53 54 4f 52 45 20 4c 45 4e 47 ┆SWPBLK=2 D & P ES A6,2,A2 STORE NUMBER OF COPIES ` , P ES A7,4,A2 STORE LENG┆
0x19824…19874 54 48 20 4f 46 20 53 57 42 20 49 4e 20 42 59 54 45 53 01 05 00 8a 00 08 00 50 5c 58 49 46 01 05 00 ba 00 18 00 50 5c 49 46 54 5c 53 57 50 42 4c 4b 2d 4d 4d 55 50 41 47 3d 31 01 05 00 c6 00 26 00 50 5c 53 54 5c 41 36 2c 32 2c 41 32 5c 53 54 ┆TH OF SWB IN BYTES P XIF P IFT SWPBLK-MMUPAG=1 & P ST A6,2,A2 ST┆
0x19874…198c4 4f 52 45 20 4e 55 4d 42 45 52 20 4f 46 20 43 4f 50 49 45 53 01 05 00 e2 00 2c 00 50 5c 53 54 5c 41 37 2c 34 2c 41 32 5c 53 54 4f 52 45 20 4c 45 4e 47 54 48 20 4f 46 20 53 57 42 20 49 4e 20 42 59 54 45 53 01 05 01 0c 00 08 00 50 5c 58 49 46 ┆ORE NUMBER OF COPIES , P ST A7,4,A2 STORE LENGTH OF SWB IN BYTES P XIF┆
0x198c4…19914 01 05 01 3c 00 12 00 50 5c 49 46 54 5c 53 57 50 42 4c 4b 3d 31 20 01 05 01 48 00 26 00 50 5c 53 55 4b 5c 41 35 2c 36 5c 44 45 43 52 45 4d 45 4e 54 53 20 53 3a 42 54 41 42 20 4c 45 4e 47 54 48 01 05 01 5e 00 28 00 50 5c 41 44 4b 5c 41 32 2c ┆ < P IFT SWPBLK=1 H & P SUK A5,6 DECREMENTS S:BTAB LENGTH ^ ( P ADK A2,┆
0x19914…19964 (262, 0, 400) 36 5c 49 4e 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 49 4e 20 42 4c 4f 43 4b 01 05 01 88 00 28 00 50 5c 53 55 4b 5c 41 33 2c 31 5c 44 45 43 52 45 4d 45 4e 54 20 4e 55 4d 42 45 52 20 4f 46 20 54 59 50 45 53 20 01 06 00 24 00 12 00 50 ┆6 INCREMENT POINTER IN BLOCK ( P SUK A3,1 DECREMENT NUMBER OF TYPES $ P┆
0x19964…199b4 5c 52 42 28 50 29 5c 52 53 57 42 31 30 20 01 06 00 50 00 0e 00 50 5c 4c 44 52 5c 41 34 2c 41 32 01 06 00 66 00 06 00 50 2a 20 01 06 00 78 00 34 00 50 2a 20 20 49 4e 49 54 20 50 4f 49 4e 54 45 52 53 20 54 4f 20 54 49 44 20 42 4c 4f 43 4b 53 ┆ RB(P) RSWB10 P P LDR A4,A2 f P* x 4 P* INIT POINTERS TO TID BLOCKS┆
0x199b4…19a04 20 46 4f 52 20 45 41 43 48 20 53 57 42 20 54 59 50 45 01 06 00 82 00 28 00 50 2a 20 20 41 4e 44 20 52 45 53 45 54 20 41 4c 4c 20 57 4f 52 44 53 20 49 4e 20 54 49 44 20 42 4c 4f 43 4b 53 01 06 00 ba 00 06 00 50 2a 20 01 06 00 e6 00 10 00 50 ┆ FOR EACH SWB TYPE ( P* AND RESET ALL WORDS IN TID BLOCKS P* P┆
0x19a04…19a54 52 53 57 42 32 30 5c 45 51 55 5c 2a 01 06 00 f0 00 28 00 50 5c 4c 44 52 5c 41 36 2c 41 32 5c 47 45 54 20 41 44 44 52 45 53 53 20 54 4f 20 54 49 44 20 42 4c 4f 43 4b 20 01 06 01 04 00 24 00 50 5c 53 55 52 5c 41 36 2c 41 38 5c 43 4f 4d 50 55 ┆RSWB20 EQU * ( P LDR A6,A2 GET ADDRESS TO TID BLOCK $ P SUR A6,A8 COMPU┆
0x19a54…19aa4 54 45 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 20 01 06 01 30 00 18 00 50 5c 49 46 54 5c 53 57 50 42 4c 4b 2d 4d 4d 55 50 41 47 3d 31 01 06 01 58 00 20 00 50 5c 4c 44 5c 41 31 2c 32 2c 41 38 5c 4e 55 4d 42 45 52 20 4f 46 20 43 4f 50 49 45 53 ┆TE DISPLACEMENT 0 P IFT SWPBLK-MMUPAG=1 X P LD A1,2,A8 NUMBER OF COPIES┆
0x19aa4…19af4 (263, 0, 398) 01 06 01 74 00 1c 00 50 5c 52 46 28 5a 29 5c 52 53 57 42 35 30 5c 4e 4f 20 43 4f 50 49 45 53 21 01 07 00 08 00 2a 00 50 5c 53 54 52 5c 41 36 2c 41 38 5c 53 54 4f 52 45 20 50 4f 49 4e 54 45 52 20 54 4f 20 54 49 44 20 42 4c 4f 43 4b 20 01 07 ┆ t P RF(Z) RSWB50 NO COPIES! * P STR A6,A8 STORE POINTER TO TID BLOCK ┆
0x19af4…19b44 00 28 00 1e 00 50 52 53 57 42 33 30 5c 53 54 52 5c 41 33 2c 41 32 5c 52 45 53 45 54 20 54 49 44 01 07 00 56 00 2c 00 50 5c 41 44 4b 5c 41 32 2c 32 5c 49 4e 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 49 4e 20 54 49 44 20 42 4c 4f 43 4b ┆ ( PRSWB30 STR A3,A2 RESET TID V , P ADK A2,2 INCREMENT POINTER IN TID BLOCK┆
0x19b44…19b94 01 07 00 78 00 2e 00 50 5c 53 55 4b 5c 41 35 2c 32 5c 44 45 43 52 45 4d 45 4e 54 20 4c 45 4e 47 54 48 20 4f 46 20 52 45 41 4c 20 53 3a 42 54 41 42 20 01 07 00 a8 00 24 00 50 5c 53 55 4b 5c 41 31 2c 31 5c 44 45 43 52 2e 20 4e 55 4d 42 45 52 ┆ x . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB $ P SUK A1,1 DECR. NUMBER┆
0x19b94…19be4 20 4f 46 20 43 4f 50 49 45 53 01 07 00 da 00 1c 00 50 5c 52 42 28 50 29 5c 52 53 57 42 33 30 5c 4e 45 58 54 20 43 4f 50 59 20 01 07 01 02 00 08 00 50 5c 58 49 46 01 07 01 22 00 18 00 50 5c 49 46 54 5c 4d 4d 55 50 41 47 2b 53 57 50 42 4c 4b ┆ OF COPIES P RB(P) RSWB30 NEXT COPY P XIF " P IFT MMUPAG+SWPBLK┆
0x19be4…19c32 3d 32 01 07 01 2e 00 24 00 50 5c 45 4c 5c 41 31 2c 32 2c 41 38 5c 47 45 54 20 4e 55 4d 42 45 52 20 4f 46 20 43 4f 50 49 45 53 01 07 01 4a 00 1c 00 50 5c 52 46 28 5a 29 5c 52 53 57 42 35 30 5c 4e 4f 20 43 4f 50 49 45 53 21 01 07 01 72 ┆=2 . $ P EL A1,2,A8 GET NUMBER OF COPIES J P RF(Z) RSWB50 NO COPIES! r┆
0x19c32…19c82 (264, 0, 400) 00 2a 00 50 5c 45 53 52 5c 41 36 2c 41 38 5c 53 54 4f 52 45 20 50 4f 49 4e 54 45 52 20 54 4f 20 54 49 44 20 42 4c 4f 43 4b 20 01 08 00 04 00 1e 00 50 52 53 57 42 34 30 5c 45 53 52 5c 41 33 2c 41 32 5c 52 45 53 45 54 20 54 49 44 01 08 00 32 ┆ * P ESR A6,A8 STORE POINTER TO TID BLOCK PRSWB40 ESR A3,A2 RESET TID 2┆
0x19c82…19cd2 00 2c 00 50 5c 41 44 4b 5c 41 32 2c 32 5c 49 4e 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 49 4e 20 54 49 44 20 42 4c 4f 43 4b 01 08 00 54 00 2e 00 50 5c 53 55 4b 5c 41 35 2c 32 5c 44 45 43 52 45 4d 45 4e 54 20 4c 45 4e 47 54 48 20 4f ┆ , P ADK A2,2 INCREMENT POINTER IN TID BLOCK T . P SUK A5,2 DECREMENT LENGTH O┆
0x19cd2…19d22 46 20 52 45 41 4c 20 53 3a 42 54 41 42 20 01 08 00 84 00 28 00 50 5c 53 55 4b 5c 41 31 2c 31 5c 44 45 43 52 45 4d 45 4e 54 20 4e 55 4d 42 45 52 20 4f 46 20 43 4f 50 49 45 53 01 08 00 b6 00 1c 00 50 5c 52 42 28 50 29 5c 52 53 57 42 34 30 5c ┆F REAL S:BTAB ( P SUK A1,1 DECREMENT NUMBER OF COPIES P RB(P) RSWB40 ┆
0x19d22…19d72 4e 45 58 54 20 43 4f 50 59 20 01 08 00 e2 00 08 00 50 5c 58 49 46 01 08 01 02 00 12 00 50 5c 49 46 54 5c 53 57 50 42 4c 4b 3d 31 20 01 08 01 0e 00 14 00 50 52 53 57 42 35 30 5c 41 44 4b 4c 5c 41 38 2c 36 01 08 01 24 00 0e 00 50 5c 43 57 52 ┆NEXT COPY P XIF P IFT SWPBLK=1 PRSWB50 ADKL A8,6 $ P CWR┆
0x19d72…19dc2 5c 41 38 2c 41 34 01 08 01 3c 00 12 00 50 5c 52 42 28 4e 45 29 5c 52 53 57 42 32 30 01 08 01 4e 00 22 00 50 5c 4c 44 52 5c 41 35 2c 41 35 5c 53 3a 42 54 41 42 20 43 4f 4e 53 49 53 54 45 4e 54 3f 20 01 08 01 64 00 16 00 50 5c 52 46 28 5a 29 ┆ A8,A4 < P RB(NE) RSWB20 N " P LDR A5,A5 S:BTAB CONSISTENT? d P RF(Z)┆
0x19dc2…19e12 (265, 2, 152) 5c 52 53 57 42 45 58 5c 59 45 53 20 01 08 01 8a 00 1c 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4c 4d 50 36 5c 53 57 42 20 45 52 52 4f 52 21 01 09 00 14 00 10 00 50 5c 43 41 4c 4c 5c 45 52 52 4f 52 20 01 09 00 34 00 12 00 50 52 53 57 42 45 58 5c 52 ┆ RSWBEX YES P LDKL A1,LMP6 SWB ERROR! P CALL ERROR 4 PRSWBEX R┆
0x19e12…19e5a 54 4e 5c 41 31 34 01 09 00 48 00 08 00 50 5c 58 49 46 01 09 00 5e 00 10 00 50 4c 43 52 45 4e 44 5c 45 51 55 5c 2a 01 09 00 6a 00 06 00 50 5c 20 01 09 00 7e 00 08 00 50 5c 45 4e 44 01 09 00 88 40 04 00 00 01 09 00 94 ┆TN A14 H P XIF ^ PLCREND EQU * j P ~ P END @ ┆
0x19e5a…19e62 (266, 1, 8) 20 04 00 00 01 0a 00 04 ┆ ┆
0x19e62…19eb2 (267, 0, 400) 00 08 01 04 01 fa 00 00 f6 a1 02 ca 45 46 43 46 43 41 00 00 00 02 07 01 81 ce 00 5a ef 47 00 0b 54 08 06 5a 86 4f 00 0e 57 06 06 2e 86 4f 00 0e f6 a1 02 be 82 4e 00 0a 01 00 38 41 3a 61 d8 20 00 00 00 00 50 ba 87 4e 00 0a 87 57 00 0e 87 4f ┆ EFCFCA Z G T Z O W . O N 8A:a P N W O┆
0x19eb2…19f02 00 5e 06 00 ee 4f 00 64 54 0a 05 01 81 d6 00 0e e5 47 00 22 07 00 81 ce 00 5a e7 46 00 0b 80 d6 00 0e e7 43 00 14 85 4e 00 56 81 d6 00 0e 85 47 00 0a 07 01 81 d6 00 0e ef 47 00 14 54 08 84 4e 00 58 84 47 00 3c e7 4f 00 54 07 00 e7 4e 00 54 ┆ ^ O dT G " Z F C N V G G T N X G < O T N T┆
0x19f02…19f52 ef 53 00 30 51 42 3f 01 97 52 00 0c 86 5c ff fe 86 4f 00 52 82 18 01 00 38 41 3a 61 d8 20 00 00 00 00 54 16 87 56 00 0e 05 00 e5 4e 00 54 3d 01 95 52 00 0c 87 55 ff fe 57 0e 07 00 e7 4e 00 54 17 01 e7 4f 00 54 5f 4e 07 00 e7 4e 00 54 ef 53 ┆ S 0QB? R O R 8A:a T V N T= R U W N T O T_N N T S┆
0x19f52…19fa2 00 30 55 0c 06 fd 81 d2 00 06 e6 47 00 20 57 00 8f 20 02 c4 f6 a1 02 ca 45 46 43 4b 45 59 00 00 00 02 07 00 e7 4e 00 71 3f 01 97 56 00 0e 86 5c 00 42 86 4f 00 2e 07 00 e7 58 00 04 87 57 00 14 f6 a1 02 d0 07 00 81 d6 00 0e e7 46 00 3f 81 46 ┆ 0U G W EFCKEY N q? V B O . X W F ? F┆
0x19fa2…19ff2 00 40 82 46 00 42 03 00 e3 46 00 3f 84 1c f6 a1 02 dc 81 d6 00 0e 87 46 00 10 87 4f 00 6e 86 56 00 10 81 d6 00 0e 86 47 00 10 f6 a1 02 d0 87 4e 00 6e 81 d6 00 0e 87 47 e4 00 00 40 00 00 00 00 00 00 00 00 00 00 00 00 50 00 00 40 00 80 02 00 ┆ @ F B F ? F O n V G N n G @ P @ ┆
0x19ff2…1a042 (268, 0, 400) 00 10 06 00 81 d6 00 0e e6 46 00 3f 81 46 00 40 82 46 00 42 03 00 e3 46 00 3f 84 18 f6 a1 02 d6 11 00 54 08 07 01 e7 4f 00 70 57 06 07 00 e7 4f 00 70 06 01 81 ce 00 2e ee 47 00 06 54 40 85 56 00 10 e4 46 00 08 e4 10 e4 46 00 09 95 10 85 4f ┆ F ? F @ F B F ? T O pW O p . G T@ V F F O┆
0x1a042…1a092 00 46 81 d6 00 0e 87 46 00 10 80 ce 00 2e e4 42 00 08 e4 10 e4 42 00 09 97 10 87 4f 00 6e 05 00 e5 6e 00 46 ed 3d 50 06 04 00 e4 4f 00 70 8f 20 02 c4 f6 a1 02 ca 45 46 43 54 55 53 00 00 00 02 81 d2 00 06 87 46 00 1e ef 20 39 31 06 00 54 02 ┆ F F . B B O n n F =P O p EFCTUS F 91 T ┆
0x1a092…1a0e2 06 80 05 01 80 d6 00 0e ed 43 00 26 04 00 54 02 04 80 a6 10 26 80 26 80 54 84 03 30 eb 47 00 1e 54 1c ed 4f 00 71 02 00 54 02 02 80 ed 4f 00 4e 01 00 54 02 01 80 a2 04 22 80 22 80 50 60 82 56 00 10 82 4f 00 6e 81 d6 00 0e 87 46 00 10 87 57 ┆ C & T & & T 0 G T O q T O N T " " P` V O n F W┆
0x1a0e2…1a132 00 10 86 4e 00 6e 81 d6 00 0e 86 47 00 10 07 00 ef 4f 00 4e 54 1a 81 d2 00 06 b8 c6 00 1e b8 cf 00 52 b8 c0 02 bc 81 d2 00 06 b8 c7 00 1e 57 1c b8 ce 00 52 81 d2 00 06 b8 c7 00 1e ed 4f 00 71 50 0a 06 03 81 d6 00 0e e6 47 00 08 57 00 57 00 ┆ N n G O NT R W R O qP G W W ┆
0x1a132…1a182 8f 20 02 c4 30 30 07 24 f6 a1 02 e2 07 8a 8f 52 01 02 07 12 8f 52 01 02 07 71 f6 a1 02 e2 07 04 8f 52 01 02 07 0f 8f 52 01 02 80 c0 02 ea 8f 52 01 00 00 1a 00 00 00 00 00 01 00 00 00 00 00 00 a0 00 00 00 00 00 00 00 00 20 00 00 44 02 02 00 ┆ 00 $ R R q R R R D ┆