|
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: 4510 (0x119e)
Notes: pts_type(SC)
Names: »TCAPP.SC«
└─⟦2a21e4bb5⟧ Bits:30009691 Philips computer tape "600408"
└─⟦this⟧ »BDKAPP/TCAPP.SC«
IDENT TCAPP **************************************** * * T C A P P * * READS TRANSACTIONS FROM TC:S AND * WRITES THEM TO FRED. THE REPLIES * FROM FRED ARE SENT BACK TO THE TC * **************************************** EJECT ENTRY TCAPP EXTRN K:LR,K:LW,K:CCQ,K:RBCC EXTRN K:LINB,CCBUF EJECT * * READ MESSAGE FROM TC * TCAPP CF A14,K:LR * * WRITE MESSAGE TO FRED * AND READ REPLY * LDKL A1,K:LINB GET TC READ BUFFER ADR A1,A13 LD A2,-4,A1 AND LENGTH ADK A2,1 LDKL A3,CCBUF+4 AND FRED WRITE BUFFER ADR A3,A13 ST A2,-4,A3 STORE LENGTH LDR A4,A3 ADK A4,2 ADJUST FOR DRIVER INTERFACE ADK A1,1 TCAP10 LCR A5,A1 MOVE MESSAGE SCR A5,A4 ADK A1,1 ADK A4,1 SUK A2,1 RB(NZ) TCAP10 CF A14,K:CCQ EXCHANGE WITH FRED RB(NZ) TCAPP BAD REPLY EJECT * * WRITE REPLY TO TC * LDKL A2,K:LINB GET TC WRITE BUFFER ADR A2,A13 LD A3,-4,A1 GET LENGTH ADK A3,1 ST A3,-4,A2 AND STORE LDR A4,A2 ADK A4,1 ADJUST FOR STA TCAP20 LCR A5,A1 MOVE REPLY SCR A5,A4 ADK A1,1 ADK A4,1 SUK A3,1 RB(NZ) TCAP20 CF A14,K:RBCC RELEASE BUFFER CF A14,K:LW WRITE REPLY RB TCAPP END
0x0000…0014 (0, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IDENT TCAPP«, t00=0x0000, t01=0x0004}
0x0014…001c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0018}
0x001c…004c Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0000, t01=0x0020}
0x004c…0056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0050}
0x0056…006c Head {h00=0x0012, h01=0x0050, text=»* T C A P P «, t00=0x0000, t01=0x005a}
0x006c…0076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0070}
0x0076…00a2 Head {h00=0x0028, h01=0x0050, text=»* READS TRANSACTIONS FROM TC:S AND«, t00=0x0000, t01=0x007a}
0x00a2…00ce Head {h00=0x0028, h01=0x0050, text=»* WRITES THEM TO FRED. THE REPLIES«, t00=0x0000, t01=0x00a6}
0x00ce…00fc Head {h00=0x002a, h01=0x0050, text=»* FROM FRED ARE SENT BACK TO THE TC «, t00=0x0000, t01=0x00d2}
0x00fc…0106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x0106…0136 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0000, t01=0x010a}
0x0136…0144 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x013a}
0x0144…014c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0148}
0x014c…0154 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0150}
0x0154…0168 Head {h00=0x0010, h01=0x0050, text=» ENTRY TCAPP«, t00=0x0000, t01=0x0158}
0x0168…0170 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x016c}
0x0170…0196 Head {h00=0x0022, h01=0x0050, text=» EXTRN K:LR,K:LW,K:CCQ,K:RBCC «, t00=0x0000, t01=0x0174}
0x0196…01b2 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:LINB,CCBUF «, t00=0x0001, t01=0x000a}
0x01b2…01c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0026}
0x01c0…01c8 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0034}
0x01c8…01d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003c}
0x01d2…01f0 Head {h00=0x001a, h01=0x0050, text=»* READ MESSAGE FROM TC«, t00=0x0001, t01=0x0046}
0x01f0…01fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0064}
0x01fa…0202 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x006e}
0x0202…021c Head {h00=0x0016, h01=0x0050, text=»TCAPP CF A14,K:LR «, t00=0x0001, t01=0x0076}
0x021c…0224 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0090}
0x0224…022c Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0098}
0x022c…0236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a0}
0x0236…0256 Head {h00=0x001c, h01=0x0050, text=»* WRITE MESSAGE TO FRED «, t00=0x0001, t01=0x00aa}
0x0256…026e Head {h00=0x0014, h01=0x0050, text=»* AND READ REPLY«, t00=0x0001, t01=0x00ca}
0x026e…0278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e2}
0x0278…0280 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x00ec}
0x0280…02aa Head {h00=0x0026, h01=0x0050, text=» LDKL A1,K:LINB GET TC READ BUFFER«, t00=0x0001, t01=0x00f4}
0x02aa…02be Head {h00=0x0010, h01=0x0050, text=» ADR A1,A13 «, t00=0x0001, t01=0x011e}
0x02be…02de Head {h00=0x001c, h01=0x0050, text=» LD A2,-4,A1 AND LENGTH «, t00=0x0001, t01=0x0132}
0x02de…02f0 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0001, t01=0x0152}
0x02f0…031e Head {h00=0x002a, h01=0x0050, text=» LDKL A3,CCBUF+4 AND FRED WRITE BUFFER«, t00=0x0001, t01=0x0164}
0x031e…0332 (2, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ADR A3,A13 «, t00=0x0002, t01=0x0004}
0x0332…0354 Head {h00=0x001e, h01=0x0050, text=» ST A2,-4,A3 STORE LENGTH «, t00=0x0002, t01=0x0018}
0x0354…0366 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0002, t01=0x003a}
0x0366…0394 Head {h00=0x002a, h01=0x0050, text=» ADK A4,2 ADJUST FOR DRIVER INTERFACE «, t00=0x0002, t01=0x004c}
0x0394…03a6 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0002, t01=0x007a}
0x03a6…03ae Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x008c}
0x03ae…03d4 Head {h00=0x0022, h01=0x0050, text=»TCAP10 LCR A5,A1 MOVE MESSAGE «, t00=0x0002, t01=0x0094}
0x03d4…03e6 Head {h00=0x000e, h01=0x0050, text=» SCR A5,A4«, t00=0x0002, t01=0x00ba}
0x03e6…03f8 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0002, t01=0x00cc}
0x03f8…040a Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0002, t01=0x00de}
0x040a…041c Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0002, t01=0x00f0}
0x041c…0432 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TCAP10«, t00=0x0002, t01=0x0102}
0x0432…043a Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0118}
0x043a…0462 Head {h00=0x0024, h01=0x0050, text=» CF A14,K:CCQ EXCHANGE WITH FRED«, t00=0x0002, t01=0x0120}
0x0462…0482 Head {h00=0x001c, h01=0x0050, text=» RB(NZ) TCAPP BAD REPLY «, t00=0x0002, t01=0x0148}
0x0482…0490 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0168}
0x0490…0498 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0176}
0x0498…04a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017e}
0x04a2…04be Head {h00=0x0018, h01=0x0050, text=»* WRITE REPLY TO TC «, t00=0x0002, t01=0x0188}
0x04be…04c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0014}
0x04c8…04d0 Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x001e}
0x04d0…04fc Head {h00=0x0028, h01=0x0050, text=» LDKL A2,K:LINB GET TC WRITE BUFFER «, t00=0x0003, t01=0x0026}
0x04fc…0510 Head {h00=0x0010, h01=0x0050, text=» ADR A2,A13 «, t00=0x0003, t01=0x0052}
0x0510…0530 Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A1 GET LENGTH «, t00=0x0003, t01=0x0066}
0x0530…0542 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0003, t01=0x0086}
0x0542…0560 Head {h00=0x001a, h01=0x0050, text=» ST A3,-4,A2 AND STORE«, t00=0x0003, t01=0x0098}
0x0560…0572 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0003, t01=0x00b6}
0x0572…0592 Head {h00=0x001c, h01=0x0050, text=» ADK A4,1 ADJUST FOR STA«, t00=0x0003, t01=0x00c8}
0x0592…059a Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x00e8}
0x059a…05be Head {h00=0x0020, h01=0x0050, text=»TCAP20 LCR A5,A1 MOVE REPLY «, t00=0x0003, t01=0x00f0}
0x05be…05d0 Head {h00=0x000e, h01=0x0050, text=» SCR A5,A4«, t00=0x0003, t01=0x0114}
0x05d0…05e2 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0003, t01=0x0126}
0x05e2…05f4 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0003, t01=0x0138}
0x05f4…0606 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0003, t01=0x014a}
0x0606…061c Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TCAP20«, t00=0x0003, t01=0x015c}
0x061c…0624 Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x0172}
0x0624…064a Head {h00=0x0022, h01=0x0050, text=» CF A14,K:RBCC RELEASE BUFFER «, t00=0x0003, t01=0x017a}
0x064a…0652 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0010}
0x0652…0672 Head {h00=0x001c, h01=0x0050, text=» CF A14,K:LW WRITE REPLY«, t00=0x0004, t01=0x0018}
0x0672…067a Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0038}
0x067a…068c Head {h00=0x000e, h01=0x0050, text=» RB TCAPP «, t00=0x0004, t01=0x0040}
0x068c…0694 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0052}
0x0694…06a0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0004, t01=0x005a}
0x06a0…06a4 Head {h00=0x4004, h01=0x0000}
0x06a4…06a8 00 04 00 66 ┆ f┆
0x06a8…06b0 (5, 1, 8) 20 04 00 00 00 05 00 04 ┆ ┆
0x06b0…0700 (6, 0, 398) 00 05 01 8e 00 06 00 50 2a 20 00 06 00 08 00 06 00 50 2a 20 00 06 00 12 00 06 00 50 2a 20 00 06 00 1c 00 06 00 50 2a 20 00 06 00 26 00 06 00 50 2a 20 00 06 00 30 00 06 00 50 2a 20 00 06 00 3a 00 06 00 50 2a 20 00 06 00 44 00 06 00 50 2a 20 ┆ P* P* P* P* & P* 0 P* : P* D P* ┆
0x0700…0750 00 06 00 4e 00 06 00 50 2a 20 00 06 00 58 00 06 00 50 2a 20 00 06 00 62 00 06 00 50 2a 20 00 06 00 6c 00 06 00 50 2a 20 00 06 00 76 00 06 00 50 2a 20 00 06 00 80 00 06 00 50 2a 20 00 06 00 8a 00 06 00 50 2a 20 00 06 00 94 00 06 00 50 2a 20 ┆ N P* X P* b P* l P* v P* P* P* P* ┆
0x0750…07a0 00 06 00 9e 00 06 00 50 2a 20 00 06 00 a8 00 06 00 50 2a 20 00 06 00 b2 00 06 00 50 2a 20 00 06 00 bc 00 2e 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 2a 2a 43 4f 4d 4d 4f 4e 20 41 52 45 41 20 46 52 41 4d 45 2a 2a 20 ┆ P* P* P* . P EJECT IDENT C:EQU **COMMON AREA FRAME** ┆
0x07a0…07f0 00 06 00 c6 00 2e 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 2a 2a 43 4f 4d 4d 4f 4e 20 41 52 45 41 20 46 52 41 4d 45 2a 2a 20 00 06 00 f8 00 06 00 50 2a 20 00 06 01 2a 00 12 00 50 2a 20 20 20 45 58 54 45 52 4e 41 4c ┆ . P EJECT IDENT C:EQU **COMMON AREA FRAME** P* * P* EXTERNAL┆
0x07f0…083e 53 20 00 06 01 34 00 06 00 50 2a 20 00 06 01 4a 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 41 44 44 00 06 01 54 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 41 44 44 43 20 00 06 01 68 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 53 55 42 00 06 01 7e ┆S 4 P* J P EXTRN T:ADD T P EXTRN T:ADDC h P EXTRN T:SUB ~┆
0x083e…088e (7, 0, 400) 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 53 55 42 43 20 00 07 00 04 00 06 00 50 2a 20 00 07 00 1a 00 1c 00 50 5c 45 58 54 52 4e 5c 54 3a 4d 55 4c 5c 54 4f 53 53 2d 4d 55 4c 44 49 56 00 07 00 24 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 4d 55 4c ┆ P EXTRN T:SUBC P* P EXTRN T:MUL TOSS-MULDIV $ P EXTRN T:MUL┆
0x088e…08de 43 20 00 07 00 44 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 44 49 56 00 07 00 5a 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 44 49 56 43 20 00 07 00 6e 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 00 07 00 84 00 06 00 50 ┆C D P EXTRN T:DIV Z P EXTRN T:DIVC n P EJECT IDENT C:EQU P┆
0x08de…092e 2a 20 00 07 00 a0 00 1e 00 50 2a 20 20 20 46 4f 52 4d 53 20 46 4f 52 20 46 4f 52 4d 41 54 20 43 4f 44 45 53 00 07 00 aa 00 06 00 50 2a 20 00 07 00 cc 00 26 00 50 45 4f 4c 5c 46 4f 52 4d 5c 38 3d 31 2c 38 5c 45 4e 44 20 4f 46 20 46 4f 52 4d ┆* P* FORMS FOR FORMAT CODES P* & PEOL FORM 8=1,8 END OF FORM┆
0x092e…097e 41 54 20 4c 49 53 54 20 00 07 00 d6 00 20 00 50 45 4f 52 5c 46 4f 52 4d 5c 38 3d 39 2c 38 5c 45 4e 44 20 4f 46 20 52 45 43 4f 52 44 00 07 01 00 00 22 00 50 54 58 54 5c 46 4f 52 4d 5c 38 3d 2f 31 30 2c 38 5c 54 45 58 54 20 45 4c 45 4d 45 4e ┆AT LIST PEOR FORM 8=9,8 END OF RECORD " PTXT FORM 8=/10,8 TEXT ELEMEN┆
0x097e…09ce 54 20 00 07 01 24 00 2e 00 50 43 4f 4e 54 58 54 5c 46 4f 52 4d 5c 38 3d 2f 31 32 2c 38 5c 54 45 58 54 20 43 4f 4e 53 54 41 4e 54 20 45 4c 45 4d 45 4e 54 20 00 07 01 4a 00 2e 00 50 49 4d 54 58 54 5c 46 4f 52 4d 5c 38 3d 2f 31 31 2c 38 5c 49 ┆T $ . PCONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT J . PIMTXT FORM 8=/11,8 I┆
0x09ce…0a1e (8, 0, 400) 4d 49 44 45 41 54 45 20 54 45 58 54 20 43 4f 4e 53 54 41 4e 54 20 00 07 01 7c 00 2a 00 50 45 4e 44 53 55 42 5c 46 4f 52 4d 5c 31 36 3d 2f 31 37 30 30 5c 45 4e 44 20 4f 46 20 53 55 42 46 4f 52 4d 41 54 20 00 08 00 1e 00 28 00 50 43 4f 4e 44 ┆MIDEATE TEXT CONSTANT | * PENDSUB FORM 16=/1700 END OF SUBFORMAT ( PCOND┆
0x0a1e…0a6e 5c 46 4f 52 4d 5c 38 3d 2f 31 46 2c 38 5c 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 46 4f 52 4d 41 54 00 08 00 4c 00 1a 00 50 46 49 4c 4c 45 52 5c 46 4f 52 4d 5c 38 2c 38 5c 46 49 4c 4c 45 52 00 08 00 78 00 1c 00 50 53 50 41 43 45 5c 46 4f 52 4d ┆ FORM 8=/1F,8 CONDITIONAL FORMAT L PFILLER FORM 8,8 FILLER x PSPACE FORM┆
0x0a6e…0abe 5c 38 3d 2f 32 30 2c 38 5c 53 50 41 43 45 00 08 00 96 00 1e 00 50 50 49 43 54 5c 46 4f 52 4d 5c 31 3d 31 2c 37 2c 38 5c 50 49 43 54 55 52 45 20 00 08 00 b6 00 26 00 50 50 49 43 52 45 46 5c 46 4f 52 4d 5c 38 2c 38 2c 31 36 5c 47 45 4e 45 52 ┆ 8=/20,8 SPACE PPICT FORM 1=1,7,8 PICTURE & PPICREF FORM 8,8,16 GENER┆
0x0abe…0b0e 41 54 45 20 46 4f 52 4d 53 20 00 08 00 d8 00 12 00 50 42 59 54 45 5c 46 4f 52 4d 5c 38 2c 38 20 00 08 01 02 00 14 00 50 42 43 44 5c 46 4f 52 4d 5c 34 3d 30 2c 31 32 20 00 08 01 18 00 16 00 50 41 53 43 49 49 5c 46 4f 52 4d 5c 34 3d 38 2c 31 ┆ATE FORMS PBYTE FORM 8,8 PBCD FORM 4=0,12 PASCII FORM 4=8,1┆
0x0b0e…0b5e 32 20 00 08 01 30 00 22 00 50 41 44 44 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 41 44 44 2c 38 2c 38 00 08 01 4a 00 24 00 50 41 44 44 43 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 41 44 44 43 2c 38 2c 38 ┆2 0 " PADD FORM 16=/F6A1,16=T:ADD,8,8 J $ PADDC FORM 16=/F6A1,16=T:ADDC,8,8┆
0x0b5e…0bae (9, 0, 400) 00 08 01 70 00 22 00 50 53 55 42 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 53 55 42 2c 38 2c 38 00 09 00 08 00 24 00 50 53 55 42 43 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 53 55 42 43 2c 38 2c 38 00 09 ┆ p " PSUB FORM 16=/F6A1,16=T:SUB,8,8 $ PSUBC FORM 16=/F6A1,16=T:SUBC,8,8 ┆
0x0bae…0bfe 00 2e 00 26 00 50 4d 55 4c 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 4d 55 4c 2c 38 2c 38 2c 38 2c 38 00 09 00 56 00 28 00 50 4d 55 4c 43 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 4d 55 4c 43 2c 38 2c 38 ┆ . & PMUL FORM 16=/F6A1,16=T:MUL,8,8,8,8 V ( PMULC FORM 16=/F6A1,16=T:MULC,8,8┆
0x0bfe…0c4e 2c 38 2c 38 00 09 00 80 00 26 00 50 44 49 56 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 44 49 56 2c 38 2c 38 2c 38 2c 38 00 09 00 ac 00 28 00 50 44 49 56 43 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 44 49 ┆,8,8 & PDIV FORM 16=/F6A1,16=T:DIV,8,8,8,8 ( PDIVC FORM 16=/F6A1,16=T:DI┆
0x0c4e…0c9e 56 43 2c 38 2c 38 2c 38 2c 38 00 09 00 d6 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 00 09 01 02 00 06 00 50 2a 20 00 09 01 1e 00 1c 00 50 2a 20 20 20 43 4f 4e 53 54 41 4e 54 20 54 43 41 20 45 51 55 41 54 45 53 ┆VC,8,8,8,8 P EJECT IDENT C:EQU P* P* CONSTANT TCA EQUATES┆
0x0c9e…0cee 00 09 01 28 00 06 00 50 2a 20 00 09 01 48 00 10 00 50 43 41 31 5c 45 51 55 5c 2f 31 30 20 00 09 01 52 00 10 00 50 43 42 31 5c 45 51 55 5c 2f 32 30 20 00 09 01 66 00 10 00 50 43 42 31 30 5c 45 51 55 5c 2f 32 31 00 09 01 7a 00 12 00 50 43 42 ┆ ( P* H PCA1 EQU /10 R PCB1 EQU /20 f PCB10 EQU /21 z PCB┆
0x0cee…0d3e (10, 0, 400) 31 30 30 5c 45 51 55 5c 2f 32 32 20 00 09 01 8e 00 12 00 50 43 42 31 30 30 30 5c 45 51 55 5c 2f 32 33 00 0a 00 14 00 12 00 50 43 42 33 32 4b 5c 45 51 55 5c 2f 32 34 20 00 0a 00 2a 00 10 00 50 59 45 41 52 5c 45 51 55 5c 2f 33 30 00 0a 00 40 ┆100 EQU /22 PCB1000 EQU /23 PCB32K EQU /24 * PYEAR EQU /30 @┆
0x0d3e…0d8e 00 12 00 50 4d 4f 4e 54 48 5c 45 51 55 5c 2f 33 31 20 00 0a 00 54 00 10 00 50 44 41 59 5c 45 51 55 5c 2f 33 32 20 00 0a 00 6a 00 10 00 50 48 4f 55 52 5c 45 51 55 5c 2f 34 30 00 0a 00 7e 00 10 00 50 4d 49 4e 5c 45 51 55 5c 2f 34 31 20 00 0a ┆ PMONTH EQU /31 T PDAY EQU /32 j PHOUR EQU /40 ~ PMIN EQU /41 ┆
0x0d8e…0dde 00 92 00 10 00 50 53 45 43 5c 45 51 55 5c 2f 34 32 20 00 0a 00 a6 00 06 00 50 2a 20 00 0a 00 ba 00 20 00 50 2a 20 20 20 4c 49 4e 45 20 57 4f 52 4b 42 4c 4f 43 4b 53 20 45 51 55 41 54 45 53 20 00 0a 00 c4 00 06 00 50 2a 20 00 0a 00 e8 00 18 ┆ PSEC EQU /42 P* P* LINE WORKBLOCKS EQUATES P* ┆
0x0dde…0e2e 00 50 4c 49 4e 5c 45 51 55 5c 2f 31 30 5c 4c 49 4e 45 20 4e 42 52 00 0a 00 f2 00 1e 00 50 4c 49 4e 42 43 5c 45 51 55 5c 2f 31 31 5c 42 55 53 59 20 43 4f 55 4e 54 45 52 00 0a 01 0e 00 20 00 50 4c 49 4e 54 43 5c 45 51 55 5c 2f 31 32 5c 54 52 ┆ PLIN EQU /10 LINE NBR PLINBC EQU /11 BUSY COUNTER PLINTC EQU /12 TR┆
0x0e2e…0e7e 41 4e 53 20 43 4f 55 4e 54 45 52 20 00 0a 01 30 00 20 00 50 4c 49 4e 45 43 5c 45 51 55 5c 2f 31 33 5c 45 52 52 4f 52 20 43 4f 55 4e 54 45 52 20 00 0a 01 54 00 26 00 50 4c 49 4e 48 55 52 5c 45 51 55 5c 2f 31 34 5c 54 49 4d 45 20 4f 46 20 4c ┆ANS COUNTER 0 PLINEC EQU /13 ERROR COUNTER T & PLINHUR EQU /14 TIME OF L┆
0x0e7e…0ece (11, 0, 400) 41 53 54 20 54 52 41 4e 53 20 00 0a 01 78 00 12 00 50 4c 49 4e 4d 49 4e 5c 45 51 55 5c 2f 31 35 00 0b 00 12 00 12 00 50 4c 49 4e 53 45 43 5c 45 51 55 5c 2f 31 36 00 0b 00 28 00 06 00 50 2a 20 00 0b 00 3e 00 1c 00 50 2a 20 20 20 54 43 20 57 ┆AST TRANS x PLINMIN EQU /15 PLINSEC EQU /16 ( P* > P* TC W┆
0x0ece…0f1e 4f 52 4b 42 4c 4f 43 4b 20 45 51 55 41 54 45 53 00 0b 00 48 00 06 00 50 2a 20 00 0b 00 68 00 0e 00 50 54 43 5c 45 51 55 5c 2f 32 30 00 0b 00 72 00 10 00 50 54 43 42 43 5c 45 51 55 5c 2f 32 31 00 0b 00 84 00 10 00 50 54 43 54 43 5c 45 51 55 ┆ORKBLOCK EQUATES H P* h PTC EQU /20 r PTCBC EQU /21 PTCTC EQU┆
0x0f1e…0f6e 5c 2f 32 32 00 0b 00 98 00 10 00 50 54 43 45 43 5c 45 51 55 5c 2f 32 33 00 0b 00 ac 00 12 00 50 54 43 48 55 52 5c 45 51 55 5c 2f 32 34 20 00 0b 00 c0 00 12 00 50 54 43 4d 49 4e 5c 45 51 55 5c 2f 32 35 20 00 0b 00 d6 00 12 00 50 54 43 53 45 ┆ /22 PTCEC EQU /23 PTCHUR EQU /24 PTCMIN EQU /25 PTCSE┆
0x0f6e…0fbe 43 5c 45 51 55 5c 2f 32 36 20 00 0b 00 ec 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 00 0b 01 02 00 06 00 50 2a 20 00 0b 01 1e 00 2a 00 50 2a 20 20 20 43 43 20 57 4f 52 4b 42 4c 4f 43 4b 20 52 45 53 50 4f 4e 53 ┆C EQU /26 P EJECT IDENT C:EQU P* * P* CC WORKBLOCK RESPONS┆
0x0fbe…100e 45 54 49 4d 45 20 45 51 55 41 54 45 53 20 00 0b 01 28 00 06 00 50 2a 20 00 0b 01 56 00 10 00 50 43 43 31 5c 45 51 55 5c 2f 33 30 20 00 0b 01 60 00 10 00 50 43 43 32 5c 45 51 55 5c 2f 33 31 20 00 0b 01 74 00 10 00 50 43 43 33 5c 45 51 55 5c ┆ETIME EQUATES ( P* V PCC1 EQU /30 ` PCC2 EQU /31 t PCC3 EQU ┆
0x100e…105e (12, 0, 400) 2f 33 32 20 00 0b 01 88 00 10 00 50 43 43 34 5c 45 51 55 5c 2f 33 33 20 00 0c 00 0c 00 10 00 50 43 43 35 5c 45 51 55 5c 2f 33 34 20 00 0c 00 20 00 10 00 50 43 43 36 5c 45 51 55 5c 2f 33 35 20 00 0c 00 34 00 10 00 50 43 43 37 5c 45 51 55 5c ┆/32 PCC4 EQU /33 PCC5 EQU /34 PCC6 EQU /35 4 PCC7 EQU ┆
0x105e…10ae 2f 33 36 20 00 0c 00 48 00 10 00 50 43 43 38 5c 45 51 55 5c 2f 33 37 20 00 0c 00 5c 00 10 00 50 43 43 39 5c 45 51 55 5c 2f 33 38 20 00 0c 00 70 00 10 00 50 43 43 31 30 5c 45 51 55 5c 2f 33 39 00 0c 00 84 00 10 00 50 43 43 31 31 5c 45 51 55 ┆/36 H PCC8 EQU /37 PCC9 EQU /38 p PCC10 EQU /39 PCC11 EQU┆
0x10ae…10fe 5c 2f 33 41 00 0c 00 98 00 10 00 50 43 43 31 32 5c 45 51 55 5c 2f 33 42 00 0c 00 ac 00 06 00 50 2a 20 00 0c 00 c0 00 1c 00 50 2a 20 20 20 43 43 20 57 4f 52 4b 42 4c 4f 43 4b 20 45 51 55 41 54 45 53 00 0c 00 ca 00 06 00 50 2a 20 00 0c 00 ea ┆ /3A PCC12 EQU /3B P* P* CC WORKBLOCK EQUATES P* ┆
0x10fe…114e 00 22 00 50 43 43 54 4f 5c 45 51 55 5c 2f 34 30 5c 54 49 4d 45 20 4f 55 54 20 43 4f 55 4e 54 45 52 20 00 0c 00 f4 00 10 00 50 43 43 54 43 5c 45 51 55 5c 2f 34 31 00 0c 01 1a 00 10 00 50 43 43 45 43 5c 45 51 55 5c 2f 34 32 00 0c 01 2e 00 26 ┆ " PCCTO EQU /40 TIME OUT COUNTER PCCTC EQU /41 PCCEC EQU /42 . &┆
0x114e…119e 00 50 43 43 53 55 50 5c 45 51 55 5c 2f 34 33 5c 53 55 50 45 52 56 20 4d 53 47 53 20 43 4f 55 4e 54 45 52 20 00 0c 01 42 00 24 00 50 43 43 48 55 52 5c 45 51 55 5c 2f 34 34 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 52 45 50 4c 59 00 0c 01 6c ┆ PCCSUP EQU /43 SUPERV MSGS COUNTER B $ PCCHUR EQU /44 TIME OF LAST REPLY l┆