|
|
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: 1506 (0x5e2)
Notes: pts_type(SC)
Names: »DW1501.SC«
└─⟦726a6c4ca⟧ Bits:30009685 Philips computer tape "600309"
└─⟦this⟧ »M:PTB/DW1501.SC«
IDENT DW1501 REL 9.2 79-11-16 870105040920 * * DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 * ENTRY DW1501 TABLE ENTRY EXTRN DC15AD POINTER TO ADDRESS-BLOCK * MMUPAG EQU 0 * DW1501 EQU * TABLE ENTRY DATA 0 CHANNEL PARAMETER DATA /8000 STATUS./8000 MEANS DEVICE READY DATA 0 ECB-ADDRESS DATA DWTEND-DW1501 RIGHT BYTE=ORDER DATA DC15AD POINTER TO ADDRESS-BLOCK DATA 'DC' TTAB-ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE * IFT MMUPAG=1 DATA 0 USER ECB ADDRESS DATA DC:ECB MMU ECB ADDRESS XIF * DATA 0 TIMER POINTER DATA 0 WRITE QUEUE DATA 0 STATUS QUEUE DATA 0 RECEIVE QUEUE DATA 0 BUFFER ADDRESS DATA 0 CURSOR ADDRESS DATA 0 REQUEST TIMEOUT VALUE * IFT MMUPAG=1 DC:ECB EQU * MMU ECB DATA 0,0,0,0,0,0 XIF * DWTEND EQU * END
0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DW1501 REL 9.2 79-11-16 870105040920 «, 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…086 Head {h00=0x003a, h01=0x0050, text=»* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 «, t00=0x0000, t01=0x004c}
0x086…090 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008a}
0x090…0b2 Head {h00=0x001e, h01=0x0050, text=» ENTRY DW1501 TABLE ENTRY «, t00=0x0000, t01=0x0094}
0x0b2…0e0 Head {h00=0x002a, h01=0x0050, text=» EXTRN DC15AD POINTER TO ADDRESS-BLOCK«, t00=0x0000, t01=0x00b6}
0x0e0…0ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e4}
0x0ea…0fe Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0000, t01=0x00ee}
0x0fe…108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0102}
0x108…128 Head {h00=0x001c, h01=0x0050, text=»DW1501 EQU * TABLE ENTRY«, t00=0x0000, t01=0x010c}
0x128…14a Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0000, t01=0x012c}
0x14a…17e Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0000, t01=0x014e}
0x17e…19a Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0000, t01=0x0182}
0x19a…1b6 Head {h00=0x0018, h01=0x0050, text=» DATA DWTEND-DW1501 «, t00=0x0001, t01=0x000e}
0x1b6…1d2 Head {h00=0x0018, h01=0x0050, text=» RIGHT BYTE=ORDER «, t00=0x0001, t01=0x002a}
0x1d2…200 Head {h00=0x002a, h01=0x0050, text=» DATA DC15AD POINTER TO ADDRESS-BLOCK «, t00=0x0001, t01=0x0046}
0x200…220 Head {h00=0x001c, h01=0x0050, text=» DATA 'DC' TTAB-ADDRESS «, t00=0x0001, t01=0x0074}
0x220…248 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0001, t01=0x0094}
0x248…266 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0001, t01=0x00bc}
0x266…270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x270…286 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0001, t01=0x00e4}
0x286…2a6 Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x0001, t01=0x00fa}
0x2a6…2ca Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x0001, t01=0x011a}
0x2ca…2d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0001, t01=0x013e}
0x2d6…2e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x2e0…2fe Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0001, t01=0x0154}
0x2fe…31a Head {h00=0x0018, h01=0x0050, text=» DATA 0 WRITE QUEUE «, t00=0x0001, t01=0x0172}
0x31a…336 Head {h00=0x0018, h01=0x0050, text=» DATA 0 STATUS QUEUE«, t00=0x0001, t01=0x018e}
0x336…354 Head {h00=0x001a, h01=0x0050, text=» DATA 0 RECEIVE QUEUE «, t00=0x0002, t01=0x001a}
0x354…372 Head {h00=0x001a, h01=0x0050, text=» DATA 0 BUFFER ADDRESS«, t00=0x0002, t01=0x0038}
0x372…390 Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0002, t01=0x0056}
0x390…3b6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x0002, t01=0x0074}
0x3b6…3c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x009a}
0x3c0…3d6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0002, t01=0x00a4}
0x3d6…3f2 Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x0002, t01=0x00ba}
0x3f2…40c Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x0002, t01=0x00d6}
0x40c…418 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0002, t01=0x00f0}
0x418…422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fc}
0x422…436 Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0002, t01=0x0106}
0x436…442 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0002, t01=0x011a}
0x442…446 Head {h00=0x4004, h01=0x0000}
0x446…44a 00 02 01 26 ┆ &┆
0x44a…452 (3, 1, 8) 20 04 00 00 00 03 00 04 ┆ ┆
0x452…4a2 (4, 0, 400) 50 42 4c 4b 3d 32 00 63 01 82 00 10 00 50 5c 43 41 4c 4c 5c 53 48 49 46 54 20 00 64 00 0e 00 20 00 50 54 57 53 57 33 30 5c 52 46 28 5a 29 5c 54 41 52 5a 41 4e 5c 41 4c 4c 20 44 4f 4e 45 00 64 00 22 00 10 00 50 5c 43 41 4c 4c 5c 47 45 54 57 ┆PBLK=2 c P CALL SHIFT d PTWSW30 RF(Z) TARZAN ALL DONE d " P CALL GETW┆
0x4a2…4f2 42 20 00 64 00 46 00 1e 00 50 5c 43 41 4c 4c 5c 4d 4f 56 57 42 5c 52 45 53 45 52 56 45 20 53 50 41 43 45 20 00 64 00 5a 00 28 00 50 5c 53 54 5c 41 32 2c 4e 45 57 41 44 32 2c 41 31 33 5c 53 41 56 45 20 57 2e 42 2e 2d 41 44 44 52 45 53 53 20 ┆B d F P CALL MOVWB RESERVE SPACE d Z ( P ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS ┆
0x4f2…542 00 64 00 7c 00 26 00 50 5c 43 41 4c 4c 5c 4d 4f 56 44 57 42 5c 43 48 41 4e 47 45 20 44 57 42 2d 20 41 44 44 52 45 53 53 45 53 00 64 00 a8 00 10 00 50 5c 43 41 4c 4c 5c 53 4b 49 46 54 41 00 64 00 d2 00 0e 00 50 5c 52 42 5c 54 57 53 57 33 30 ┆ d | & P CALL MOVDWB CHANGE DWB- ADDRESSES d P CALL SKIFTA d P RB TWSW30┆
0x542…592 00 64 00 e6 00 10 00 50 54 41 52 5a 41 4e 5c 45 51 55 5c 2a 00 64 00 f8 00 08 00 50 5c 58 49 46 00 64 01 0c 00 12 00 50 5c 49 46 54 5c 43 52 45 44 49 54 3d 31 20 00 64 01 18 00 20 00 50 5c 4c 44 5c 41 37 2c 53 41 56 45 30 34 2c 41 31 33 5c ┆ d PTARZAN EQU * d P XIF d P IFT CREDIT=1 d P LD A7,SAVE04,A13 ┆
0x592…5e2 52 45 53 54 4f 52 45 20 41 37 00 64 01 2e 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 64 01 52 00 0a 00 50 5c 45 4a 45 43 54 00 64 01 62 00 04 00 50 00 64 01 70 00 04 00 50 00 64 01 78 00 34 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RESTORE A7 d . P RTN A14 d R P EJECT d b P d p P d x 4 P** ┆