|
|
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: 3648 (0xe40)
Notes: pts_type(SC)
Names: »SCLASS.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »M:TU10/SCLASS.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »M:TU10/SCLASS.SC«
IDENT SCLASS REL 10.0 80-03-14 870105041000
*
*
ENTRY SCLASS
*
*
EXTRN DWTC01
EXTRN DWSI01
EXTRN DWSO01
EXTRN DWTC02
EXTRN DWLP01
EXTRN DWDM01
EXTRN DWDU01
EXTRN DWFD01
*
*
*
*
SCLASS DATA TCLASE-*
DATA TC00
DATA TC01
DATA TC02
DATA TC03
DATA TC04
DATA TC05
DATA TC06
TCLASE EQU *
TC00 DATA TC00E-*
DATA /0012
DATA DWTC01
DATA /0010
DATA DWSI01
DATA /0011
DATA DWSO01
TC00E EQU *
TC01 DATA TC01E-*
DATA /0013
DATA DWTC02
TC01E EQU *
TC02 DATA TC02E-*
DATA /0080
DATA DWLP01
TC02E EQU *
TC03 DATA TC03E-*
DATA /00C0
DATA DWDM01
TC03E EQU *
TC04 DATA TC04E-*
DATA /00C1
DATA DWDM01
TC04E EQU *
TC05 DATA TC05E-*
DATA /00C2
DATA DWDM01
TC05E EQU *
TC06 DATA TC06E-*
DATA /02F2
DATA DWDU01
DATA /03F3
DATA DWDU01
DATA /00F0
DATA DWDU01
DATA /01F1
DATA DWDU01
DATA /00F8
DATA DWFD01
DATA /01F9
DATA DWFD01
DATA /02FA
DATA DWFD01
DATA /03FB
DATA DWFD01
TC06E EQU *
END
0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT SCLASS REL 10.0 80-03-14 870105041000 «, 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…052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004c}
0x052…068 Head {h00=0x0012, h01=0x0050, text=» ENTRY SCLASS «, t00=0x0000, t01=0x0056}
0x068…072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x006c}
0x072…07c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0076}
0x07c…09c Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTC01«, t00=0x0000, t01=0x0080}
0x09c…0bc Head {h00=0x001c, h01=0x0050, text=» EXTRN DWSI01«, t00=0x0000, t01=0x00a0}
0x0bc…0dc Head {h00=0x001c, h01=0x0050, text=» EXTRN DWSO01«, t00=0x0000, t01=0x00c0}
0x0dc…0fc Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTC02«, t00=0x0000, t01=0x00e0}
0x0fc…11c Head {h00=0x001c, h01=0x0050, text=» EXTRN DWLP01«, t00=0x0000, t01=0x0100}
0x11c…13c Head {h00=0x001c, h01=0x0050, text=» EXTRN DWDM01«, t00=0x0000, t01=0x0120}
0x13c…15c Head {h00=0x001c, h01=0x0050, text=» EXTRN DWDU01«, t00=0x0000, t01=0x0140}
0x15c…17c Head {h00=0x001c, h01=0x0050, text=» EXTRN DWFD01«, t00=0x0000, t01=0x0160}
0x17c…186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x186…190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018a}
0x190…19a (1, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0004}
0x19a…1a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x1a4…1c0 Head {h00=0x0018, h01=0x0050, text=»SCLASS DATA TCLASE-*«, t00=0x0001, t01=0x0018}
0x1c0…1de Head {h00=0x001a, h01=0x0050, text=» DATA TC00«, t00=0x0001, t01=0x0034}
0x1de…1fc Head {h00=0x001a, h01=0x0050, text=» DATA TC01«, t00=0x0001, t01=0x0052}
0x1fc…21a Head {h00=0x001a, h01=0x0050, text=» DATA TC02«, t00=0x0001, t01=0x0070}
0x21a…238 Head {h00=0x001a, h01=0x0050, text=» DATA TC03«, t00=0x0001, t01=0x008e}
0x238…256 Head {h00=0x001a, h01=0x0050, text=» DATA TC04«, t00=0x0001, t01=0x00ac}
0x256…274 Head {h00=0x001a, h01=0x0050, text=» DATA TC05«, t00=0x0001, t01=0x00ca}
0x274…292 Head {h00=0x001a, h01=0x0050, text=» DATA TC06«, t00=0x0001, t01=0x00e8}
0x292…2a6 Head {h00=0x0010, h01=0x0050, text=»TCLASE EQU *«, t00=0x0001, t01=0x0106}
0x2a6…2c8 Head {h00=0x001e, h01=0x0050, text=»TC00 DATA TC00E-* «, t00=0x0001, t01=0x011a}
0x2c8…2e8 Head {h00=0x001c, h01=0x0050, text=» DATA /0012 «, t00=0x0001, t01=0x013c}
0x2e8…308 Head {h00=0x001c, h01=0x0050, text=» DATA DWTC01«, t00=0x0001, t01=0x015c}
0x308…328 Head {h00=0x001c, h01=0x0050, text=» DATA /0010 «, t00=0x0001, t01=0x017c}
0x328…348 Head {h00=0x001c, h01=0x0050, text=» DATA DWSI01«, t00=0x0002, t01=0x000c}
0x348…368 Head {h00=0x001c, h01=0x0050, text=» DATA /0011 «, t00=0x0002, t01=0x002c}
0x368…388 Head {h00=0x001c, h01=0x0050, text=» DATA DWSO01«, t00=0x0002, t01=0x004c}
0x388…3a4 Head {h00=0x0018, h01=0x0050, text=»TC00E EQU * «, t00=0x0002, t01=0x006c}
0x3a4…3c6 Head {h00=0x001e, h01=0x0050, text=»TC01 DATA TC01E-* «, t00=0x0002, t01=0x0088}
0x3c6…3e6 Head {h00=0x001c, h01=0x0050, text=» DATA /0013 «, t00=0x0002, t01=0x00aa}
0x3e6…406 Head {h00=0x001c, h01=0x0050, text=» DATA DWTC02«, t00=0x0002, t01=0x00ca}
0x406…422 Head {h00=0x0018, h01=0x0050, text=»TC01E EQU * «, t00=0x0002, t01=0x00ea}
0x422…444 Head {h00=0x001e, h01=0x0050, text=»TC02 DATA TC02E-* «, t00=0x0002, t01=0x0106}
0x444…464 Head {h00=0x001c, h01=0x0050, text=» DATA /0080 «, t00=0x0002, t01=0x0128}
0x464…484 Head {h00=0x001c, h01=0x0050, text=» DATA DWLP01«, t00=0x0002, t01=0x0148}
0x484…4a0 Head {h00=0x0018, h01=0x0050, text=»TC02E EQU * «, t00=0x0002, t01=0x0168}
0x4a0…4c2 Head {h00=0x001e, h01=0x0050, text=»TC03 DATA TC03E-* «, t00=0x0002, t01=0x0184}
0x4c2…4e2 Head {h00=0x001c, h01=0x0050, text=» DATA /00C0 «, t00=0x0003, t01=0x0016}
0x4e2…502 Head {h00=0x001c, h01=0x0050, text=» DATA DWDM01«, t00=0x0003, t01=0x0036}
0x502…51e Head {h00=0x0018, h01=0x0050, text=»TC03E EQU * «, t00=0x0003, t01=0x0056}
0x51e…540 Head {h00=0x001e, h01=0x0050, text=»TC04 DATA TC04E-* «, t00=0x0003, t01=0x0072}
0x540…560 Head {h00=0x001c, h01=0x0050, text=» DATA /00C1 «, t00=0x0003, t01=0x0094}
0x560…580 Head {h00=0x001c, h01=0x0050, text=» DATA DWDM01«, t00=0x0003, t01=0x00b4}
0x580…59c Head {h00=0x0018, h01=0x0050, text=»TC04E EQU * «, t00=0x0003, t01=0x00d4}
0x59c…5be Head {h00=0x001e, h01=0x0050, text=»TC05 DATA TC05E-* «, t00=0x0003, t01=0x00f0}
0x5be…5de Head {h00=0x001c, h01=0x0050, text=» DATA /00C2 «, t00=0x0003, t01=0x0112}
0x5de…5fe Head {h00=0x001c, h01=0x0050, text=» DATA DWDM01«, t00=0x0003, t01=0x0132}
0x5fe…61a Head {h00=0x0018, h01=0x0050, text=»TC05E EQU * «, t00=0x0003, t01=0x0152}
0x61a…63c Head {h00=0x001e, h01=0x0050, text=»TC06 DATA TC06E-* «, t00=0x0003, t01=0x016e}
0x63c…65c Head {h00=0x001c, h01=0x0050, text=» DATA /02F2 «, t00=0x0003, t01=0x0190}
0x65c…672 Head {h00=0x0012, h01=0x0050, text=» DATA DWDU01 «, t00=0x0004, t01=0x0020}
0x672…692 Head {h00=0x001c, h01=0x0050, text=» DATA /03F3 «, t00=0x0004, t01=0x0036}
0x692…6a8 Head {h00=0x0012, h01=0x0050, text=» DATA DWDU01 «, t00=0x0004, t01=0x0056}
0x6a8…6c8 Head {h00=0x001c, h01=0x0050, text=» DATA /00F0 «, t00=0x0004, t01=0x006c}
0x6c8…6de Head {h00=0x0012, h01=0x0050, text=» DATA DWDU01 «, t00=0x0004, t01=0x008c}
0x6de…6fe Head {h00=0x001c, h01=0x0050, text=» DATA /01F1 «, t00=0x0004, t01=0x00a2}
0x6fe…714 Head {h00=0x0012, h01=0x0050, text=» DATA DWDU01 «, t00=0x0004, t01=0x00c2}
0x714…734 Head {h00=0x001c, h01=0x0050, text=» DATA /00F8 «, t00=0x0004, t01=0x00d8}
0x734…74a Head {h00=0x0012, h01=0x0050, text=» DATA DWFD01 «, t00=0x0004, t01=0x00f8}
0x74a…76a Head {h00=0x001c, h01=0x0050, text=» DATA /01F9 «, t00=0x0004, t01=0x010e}
0x76a…780 Head {h00=0x0012, h01=0x0050, text=» DATA DWFD01 «, t00=0x0004, t01=0x012e}
0x780…7a0 Head {h00=0x001c, h01=0x0050, text=» DATA /02FA «, t00=0x0004, t01=0x0144}
0x7a0…7b6 Head {h00=0x0012, h01=0x0050, text=» DATA DWFD01 «, t00=0x0004, t01=0x0164}
0x7b6…7d6 Head {h00=0x001c, h01=0x0050, text=» DATA /03FB «, t00=0x0004, t01=0x017a}
0x7d6…7ec Head {h00=0x0012, h01=0x0050, text=» DATA DWFD01 «, t00=0x0005, t01=0x000a}
0x7ec…808 Head {h00=0x0018, h01=0x0050, text=»TC06E EQU * «, t00=0x0005, t01=0x0020}
0x808…814 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0005, t01=0x003c}
0x814…818 Head {h00=0x4004, h01=0x0000}
0x818…81c 00 05 00 48 ┆ H┆
0x81c…824 (6, 1, 8) 20 04 00 00 00 06 00 04 ┆ ┆
0x824…826 (7, 0, 2) 2f b0 ┆/ ┆
0x826…876 (8, 2, 354) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 54 43 4c 41 53 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 31 30 2e 30 20 38 30 2d 30 33 2d 31 34 20 38 37 30 31 30 35 30 34 31 30 30 30 00 00 00 04 00 0e ┆ J F IDENT TCLASS REL 10.0 80-03-14 870105041000 ┆
0x876…8c6 00 0a 01 04 c4 54 43 4c 41 53 53 4b 00 00 00 52 00 10 00 0c 05 05 dc 54 43 4c 41 53 53 4b 00 00 00 00 00 64 00 0e 00 0a 02 04 c2 44 56 4b 42 30 30 00 00 00 00 78 00 0e 00 0a 02 04 c2 44 56 44 59 30 30 c4 00 00 00 8a 00 0e 00 0a 02 04 c2 44 ┆ TCLASSK R TCLASSK d DVKB00 x DVDY00 D┆
0x8c6…916 56 4b 42 30 31 00 00 00 00 9c 00 2c 00 28 03 13 00 00 00 01 02 44 00 00 00 00 00 00 00 00 00 00 00 20 00 00 00 02 00 30 00 00 00 04 00 00 00 20 00 00 00 06 00 20 00 00 00 ae 00 0e 00 0a 02 04 c2 44 56 44 59 30 31 ff 00 00 00 de 00 0e 00 0a ┆VKB01 , ( D 0 DVDY01 ┆
0x916…966 02 04 c2 44 56 47 50 30 32 d3 00 00 00 f0 00 1e 00 1a 03 0c 00 00 00 1b 91 00 00 00 00 06 00 30 00 00 00 08 00 00 00 80 00 00 00 0a 00 00 01 02 00 24 00 20 04 0f 70 00 00 01 00 08 00 03 00 08 00 05 00 12 00 07 00 20 00 09 00 0a 00 13 00 0e ┆ DVGP02 0 $ p ┆
0x966…988 00 21 00 06 00 00 01 24 00 0e 00 0a 07 04 00 00 00 00 00 26 00 00 00 00 01 4c 40 04 00 00 00 00 01 5e ┆ ! $ & L@ ^┆
0x988…990 (9, 1, 8) 20 04 00 00 00 01 00 04 ┆ ┆
0x990…9e0 (10, 0, 400) 00 59 01 8c 00 28 00 50 5c 43 46 5c 41 31 35 2c 46 4e 44 44 57 44 5c 46 49 4e 44 20 44 49 53 43 20 44 57 54 20 41 44 44 52 45 53 53 00 5a 00 08 00 08 00 50 5c 45 4e 42 00 5a 00 34 00 06 00 50 2a 20 00 5a 00 40 00 10 00 50 46 4e 41 4d 30 35 ┆ Y ( P CF A15,FNDDWD FIND DISC DWT ADDRESS Z P ENB Z 4 P* Z @ PFNAM05┆
0x9e0…a30 5c 45 51 55 5c 2a 00 5a 00 4a 00 14 00 50 5c 4c 44 5c 41 34 2c 44 57 54 53 54 2c 41 36 20 00 5a 00 5e 00 0e 00 50 5c 41 4e 4b 5c 41 34 2c 31 20 00 5a 00 76 00 34 00 50 5c 52 46 28 4e 5a 29 5c 46 4e 41 4d 31 30 5c 50 4f 57 45 52 20 4f 4e 20 ┆ EQU * Z J P LD A4,DWTST,A6 Z ^ P ANK A4,1 Z v 4 P RF(NZ) FNAM10 POWER ON ┆
0xa30…a80 43 4f 4d 50 4c 45 54 45 44 20 46 4f 52 20 54 48 49 53 20 44 49 53 43 20 00 5a 00 88 00 08 00 50 5c 4c 4b 4d 00 5a 00 c0 00 18 00 50 5c 44 41 54 41 5c 30 5c 53 57 49 54 43 48 20 54 41 53 4b 53 00 5a 00 cc 00 20 00 50 5c 52 42 5c 46 4e 41 4d ┆COMPLETED FOR THIS DISC Z P LKM Z P DATA 0 SWITCH TASKS Z P RB FNAM┆
0xa80…ad0 30 35 5c 43 48 45 43 4b 20 44 49 53 43 20 41 47 41 49 4e 20 00 5a 00 e8 00 06 00 50 2a 20 00 5a 01 0c 00 10 00 50 46 4e 41 4d 31 30 5c 45 51 55 5c 2a 00 5a 01 16 00 26 00 50 5c 41 44 4b 5c 41 36 2c 36 5c 4e 45 58 54 20 56 4f 4c 55 4d 45 20 ┆05 CHECK DISC AGAIN Z P* Z PFNAM10 EQU * Z & P ADK A6,6 NEXT VOLUME ┆
0xad0…b20 4e 41 4d 45 20 49 4e 20 44 57 54 20 00 5a 01 2a 00 1e 00 50 5c 53 55 4b 5c 41 32 2c 31 5c 44 45 43 52 45 4d 45 4e 54 20 49 4e 44 45 58 20 00 5a 01 54 00 12 00 50 5c 52 42 28 4e 4e 29 5c 46 4e 41 4d 31 30 00 5a 01 76 00 0e 00 50 5c 4c 44 4b ┆NAME IN DWT Z * P SUK A2,1 DECREMENT INDEX Z T P RB(NN) FNAM10 Z v P LDK┆
0xb20…b70 (11, 0, 400) 5c 41 32 2c 36 20 00 5a 01 8c 00 16 00 50 5c 41 44 4b 4c 5c 41 36 2c 44 57 54 56 4f 4c 2d 36 20 00 5b 00 0e 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 5b 00 28 00 06 00 50 2a 20 00 5b 00 38 00 14 00 50 5c 45 4a 45 43 54 5c 5c 5c 46 4d 54 41 53 ┆ A2,6 Z P ADKL A6,DWTVOL-6 [ P RTN A14 [ ( P* [ 8 P EJECT FMTAS┆
0xb70…bc0 4b 20 00 5b 00 42 00 06 00 50 2a 20 00 5b 00 5a 00 06 00 50 2a 20 00 5b 00 64 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 5b 00 6e 00 0e 00 50 2a 20 46 4e 44 56 4f 4c 20 2a 00 5b 00 80 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 5b 00 92 ┆K [ B P* [ Z P* [ d P********** [ n P* FNDVOL * [ P********** [ ┆
0xbc0…c10 00 06 00 50 2a 20 00 5b 00 a4 00 06 00 50 2a 20 00 5b 00 ae 00 26 00 50 2a 20 20 20 46 4e 44 56 4f 4c 20 53 45 41 52 43 48 45 53 20 54 48 45 20 52 45 51 55 45 53 54 45 44 20 00 5b 00 b8 00 24 00 50 2a 20 20 20 56 4f 4c 55 4d 45 20 53 50 45 ┆ P* [ P* [ & P* FNDVOL SEARCHES THE REQUESTED [ $ P* VOLUME SPE┆
0xc10…c60 43 49 46 49 45 44 20 49 4e 20 54 48 45 20 46 50 42 2e 00 5b 00 e2 00 06 00 50 2a 20 00 5b 01 0a 00 34 00 50 2a 20 20 20 49 4e 50 55 54 3a 20 20 41 37 20 3d 20 56 4f 4c 55 4d 45 20 4e 41 4d 45 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 20 49 4e ┆CIFIED IN THE FPB. [ P* [ 4 P* INPUT: A7 = VOLUME NAME DISPLACEMENT IN┆
0xc60…cb0 20 46 50 42 00 5b 01 14 00 20 00 50 2a 20 20 20 20 20 20 20 20 20 20 41 31 30 20 3d 20 46 50 42 20 41 44 44 52 45 53 53 00 5b 01 4c 00 06 00 50 2a 20 00 5b 01 70 00 32 00 50 2a 20 20 20 4f 55 54 50 55 54 3a 20 41 32 20 3d 20 44 49 53 43 20 ┆ FPB [ P* A10 = FPB ADDRESS [ L P* [ p 2 P* OUTPUT: A2 = DISC ┆
0xcb0…d00 (12, 0, 400) 46 49 4c 45 20 43 4f 44 45 20 49 46 20 46 4f 55 4e 44 2c 20 45 4c 53 45 00 5b 01 7a 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3d 20 30 20 49 46 20 56 4f 4c 55 4d 45 20 4e 4f 54 20 46 4f 55 4e 44 00 5c 00 20 00 26 00 50 2a 5c ┆FILE CODE IF FOUND, ELSE [ z * P* = 0 IF VOLUME NOT FOUND & P* ┆
0xd00…d50 20 20 20 41 31 2c 20 41 33 2d 41 34 2c 20 41 31 32 20 41 52 45 20 44 45 53 54 52 4f 59 45 44 20 00 5c 00 4e 00 06 00 50 2a 20 00 5c 00 78 00 28 00 50 46 4e 44 56 4f 4c 5c 45 51 55 5c 2a 5c 46 49 4e 44 20 56 4f 4c 55 4d 45 20 28 46 49 4c 45 ┆ A1, A3-A4, A12 ARE DESTROYED N P* x ( PFNDVOL EQU * FIND VOLUME (FILE┆
0xd50…da0 20 43 4f 44 45 29 00 5c 00 82 00 34 00 50 5c 4c 44 4b 4c 5c 41 31 2c 44 46 54 41 42 2d 31 5c 44 49 53 43 20 46 49 4c 45 20 43 4f 44 45 20 54 41 42 4c 45 20 41 44 44 52 45 53 53 2d 31 20 00 5c 00 ae 00 20 00 50 5c 4c 44 52 5c 41 31 32 2c 41 ┆ CODE) 4 P LDKL A1,DFTAB-1 DISC FILE CODE TABLE ADDRESS-1 P LDR A12,A┆
0xda0…df0 36 5c 53 41 56 45 20 46 57 54 20 41 44 44 52 45 53 53 00 5c 00 e6 00 06 00 50 2a 20 00 5c 01 0a 00 10 00 50 46 56 4f 4c 31 30 5c 45 51 55 5c 2a 00 5c 01 14 00 26 00 50 5c 41 44 4b 5c 41 31 2c 31 5c 50 4f 49 4e 54 20 54 4f 20 4e 45 58 54 20 ┆6 SAVE FWT ADDRESS P* PFVOL10 EQU * & P ADK A1,1 POINT TO NEXT ┆
0xdf0…e40 46 49 4c 45 20 43 4f 44 45 20 00 5c 01 28 00 28 00 50 5c 43 57 4b 5c 41 31 2c 44 46 54 41 42 45 5c 43 48 45 43 4b 20 49 46 20 45 4e 44 20 4f 46 20 44 46 54 41 42 00 5c 01 52 00 1e 00 50 5c 52 46 28 45 29 5c 46 56 4f 4c 33 30 5c 45 4e 44 20 ┆FILE CODE ( ( P CWK A1,DFTABE CHECK IF END OF DFTAB R P RF(E) FVOL30 END ┆