|
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: 1448 (0x5a8)
Notes: pts_type(SC)
Names: »INTLT2.SC«
└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
└─⟦this⟧ »BDKMON/INTLT2.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKMON/INTLT2.SC«
IDENT INTLT2 REL=7.2 DATE=77-09-09 * * INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 * FOR LOCAL TERMINALS * THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED * WITH DEVICES CONNECTED TO A SPECIFIC LINE ON CHLT2. A MAXIMUM * OF SEVEN DEVICES CAN BE CONNECTED TO EACH OF EIGHT LINES * ENTRY INTLT2 TABLE ENTRY * * TERMINAL PARAMETERS * * * RIGHT BYTE = 2 * NUMBER OF DEVICES * * * * INTLT2 EQU * TABLE ENTRY * * * END
0x000…02e (0, 0, 400) Head {h00=0x002a, h01=0x0050, text=» IDENT INTLT2 REL=7.2 DATE=77-09-09«, t00=0x0000, t01=0x0004}
0x02e…038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0032}
0x038…07c Head {h00=0x0040, h01=0x0050, text=»* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1«, t00=0x0000, t01=0x003c}
0x07c…09a Head {h00=0x001a, h01=0x0050, text=»* FOR LOCAL TERMINALS «, t00=0x0000, t01=0x0080}
0x09a…0e2 Head {h00=0x0044, h01=0x0050, text=»* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED «, t00=0x0000, t01=0x009e}
0x0e2…12a Head {h00=0x0044, h01=0x0050, text=»* WITH DEVICES CONNECTED TO A SPECIFIC LINE ON CHLT2. A MAXIMUM «, t00=0x0000, t01=0x00e6}
0x12a…16c Head {h00=0x003e, h01=0x0050, text=»* OF SEVEN DEVICES CAN BE CONNECTED TO EACH OF EIGHT LINES«, t00=0x0000, t01=0x012e}
0x16c…176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0170}
0x176…198 Head {h00=0x001e, h01=0x0050, text=» ENTRY INTLT2 TABLE ENTRY «, t00=0x0000, t01=0x017a}
0x198…1a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x1a2…1c2 Head {h00=0x001c, h01=0x0050, text=»* TERMINAL PARAMETERS«, t00=0x0001, t01=0x0016}
0x1c2…1cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x1cc…1d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0040}
0x1d6…206 Head {h00=0x002c, h01=0x0050, text=»* RIGHT BYTE = 2 * NUMBER OF DEVICES «, t00=0x0001, t01=0x004a}
0x206…210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007a}
0x210…21a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0084}
0x21a…224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008e}
0x224…22e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0098}
0x22e…24e Head {h00=0x001c, h01=0x0050, text=»INTLT2 EQU * TABLE ENTRY«, t00=0x0001, t01=0x00a2}
0x24e…258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x258…262 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00cc}
0x262…26c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d6}
0x26c…278 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0001, t01=0x00e0}
0x278…27c Head {h00=0x4004, h01=0x0000}
0x27c…280 00 01 00 ec ┆ ┆
0x280…288 (2, 1, 8) 20 04 00 00 00 02 00 04 ┆ ┆
0x288…2d8 (3, 0, 400) 36 2c 31 5c 44 45 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 4f 50 31 20 00 1a 01 8a 00 24 00 50 5c 53 55 4b 5c 41 37 2c 31 5c 44 45 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 4f 50 32 20 00 1b 00 22 00 1a 00 50 5c 4c 44 4b 5c 41 ┆6,1 DECREMENT POINTER OP1 $ P SUK A7,1 DECREMENT POINTER OP2 " P LDK A┆
0x2d8…328 31 2c 2f 46 5c 4c 4f 41 44 20 42 4c 41 4e 4b 20 00 1b 00 4a 00 26 00 50 5c 41 44 4b 5c 41 32 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 49 4e 44 45 58 20 46 4f 52 20 4f 50 32 20 00 1b 00 68 00 28 00 50 5c 52 42 28 50 29 5c 50 43 4b 30 34 30 5c ┆1,/F LOAD BLANK J & P ADK A2,1 INCREMENT INDEX FOR OP2 h ( P RB(P) PCK040 ┆
0x328…378 4a 55 4d 50 20 49 46 20 45 4e 44 20 4f 46 20 45 4c 45 4d 45 4e 54 00 1b 00 92 00 20 00 50 5c 4c 43 52 5c 41 31 2c 41 37 5c 47 45 54 20 42 59 54 45 20 46 52 4f 4d 20 4f 50 32 00 1b 00 be 00 10 00 50 5c 53 55 4b 5c 41 31 2c 2f 33 30 20 00 1b ┆JUMP IF END OF ELEMENT P LCR A1,A7 GET BYTE FROM OP2 P SUK A1,/30 ┆
0x378…3c8 00 e2 00 24 00 50 5c 52 46 28 4e 4e 29 5c 50 43 4b 30 36 30 5c 4a 55 4d 50 20 49 46 20 4e 4f 54 20 53 50 41 43 45 00 1b 00 f6 00 1a 00 50 5c 4c 44 4b 5c 41 31 2c 2f 46 5c 4c 4f 41 44 20 42 4c 41 4e 4b 20 00 1b 01 1e 00 2e 00 50 50 43 4b 30 ┆ $ P RF(NN) PCK060 JUMP IF NOT SPACE P LDK A1,/F LOAD BLANK . PPCK0┆
0x3c8…418 36 30 5c 53 55 4b 5c 41 37 2c 31 5c 44 45 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 46 4f 52 20 4f 50 32 20 00 1b 01 3c 00 0e 00 50 5c 52 42 5c 50 43 4b 30 34 30 00 1b 01 6e 00 0a 00 50 5c 45 4a 45 43 54 00 1b 01 80 00 06 00 50 2a 20 ┆60 SUK A7,1 DECREMENT POINTER FOR OP2 < P RB PCK040 n P EJECT P* ┆
0x418…468 (4, 0, 400) 00 1b 01 8e 00 22 00 50 2a 20 4d 4f 56 45 20 43 48 41 52 41 43 54 45 52 20 42 59 20 43 48 41 52 41 43 54 45 52 20 00 1c 00 08 00 22 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 20 00 1c 00 2e ┆ " P* MOVE CHARACTER BY CHARACTER " P***************************** .┆
0x468…4b8 00 06 00 50 2a 20 00 1c 00 54 00 0e 00 50 4d 56 43 5c 45 51 55 5c 2a 20 00 1c 00 5e 00 1c 00 50 5c 4c 44 4b 5c 41 33 2c 30 5c 4c 4f 41 44 20 48 45 58 20 5a 45 52 4f 20 00 1c 00 70 00 10 00 50 4d 56 43 30 32 30 5c 45 51 55 5c 2a 00 1c 00 90 ┆ P* T PMVC EQU * ^ P LDK A3,0 LOAD HEX ZERO p PMVC020 EQU * ┆
0x4b8…508 00 20 00 50 5c 4c 44 52 2a 5c 41 35 2c 41 35 5c 47 45 54 20 50 41 43 4b 49 4e 47 20 46 4f 52 4d 00 1c 00 a4 00 20 00 50 5c 52 46 28 4e 29 5c 4d 56 43 30 35 30 5c 4a 55 4d 50 20 49 46 20 41 53 43 49 49 20 00 1c 00 c8 00 1c 00 50 5c 4c 44 4b ┆ P LDR* A5,A5 GET PACKING FORM P RF(N) MVC050 JUMP IF ASCII P LDK┆
0x508…558 5c 41 33 2c 2f 46 46 5c 4c 4f 41 44 20 42 4c 41 4e 4b 53 20 00 1c 00 ec 00 26 00 50 4d 56 43 30 35 30 5c 4c 44 52 5c 41 31 2c 41 33 5c 47 45 54 20 46 49 4c 4c 45 52 20 54 4f 20 41 31 20 00 1c 01 0c 00 26 00 50 5c 41 44 4b 5c 41 32 2c 31 5c ┆ A3,/FF LOAD BLANKS & PMVC050 LDR A1,A3 GET FILLER TO A1 & P ADK A2,1 ┆
0x558…5a8 49 4e 43 52 45 4d 45 4e 54 20 49 4e 44 45 58 20 46 4f 52 20 4f 50 32 20 00 1c 01 36 00 28 00 50 5c 52 46 28 50 29 5c 4d 56 43 31 30 30 5c 4a 55 4d 50 20 49 46 20 45 4e 44 20 4f 46 20 45 4c 45 4d 45 4e 54 00 1c 01 60 00 20 00 50 5c 4c 43 52 ┆INCREMENT INDEX FOR OP2 6 ( P RF(P) MVC100 JUMP IF END OF ELEMENT ` P LCR┆