DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦7ece31509⟧ 

    Length: 1468 (0x5bc)
    Notes: pts_type(SC)
    Names: »PFTAB.SC«

Derivation

└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
    └─⟦this⟧ »BDKMON/PFTAB.SC«

PTS(SC)

	IDENT  PFTAB 	REL=7.2  DATE=77-09-09 
* 
* 
* 
* POWER FAIL TABLE
* 
* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED 
* AFTER MASTER CLEAR
* 
* 
	ENTRY	PFTAB	TABLE ENTRY
* 
* 
	EXTRN	SOPR	SOP. PANEL
	EXTRN	DC15ON	DATA COMMUNICATION
	EXTRN	CHLTON	LOCAL/REMOTE TERMINALS
	EXTRN	DC81ON 
	EXTRN	FDON 
PFTAB	DATA	PFTABE-*	TABLE LENGTH
	DATA	DC81ON
	DATA	SOPR
	DATA	DC15ON
	DATA	CHLTON
	DATA	FDON
* 
PFTABE	EQU	*	END OF TABLE 
* 
* 
	END

HexDump

0x000…02e (0, 0, 398) Head {h00=0x002a, h01=0x0050, text=» IDENT  PFTAB  REL=7.2  DATE=77-09-09 «, t00=0x0000, t01=0x0004}
0x02e…038             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0032}
0x038…042             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x003c}
0x042…04c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0046}
0x04c…066             Head {h00=0x0016, h01=0x0050, text=»* POWER FAIL TABLE«, t00=0x0000, t01=0x0050}
0x066…070             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x006a}
0x070…0b8             Head {h00=0x0044, h01=0x0050, text=»* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED «, t00=0x0000, t01=0x0074}
0x0b8…0d4             Head {h00=0x0018, h01=0x0050, text=»* AFTER MASTER CLEAR«, t00=0x0000, t01=0x00bc}
0x0d4…0de             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d8}
0x0de…0e8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e2}
0x0e8…108             Head {h00=0x001c, h01=0x0050, text=» ENTRY PFTAB TABLE ENTRY«, t00=0x0000, t01=0x00ec}
0x108…112             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x112…11c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x11c…13a             Head {h00=0x001a, h01=0x0050, text=» EXTRN SOPR SOP. PANEL«, t00=0x0000, t01=0x0120}
0x13a…162             Head {h00=0x0024, h01=0x0050, text=» EXTRN DC15ON DATA COMMUNICATION«, t00=0x0000, t01=0x013e}
0x162…18e             Head {h00=0x0028, h01=0x0050, text=» EXTRN CHLTON LOCAL/REMOTE TERMINALS«, t00=0x0000, t01=0x0166}
0x18e…1a4 (1, 2, 262) Head {h00=0x0012, h01=0x0050, text=» EXTRN DC81ON «, t00=0x0001, t01=0x0004}
0x1a4…1b8             Head {h00=0x0010, h01=0x0050, text=» EXTRN FDON «, t00=0x0001, t01=0x001a}
0x1b8…1e0             Head {h00=0x0024, h01=0x0050, text=»PFTAB DATA PFTABE-* TABLE LENGTH«, t00=0x0001, t01=0x002e}
0x1e0…1f4             Head {h00=0x0010, h01=0x0050, text=» DATA DC81ON«, t00=0x0001, t01=0x0056}
0x1f4…206             Head {h00=0x000e, h01=0x0050, text=» DATA SOPR«, t00=0x0001, t01=0x006a}
0x206…21a             Head {h00=0x0010, h01=0x0050, text=» DATA DC15ON«, t00=0x0001, t01=0x007c}
0x21a…22e             Head {h00=0x0010, h01=0x0050, text=» DATA CHLTON«, t00=0x0001, t01=0x0090}
0x22e…240             Head {h00=0x000e, h01=0x0050, text=» DATA FDON«, t00=0x0001, t01=0x00a4}
0x240…24a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b6}
0x24a…26c             Head {h00=0x001e, h01=0x0050, text=»PFTABE EQU * END OF TABLE «, t00=0x0001, t01=0x00c0}
0x26c…276             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e2}
0x276…280             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ec}
0x280…28c             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0001, t01=0x00f6}
0x28c…290             Head {h00=0x4004, h01=0x0000}
0x290…294             00 01 01 02                                                                                                                                                                                                                                       ┆    ┆
0x294…29c (2, 1, 8)   20 04 00 00 00 02 00 04                                                                                                                                                                                                                           ┆        ┆
0x29c…2ec (3, 0, 400) 00 0e 00 50 5c 52 46 5c 54 52 54 31 30 30 00 73 00 04 00 10 00 50 54 52 54 30 37 30 5c 45 51 55 5c 2a 00 73 00 16 00 08 00 50 5c 58 49 46 00 73 00 2a 00 04 00 50 00 73 00 36 00 0e 00 50 5c 4c 44 4b 5c 41 33 2c 32 20 00 73 00 3e 00 10 00 50   ┆   P RF TRT100 s     PTRT070 EQU * s     P XIF s *   P s 6   P LDK A3,2  s >   P┆
0x2ec…33c             54 52 54 31 30 30 5c 45 51 55 5c 2a 00 73 00 50 00 20 00 50 5c 4c 43 52 5c 41 32 2c 41 34 5c 47 45 54 20 4f 4e 45 20 43 48 41 52 41 43 54 45 52 00 73 00 64 00 20 00 50 5c 41 44 4b 5c 41 34 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 50 4f 49 4e   ┆TRT100 EQU * s P   P LCR A2,A4 GET ONE CHARACTER s d   P ADK A4,1 INCREMENT POIN┆
0x33c…38c             54 45 52 20 00 73 00 88 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 37 46 20 00 73 00 ac 00 10 00 50 5c 49 46 54 5c 52 43 4f 4d 3d 31 20 00 73 00 c0 00 26 00 50 5c 4c 44 5c 41 31 2c 58 52 42 5c 52 45 41 44 20 42 55 46 46 45 52 20 43 4f 4d 4d 41   ┆TER  s     P ANK A2,/7F  s     P IFT RCOM=1  s   & P LD A1,XRB READ BUFFER COMMA┆
0x38c…3dc             4e 44 20 3f 3f 3f 00 73 00 d4 00 16 00 50 5c 52 46 28 5a 29 5c 54 52 54 31 30 35 5c 4e 4f 21 21 00 73 00 fe 00 04 00 50 00 73 01 18 00 40 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   ┆ND ??? s     P RF(Z) TRT105 NO!! s     P s   @ P********************************┆
0x3dc…42c             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 73 01 20 00 06 00 50 2a 20 00 73 01 64 00 2c 00 50 2a 20 20 20 43 48 45 43 4b 20 49 46 20 41 54 54 52 49 42 55 54 45 20 43 48 41 52 41 43 54 45 52 20 4f   ┆**************************** s     P*  s d , P*   CHECK IF ATTRIBUTE CHARACTER O┆
0x42c…47c (4, 0, 400) 52 20 4e 55 4c 4c 00 73 01 6e 00 06 00 50 2a 20 00 74 00 0e 00 34 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 2a 2a 20 00 74 00 18 00 04 00 50   ┆R NULL s n   P*  t   4 P***********************************************  t     P┆
0x47c…4cc             00 74 00 50 00 26 00 50 5c 43 57 4b 5c 41 32 2c 58 27 32 30 27 5c 41 54 54 52 49 42 55 54 45 20 43 48 41 52 41 43 54 45 52 20 00 74 00 58 00 18 00 50 5c 52 46 28 4c 29 5c 54 52 54 31 30 31 5c 59 45 53 21 21 21 00 74 00 82 00 08 00 50 5c 58   ┆ t P & P CWK A2,X'20' ATTRIBUTE CHARACTER  t X   P RF(L) TRT101 YES!!! t     P X┆
0x4cc…51c             49 46 00 74 00 9e 00 10 00 50 5c 49 46 54 5c 44 4d 52 4b 3d 31 20 00 74 00 aa 00 1c 00 50 5c 43 57 4b 5c 41 32 2c 2f 37 45 5c 4c 49 4e 45 20 46 45 45 44 20 3f 20 00 74 00 be 00 22 00 50 5c 52 46 28 4e 45 29 5c 54 52 54 31 30 32 5c 4e 4f 2c   ┆IF t     P IFT DMRK=1  t     P CWK A2,/7E LINE FEED ?  t   " P RF(NE) TRT102 NO,┆
0x51c…56c             47 4f 20 54 4f 20 54 52 54 31 30 32 00 74 00 de 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 2f 30 41 20 00 74 01 04 00 10 00 50 54 52 54 31 30 32 5c 45 51 55 5c 2a 00 74 01 18 00 20 00 50 5c 43 57 4b 5c 41 32 2c 2f 37 44 5c 45 4e 44 20 4f 46 20 4d   ┆GO TO TRT102 t     P LDK A2,/0A  t     PTRT102 EQU * t     P CWK A2,/7D END OF M┆
0x56c…5bc             45 53 53 41 47 45 20 3f 00 74 01 2c 00 22 00 50 5c 52 46 28 4e 45 29 5c 54 52 54 31 30 33 5c 4e 4f 2c 47 4f 20 54 4f 20 54 52 54 31 30 33 00 74 01 50 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 2f 31 39 20 00 74 01 76 00 10 00 50 54 52 54 31 30 33   ┆ESSAGE ? t , " P RF(NE) TRT103 NO,GO TO TRT103 t P   P LDK A2,/19  t v   PTRT103┆

Reduced view