|
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: 27000 (0x6978)
Notes: pts_type(SC)
Names: »C:NSU.SC«
└─⟦2a21e4bb5⟧ Bits:30009691 Philips computer tape "600408"
└─⟦this⟧ »BDKAPP/C:NSU.SC«
IDENT C:NSU CONPAC REL=0.0 DATE= 77.10.12 UPDATE #8 77.09.26 JES *************************************************************** * * CONCENTRATOR APPLICATION PACKAGE PEAB-T * * PROGRAMMER: PER OMAN / PAN * * * N S U B S * * * * * THIS MODULE CONTAINS SUBROUTINES FOR * NETWORK AND TERMINAL CONTROL * * * * * THIS MODULE RUNS UNDER TASK: OPCOM * * * THE MODULE CONTAINS THE SUBROUTINES: * * NAME REVDAT VERSION * * K:CKL 751205 * K:OTC 77.09.14 * K:GTC 751205 * K:LFC 751205 * K:TL 77.08.08 * * **************************************************************** EJECT IDENT C:NSU * * * ENTRY ADDRESSES * *************************************************************** * * ENTRY DESCRIPTION * ENTRY K:OTC MAKES OPEN TC REQUESTS ENTRY K:CKL CHECK LINE NBR ENTRY K:GTC GET TC FROM KBB ENTRY K:LFC GET LINE CONTROL ECB ENTRY K:TL TEST TERMINAL LINE EJECT IDENT C:NSU * * * EXTERNAL REFERENSES * *************************************************************** * * ADDRESS IN MODULE * EXTRN K:F320 C:TXT EXTRN K:F321 EXTRN K:F325 EXTRN K:FL09 EXTRN K:FL10 EXTRN K:FL11 EXTRN K:FL12 EXTRN K:F377 EXTRN K:F342 EXTRN K:F340 EXTRN K:F311 EXTRN K:F302 EXTRN K:F310 EXTRN K:F323 EXTRN K:F324 EXTRN K:F393 * EXTRN K:XL10 C:XNW * EXTRN K:KBB C:TCA EXTRN K:LCE EXTRN K:GPE EXTRN K:KBE * EJECT IDENT C:NSU * EXTRN K:PRTN C:FUA * EXTRN K:LST C:FIG EXTRN K:CONE EXTRN K:LEND EXTRN K:CONF EXTRN K:TCST EXTRN K:TCP EXTRN K:TCPE EXTRN K:TCE EXTRN K:LTC EXTRN K:REPC * EXTRN K:DUM C:WBS * EXTRN K:ST8 C:SUB EXTRN K:LD8 * EXTRN K:HXAS C:SET EXTRN K:ASHX * * HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST * NLIST * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * EJECT IDENT C:EQU **COMMON AREA FRAME** EJECT IDENT C:EQU **COMMON AREA FRAME** * * EXTERNALS * EXTRN T:ADD EXTRN T:ADDC EXTRN T:SUB EXTRN T:SUBC * EXTRN T:MUL TOSS-MULDIV EXTRN T:MULC EXTRN T:DIV EXTRN T:DIVC EJECT IDENT C:EQU * * FORMS FOR FORMAT CODES * EOL FORM 8=1,8 END OF FORMAT LIST EOR FORM 8=9,8 END OF RECORD TXT FORM 8=/10,8 TEXT ELEMENT CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT ENDSUB FORM 16=/1700 END OF SUBFORMAT COND FORM 8=/1F,8 CONDITIONAL FORMAT FILLER FORM 8,8 FILLER SPACE FORM 8=/20,8 SPACE PICT FORM 1=1,7,8 PICTURE PICREF FORM 8,8,16 GENERATE FORMS BYTE FORM 8,8 BCD FORM 4=0,12 ASCII FORM 4=8,12 ADD FORM 16=/F6A1,16=T:ADD,8,8 ADDC FORM 16=/F6A1,16=T:ADDC,8,8 SUB FORM 16=/F6A1,16=T:SUB,8,8 SUBC FORM 16=/F6A1,16=T:SUBC,8,8 MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8 MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8 DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8 DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8 EJECT IDENT C:EQU * * CONSTANT TCA EQUATES * CA1 EQU /10 CB1 EQU /20 CB10 EQU /21 CB100 EQU /22 CB1000 EQU /23 CB32K EQU /24 YEAR EQU /30 MONTH EQU /31 DAY EQU /32 HOUR EQU /40 MIN EQU /41 SEC EQU /42 * * LINE WORKBLOCKS EQUATES * LIN EQU /10 LINE NBR LINBC EQU /11 BUSY COUNTER LINTC EQU /12 TRANS COUNTER LINEC EQU /13 ERROR COUNTER LINHUR EQU /14 TIME OF LAST TRANS LINMIN EQU /15 LINSEC EQU /16 * * TC WORKBLOCK EQUATES * TC EQU /20 TCBC EQU /21 TCTC EQU /22 TCEC EQU /23 TCHUR EQU /24 TCMIN EQU /25 TCSEC EQU /26 EJECT IDENT C:EQU * * CC WORKBLOCK RESPONSETIME EQUATES * CC1 EQU /30 CC2 EQU /31 CC3 EQU /32 CC4 EQU /33 CC5 EQU /34 CC6 EQU /35 CC7 EQU /36 CC8 EQU /37 CC9 EQU /38 CC10 EQU /39 CC11 EQU /3A CC12 EQU /3B * * CC WORKBLOCK EQUATES * CCTO EQU /40 TIME OUT COUNTER CCTC EQU /41 CCEC EQU /42 CCSUP EQU /43 SUPERV MSGS COUNTER CCHUR EQU /44 TIME OF LAST REPLY CCMIN EQU /45 CCSEC EQU /46 EJECT IDENT C:EQU * * NETWORK WORKBLOCK EQUATES * NWTC EQU /5D ACCUMULATED TRANS COUNTER NWEC EQU /5E ACC ERROR COUNT * PCNT1 EQU /50 % INTERVALS PCNT2 EQU /51 PCNT3 EQU /52 PCNT4 EQU /53 PCNT5 EQU /54 PCNT6 EQU /55 PCNT7 EQU /56 PCNT8 EQU /57 PCNT9 EQU /58 PCNT10 EQU /59 PCNT11 EQU /5A PCNT12 EQU /5B * RSPTIM EQU /5C RESPONSE TIME PCNTW EQU /5F % WORK AREA 1 PCNTW2 EQU /6C %WORK AREA 2 * * CC TEXT-INTERVAL EQUATES * IN1 EQU /60 IN2 EQU /61 IN3 EQU /62 IN4 EQU /63 IN5 EQU /64 IN6 EQU /65 IN7 EQU /66 IN8 EQU /67 IN9 EQU /68 IN10 EQU /69 IN11 EQU /6A IN12 EQU /6B EJECT IDENT C:EQU * CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK * IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH * K:EBA EQU 2 ECB EQUATES K:ERL EQU 4 K:EEL EQU 6 K:ERC EQU 8 K:ECW EQU 10 * * TCAWBL EQU 6 INDEX IN TCA TO LINE WB TCAWBT EQU 10 INDEX IN TCA TO TC WB EJECT IDENT C:EQU ******************************************************* * * SYSTEM ADAPTION PARAMETERS * * KEYBOARD KONTROL KEYS K:KKEY EQU /06 ENTRY K KEY K:UKEY EQU /05 ENTER U KEY K:EOR EQU /12 END OF RECORD KEY CANCEL EQU /17 CANCEL KEY * TIME OUT VALUES OF TRUNK LINE K:WTIM EQU 40 CC WRITE REQUEST TIME OUT (X100 MS) K:QTIM EQU 3000 CC EXCHANGE REQUEST TIME OUT (X100 MS) * BUFFER LENGTHS K:CCBL EQU 1100 CCWRITE BUFFER LENGTH (WORDS) K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) K:BLTC EQU 128 LENGTH OF CASSETTE BUFFER (WORDS) K:KBL EQU 60 KB BUF LENGTH IN WORDS K:KBBL EQU K:KBL+K:KBL IN CHARS K:GPBL EQU 60 GP BUF LENGTH IN WORDS K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS) K:INBL EQU 1100 TERMINAL LINE INPUT BUF LENGTH (WORDS) EJECT * COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION K:CCAD EQU 0 CONCENTRATOR ADDRESS LEFT BYTE = SELECT ADDR. RIGHT BYTE = POLL ADDR. K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES AND SYSTEM MESSAGES K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT C:NSU CONPAC REL=0.0 DATE= 77.10.12 «, t00=0x0000, t01=0x0004}
0x0034…0056 Head {h00=0x001e, h01=0x0050, text=» UPDATE #8 77.09.26 JES «, t00=0x0000, t01=0x0038}
0x0056…009e Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0000, t01=0x005a}
0x009e…00a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00a2}
0x00a8…00da Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR APPLICATION PACKAGE PEAB-T«, t00=0x0000, t01=0x00ac}
0x00da…00e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00de}
0x00e4…010a Head {h00=0x0022, h01=0x0050, text=»* PROGRAMMER: PER OMAN / PAN «, t00=0x0000, t01=0x00e8}
0x010a…0114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…011e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0132 Head {h00=0x0010, h01=0x0050, text=»* N S U B S «, t00=0x0000, t01=0x0122}
0x0132…013c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…0146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0140}
0x0146…0154 Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0000, t01=0x014a}
0x0154…0184 Head {h00=0x002c, h01=0x0050, text=»* THIS MODULE CONTAINS SUBROUTINES FOR«, t00=0x0000, t01=0x0158}
0x0184…01ac Head {h00=0x0024, h01=0x0050, text=»* NETWORK AND TERMINAL CONTROL«, t00=0x0000, t01=0x0188}
0x01ac…01ba Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0020}
0x01ba…01c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002e}
0x01c4…01ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0038}
0x01ce…01fc Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE RUNS UNDER TASK: OPCOM «, t00=0x0001, t01=0x0042}
0x01fc…0206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0070}
0x0206…0210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007a}
0x0210…023e Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x0084}
0x023e…0248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b2}
0x0248…0266 Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x00bc}
0x0266…0270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x0270…0286 Head {h00=0x0012, h01=0x0050, text=»* K:CKL 751205«, t00=0x0001, t01=0x00e4}
0x0286…029e Head {h00=0x0014, h01=0x0050, text=»* K:OTC 77.09.14«, t00=0x0001, t01=0x00fa}
0x029e…02b4 Head {h00=0x0012, h01=0x0050, text=»* K:GTC 751205«, t00=0x0001, t01=0x0112}
0x02b4…02ca Head {h00=0x0012, h01=0x0050, text=»* K:LFC 751205«, t00=0x0001, t01=0x0128}
0x02ca…02e2 Head {h00=0x0014, h01=0x0050, text=»* K:TL 77.08.08 «, t00=0x0001, t01=0x013e}
0x02e2…02ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0156}
0x02ec…02f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0160}
0x02f6…033e Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x016a}
0x033e…035a Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:NSU «, t00=0x0002, t01=0x0022}
0x035a…0364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003e}
0x0364…036e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0048}
0x036e…0388 Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0052}
0x0388…0392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006c}
0x0392…03da Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0076}
0x03da…03e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00be}
0x03e4…0400 Head {h00=0x0018, h01=0x0050, text=»* ENTRY DESCRIPTION«, t00=0x0002, t01=0x00c8}
0x0400…040a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e4}
0x040a…0436 Head {h00=0x0028, h01=0x0050, text=» ENTRY K:OTC MAKES OPEN TC REQUESTS «, t00=0x0002, t01=0x00ee}
0x0436…045a Head {h00=0x0020, h01=0x0050, text=» ENTRY K:CKL CHECK LINE NBR «, t00=0x0002, t01=0x011a}
0x045a…047e Head {h00=0x0020, h01=0x0050, text=» ENTRY K:GTC GET TC FROM KBB«, t00=0x0002, t01=0x013e}
0x047e…04a8 Head {h00=0x0026, h01=0x0050, text=» ENTRY K:LFC GET LINE CONTROL ECB «, t00=0x0002, t01=0x0162}
0x04a8…04ce Head {h00=0x0022, h01=0x0050, text=» ENTRY K:TL TEST TERMINAL LINE«, t00=0x0002, t01=0x018c}
0x04ce…04ea Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:NSU «, t00=0x0003, t01=0x0022}
0x04ea…04f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003e}
0x04f4…04fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0048}
0x04fe…051c Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x0052}
0x051c…0526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…056e Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x007a}
0x056e…0578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c2}
0x0578…0594 Head {h00=0x0018, h01=0x0050, text=»* ADDRESS IN MODULE«, t00=0x0003, t01=0x00cc}
0x0594…059e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e8}
0x059e…05ba Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F320 C:TXT «, t00=0x0003, t01=0x00f2}
0x05ba…05d0 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F321 «, t00=0x0003, t01=0x010e}
0x05d0…05e6 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F325 «, t00=0x0003, t01=0x0124}
0x05e6…05fc Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FL09 «, t00=0x0003, t01=0x013a}
0x05fc…0612 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FL10 «, t00=0x0003, t01=0x0150}
0x0612…0628 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FL11 «, t00=0x0003, t01=0x0166}
0x0628…063e Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FL12 «, t00=0x0003, t01=0x017c}
0x063e…0654 (4, 0, 400) Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F377 «, t00=0x0004, t01=0x0004}
0x0654…066a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F342 «, t00=0x0004, t01=0x001a}
0x066a…0680 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F340 «, t00=0x0004, t01=0x0030}
0x0680…0696 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F311 «, t00=0x0004, t01=0x0046}
0x0696…06ac Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F302 «, t00=0x0004, t01=0x005c}
0x06ac…06c2 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F310 «, t00=0x0004, t01=0x0072}
0x06c2…06d8 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F323 «, t00=0x0004, t01=0x0088}
0x06d8…06ee Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F324 «, t00=0x0004, t01=0x009e}
0x06ee…0704 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F393 «, t00=0x0004, t01=0x00b4}
0x0704…070e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ca}
0x070e…072a Head {h00=0x0018, h01=0x0050, text=» EXTRN K:XL10 C:XNW «, t00=0x0004, t01=0x00d4}
0x072a…0734 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f0}
0x0734…074e Head {h00=0x0016, h01=0x0050, text=» EXTRN K:KBB C:TCA«, t00=0x0004, t01=0x00fa}
0x074e…0762 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LCE«, t00=0x0004, t01=0x0114}
0x0762…0776 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:GPE«, t00=0x0004, t01=0x0128}
0x0776…078a Head {h00=0x0010, h01=0x0050, text=» EXTRN K:KBE«, t00=0x0004, t01=0x013c}
0x078a…0794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0150}
0x0794…07b0 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:NSU «, t00=0x0004, t01=0x015a}
0x07b0…07ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0176}
0x07ba…07d6 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:PRTN C:FUA «, t00=0x0004, t01=0x0180}
0x07d6…07e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000c}
0x07e0…07fa Head {h00=0x0016, h01=0x0050, text=» EXTRN K:LST C:FIG«, t00=0x0005, t01=0x0016}
0x07fa…0810 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CONE «, t00=0x0005, t01=0x0030}
0x0810…0826 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LEND «, t00=0x0005, t01=0x0046}
0x0826…083c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CONF «, t00=0x0005, t01=0x005c}
0x083c…0852 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TCST «, t00=0x0005, t01=0x0072}
0x0852…0866 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:TCP«, t00=0x0005, t01=0x0088}
0x0866…087c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TCPE «, t00=0x0005, t01=0x009c}
0x087c…0890 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:TCE«, t00=0x0005, t01=0x00b2}
0x0890…08a4 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LTC«, t00=0x0005, t01=0x00c6}
0x08a4…08ba Head {h00=0x0012, h01=0x0050, text=» EXTRN K:REPC «, t00=0x0005, t01=0x00da}
0x08ba…08c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f0}
0x08c4…08de Head {h00=0x0016, h01=0x0050, text=» EXTRN K:DUM C:WBS«, t00=0x0005, t01=0x00fa}
0x08de…08e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0114}
0x08e8…0902 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:ST8 C:SUB«, t00=0x0005, t01=0x011e}
0x0902…0916 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LD8«, t00=0x0005, t01=0x0138}
0x0916…0920 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x014c}
0x0920…093c Head {h00=0x0018, h01=0x0050, text=» EXTRN K:HXAS C:SET «, t00=0x0005, t01=0x0156}
0x093c…0952 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:ASHX «, t00=0x0005, t01=0x0172}
0x0952…095c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0188}
0x095c…09ac (6, 0, 400) Head {h00=0x004c, h01=0x0050, text=»* HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0006, t01=0x0004}
0x09ac…09b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0054}
0x09b6…09c4 Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0006, t01=0x005e}
0x09c4…09ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09ce…09d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0076}
0x09d8…09e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0080}
0x09e2…09ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008a}
0x09ec…09f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0094}
0x09f6…0a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009e}
0x0a00…0a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a8}
0x0a0a…0a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b2}
0x0a14…0a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00bc}
0x0a1e…0a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c6}
0x0a28…0a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d0}
0x0a32…0a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00da}
0x0a3c…0a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e4}
0x0a46…0a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ee}
0x0a50…0a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f8}
0x0a5a…0a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0102}
0x0a64…0a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010c}
0x0a6e…0a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0116}
0x0a78…0a82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0120}
0x0a82…0a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012a}
0x0a8c…0a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0134}
0x0a96…0aa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013e}
0x0aa0…0aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0148}
0x0aaa…0ab4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0152}
0x0ab4…0abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x015c}
0x0abe…0ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0166}
0x0ac8…0ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0170}
0x0ad2…0adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017a}
0x0adc…0ae6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0184}
0x0ae6…0af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018e}
0x0af0…0afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0008}
0x0afa…0b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0012}
0x0b04…0b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001c}
0x0b0e…0b18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0026}
0x0b18…0b22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0030}
0x0b22…0b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003a}
0x0b2c…0b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0044}
0x0b36…0b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004e}
0x0b40…0b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0058}
0x0b4a…0b54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0062}
0x0b54…0b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x006c}
0x0b5e…0b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0076}
0x0b68…0b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0080}
0x0b72…0b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x008a}
0x0b7c…0bae Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0007, t01=0x0094}
0x0bae…0be0 Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0007, t01=0x00c6}
0x0be0…0bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f8}
0x0bea…0c00 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x0102}
0x0c00…0c0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0118}
0x0c0a…0c1e Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0007, t01=0x0122}
0x0c1e…0c34 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0007, t01=0x0136}
0x0c34…0c48 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0007, t01=0x014c}
0x0c48…0c5e Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0007, t01=0x0160}
0x0c5e…0c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0176}
0x0c68…0c88 Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0007, t01=0x0180}
0x0c88…0c9e Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0008, t01=0x0010}
0x0c9e…0cb2 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0008, t01=0x0026}
0x0cb2…0cc8 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0008, t01=0x003a}
0x0cc8…0ce4 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0008, t01=0x0050}
0x0ce4…0cee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006c}
0x0cee…0d10 Head {h00=0x001e, h01=0x0050, text=»* FORMS FOR FORMAT CODES«, t00=0x0008, t01=0x0076}
0x0d10…0d1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0098}
0x0d1a…0d44 Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0008, t01=0x00a2}
0x0d44…0d68 Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0008, t01=0x00cc}
0x0d68…0d8e Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0008, t01=0x00f0}
0x0d8e…0dc0 Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0008, t01=0x0116}
0x0dc0…0df2 Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0008, t01=0x0148}
0x0df2…0e20 Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0008, t01=0x017a}
0x0e20…0e4c Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0009, t01=0x0018}
0x0e4c…0e6a Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0009, t01=0x0044}
0x0e6a…0e8a Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0009, t01=0x0062}
0x0e8a…0eac Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0009, t01=0x0082}
0x0eac…0ed6 Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0009, t01=0x00a4}
0x0ed6…0eec Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x0009, t01=0x00ce}
0x0eec…0f04 Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0009, t01=0x00e4}
0x0f04…0f1e Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0009, t01=0x00fc}
0x0f1e…0f44 Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x0009, t01=0x0116}
0x0f44…0f6c Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x0009, t01=0x013c}
0x0f6c…0f92 Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x0009, t01=0x0164}
0x0f92…0fba Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x0009, t01=0x018a}
0x0fba…0fe4 Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x000a, t01=0x0022}
0x0fe4…1010 Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x000a, t01=0x004c}
0x1010…103a Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x000a, t01=0x0078}
0x103a…1066 Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x000a, t01=0x00a2}
0x1066…1082 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000a, t01=0x00ce}
0x1082…108c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ea}
0x108c…10ac Head {h00=0x001c, h01=0x0050, text=»* CONSTANT TCA EQUATES«, t00=0x000a, t01=0x00f4}
0x10ac…10b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0114}
0x10b6…10ca Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000a, t01=0x011e}
0x10ca…10de Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000a, t01=0x0132}
0x10de…10f2 Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000a, t01=0x0146}
0x10f2…1108 Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000a, t01=0x015a}
0x1108…111e Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000a, t01=0x0170}
0x111e…1134 Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000a, t01=0x0186}
0x1134…1148 Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000b, t01=0x000c}
0x1148…115e Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000b, t01=0x0020}
0x115e…1172 Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000b, t01=0x0036}
0x1172…1186 Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000b, t01=0x004a}
0x1186…119a Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000b, t01=0x005e}
0x119a…11ae Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000b, t01=0x0072}
0x11ae…11b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0086}
0x11b8…11dc Head {h00=0x0020, h01=0x0050, text=»* LINE WORKBLOCKS EQUATES «, t00=0x000b, t01=0x0090}
0x11dc…11e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b4}
0x11e6…1202 Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000b, t01=0x00be}
0x1202…1224 Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000b, t01=0x00da}
0x1224…1248 Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000b, t01=0x00fc}
0x1248…126c Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000b, t01=0x0120}
0x126c…1296 Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000b, t01=0x0144}
0x1296…12ac Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000b, t01=0x016e}
0x12ac…12c2 Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000b, t01=0x0184}
0x12c2…12cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x000a}
0x12cc…12ec Head {h00=0x001c, h01=0x0050, text=»* TC WORKBLOCK EQUATES«, t00=0x000c, t01=0x0014}
0x12ec…12f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0034}
0x12f6…1308 Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000c, t01=0x003e}
0x1308…131c Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000c, t01=0x0050}
0x131c…1330 Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000c, t01=0x0064}
0x1330…1344 Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000c, t01=0x0078}
0x1344…135a Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000c, t01=0x008c}
0x135a…1370 Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000c, t01=0x00a2}
0x1370…1386 Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000c, t01=0x00b8}
0x1386…13a2 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000c, t01=0x00ce}
0x13a2…13ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ea}
0x13ac…13da Head {h00=0x002a, h01=0x0050, text=»* CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000c, t01=0x00f4}
0x13da…13e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0122}
0x13e4…13f8 Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000c, t01=0x012c}
0x13f8…140c Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000c, t01=0x0140}
0x140c…1420 Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000c, t01=0x0154}
0x1420…1434 Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000c, t01=0x0168}
0x1434…1448 Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000c, t01=0x017c}
0x1448…145c Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000c, t01=0x0190}
0x145c…1470 Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000d, t01=0x0014}
0x1470…1484 Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000d, t01=0x0028}
0x1484…1498 Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000d, t01=0x003c}
0x1498…14ac Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000d, t01=0x0050}
0x14ac…14c0 Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000d, t01=0x0064}
0x14c0…14d4 Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000d, t01=0x0078}
0x14d4…14de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x008c}
0x14de…14fe Head {h00=0x001c, h01=0x0050, text=»* CC WORKBLOCK EQUATES«, t00=0x000d, t01=0x0096}
0x14fe…1508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b6}
0x1508…152e Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000d, t01=0x00c0}
0x152e…1542 Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000d, t01=0x00e6}
0x1542…1556 Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000d, t01=0x00fa}
0x1556…1580 Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000d, t01=0x010e}
0x1580…15a8 Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000d, t01=0x0138}
0x15a8…15be Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000d, t01=0x0160}
0x15be…15d4 Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000d, t01=0x0176}
0x15d4…15f0 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000d, t01=0x018c}
0x15f0…15fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0018}
0x15fa…1620 Head {h00=0x0022, h01=0x0050, text=»* NETWORK WORKBLOCK EQUATES«, t00=0x000e, t01=0x0022}
0x1620…162a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0048}
0x162a…1658 Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000e, t01=0x0052}
0x1658…167c Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000e, t01=0x0080}
0x167c…1686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a4}
0x1686…16a8 Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000e, t01=0x00ae}
0x16a8…16be Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000e, t01=0x00d0}
0x16be…16d4 Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000e, t01=0x00e6}
0x16d4…16ea Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000e, t01=0x00fc}
0x16ea…1700 Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000e, t01=0x0112}
0x1700…1716 Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000e, t01=0x0128}
0x1716…172c Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000e, t01=0x013e}
0x172c…1742 Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000e, t01=0x0154}
0x1742…1758 Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000e, t01=0x016a}
0x1758…176e Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000e, t01=0x0180}
0x176e…1784 Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000f, t01=0x0008}
0x1784…179a Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000f, t01=0x001e}
0x179a…17a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0034}
0x17a4…17c8 Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000f, t01=0x003e}
0x17c8…17ec Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000f, t01=0x0062}
0x17ec…1810 Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000f, t01=0x0086}
0x1810…181a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00aa}
0x181a…183e Head {h00=0x0020, h01=0x0050, text=»* CC TEXT-INTERVAL EQUATES «, t00=0x000f, t01=0x00b4}
0x183e…1848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d8}
0x1848…185c Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x000f, t01=0x00e2}
0x185c…1870 Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x000f, t01=0x00f6}
0x1870…1884 Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x000f, t01=0x010a}
0x1884…1898 Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x000f, t01=0x011e}
0x1898…18ac Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x000f, t01=0x0132}
0x18ac…18c0 Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x000f, t01=0x0146}
0x18c0…18d4 Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x000f, t01=0x015a}
0x18d4…18e8 Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x000f, t01=0x016e}
0x18e8…18fc Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x000f, t01=0x0182}
0x18fc…1910 Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x0010, t01=0x0008}
0x1910…1924 Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x0010, t01=0x001c}
0x1924…1938 Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x0010, t01=0x0030}
0x1938…1954 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0010, t01=0x0044}
0x1954…195e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0060}
0x195e…198e Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x0010, t01=0x006a}
0x198e…1998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x009a}
0x1998…19ca Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x0010, t01=0x00a4}
0x19ca…1a08 Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x0010, t01=0x00d6}
0x1a08…1a3a Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0010, t01=0x0114}
0x1a3a…1a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0146}
0x1a44…1a64 Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0010, t01=0x0150}
0x1a64…1a78 Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0010, t01=0x0170}
0x1a78…1a8c Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0010, t01=0x0184}
0x1a8c…1aa0 Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0011, t01=0x0008}
0x1aa0…1ab4 Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0011, t01=0x001c}
0x1ab4…1abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0030}
0x1abe…1ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x003a}
0x1ac8…1af4 Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0011, t01=0x0044}
0x1af4…1b20 Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0011, t01=0x0070}
0x1b20…1b3c Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0011, t01=0x009c}
0x1b3c…1b7c Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x00b8}
0x1b7c…1b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f8}
0x1b86…1bac Head {h00=0x0022, h01=0x0050, text=»* SYSTEM ADAPTION PARAMETERS«, t00=0x0011, t01=0x0102}
0x1bac…1bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0128}
0x1bb6…1bd6 Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0011, t01=0x0132}
0x1bd6…1bf8 Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /06 ENTRY K KEY«, t00=0x0011, t01=0x0152}
0x1bf8…1c1a Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /05 ENTER U KEY«, t00=0x0011, t01=0x0174}
0x1c1a…1c42 Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /12 END OF RECORD KEY «, t00=0x0012, t01=0x0008}
0x1c42…1c64 Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /17 CANCEL KEY «, t00=0x0012, t01=0x0030}
0x1c64…1c8c Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0012, t01=0x0052}
0x1c8c…1cc6 Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 40 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x007a}
0x1cc6…1d04 Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 3000 CC EXCHANGE REQUEST TIME OUT (X100 MS)«, t00=0x0012, t01=0x00b4}
0x1d04…1d1c Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0012, t01=0x00f2}
0x1d1c…1d52 Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1100 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0012, t01=0x010a}
0x1d52…1d92 Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0012, t01=0x0140}
0x1d92…1dca Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 128 LENGTH OF CASSETTE BUFFER (WORDS)«, t00=0x0012, t01=0x0180}
0x1dca…1df6 Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 60 KB BUF LENGTH IN WORDS «, t00=0x0013, t01=0x0028}
0x1df6…1e1e Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0013, t01=0x0054}
0x1e1e…1e4a Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0013, t01=0x007c}
0x1e4a…1e80 Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0013, t01=0x00a8}
0x1e80…1ebe Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1100 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0013, t01=0x00de}
0x1ebe…1ecc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x011c}
0x1ecc…1f20 Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0013, t01=0x012a}
0x1f20…1f4a Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0013, t01=0x017e}
0x1f4a…1f6e Head {h00=0x0020, h01=0x0050, text=» LEFT BYTE = SELECT ADDR. «, t00=0x0014, t01=0x0018}
0x1f6e…1f90 Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE = POLL ADDR.«, t00=0x0014, t01=0x003c}
0x1f90…1fcc Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0014, t01=0x005e}
0x1fcc…1fea Head {h00=0x001a, h01=0x0050, text=» AND SYSTEM MESSAGES«, t00=0x0014, t01=0x009a}
0x1fea…2022 Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0014, t01=0x00b8}
0x2022…2058 Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0014, t01=0x00f0}
0x2058…205c Head {h00=0x0054, h01=0x0050}
0x205c…2060 Head {h00=0x2a20, h01=0x5349}
0x2060…2080 4d 55 4c 41 54 45 44 20 54 45 52 4d 49 4e 41 4c 20 41 44 44 52 45 53 53 45 53 20 46 4f 52 20 49 ┆MULATED TERMINAL ADDRESSES FOR I┆
0x2080…20c6 4e 51 55 49 52 59 2e 20 52 49 47 48 54 20 42 59 54 45 2e 20 49 46 20 53 50 45 43 49 46 49 45 44 20 41 54 20 53 59 53 54 45 4d 20 47 00 14 01 26 00 20 00 50 4b 3a 53 41 31 5c 45 51 55 5c 30 5c 53 49 4d 2e 20 54 ┆NQUIRY. RIGHT BYTE. IF SPECIFIED AT SYSTEM G & PK:SA1 EQU 0 SIM. T┆
0x20c6…2116 (21, 0, 400) 45 52 4d 2e 20 4e 42 52 20 31 00 14 01 7e 00 16 00 50 4b 3a 53 41 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 20 00 15 00 12 00 16 00 50 4b 3a 53 41 33 5c 45 51 55 5c 30 5c 4e 42 52 20 33 20 00 15 00 2c 00 16 00 50 4b 3a 53 41 34 5c 45 51 55 5c ┆ERM. NBR 1 ~ PK:SA2 EQU 0 NBR 2 PK:SA3 EQU 0 NBR 3 , PK:SA4 EQU ┆
0x2116…2166 30 5c 4e 42 52 20 34 20 00 15 00 46 00 16 00 50 4b 3a 53 41 35 5c 45 51 55 5c 30 5c 4e 42 52 20 35 20 00 15 00 60 00 16 00 50 4b 3a 53 41 36 5c 45 51 55 5c 30 5c 4e 42 52 20 36 20 00 15 00 7a 00 16 00 50 4b 3a 53 41 37 5c 45 51 55 5c 30 5c ┆0 NBR 4 F PK:SA5 EQU 0 NBR 5 ` PK:SA6 EQU 0 NBR 6 z PK:SA7 EQU 0 ┆
0x2166…21b6 4e 42 52 20 37 20 00 15 00 94 00 16 00 50 4b 3a 53 41 38 5c 45 51 55 5c 30 5c 4e 42 52 20 38 20 00 15 00 ae 00 16 00 50 4b 3a 53 41 39 5c 45 51 55 5c 30 5c 4e 42 52 20 39 20 00 15 00 c8 00 18 00 50 4b 3a 53 41 31 30 5c 45 51 55 5c 30 5c 4e ┆NBR 7 PK:SA8 EQU 0 NBR 8 PK:SA9 EQU 0 NBR 9 PK:SA10 EQU 0 N┆
0x21b6…2206 42 52 20 31 30 20 00 15 00 e2 00 18 00 50 4b 3a 53 41 31 31 5c 45 51 55 5c 30 5c 4e 42 52 20 31 31 20 00 15 00 fe 00 18 00 50 4b 3a 53 41 31 32 5c 45 51 55 5c 30 5c 4e 42 52 20 31 32 20 00 15 01 1a 00 18 00 50 4b 3a 53 41 31 33 5c 45 51 55 ┆BR 10 PK:SA11 EQU 0 NBR 11 PK:SA12 EQU 0 NBR 12 PK:SA13 EQU┆
0x2206…2256 5c 30 5c 4e 42 52 20 31 33 20 00 15 01 36 00 18 00 50 4b 3a 53 41 31 34 5c 45 51 55 5c 30 5c 4e 42 52 20 31 34 20 00 15 01 52 00 18 00 50 4b 3a 53 41 31 35 5c 45 51 55 5c 30 5c 4e 42 52 20 31 35 20 00 15 01 6e 00 18 00 50 4b 3a 53 41 31 36 ┆ 0 NBR 13 6 PK:SA14 EQU 0 NBR 14 R PK:SA15 EQU 0 NBR 15 n PK:SA16┆
0x2256…22a6 (22, 0, 400) 5c 45 51 55 5c 30 5c 4e 42 52 20 31 36 20 00 15 01 8a 00 18 00 50 4b 3a 53 41 31 37 5c 45 51 55 5c 30 5c 4e 42 52 20 31 37 20 00 16 00 16 00 18 00 50 4b 3a 53 41 31 38 5c 45 51 55 5c 30 5c 4e 42 52 20 31 38 20 00 16 00 32 00 18 00 50 4b 3a ┆ EQU 0 NBR 16 PK:SA17 EQU 0 NBR 17 PK:SA18 EQU 0 NBR 18 2 PK:┆
0x22a6…22f6 53 41 31 39 5c 45 51 55 5c 30 5c 4e 42 52 20 31 39 20 00 16 00 4e 00 18 00 50 4b 3a 53 41 32 30 5c 45 51 55 5c 30 5c 4e 42 52 20 32 30 20 00 16 00 6a 00 18 00 50 4b 3a 53 41 32 31 5c 45 51 55 5c 30 5c 4e 42 52 20 32 31 20 00 16 00 86 00 18 ┆SA19 EQU 0 NBR 19 N PK:SA20 EQU 0 NBR 20 j PK:SA21 EQU 0 NBR 21 ┆
0x22f6…2346 00 50 4b 3a 53 41 32 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 32 20 00 16 00 a2 00 18 00 50 4b 3a 53 41 32 33 5c 45 51 55 5c 30 5c 4e 42 52 20 32 33 20 00 16 00 be 00 18 00 50 4b 3a 53 41 32 34 5c 45 51 55 5c 30 5c 4e 42 52 20 32 34 20 00 16 ┆ PK:SA22 EQU 0 NBR 22 PK:SA23 EQU 0 NBR 23 PK:SA24 EQU 0 NBR 24 ┆
0x2346…2396 00 da 00 18 00 50 4b 3a 53 41 32 35 5c 45 51 55 5c 30 5c 4e 42 52 20 32 35 20 00 16 00 f6 00 06 00 50 2a 20 00 16 01 12 00 0a 00 50 5c 45 4a 45 43 54 00 16 01 1c 00 3c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ PK:SA25 EQU 0 NBR 25 P* P EJECT < P**********************┆
0x2396…23e6 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 16 01 2a 00 06 00 50 2a 20 00 16 01 6a 00 2c 00 50 2a 20 20 20 50 41 52 41 4d 45 54 45 52 53 20 46 4f 52 20 43 4f 4e 44 49 54 49 4f 4e ┆********************************* * P* j , P* PARAMETERS FOR CONDITION┆
0x23e6…2436 (23, 0, 400) 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 16 01 74 00 28 00 50 2a 20 20 20 4f 46 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 50 41 43 4b 41 47 45 20 4d 4f 44 55 4c 45 53 20 00 17 00 14 00 06 00 50 2a 20 00 17 00 40 00 3c 00 50 2a 2a 2a 2a 2a 2a ┆AL ASSEMBLY t ( P* OF CONCENTRATOR PACKAGE MODULES P* @ < P******┆
0x2436…2486 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 2a 2a 20 00 17 00 4a 00 1c 00 50 58 3a 41 5c 45 51 55 5c 32 5c 2a 20 20 4e 4c 49 4e 45 20 3c 3d 31 ┆************************************************* J PX:A EQU 2 * NLINE <=1┆
0x2486…24d6 30 20 00 17 00 8a 00 20 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 17 00 aa 00 1a 00 50 58 3a 42 5c 45 51 55 5c 38 30 5c 2a 20 20 4e 54 43 20 3c 3d 38 30 00 17 00 ce 00 2e 00 50 5c 5c 5c 54 ┆0 P NUMBER OF TERMINAL LINES PX:B EQU 80 * NTC <=80 . P T┆
0x24d6…2526 4f 54 41 4c 20 4e 55 4d 42 45 52 20 4f 46 20 54 43 3a 53 20 4f 4e 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 17 00 ec 00 1c 00 50 58 3a 43 5c 45 51 55 5c 32 35 5c 2a 20 20 4e 53 49 4d 20 3c 3d 32 35 20 00 17 01 1e 00 24 00 50 5c 5c ┆OTAL NUMBER OF TC:S ON TERMINAL LINES PX:C EQU 25 * NSIM <=25 $ P ┆
0x2526…2576 5c 4e 55 4d 42 45 52 20 4f 46 20 53 49 4d 55 4c 41 54 45 44 20 54 45 52 4d 49 4e 41 4c 53 00 17 01 3e 00 14 00 50 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 17 01 66 00 16 00 50 58 3a 44 5c 45 51 55 5c 30 5c 2a 20 20 4c 4f 4f 50 20 ┆ NUMBER OF SIMULATED TERMINALS > P FOR INQUIRIES f PX:D EQU 0 * LOOP ┆
0x2576…25c6 (24, 0, 400) 00 17 01 7e 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4d 55 4c 54 49 50 4f 49 4e 54 20 43 4f 4e 46 49 47 2e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 18 00 08 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 4f 4f 50 20 43 4f 4e 46 49 47 ┆ ~ . P IF = 0. MULTIPOINT CONFIG. DOWNSTREAMS . P IF = 1. LOOP CONFIG┆
0x25c6…2616 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 18 00 3a 00 1c 00 50 58 3a 45 5c 45 51 55 5c 34 5c 2a 20 20 4e 53 50 4f 4f 4c 20 3c 3d 34 20 00 18 00 6c 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 45 44 49 54 20 42 55 ┆URATION DOWNSTREAMS : PX:E EQU 4 * NSPOOL <=4 l ( P NUMBER OF EDIT BU┆
0x2616…2666 46 46 45 52 53 20 46 4f 52 20 53 50 4f 4f 4c 20 00 18 00 8c 00 22 00 50 5c 5c 5c 46 55 4e 43 54 49 4f 4e 20 54 4f 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 2e 00 18 00 b8 00 20 00 50 58 3a 46 5c 45 51 55 5c 33 5c 2a 20 20 30 3c 20 4e 54 ┆FFERS FOR SPOOL " P FUNCTION TO OPERATORS TERM. PX:F EQU 3 * 0< NT┆
0x2666…26b6 50 4c 49 4e 20 3c 3d 33 30 20 00 18 00 de 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 52 41 53 4b 53 20 49 4e 20 50 4f 4f 4c 20 27 54 50 4c 49 4e 27 20 00 18 01 02 00 26 00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e 53 41 ┆PLIN <=30 ( P NUMBER OF TRASKS IN POOL 'TPLIN' & P HANDLING TRANSA┆
0x26b6…2706 43 54 49 4f 4e 53 20 46 52 4f 4d 20 54 43 3a 53 00 18 01 2e 00 1e 00 50 58 3a 47 5c 45 51 55 5c 34 5c 2a 20 20 30 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 18 01 58 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 52 41 53 4b 53 20 49 4e ┆CTIONS FROM TC:S . PX:G EQU 4 * 0< NTPSUP <=5 X ( P NUMBER OF TRASKS IN┆
0x2706…2756 (25, 0, 398) 20 50 4f 4f 4c 20 27 54 50 53 55 50 27 20 00 18 01 7a 00 2c 00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 20 46 52 4f 4d 20 4d 41 49 4e 20 46 52 41 4d 45 00 19 00 16 00 1c 00 50 5c 5c 5c 4f 52 20 4f 50 45 52 ┆ POOL 'TPSUP' z , P HANDLING TRANSACTIONS FROM MAIN FRAME P OR OPER┆
0x2756…27a6 41 54 4f 52 53 20 54 45 52 4d 49 4e 41 4c 00 19 00 46 00 18 00 50 58 3a 48 5c 45 51 55 5c 31 5c 2a 20 20 4c 49 4e 54 53 54 20 00 19 00 66 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4e 4f 20 4c 49 4e 45 20 54 45 53 54 20 43 4f 4d 4d 41 4e ┆ATORS TERMINAL F PX:H EQU 1 * LINTST f $ P IF = 0. NO LINE TEST COMMAN┆
0x27a6…27f6 44 20 00 19 00 82 00 30 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 49 4e 45 20 54 45 53 54 20 46 41 43 49 4c 49 54 59 20 28 34 2d 57 49 52 45 20 4f 4e 4c 59 29 20 00 19 00 aa 00 18 00 50 58 3a 49 5c 45 51 55 5c 32 5c 2a 20 20 4f 4e 4c 49 4e ┆D 0 P IF = 1. LINE TEST FACILITY (4-WIRE ONLY) PX:I EQU 2 * ONLIN┆
0x27f6…2846 45 20 00 19 00 de 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 19 00 fa 00 28 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4f 4e 2f 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 ┆E $ P IF = 0. OFF LINE CONCENTRATOR ( P IF = 1. ON/OFF LINE CONCENT┆
0x2846…2894 52 41 54 4f 52 20 00 19 01 22 00 24 00 50 5c 5c 5c 49 46 20 3d 20 32 2e 20 4f 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 19 01 4e 00 18 00 50 58 3a 4b 5c 45 51 55 5c 31 5c 2a 20 20 53 45 54 41 44 52 20 00 19 01 76 ┆RATOR " $ P IF = 2. ON LINE CONCENTRATOR N PX:K EQU 1 * SETADR v┆
0x2894…28e4 (26, 0, 400) 00 06 00 50 2a 20 00 1a 00 04 00 06 00 50 2a 20 00 1a 00 0e 00 06 00 50 2a 20 00 1a 00 18 00 06 00 50 2a 20 00 1a 00 22 00 06 00 50 2a 20 00 1a 00 2c 00 06 00 50 2a 20 00 1a 00 36 00 06 00 50 2a 20 00 1a 00 40 00 0a 00 50 5c 4c 49 53 54 20 ┆ P* P* P* P* " P* , P* 6 P* @ P LIST ┆
0x28e4…2934 00 1a 00 4a 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4e 53 55 20 00 1a 00 58 00 48 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 4b 20 3a 20 43 20 4b 20 4c 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ J P EJECT IDENT C:NSU X H P*******************K : C K L **************┆
0x2934…2984 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 1a 00 74 00 06 00 50 2a 20 00 1a 00 c0 00 06 00 50 2a 20 00 1a 00 ca 00 1a 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 43 20 4b 20 4c 00 1a 00 d4 00 06 ┆*********************** t P* P* P*SUBROUTINE K : C K L ┆
0x2984…29d4 00 50 2a 20 00 1a 00 f2 00 3a 00 50 2a 43 48 45 43 4b 53 20 49 46 20 54 48 45 20 4c 49 4e 45 20 4e 42 52 20 49 4e 20 4b 42 20 42 55 46 46 45 52 20 45 58 49 53 54 53 20 49 4e 20 53 55 53 54 45 4d 20 00 1a 00 fc 00 2c 00 50 2a 49 46 20 4e 4f ┆ P* : P*CHECKS IF THE LINE NBR IN KB BUFFER EXISTS IN SUSTEM , P*IF NO┆
0x29d4…2a24 54 2c 20 27 4c 49 4e 45 20 4e 4f 54 20 49 4e 20 53 59 53 54 45 4d 27 20 49 53 20 50 52 49 4e 54 45 44 00 1a 01 3a 00 2a 00 50 2a 45 4c 53 45 20 4c 49 4e 45 20 57 42 20 41 44 44 52 45 53 53 20 49 53 20 46 49 4c 4c 45 44 20 49 4e 20 54 43 41 ┆T, 'LINE NOT IN SYSTEM' IS PRINTED : * P*ELSE LINE WB ADDRESS IS FILLED IN TCA┆
0x2a24…2a74 (27, 0, 400) 00 1a 01 6a 00 06 00 50 2a 20 00 1b 00 08 00 06 00 50 2a 20 00 1b 00 12 00 24 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 43 46 20 20 20 41 31 34 2c 4b 3a 43 4b 4c 20 00 1b 00 1c 00 06 00 50 2a 20 00 1b 00 44 00 32 00 50 2a 20 ┆ j P* P* $ P* CALL SEQUENCE: CF A14,K:CKL P* D 2 P* ┆
0x2a74…2ac4 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 41 38 20 3d 20 41 44 44 52 45 53 53 20 54 4f 20 49 4e 50 55 54 20 42 55 46 46 45 52 20 00 1b 00 4e 00 06 00 50 2a 20 00 1b 00 84 00 1c 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b ┆ ENTRY PARAM: A8 = ADDRESS TO INPUT BUFFER N P* P* SUBROUTINES: K┆
0x2ac4…2b14 3a 50 52 54 4e 20 00 1b 00 8e 00 06 00 50 2a 20 00 1b 00 ae 00 34 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 4d 3a 5c 41 32 20 3d 20 4c 49 4e 45 20 4e 42 52 20 28 32 20 41 53 43 49 49 20 44 49 47 49 54 53 29 20 00 1b 00 b8 00 1c 00 50 ┆:PRTN P* 4 P* RETURN PARAM: A2 = LINE NBR (2 ASCII DIGITS) P┆
0x2b14…2b64 2a 5c 5c 41 33 20 3d 20 4c 49 4e 45 20 57 42 20 41 44 44 52 45 53 53 20 00 1b 00 f0 00 38 00 50 2a 5c 5c 41 34 20 3d 20 49 4e 44 45 58 20 49 4e 20 49 4e 50 55 54 20 42 55 46 20 54 4f 20 4c 41 53 54 20 44 49 47 49 54 20 49 4e 20 4c 49 4e 45 ┆* A3 = LINE WB ADDRESS 8 P* A4 = INDEX IN INPUT BUF TO LAST DIGIT IN LINE┆
0x2b64…2bb4 20 4e 42 52 00 1b 01 10 00 16 00 50 2a 5c 5c 4c 49 4e 45 20 57 42 20 49 4e 20 54 43 41 20 00 1b 01 4c 00 1c 00 50 2a 20 20 5c 5c 43 4e 44 20 3d 20 30 20 49 46 20 57 42 20 46 4f 55 4e 44 00 1b 01 66 00 2a 00 50 2a 20 20 5c 5c 20 20 20 20 20 ┆ NBR P* LINE WB IN TCA L P* CND = 0 IF WB FOUND f * P* ┆
0x2bb4…2c04 (28, 0, 400) 20 31 20 49 46 20 4c 49 4e 45 20 4e 42 52 20 4e 4f 54 20 49 4e 20 53 59 53 54 45 4d 00 1b 01 86 00 06 00 50 2a 20 00 1c 00 24 00 1c 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 44 49 52 45 43 54 20 00 1c 00 2e 00 06 00 50 2a 20 ┆ 1 IF LINE NBR NOT IN SYSTEM P* $ P* RETURN METOD: DIRECT . P* ┆
0x2c04…2c54 00 1c 00 4e 00 1a 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 31 2d 41 35 00 1c 00 58 00 06 00 50 2a 20 00 1c 00 76 00 1e 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 34 20 57 4f 52 44 53 20 00 1c 00 80 00 06 ┆ N P* CHANGED REGS: A1-A5 X P* v P* STACKER NEED: 14 WORDS ┆
0x2c54…2ca4 00 50 2a 20 00 1c 00 a2 00 24 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 4e 4f 54 20 52 45 45 4e 54 52 41 4e 54 5c 20 00 1c 00 ac 00 06 00 50 2a 20 00 1c 00 d4 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f ┆ P* $ P* LIMITATIONS: NOT REENTRANT P* P* CALLING TASK: O┆
0x2ca4…2cf4 50 43 4f 4d 00 1c 00 de 00 06 00 50 2a 20 00 1c 00 fc 00 44 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆PCOM P* D P**********************************************************┆
0x2cf4…2d44 2a 2a 2a 2a 2a 20 00 1c 01 06 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4e 53 55 20 00 1c 01 4e 00 10 00 50 2a 5c 5c 4b 20 3a 20 43 20 4b 20 4c 00 1c 01 6a 00 06 00 50 2a 20 00 1c 01 7e 00 24 00 50 2a 20 20 20 47 45 54 20 ┆***** P EJECT IDENT C:NSU N P* K : C K L j P* ~ $ P* GET ┆
0x2d44…2d94 (29, 0, 400) 4c 49 4e 45 20 4e 42 52 20 46 52 4f 4d 20 4b 42 20 42 55 46 46 45 52 5c 00 1c 01 88 00 06 00 50 2a 20 00 1d 00 20 00 06 00 50 2a 20 00 1d 00 2a 00 10 00 50 4b 3a 43 4b 4c 5c 45 51 55 5c 2a 20 00 1d 00 34 00 0e 00 50 5c 4c 44 4b 5c 41 34 2c ┆LINE NBR FROM KB BUFFER P* P* * PK:CKL EQU * 4 P LDK A4,┆
0x2d94…2de4 33 20 00 1d 00 48 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 30 20 00 1d 00 5a 00 0e 00 50 5c 4c 44 52 5c 41 35 2c 41 38 00 1d 00 6c 00 0e 00 50 5c 41 44 4b 5c 41 35 2c 34 20 00 1d 00 7e 00 1e 00 50 5c 4c 43 52 5c 41 32 2c 41 35 5c 47 45 54 20 32 ┆3 H P LDK A2,0 Z P LDR A5,A8 l P ADK A5,4 ~ P LCR A2,A5 GET 2┆
0x2de4…2e34 3a 4e 44 20 44 49 47 49 54 20 00 1d 00 90 00 0e 00 50 5c 4c 44 52 5c 41 33 2c 41 32 00 1d 00 b2 00 10 00 50 5c 53 55 4b 5c 41 33 2c 2f 33 30 20 00 1d 00 c4 00 2a 00 50 5c 52 46 28 4e 29 5c 43 4b 4c 31 30 30 5c 4c 49 4e 45 20 4e 42 52 20 4f ┆:ND DIGIT P LDR A3,A2 P SUK A3,/30 * P RF(N) CKL100 LINE NBR O┆
0x2e34…2e84 4e 4c 59 20 4f 4e 45 20 44 49 47 49 54 20 00 1d 00 d8 00 0e 00 50 5c 53 55 4b 5c 41 33 2c 39 20 00 1d 01 06 00 2a 00 50 5c 52 46 28 50 29 5c 43 4b 4c 31 30 30 5c 4c 49 4e 45 20 4e 42 52 20 4f 4e 4c 59 20 4f 4e 45 20 44 49 47 49 54 20 00 1d ┆NLY ONE DIGIT P SUK A3,9 * P RF(P) CKL100 LINE NBR ONLY ONE DIGIT ┆
0x2e84…2ed4 01 18 00 0e 00 50 5c 4c 44 4b 5c 41 34 2c 34 20 00 1d 01 46 00 0e 00 50 5c 45 43 52 5c 41 32 2c 41 32 00 1d 01 58 00 0e 00 50 5c 53 55 4b 5c 41 35 2c 31 20 00 1d 01 6a 00 1e 00 50 5c 4c 43 52 5c 41 32 2c 41 35 5c 47 45 54 20 31 3a 53 54 20 ┆ P LDK A4,4 F P ECR A2,A2 X P SUK A5,1 j P LCR A2,A5 GET 1:ST ┆
0x2ed4…2ee0 (30, 0, 400) 44 49 47 49 54 20 00 1d 01 7c 00 0e ┆DIGIT | ┆
0x2ee0…2f30 00 50 5c 45 43 52 5c 41 32 2c 41 32 00 1e 00 0e 00 0e 00 50 5c 52 46 5c 43 4b 4c 31 31 30 00 1e 00 20 00 10 00 50 43 4b 4c 31 30 30 5c 45 51 55 5c 2a 00 1e 00 32 00 20 00 50 5c 41 44 4b 4c 5c 41 32 2c 2f 33 30 30 30 5c 46 49 4c 4c 49 4e 47 ┆ P ECR A2,A2 P RF CKL110 PCKL100 EQU * 2 P ADKL A2,/3000 FILLING┆
0x2f30…2f80 20 5a 45 52 4f 20 00 1e 00 46 00 0e 00 50 5c 53 55 4b 5c 41 35 2c 31 20 00 1e 00 6a 00 1e 00 50 5c 4c 43 52 5c 41 32 2c 41 35 5c 47 45 54 20 31 3a 53 54 20 44 49 47 49 54 20 00 1e 00 7c 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 ┆ ZERO F P SUK A5,1 j P LCR A2,A5 GET 1:ST DIGIT | P EJECT IDENT ┆
0x2f80…2fd0 43 3a 4e 53 55 20 00 1e 00 9e 00 06 00 50 2a 20 00 1e 00 ba 00 16 00 50 2a 20 20 20 53 45 41 52 43 48 20 4c 49 4e 45 20 57 42 00 1e 00 c4 00 06 00 50 2a 20 00 1e 00 de 00 10 00 50 43 4b 4c 31 31 30 5c 45 51 55 5c 2a 00 1e 00 e8 00 14 00 50 ┆C:NSU P* P* SEARCH LINE WB P* PCKL110 EQU * P┆
0x2fd0…3020 5c 4c 44 4b 4c 5c 41 33 2c 4b 3a 43 4f 4e 46 20 00 1e 00 fc 00 10 00 50 43 4b 4c 31 35 30 5c 45 51 55 5c 2a 00 1e 01 14 00 10 00 50 5c 4c 44 52 2a 5c 41 35 2c 41 33 20 00 1e 01 28 00 0e 00 50 5c 43 57 52 5c 41 32 2c 41 35 00 1e 01 3c 00 20 ┆ LDKL A3,K:CONF PCKL150 EQU * P LDR* A5,A3 ( P CWR A2,A5 < ┆
0x3020…3060 00 50 5c 52 46 28 45 29 5c 43 4b 4c 33 30 30 5c 4c 49 4e 45 20 57 42 20 46 4f 55 4e 44 20 00 1e 01 4e 00 14 00 50 5c 41 44 4b 4c 5c 41 33 2c 4b 3a 4c 45 4e 44 20 00 1e 01 72 00 12 00 50 5c 43 ┆ P RF(E) CKL300 LINE WB FOUND N P ADKL A3,K:LEND r P C┆
0x3060…5978 […elided…]
0x5978…59b0 00 7a 00 06 00 50 2a 20 00 39 00 84 00 0e 00 50 54 4c 58 44 5c 45 51 55 5c 2a 00 39 00 8e 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 30 20 00 39 00 a0 00 28 00 50 5c 4c 44 4b ┆ z P* 9 PTLXD EQU * 9 P LDK A2,0 9 ( P LDK┆
0x59b0…5a00 5c 41 36 2c 30 5c 5a 45 52 4f 20 53 55 50 52 45 53 53 49 4f 4e 20 49 4e 44 49 43 41 54 4f 52 20 00 39 00 b2 00 22 00 50 5c 4c 44 4b 5c 41 35 2c 34 5c 4e 55 4d 42 45 52 20 4f 46 20 44 49 47 49 54 53 20 2d 31 20 00 39 00 de 00 2a 00 50 5c 4c ┆ A6,0 ZERO SUPRESSION INDICATOR 9 " P LDK A5,4 NUMBER OF DIGITS -1 9 * P L┆
0x5a00…5a50 44 4b 4c 5c 41 34 2c 44 45 43 49 4d 41 5c 48 49 47 48 45 53 54 20 4f 52 44 45 52 20 44 45 43 49 4d 41 4c 20 00 39 01 04 00 1e 00 50 5c 4c 44 52 5c 41 33 2c 41 33 5c 48 45 58 20 57 4f 52 44 20 3e 20 33 32 4b 3f 00 39 01 32 00 16 00 50 5c 52 ┆DKL A4,DECIMA HIGHEST ORDER DECIMAL 9 P LDR A3,A3 HEX WORD > 32K? 9 2 P R┆
0x5a50…5a88 46 28 4e 4e 29 5c 54 4c 58 35 30 30 5c 4e 4f 20 00 39 01 54 00 10 00 50 54 4c 58 31 30 30 5c 45 51 55 5c 2a 00 39 01 6e 00 10 00 50 5c 53 55 52 2a 5c 41 33 2c 41 34 20 ┆F(NN) TLX500 NO 9 T PTLX100 EQU * 9 n P SUR* A3,A4 ┆
0x5a88…5ad8 (58, 0, 398) 00 39 01 82 00 1a 00 50 5c 52 46 28 4f 29 5c 54 4c 58 32 30 30 5c 4f 56 45 52 46 4c 4f 57 00 3a 00 08 00 26 00 50 5c 41 44 4b 5c 41 32 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 44 45 43 49 4d 41 4c 20 44 49 47 49 54 20 00 3a 00 26 00 0e 00 50 ┆ 9 P RF(O) TLX200 OVERFLOW : & P ADK A2,1 INCREMENT DECIMAL DIGIT : & P┆
0x5ad8…5b28 5c 52 42 5c 54 4c 58 31 30 30 00 3a 00 50 00 14 00 50 54 4c 58 32 30 30 5c 41 44 4b 5c 41 32 2c 31 20 00 3a 00 62 00 0e 00 50 5c 52 46 5c 54 4c 58 35 30 30 00 3a 00 7a 00 10 00 50 54 4c 58 33 30 30 5c 45 51 55 5c 2a 00 3a 00 8c 00 0e 00 50 ┆ RB TLX100 : P PTLX200 ADK A2,1 : b P RF TLX500 : z PTLX300 EQU * : P┆
0x5b28…5b78 5c 4c 44 4b 5c 41 32 2c 30 20 00 3a 00 a0 00 10 00 50 5c 41 44 52 2a 5c 41 33 2c 41 34 20 00 3a 00 b2 00 0e 00 50 5c 53 55 4b 5c 41 35 2c 31 20 00 3a 00 c6 00 0e 00 50 5c 4c 44 52 5c 41 35 2c 41 35 00 3a 00 d8 00 20 00 50 5c 52 46 28 5a 29 ┆ LDK A2,0 : P ADR* A3,A4 : P SUK A5,1 : P LDR A5,A5 : P RF(Z)┆
0x5b78…5bc8 5c 54 4c 58 37 30 30 5c 47 45 54 20 4c 41 53 54 20 44 49 47 49 54 00 3a 00 ea 00 10 00 50 54 4c 58 34 30 30 5c 45 51 55 5c 2a 00 3a 01 0e 00 0e 00 50 5c 41 44 4b 5c 41 34 2c 32 20 00 3a 01 22 00 10 00 50 54 4c 58 35 30 30 5c 45 51 55 5c 2a ┆ TLX700 GET LAST DIGIT : PTLX400 EQU * : P ADK A4,2 : " PTLX500 EQU *┆
0x5bc8…5c16 00 3a 01 34 00 10 00 50 5c 53 55 52 2a 5c 41 33 2c 41 34 20 00 3a 01 48 00 12 00 50 5c 52 46 28 4e 29 5c 54 4c 58 36 30 30 20 00 3a 01 5c 00 0e 00 50 5c 41 44 4b 5c 41 32 2c 31 20 00 3a 01 72 00 0e 00 50 5c 52 42 5c 54 4c 58 35 30 30 ┆ : 4 P SUR* A3,A4 : H P RF(N) TLX600 : P ADK A2,1 : r P RB TLX500┆
0x5c16…5c66 (59, 0, 400) 00 3a 01 84 00 10 00 50 54 4c 58 36 30 30 5c 45 51 55 5c 2a 00 3b 00 08 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 32 00 3b 00 1c 00 1c 00 50 5c 52 46 28 4e 5a 29 5c 54 4c 58 36 31 30 5c 4e 4f 54 20 5a 45 52 4f 20 00 3b 00 2e 00 0e 00 50 5c 4c ┆ : PTLX600 EQU * ; P LDR A2,A2 ; P RF(NZ) TLX610 NOT ZERO ; . P L┆
0x5c66…5cb6 44 52 5c 41 36 2c 41 36 00 3b 00 4e 00 24 00 50 5c 52 46 28 4e 5a 29 5c 54 4c 58 36 32 30 5c 4e 4f 54 20 4c 45 41 44 49 4e 47 20 5a 45 52 4f 20 00 3b 00 60 00 20 00 50 5c 4c 44 4b 5c 41 32 2c 27 20 27 5c 47 45 54 20 53 50 41 43 45 20 43 48 ┆DR A6,A6 ; N $ P RF(NZ) TLX620 NOT LEADING ZERO ; ` P LDK A2,' ' GET SPACE CH┆
0x5cb6…5d06 41 52 2e 20 00 3b 00 88 00 0e 00 50 5c 52 46 5c 54 4c 58 36 33 30 00 3b 00 ac 00 10 00 50 54 4c 58 36 31 30 5c 45 51 55 5c 2a 00 3b 00 be 00 2e 00 50 5c 4c 44 4b 5c 41 36 2c 31 5c 49 4e 44 49 43 41 54 45 20 45 4e 44 20 4f 46 20 5a 45 52 4f ┆AR. ; P RF TLX630 ; PTLX610 EQU * ; . P LDK A6,1 INDICATE END OF ZERO┆
0x5d06…5d56 20 53 55 50 52 45 53 53 49 4f 4e 20 00 3b 00 d2 00 10 00 50 54 4c 58 36 32 30 5c 45 51 55 5c 2a 00 3b 01 04 00 26 00 50 5c 4c 43 5c 41 32 2c 4b 3a 48 58 41 53 2c 41 32 5c 43 4f 4e 56 45 52 54 20 54 4f 20 41 53 43 49 49 20 00 3b 01 18 00 10 ┆ SUPRESSION ; PTLX620 EQU * ; & P LC A2,K:HXAS,A2 CONVERT TO ASCII ; ┆
0x5d56…5da6 00 50 54 4c 58 36 33 30 5c 45 51 55 5c 2a 00 3b 01 42 00 0e 00 50 5c 53 43 52 5c 41 32 2c 41 31 00 3b 01 56 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 31 20 00 3b 01 68 00 1a 00 50 5c 52 42 5c 54 4c 58 33 30 30 5c 4e 45 58 54 20 44 49 47 49 54 20 ┆ PTLX630 EQU * ; B P SCR A2,A1 ; V P ADK A1,1 ; h P RB TLX300 NEXT DIGIT ┆
0x5da6…5df6 (60, 2, 220) 00 3b 01 7a 00 10 00 50 54 4c 58 37 30 30 5c 45 51 55 5c 2a 00 3c 00 08 00 28 00 50 5c 4c 43 5c 41 33 2c 4b 3a 48 58 41 53 2c 41 33 5c 43 4f 4e 56 45 52 54 20 4c 41 53 54 20 44 49 47 49 54 20 00 3c 00 1c 00 0e 00 50 5c 53 43 52 5c 41 33 2c ┆ ; z PTLX700 EQU * < ( P LC A3,K:HXAS,A3 CONVERT LAST DIGIT < P SCR A3,┆
0x5df6…5e46 41 31 00 3c 00 48 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 3c 00 5a 00 06 00 50 2a 20 00 3c 00 6a 00 16 00 50 44 45 43 49 4d 41 5c 44 41 54 41 5c 31 30 30 30 30 20 00 3c 00 74 00 0e 00 50 5c 44 41 54 41 5c 31 30 30 30 00 3c 00 8e 00 0e 00 50 ┆A1 < H P RTN A14 < Z P* < j PDECIMA DATA 10000 < t P DATA 1000 < P┆
0x5e46…5e82 5c 44 41 54 41 5c 31 30 30 20 00 3c 00 a0 00 0c 00 50 5c 44 41 54 41 5c 31 30 00 3c 00 b2 00 06 00 50 2a 20 00 3c 00 c2 00 08 00 50 5c 45 4e 44 00 3c 00 cc 40 04 00 00 00 3c 00 d8 ┆ DATA 100 < P DATA 10 < P* < P END < @ < ┆
0x5e82…5e8a (61, 1, 8) 20 04 00 00 00 3d 00 04 ┆ = ┆
0x5e8a…5eda (62, 0, 400) 43 3a 46 49 47 20 00 45 01 82 00 38 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 2a 2a 2a 2a 20 00 46 00 0e 00 06 00 50 2a 20 00 46 00 4a ┆C:FIG E 8 P*************************************************** F P* F J┆
0x5eda…5f2a 00 14 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 00 46 00 54 00 06 00 50 2a 20 00 46 00 6c 00 16 00 50 5c 44 41 54 41 5c 30 5c 54 43 20 41 44 44 52 45 53 53 00 46 00 76 00 24 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f ┆ P* TC WORKBLOCK F T P* F l P DATA 0 TC ADDRESS F v $ P DATA 0,/B NBR O┆
0x5f2a…5f7a 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 20 00 46 00 90 00 22 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 00 46 00 b8 00 2a 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 ┆F TIMES TC BUSY F " P DATA 0,/B NBR OF TRANSACTIONS F * P DATA 0,/B NBR OF ┆
0x5f7a…5fca 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 53 20 00 46 00 de 00 2c 00 50 5c 44 41 54 41 5c 27 30 30 30 30 30 30 27 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 00 46 01 0c 00 06 00 50 2a 20 00 46 ┆TRANSMISSION ERRORS F , P DATA '000000' TIME OF LAST TRANSMISSION F P* F┆
0x5fca…601a 01 3c 00 12 00 50 2a 20 20 20 54 43 20 53 54 41 54 55 53 20 00 46 01 46 00 06 00 50 2a 20 00 46 01 5c 00 0c 00 50 5c 44 41 54 41 5c 30 20 00 46 01 66 00 38 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 ┆ < P* TC STATUS F F P* F P DATA 0 F f 8 P**************************┆
0x601a…606a (63, 0, 398) 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 46 01 76 00 06 00 50 2a 20 00 47 00 22 00 14 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 00 47 00 2c 00 06 00 50 2a 20 00 47 00 44 00 16 00 50 5c 44 ┆************************* F v P* G " P* TC WORKBLOCK G , P* G D P D┆
0x606a…60ba 41 54 41 5c 30 5c 54 43 20 41 44 44 52 45 53 53 00 47 00 4e 00 24 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 20 00 47 00 68 00 22 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f ┆ATA 0 TC ADDRESS G N $ P DATA 0,/B NBR OF TIMES TC BUSY G h " P DATA 0,/B NBR O┆
0x60ba…610a 46 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 00 47 00 90 00 2a 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 53 20 00 47 00 b6 00 2c 00 50 5c 44 41 54 41 5c 27 30 30 30 30 30 ┆F TRANSACTIONS G * P DATA 0,/B NBR OF TRANSMISSION ERRORS G , P DATA '00000┆
0x610a…615a 30 27 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 00 47 00 e4 00 06 00 50 2a 20 00 47 01 14 00 12 00 50 2a 20 20 20 54 43 20 53 54 41 54 55 53 20 00 47 01 1e 00 06 00 50 2a 20 00 47 01 34 00 0c 00 50 5c 44 ┆0' TIME OF LAST TRANSMISSION G P* G P* TC STATUS G P* G 4 P D┆
0x615a…61a8 41 54 41 5c 30 20 00 47 01 3e 00 10 00 50 5c 49 46 46 5c 4e 54 43 3d 31 36 20 00 47 01 4e 00 10 00 50 5c 49 46 46 5c 4e 54 43 3d 31 37 20 00 47 01 62 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 47 20 00 47 01 76 ┆ATA 0 G > P IFF NTC=16 G N P IFF NTC=17 G b P EJECT IDENT C:FIG G v┆
0x61a8…61f8 (64, 0, 400) 00 38 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 2a 2a 2a 2a 20 00 48 00 04 00 06 00 50 2a 20 00 48 00 40 00 14 00 50 2a 20 20 20 54 43 ┆ 8 P*************************************************** H P* H @ P* TC┆
0x61f8…6248 20 57 4f 52 4b 42 4c 4f 43 4b 00 48 00 4a 00 06 00 50 2a 20 00 48 00 62 00 16 00 50 5c 44 41 54 41 5c 30 5c 54 43 20 41 44 44 52 45 53 53 00 48 00 6c 00 24 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 ┆ WORKBLOCK H J P* H b P DATA 0 TC ADDRESS H l $ P DATA 0,/B NBR OF TIMES TC┆
0x6248…6298 20 42 55 53 59 20 00 48 00 86 00 22 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 00 48 00 ae 00 2a 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 4d 49 53 53 49 ┆ BUSY H " P DATA 0,/B NBR OF TRANSACTIONS H * P DATA 0,/B NBR OF TRANSMISSI┆
0x6298…62e8 4f 4e 20 45 52 52 4f 52 53 20 00 48 00 d4 00 2c 00 50 5c 44 41 54 41 5c 27 30 30 30 30 30 30 27 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 00 48 01 02 00 06 00 50 2a 20 00 48 01 32 00 12 00 50 2a 20 20 20 ┆ON ERRORS H , P DATA '000000' TIME OF LAST TRANSMISSION H P* H 2 P* ┆
0x62e8…6338 54 43 20 53 54 41 54 55 53 20 00 48 01 3c 00 06 00 50 2a 20 00 48 01 52 00 0c 00 50 5c 44 41 54 41 5c 30 20 00 48 01 5c 00 38 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 ┆TC STATUS H < P* H R P DATA 0 H 8 P************************************┆
0x6338…6388 (65, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 48 01 6c 00 06 00 50 2a 20 00 49 00 18 00 14 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 00 49 00 22 00 06 00 50 2a 20 00 49 00 3a 00 16 00 50 5c 44 41 54 41 5c 30 5c 54 43 20 41 ┆*************** H l P* I P* TC WORKBLOCK I " P* I : P DATA 0 TC A┆
0x6388…63d8 44 44 52 45 53 53 00 49 00 44 00 24 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 20 00 49 00 5e 00 22 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 41 43 54 ┆DDRESS I D $ P DATA 0,/B NBR OF TIMES TC BUSY I ^ " P DATA 0,/B NBR OF TRANSACT┆
0x63d8…6428 49 4f 4e 53 00 49 00 86 00 2a 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 53 20 00 49 00 ac 00 2c 00 50 5c 44 41 54 41 5c 27 30 30 30 30 30 30 27 5c 54 49 4d 45 20 4f 46 ┆IONS I * P DATA 0,/B NBR OF TRANSMISSION ERRORS I , P DATA '000000' TIME OF┆
0x6428…6478 20 4c 41 53 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 00 49 00 da 00 06 00 50 2a 20 00 49 01 0a 00 12 00 50 2a 20 20 20 54 43 20 53 54 41 54 55 53 20 00 49 01 14 00 06 00 50 2a 20 00 49 01 2a 00 0c 00 50 5c 44 41 54 41 5c 30 20 00 49 01 34 ┆ LAST TRANSMISSION I P* I P* TC STATUS I P* I * P DATA 0 I 4┆
0x6478…64c8 00 10 00 50 5c 49 46 46 5c 4e 54 43 3d 31 38 20 00 49 01 44 00 10 00 50 5c 49 46 46 5c 4e 54 43 3d 31 39 20 00 49 01 58 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 47 20 00 49 01 6c 00 38 00 50 2a 2a 2a 2a 2a 2a 2a 2a ┆ P IFF NTC=18 I D P IFF NTC=19 I X P EJECT IDENT C:FIG I l 8 P********┆
0x64c8…6518 (66, 0, 400) 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 49 01 88 00 06 00 50 2a 20 00 4a 00 34 00 14 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 00 4a ┆******************************************* I P* J 4 P* TC WORKBLOCK J┆
0x6518…6568 00 3e 00 06 00 50 2a 20 00 4a 00 56 00 16 00 50 5c 44 41 54 41 5c 30 5c 54 43 20 41 44 44 52 45 53 53 00 4a 00 60 00 24 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 20 00 4a 00 7a 00 22 ┆ > P* J V P DATA 0 TC ADDRESS J ` $ P DATA 0,/B NBR OF TIMES TC BUSY J z "┆
0x6568…65b8 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 00 4a 00 a2 00 2a 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 53 20 00 4a ┆ P DATA 0,/B NBR OF TRANSACTIONS J * P DATA 0,/B NBR OF TRANSMISSION ERRORS J┆
0x65b8…6608 00 c8 00 2c 00 50 5c 44 41 54 41 5c 27 30 30 30 30 30 30 27 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 00 4a 00 f6 00 06 00 50 2a 20 00 4a 01 26 00 12 00 50 2a 20 20 20 54 43 20 53 54 41 54 55 53 20 00 4a ┆ , P DATA '000000' TIME OF LAST TRANSMISSION J P* J & P* TC STATUS J┆
0x6608…6658 01 30 00 06 00 50 2a 20 00 4a 01 46 00 0c 00 50 5c 44 41 54 41 5c 30 20 00 4a 01 50 00 38 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 2a ┆ 0 P* J F P DATA 0 J P 8 P************************************************┆
0x6658…66a8 (67, 0, 400) 2a 2a 2a 20 00 4a 01 60 00 06 00 50 2a 20 00 4b 00 0c 00 14 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 00 4b 00 16 00 06 00 50 2a 20 00 4b 00 2e 00 16 00 50 5c 44 41 54 41 5c 30 5c 54 43 20 41 44 44 52 45 53 53 00 4b 00 38 00 24 ┆*** J ` P* K P* TC WORKBLOCK K P* K . P DATA 0 TC ADDRESS K 8 $┆
0x66a8…66f8 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 20 00 4b 00 52 00 22 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 00 4b 00 7a 00 2a 00 50 ┆ P DATA 0,/B NBR OF TIMES TC BUSY K R " P DATA 0,/B NBR OF TRANSACTIONS K z * P┆
0x66f8…6748 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 53 20 00 4b 00 a0 00 2c 00 50 5c 44 41 54 41 5c 27 30 30 30 30 30 30 27 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 4d ┆ DATA 0,/B NBR OF TRANSMISSION ERRORS K , P DATA '000000' TIME OF LAST TRANSM┆
0x6748…6798 49 53 53 49 4f 4e 00 4b 00 ce 00 06 00 50 2a 20 00 4b 00 fe 00 12 00 50 2a 20 20 20 54 43 20 53 54 41 54 55 53 20 00 4b 01 08 00 06 00 50 2a 20 00 4b 01 1e 00 0c 00 50 5c 44 41 54 41 5c 30 20 00 4b 01 28 00 10 00 50 5c 49 46 46 5c 4e 54 43 ┆ISSION K P* K P* TC STATUS K P* K P DATA 0 K ( P IFF NTC┆
0x6798…67e8 3d 32 30 20 00 4b 01 38 00 10 00 50 5c 49 46 46 5c 4e 54 43 3d 32 31 20 00 4b 01 4c 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 47 20 00 4b 01 60 00 38 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆=20 K 8 P IFF NTC=21 K L P EJECT IDENT C:FIG K ` 8 P********************┆
0x67e8…6838 (68, 0, 400) 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 4b 01 7c 00 06 00 50 2a 20 00 4c 00 28 00 14 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 00 4c 00 32 00 06 00 50 2a 20 00 4c 00 4a ┆******************************* K | P* L ( P* TC WORKBLOCK L 2 P* L J┆
0x6838…6888 00 16 00 50 5c 44 41 54 41 5c 30 5c 54 43 20 41 44 44 52 45 53 53 00 4c 00 54 00 24 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 20 00 4c 00 6e 00 22 00 50 5c 44 41 54 41 5c 30 2c 2f 42 ┆ P DATA 0 TC ADDRESS L T $ P DATA 0,/B NBR OF TIMES TC BUSY L n " P DATA 0,/B┆
0x6888…68d8 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 00 4c 00 96 00 2a 00 50 5c 44 41 54 41 5c 30 2c 2f 42 5c 4e 42 52 20 4f 46 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 53 20 00 4c 00 bc 00 2c 00 50 5c 44 41 54 41 5c ┆ NBR OF TRANSACTIONS L * P DATA 0,/B NBR OF TRANSMISSION ERRORS L , P DATA ┆
0x68d8…6928 27 30 30 30 30 30 30 27 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 00 4c 00 ea 00 06 00 50 2a 20 00 4c 01 1a 00 12 00 50 2a 20 20 20 54 43 20 53 54 41 54 55 53 20 00 4c 01 24 00 06 00 50 2a 20 00 4c 01 3a ┆'000000' TIME OF LAST TRANSMISSION L P* L P* TC STATUS L $ P* L :┆
0x6928…6978 00 0c 00 50 5c 44 41 54 41 5c 30 20 00 4c 01 44 00 38 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 2a 2a 2a 2a 20 00 4c 01 54 00 06 00 50 ┆ P DATA 0 L D 8 P*************************************************** L T P┆