|
|
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: 1598 (0x63e)
Notes: pts_type(SC)
Names: »DWDC09.SC«
└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
└─⟦this⟧ »BDKMON/DWDC09.SC«
IDENT DWDC09 REL 8.3 79-06-25 870105040830 * * DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 * ENTRY DWDC09 TABLE ENTRY EXTRN DC15AD POINTER TO ADDRESS-BLOCK * DWDC09 EQU * TABLE ENTRY DATA 0 CHANNEL PARAMETER DATA /8000 STATUS./8000 MEANS DEVICE READY DATA 0 ECB-ADDRESS DATA DWTEND-DWDC09 RIGHT BYTE=ORDER DATA DC15AD POINTER TO ADDRESS-BLOCK DATA 'DC' TTAB-ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE DATA 0 TIMER POINTER DATA 0 WRITE QUEUE DATA 0 STATUS QUEUE DATA 0 RECEIVE QUEUE DATA 0 BUFFER ADDRESS DATA 0 CURSOR ADDRESS DWTEND EQU * END
0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DWDC09 REL 8.3 79-06-25 870105040830 «, t00=0x0000, t01=0x0004}
0x036…040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x003a}
0x040…07e Head {h00=0x003a, h01=0x0050, text=»* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 «, t00=0x0000, t01=0x0044}
0x07e…088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0082}
0x088…0aa Head {h00=0x001e, h01=0x0050, text=» ENTRY DWDC09 TABLE ENTRY «, t00=0x0000, t01=0x008c}
0x0aa…0d8 Head {h00=0x002a, h01=0x0050, text=» EXTRN DC15AD POINTER TO ADDRESS-BLOCK«, t00=0x0000, t01=0x00ae}
0x0d8…0e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00dc}
0x0e2…102 Head {h00=0x001c, h01=0x0050, text=»DWDC09 EQU * TABLE ENTRY«, t00=0x0000, t01=0x00e6}
0x102…124 Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0000, t01=0x0106}
0x124…158 Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0000, t01=0x0128}
0x158…174 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0000, t01=0x015c}
0x174…190 Head {h00=0x0018, h01=0x0050, text=» DATA DWTEND-DWDC09 «, t00=0x0000, t01=0x0178}
0x190…1ac (1, 2, 392) Head {h00=0x0018, h01=0x0050, text=» RIGHT BYTE=ORDER «, t00=0x0001, t01=0x0004}
0x1ac…1da Head {h00=0x002a, h01=0x0050, text=» DATA DC15AD POINTER TO ADDRESS-BLOCK «, t00=0x0001, t01=0x0020}
0x1da…1fa Head {h00=0x001c, h01=0x0050, text=» DATA 'DC' TTAB-ADDRESS «, t00=0x0001, t01=0x004e}
0x1fa…222 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0001, t01=0x006e}
0x222…240 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0001, t01=0x0096}
0x240…25e Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0001, t01=0x00b4}
0x25e…27a Head {h00=0x0018, h01=0x0050, text=» DATA 0 WRITE QUEUE «, t00=0x0001, t01=0x00d2}
0x27a…296 Head {h00=0x0018, h01=0x0050, text=» DATA 0 STATUS QUEUE«, t00=0x0001, t01=0x00ee}
0x296…2b4 Head {h00=0x001a, h01=0x0050, text=» DATA 0 RECEIVE QUEUE «, t00=0x0001, t01=0x010a}
0x2b4…2d2 Head {h00=0x001a, h01=0x0050, text=» DATA 0 BUFFER ADDRESS«, t00=0x0001, t01=0x0128}
0x2d2…2f0 Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0001, t01=0x0146}
0x2f0…304 Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0001, t01=0x0164}
0x304…310 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0001, t01=0x0178}
0x310…314 Head {h00=0x4004, h01=0x0000}
0x314…318 00 01 01 84 ┆ ┆
0x318…320 (2, 1, 8) 20 04 00 00 00 02 00 04 ┆ ┆
0x320…370 (3, 0, 398) 20 53 45 4c 45 43 54 20 00 0a 01 6c 00 30 00 50 5c 5c 5c 53 45 51 55 45 4e 43 45 2c 20 4e 4f 57 41 43 4b 20 53 48 4f 55 4c 44 20 42 45 20 53 45 54 20 54 4f 20 22 4f 4e 45 22 2e 20 00 0b 00 10 00 2c 00 50 5c 5c 5c 4f 4e 4c 59 20 57 4f 52 4b ┆ SELECT l 0 P SEQUENCE, NOWACK SHOULD BE SET TO "ONE". , P ONLY WORK┆
0x370…3c0 49 4e 47 20 49 46 20 53 54 41 54 20 49 53 20 53 45 54 20 54 4f 20 22 4f 4e 45 22 2e 00 0b 00 44 00 18 00 50 5c 49 46 54 5c 50 36 38 30 35 3d 30 5c 5c 53 41 4c 43 55 5a 00 0b 00 74 00 3c 00 50 4c 43 55 55 54 5c 45 51 55 5c 4c 43 55 49 4e 2b ┆ING IF STAT IS SET TO "ONE". D P IFT P6805=0 SALCUZ t < PLCUUT EQU LCUIN+┆
0x3c0…410 2f 31 30 5c 44 45 56 49 43 45 20 41 44 44 52 45 53 53 20 4f 46 20 54 52 41 4e 53 4d 49 54 54 45 52 5c 53 41 4c 43 55 5a 00 0b 00 90 00 12 00 50 5c 58 49 46 5c 5c 5c 53 41 4c 43 55 5a 20 00 0b 00 d0 00 10 00 50 5c 49 46 54 5c 50 36 38 30 35 ┆/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF SALCUZ P IFT P6805┆
0x410…460 3d 31 00 0b 00 e6 00 3c 00 50 4c 43 55 55 54 5c 45 51 55 5c 4c 43 55 49 4e 2b 2f 30 31 5c 44 45 56 49 43 45 20 41 44 44 52 45 53 53 20 4f 46 20 54 52 41 4e 53 4d 49 54 54 45 52 5c 53 41 4c 43 55 5a 00 0b 00 fa 00 12 00 50 5c 58 49 46 5c 5c ┆=1 < PLCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF ┆
0x460…4ae 5c 53 41 4c 43 55 5a 20 00 0b 01 3a 00 0a 00 50 5c 45 4a 45 43 54 00 0b 01 50 00 06 00 50 2a 20 00 0b 01 5e 00 16 00 50 2a 5c 52 45 51 55 45 53 54 20 48 41 4e 44 4c 49 4e 47 00 0b 01 68 00 06 00 50 2a 20 00 0b 01 82 00 06 00 50 2a 20 ┆ SALCUZ : P EJECT P P* ^ P* REQUEST HANDLING h P* P* ┆
0x4ae…4fe (4, 0, 400) 00 0b 01 8c 00 06 00 50 2a 20 00 0c 00 08 00 0e 00 50 2a 5c 41 37 3d 4f 52 44 45 52 00 0c 00 12 00 06 00 50 2a 20 00 0c 00 24 00 10 00 50 2a 5c 2f 30 32 3a 20 52 45 41 44 20 00 0c 00 2e 00 10 00 50 2a 5c 2f 30 36 3a 20 57 52 49 54 45 00 0c ┆ P* P* A7=ORDER P* $ P* /02: READ . P* /06: WRITE ┆
0x4fe…54e 00 42 00 14 00 50 2a 5c 2f 30 38 3a 20 45 58 43 48 41 4e 47 45 20 00 0c 00 56 00 1e 00 50 2a 5c 2f 32 32 3a 20 52 45 4c 45 41 53 45 20 52 45 41 44 20 42 55 46 46 45 52 00 0c 00 6e 00 1c 00 50 2a 5c 2f 33 31 3a 20 47 45 54 20 57 52 49 54 45 ┆ B P* /08: EXCHANGE V P* /22: RELEASE READ BUFFER n P* /31: GET WRITE┆
0x54e…59e 20 42 55 46 46 45 52 20 00 0c 00 90 00 1e 00 50 2a 5c 2f 33 37 3a 20 54 52 41 4e 53 46 45 52 20 50 41 52 41 4d 45 54 45 52 53 00 0c 00 b0 00 16 00 50 2a 5c 2f 33 38 3a 20 53 45 54 20 53 54 41 54 55 53 20 00 0c 00 d2 00 06 00 50 2a 20 00 0c ┆ BUFFER P* /37: TRANSFER PARAMETERS P* /38: SET STATUS P* ┆
0x59e…5ee 00 ec 00 06 00 50 2a 20 00 0c 00 f6 00 1e 00 50 2a 5c 43 4f 4e 53 54 41 4e 54 53 20 41 4e 44 20 57 4f 52 4b 20 41 52 45 41 53 00 0c 01 00 00 06 00 50 2a 20 00 0c 01 22 00 06 00 50 2a 20 00 0c 01 2c 00 26 00 50 44 43 4f 4e 4f 46 5c 44 41 54 ┆ P* P* CONSTANTS AND WORK AREAS P* " P* , & PDCONOF DAT┆
0x5ee…63e 41 5c 30 5c 4f 4e 2d 20 2f 20 4f 46 46 4c 49 4e 45 53 57 49 54 43 48 20 00 0c 01 36 00 2a 00 50 44 43 53 54 4f 4c 5c 44 41 54 41 5c 30 5c 4f 4c 44 20 44 43 20 45 51 55 49 50 4d 45 4e 54 20 53 54 41 54 55 53 20 00 0c 01 60 00 20 00 50 44 43 ┆A 0 ON- / OFFLINESWITCH 6 * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS ` PDC┆