|
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: 1302 (0x516)
Notes: pts_type(SC)
Names: »DRIC0X.SC«
└─⟦c47f25c27⟧ Bits:30009688 Philips computer tape "600318"
└─⟦this⟧ »M:KMDV/DRIC0X.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/DRIC0X.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/DRIC0X.SC«
IDENT DRIC0X REL 8.2 78-09-15 870105040820 * *************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRIC0X = DRIC01 DUMMY MODULE * * * * * * ********************************* * ENTRY ITABRT ENTRY ITADI ENTRY ITADO * EXTRN IHRTN ITADI EQU * ITADO EQU * ITABRT ABL IHRTN END
0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRIC0X REL 8.2 78-09-15 870105040820 «, t00=0x0000, t01=0x0004}
0x036…03e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x03e…048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x048…06c Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0000, t01=0x004c}
0x06c…076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0070}
0x076…09e Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x007a}
0x09e…0a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00a2}
0x0a8…0d0 Head {h00=0x0024, h01=0x0050, text=»* DRIC0X = DRIC01 DUMMY MODULE«, t00=0x0000, t01=0x00ac}
0x0d0…0da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d4}
0x0da…0e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00de}
0x0e4…0ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x0ee…0f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x0f8…102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x102…10c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x10c…136 Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0000, t01=0x0110}
0x136…140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x140…156 Head {h00=0x0012, h01=0x0050, text=» ENTRY ITABRT «, t00=0x0000, t01=0x0144}
0x156…16a Head {h00=0x0010, h01=0x0050, text=» ENTRY ITADI«, t00=0x0000, t01=0x015a}
0x16a…17e Head {h00=0x0010, h01=0x0050, text=» ENTRY ITADO«, t00=0x0000, t01=0x016e}
0x17e…188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0182}
0x188…19c Head {h00=0x0010, h01=0x0050, text=» EXTRN IHRTN«, t00=0x0000, t01=0x018c}
0x19c…1b0 Head {h00=0x0010, h01=0x0050, text=»ITADI EQU * «, t00=0x0001, t01=0x0010}
0x1b0…1c4 Head {h00=0x0010, h01=0x0050, text=»ITADO EQU * «, t00=0x0001, t01=0x0024}
0x1c4…1dc Head {h00=0x0014, h01=0x0050, text=»ITABRT ABL IHRTN«, t00=0x0001, t01=0x0038}
0x1dc…1e8 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0001, t01=0x0050}
0x1e8…1ec Head {h00=0x4004, h01=0x0000}
0x1ec…1f0 00 01 00 5c ┆ ┆
0x1f0…1f8 (2, 1, 8) 20 04 00 00 00 02 00 04 ┆ ┆
0x1f8…248 (3, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 22 01 80 00 28 00 50 2a 20 53 20 28 4c 45 41 44 49 4e 47 20 5a 45 52 4f 20 52 45 50 4c 41 43 45 44 20 42 59 20 53 49 47 4e 29 2a 00 23 00 1c 00 28 00 50 2a 2a 2a 2a 2a 2a 2a 2a ┆******************** " ( P* S (LEADING ZERO REPLACED BY SIGN)* # ( P********┆
0x248…298 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 00 23 00 48 00 12 00 50 4c 53 5c 45 51 55 5c 2a 2d 42 41 53 45 20 00 23 00 74 00 26 00 50 45 44 50 38 35 30 5c 49 4d 5c 45 44 53 55 50 50 5c 4d 41 52 4b 20 ┆**************************** # H PLS EQU *-BASE # t & PEDP850 IM EDSUPP MARK ┆
0x298…2e8 53 55 50 50 52 45 53 53 49 4f 4e 20 00 23 00 8a 00 28 00 50 5c 43 46 5c 41 31 34 2c 45 44 47 45 54 4e 5c 47 45 54 20 43 48 52 20 46 52 4f 4d 20 45 4c 45 4d 45 4e 54 20 00 23 00 b4 00 26 00 50 5c 4c 44 5c 41 31 2c 45 44 4e 4f 54 5a 5c 4c 4f ┆SUPPRESSION # ( P CF A14,EDGETN GET CHR FROM ELEMENT # & P LD A1,EDNOTZ LO┆
0x2e8…338 41 44 20 5a 45 52 4f 20 49 4e 44 49 43 41 54 4f 52 20 00 23 00 e0 00 28 00 50 5c 52 42 28 4e 5a 29 5c 45 44 50 36 37 30 5c 53 54 4f 52 45 20 43 48 52 20 49 46 20 4e 4f 54 20 5a 45 52 4f 00 23 01 0a 00 1e 00 50 5c 43 57 4b 5c 41 36 2c 2f 33 ┆AD ZERO INDICATOR # ( P RB(NZ) EDP670 STORE CHR IF NOT ZERO # P CWK A6,/3┆
0x338…388 30 5c 43 4f 4d 50 20 57 49 54 48 20 5a 45 52 4f 00 23 01 36 00 20 00 50 5c 52 42 28 45 29 5c 45 44 50 38 31 30 5c 4a 55 4d 50 20 49 46 20 45 51 55 41 4c 20 00 23 01 58 00 26 00 50 5c 52 42 5c 45 44 50 36 36 30 5c 49 4d 20 45 44 4e 4f 54 5a ┆0 COMP WITH ZERO # 6 P RB(E) EDP810 JUMP IF EQUAL # X & P RB EDP660 IM EDNOTZ┆
0x388…3d8 (4, 0, 398) 20 41 4e 44 20 53 54 4f 52 45 20 43 48 52 00 23 01 7c 00 0a 00 50 5c 45 4a 45 43 54 00 24 00 16 00 1e 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 20 00 24 00 24 00 1e 00 50 2a 20 43 3a 43 4f 4e 44 49 54 ┆ AND STORE CHR # | P EJECT $ P************************* $ $ P* C:CONDIT┆
0x3d8…428 49 4f 4e 41 4c 20 50 49 43 54 55 52 45 20 2a 20 00 24 00 46 00 1e 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 20 00 24 00 68 00 12 00 50 4c 43 5c 45 51 55 5c 2a 2d 42 41 53 45 20 00 24 00 8a 00 22 00 50 ┆IONAL PICTURE * $ F P************************* $ h PLC EQU *-BASE $ " P┆
0x428…478 45 44 50 39 30 30 5c 4c 44 5c 41 34 2c 45 44 53 49 47 4e 5c 4c 4f 41 44 20 53 49 47 4e 20 00 24 00 a0 00 28 00 50 5c 52 42 28 4e 5a 29 5c 45 44 50 37 32 35 5c 4a 55 4d 50 20 42 41 43 4b 20 49 46 20 50 4f 53 49 54 49 56 45 00 24 00 c6 00 26 ┆EDP900 LD A4,EDSIGN LOAD SIGN $ ( P RB(NZ) EDP725 JUMP BACK IF POSITIVE $ &┆
0x478…4c8 00 50 5c 4c 44 5c 41 34 2c 45 44 50 50 4f 49 5c 4c 4f 41 44 20 50 49 43 54 55 52 45 20 50 4f 49 4e 54 45 52 00 24 00 f2 00 28 00 50 5c 53 55 5c 41 34 2c 45 44 43 4e 54 50 5c 53 55 42 2e 20 57 49 54 48 20 4e 45 47 2e 4e 55 4d 42 45 52 3d 3b ┆ P LD A4,EDPPOI LOAD PICTURE POINTER $ ( P SU A4,EDCNTP SUB. WITH NEG.NUMBER=;┆
0x4c8…516 00 24 01 1c 00 24 00 50 5c 53 54 5c 41 34 2c 45 44 50 50 4f 49 5c 53 54 4f 52 45 20 4e 45 57 20 50 4f 49 4e 54 45 52 20 00 24 01 48 00 18 00 50 5c 52 42 5c 45 44 50 37 32 35 5c 4a 55 4d 50 20 42 41 43 4b 00 24 01 70 00 06 00 50 2a 20 ┆ $ $ P ST A4,EDPPOI STORE NEW POINTER $ H P RB EDP725 JUMP BACK $ p P* ┆