|
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: 19834 (0x4d7a)
Notes: pts_type(SC)
Names: »C:XNW.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKAPP/C:XNW.SC«
IDENT C:XNW CONPAC REL=1.0 DATE= 80.04.29 UPDATE #6 77.11.21 JES *************************************************************** * * CONCENTRATOR APPLICATION PACKAGE PEAB-T * * PROGRAMMER: PER OMAN / PAN * * * C : X N W * * * * * THIS MODULE HANDLES CLOSE COMMANDS FOR NETWORK AND * TERMINAL CONTROL * * * * * THIS MODULE RUNS UNDER TASK: OPCOM * * * THE MODULE CONTAINS THE SUBROUTINES: * * NAME REVDAT VERSION * * K:XL 77.08.08 * K:XT 751203 * K:XS 751203 * K:XC 770620 * **************************************************************** EJECT IDENT C:XNW * * * ENTRY ADDRESSES * *************************************************************** * * ENTRY DESCRIPTION * ENTRY K:XL CLOSE TERMINAL LINE ENTRY K:XL10 " ENTRY K:XT CLOSE TC ENTRY K:XS CLOSE CONCENTRATOR ENTRY K:XC CLOSE LINE TO CC EJECT IDENT C:XNW * * * EXTERNAL REFERENSES * *************************************************************** * * ADDRESS IN MODULE * EXTRN K:F320 C:TXT EXTRN K:F321 EXTRN K:F322 EXTRN K:F325 EXTRN K:F377 EXTRN K:F342 EXTRN K:F340 EXTRN K:F343 EXTRN K:F344 EXTRN K:F311 EXTRN K:F301 EXTRN K:F302 EXTRN K:F306 EXTRN K:F310 EXTRN K:F323 EXTRN K:F324 EXTRN K:F355 EXTRN K:F350 * EXTRN K:KBB C:TCA EXTRN K:LCE EXTRN K:GPE EXTRN K:CCST EXTRN K:OPEN * EJECT IDENT C:XNW * EXTRN K:PRTT C:FUA EXTRN K:PRTN * EXTRN K:LST C:FIG EXTRN K:CONE EXTRN K:LEND EXTRN K:CONF EXTRN K:TCST EXTRN K:REPC * EXTRN K:CKL C:ONW EXTRN K:LFC EXTRN K:GTC * EXTRN K:LD6 C:NSU EXTRN K:ST6 EXTRN K:LD10 EXTRN K:ST10 EXTRN K:LD8 EXTRN K:ST8 EXTRN K:CON CONVERT 1-15 TO A-Z * EXTRN K:DUM C:WBS * EXTRN K:TS10 C:SIC * EXTRN K:DCPL C:DCC EJECT IDENT C:XNW * * HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST * NLIST * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * EXTERNALS 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 /2F ENTRY K KEY K:UKEY EQU /28 ENTER U KEY K:EOR EQU /2A END OF RECORD KEY CANCEL EQU /23 CANCEL KEY * TIME OUT VALUES OF TRUNK LINE K:WTIM EQU 60 CC WRITE REQUEST TIME OUT (X100 MS) K:QTIM EQU 600 CC EXCHANGE REQUEST TIME OUT (X100 MS) * BUFFER LENGTHS K:CCBL EQU 1150 CCWRITE BUFFER LENGTH (WORDS) K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) K:BLTC EQU 64 LENGTH OF CASSETTE BUFFER (WORDS) K:KBL EQU 70 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 1150 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, 398) Head {h00=0x0030, h01=0x0050, text=» IDENT C:XNW CONPAC REL=1.0 DATE= 80.04.29 «, t00=0x0000, t01=0x0004}
0x0034…0056 Head {h00=0x001e, h01=0x0050, text=» UPDATE #6 77.11.21 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=»* C : X N W «, 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…0192 Head {h00=0x003a, h01=0x0050, text=»* THIS MODULE HANDLES CLOSE COMMANDS FOR NETWORK AND«, t00=0x0000, t01=0x0158}
0x0192…01ae Head {h00=0x0018, h01=0x0050, text=»* TERMINAL CONTROL«, t00=0x0001, t01=0x0008}
0x01ae…01bc Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0024}
0x01bc…01c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0032}
0x01c6…01d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003c}
0x01d0…01fe Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE RUNS UNDER TASK: OPCOM «, t00=0x0001, t01=0x0046}
0x01fe…0208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0074}
0x0208…0212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007e}
0x0212…0240 Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x0088}
0x0240…024a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b6}
0x024a…0268 Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x00c0}
0x0268…0272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00de}
0x0272…028a Head {h00=0x0014, h01=0x0050, text=»* K:XL 77.08.08 «, t00=0x0001, t01=0x00e8}
0x028a…02a0 Head {h00=0x0012, h01=0x0050, text=»* K:XT 751203 «, t00=0x0001, t01=0x0100}
0x02a0…02b6 Head {h00=0x0012, h01=0x0050, text=»* K:XS 751203 «, t00=0x0001, t01=0x0116}
0x02b6…02cc Head {h00=0x0012, h01=0x0050, text=»* K:XC 770620 «, t00=0x0001, t01=0x012c}
0x02cc…02d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0142}
0x02d6…031e Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x014c}
0x031e…033a (2, 0, 400) Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:XNW «, t00=0x0002, t01=0x0004}
0x033a…0344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0020}
0x0344…034e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002a}
0x034e…0368 Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0034}
0x0368…0372 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004e}
0x0372…03ba Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0058}
0x03ba…03c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a0}
0x03c4…03e0 Head {h00=0x0018, h01=0x0050, text=»* ENTRY DESCRIPTION«, t00=0x0002, t01=0x00aa}
0x03e0…03ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c6}
0x03ea…0412 Head {h00=0x0024, h01=0x0050, text=» ENTRY K:XL CLOSE TERMINAL LINE «, t00=0x0002, t01=0x00d0}
0x0412…042c Head {h00=0x0016, h01=0x0050, text=» ENTRY K:XL10 " «, t00=0x0002, t01=0x00f8}
0x042c…0448 Head {h00=0x0018, h01=0x0050, text=» ENTRY K:XT CLOSE TC«, t00=0x0002, t01=0x0112}
0x0448…046e Head {h00=0x0022, h01=0x0050, text=» ENTRY K:XS CLOSE CONCENTRATOR«, t00=0x0002, t01=0x012e}
0x046e…0492 Head {h00=0x0020, h01=0x0050, text=» ENTRY K:XC CLOSE LINE TO CC«, t00=0x0002, t01=0x0154}
0x0492…04ae Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:XNW «, t00=0x0002, t01=0x0178}
0x04ae…04b8 (3, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0004}
0x04b8…04c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000e}
0x04c2…04e0 Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x0018}
0x04e0…04ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0036}
0x04ea…0532 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x0040}
0x0532…053c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0088}
0x053c…0558 Head {h00=0x0018, h01=0x0050, text=»* ADDRESS IN MODULE«, t00=0x0003, t01=0x0092}
0x0558…0562 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ae}
0x0562…057e Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F320 C:TXT «, t00=0x0003, t01=0x00b8}
0x057e…0594 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F321 «, t00=0x0003, t01=0x00d4}
0x0594…05aa Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F322 «, t00=0x0003, t01=0x00ea}
0x05aa…05c0 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F325 «, t00=0x0003, t01=0x0100}
0x05c0…05d6 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F377 «, t00=0x0003, t01=0x0116}
0x05d6…05ec Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F342 «, t00=0x0003, t01=0x012c}
0x05ec…0602 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F340 «, t00=0x0003, t01=0x0142}
0x0602…0618 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F343 «, t00=0x0003, t01=0x0158}
0x0618…062e Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F344 «, t00=0x0003, t01=0x016e}
0x062e…0644 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F311 «, t00=0x0003, t01=0x0184}
0x0644…065a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F301 «, t00=0x0004, t01=0x000a}
0x065a…0670 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F302 «, t00=0x0004, t01=0x0020}
0x0670…0686 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F306 «, t00=0x0004, t01=0x0036}
0x0686…069c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F310 «, t00=0x0004, t01=0x004c}
0x069c…06b2 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F323 «, t00=0x0004, t01=0x0062}
0x06b2…06c8 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F324 «, t00=0x0004, t01=0x0078}
0x06c8…06de Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F355 «, t00=0x0004, t01=0x008e}
0x06de…06f4 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F350 «, t00=0x0004, t01=0x00a4}
0x06f4…06fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ba}
0x06fe…0718 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:KBB C:TCA«, t00=0x0004, t01=0x00c4}
0x0718…072c Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LCE«, t00=0x0004, t01=0x00de}
0x072c…0740 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:GPE«, t00=0x0004, t01=0x00f2}
0x0740…0756 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCST «, t00=0x0004, t01=0x0106}
0x0756…076c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:OPEN «, t00=0x0004, t01=0x011c}
0x076c…0776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0132}
0x0776…0792 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:XNW «, t00=0x0004, t01=0x013c}
0x0792…079c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0158}
0x079c…07b8 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:PRTT C:FUA «, t00=0x0004, t01=0x0162}
0x07b8…07ce Head {h00=0x0012, h01=0x0050, text=» EXTRN K:PRTN «, t00=0x0004, t01=0x017e}
0x07ce…07d8 (5, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0004}
0x07d8…07f2 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:LST C:FIG«, t00=0x0005, t01=0x000e}
0x07f2…0808 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CONE «, t00=0x0005, t01=0x0028}
0x0808…081e Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LEND «, t00=0x0005, t01=0x003e}
0x081e…0834 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CONF «, t00=0x0005, t01=0x0054}
0x0834…084a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TCST «, t00=0x0005, t01=0x006a}
0x084a…0860 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:REPC «, t00=0x0005, t01=0x0080}
0x0860…086a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0096}
0x086a…0884 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:CKL C:ONW«, t00=0x0005, t01=0x00a0}
0x0884…0898 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LFC«, t00=0x0005, t01=0x00ba}
0x0898…08ac Head {h00=0x0010, h01=0x0050, text=» EXTRN K:GTC«, t00=0x0005, t01=0x00ce}
0x08ac…08b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e2}
0x08b6…08d0 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:LD6 C:NSU«, t00=0x0005, t01=0x00ec}
0x08d0…08e4 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:ST6«, t00=0x0005, t01=0x0106}
0x08e4…08fa Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LD10 «, t00=0x0005, t01=0x011a}
0x08fa…0910 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:ST10 «, t00=0x0005, t01=0x0130}
0x0910…0924 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LD8«, t00=0x0005, t01=0x0146}
0x0924…0938 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:ST8«, t00=0x0005, t01=0x015a}
0x0938…0960 Head {h00=0x0024, h01=0x0050, text=» EXTRN K:CON CONVERT 1-15 TO A-Z«, t00=0x0005, t01=0x016e}
0x0960…096a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x096a…0984 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:DUM C:WBS«, t00=0x0006, t01=0x0012}
0x0984…098e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002c}
0x098e…09aa Head {h00=0x0018, h01=0x0050, text=» EXTRN K:TS10 C:SIC «, t00=0x0006, t01=0x0036}
0x09aa…09b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0052}
0x09b4…09d0 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:DCPL C:DCC «, t00=0x0006, t01=0x005c}
0x09d0…09ec Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:XNW «, t00=0x0006, t01=0x0078}
0x09ec…09f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0094}
0x09f6…0a46 Head {h00=0x004c, h01=0x0050, text=»* HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0006, t01=0x009e}
0x0a46…0a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ee}
0x0a50…0a5e Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0006, t01=0x00f8}
0x0a5e…0a68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x0a68…0a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0110}
0x0a72…0a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011a}
0x0a7c…0a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0124}
0x0a86…0a90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012e}
0x0a90…0a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0138}
0x0a9a…0aa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0142}
0x0aa4…0aae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0aae…0ab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0156}
0x0ab8…0ac2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0160}
0x0ac2…0acc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016a}
0x0acc…0ad6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0174}
0x0ad6…0ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017e}
0x0ae0…0aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0188}
0x0aea…0af4 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af4…0afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0afe…0b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0018}
0x0b08…0b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0022}
0x0b12…0b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002c}
0x0b1c…0b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0036}
0x0b26…0b30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0040}
0x0b30…0b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004a}
0x0b3a…0b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0054}
0x0b44…0b4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005e}
0x0b4e…0b58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0068}
0x0b58…0b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0072}
0x0b62…0b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007c}
0x0b6c…0b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0086}
0x0b76…0b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0090}
0x0b80…0b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009a}
0x0b8a…0b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a4}
0x0b94…0b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ae}
0x0b9e…0ba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00b8}
0x0ba8…0bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x0bb2…0bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00cc}
0x0bbc…0bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d6}
0x0bc6…0bd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e0}
0x0bd0…0be6 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x00ea}
0x0be6…0c18 Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0007, t01=0x0100}
0x0c18…0c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0132}
0x0c22…0c38 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x013c}
0x0c38…0c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0152}
0x0c42…0c56 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0007, t01=0x015c}
0x0c56…0c6c Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0007, t01=0x0170}
0x0c6c…0c80 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0007, t01=0x0186}
0x0c80…0c96 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0008, t01=0x000a}
0x0c96…0ca0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0020}
0x0ca0…0cc0 Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0008, t01=0x002a}
0x0cc0…0cd6 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0008, t01=0x004a}
0x0cd6…0cea Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0008, t01=0x0060}
0x0cea…0d00 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0008, t01=0x0074}
0x0d00…0d1c Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0008, t01=0x008a}
0x0d1c…0d26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00a6}
0x0d26…0d48 Head {h00=0x001e, h01=0x0050, text=»* FORMS FOR FORMAT CODES«, t00=0x0008, t01=0x00b0}
0x0d48…0d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d2}
0x0d52…0d7c Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0008, t01=0x00dc}
0x0d7c…0da0 Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0008, t01=0x0106}
0x0da0…0dc6 Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0008, t01=0x012a}
0x0dc6…0df8 Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0008, t01=0x0150}
0x0df8…0e2a Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0008, t01=0x0182}
0x0e2a…0e58 Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0009, t01=0x0024}
0x0e58…0e84 Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0009, t01=0x0052}
0x0e84…0ea2 Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0009, t01=0x007e}
0x0ea2…0ec2 Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0009, t01=0x009c}
0x0ec2…0ee4 Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0009, t01=0x00bc}
0x0ee4…0f0e Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0009, t01=0x00de}
0x0f0e…0f24 Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x0009, t01=0x0108}
0x0f24…0f3c Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0009, t01=0x011e}
0x0f3c…0f56 Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0009, t01=0x0136}
0x0f56…0f7c Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x0009, t01=0x0150}
0x0f7c…0fa4 Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x0009, t01=0x0176}
0x0fa4…0fca Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x000a, t01=0x000e}
0x0fca…0ff2 Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x000a, t01=0x0034}
0x0ff2…101c Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x000a, t01=0x005c}
0x101c…1048 Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x000a, t01=0x0086}
0x1048…1072 Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x000a, t01=0x00b2}
0x1072…109e Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x000a, t01=0x00dc}
0x109e…10ba Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000a, t01=0x0108}
0x10ba…10c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0124}
0x10c4…10e4 Head {h00=0x001c, h01=0x0050, text=»* CONSTANT TCA EQUATES«, t00=0x000a, t01=0x012e}
0x10e4…10ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014e}
0x10ee…1102 Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000a, t01=0x0158}
0x1102…1116 Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000a, t01=0x016c}
0x1116…112a Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000a, t01=0x0180}
0x112a…1140 (11, 0, 400) Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000b, t01=0x0004}
0x1140…1156 Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000b, t01=0x001a}
0x1156…116c Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000b, t01=0x0030}
0x116c…1180 Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000b, t01=0x0046}
0x1180…1196 Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000b, t01=0x005a}
0x1196…11aa Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000b, t01=0x0070}
0x11aa…11be Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000b, t01=0x0084}
0x11be…11d2 Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000b, t01=0x0098}
0x11d2…11e6 Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000b, t01=0x00ac}
0x11e6…11f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c0}
0x11f0…1214 Head {h00=0x0020, h01=0x0050, text=»* LINE WORKBLOCKS EQUATES «, t00=0x000b, t01=0x00ca}
0x1214…121e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ee}
0x121e…123a Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000b, t01=0x00f8}
0x123a…125c Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000b, t01=0x0114}
0x125c…1280 Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000b, t01=0x0136}
0x1280…12a4 Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000b, t01=0x015a}
0x12a4…12ce Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000b, t01=0x017e}
0x12ce…12e4 Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000c, t01=0x0018}
0x12e4…12fa Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000c, t01=0x002e}
0x12fa…1304 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0044}
0x1304…1324 Head {h00=0x001c, h01=0x0050, text=»* TC WORKBLOCK EQUATES«, t00=0x000c, t01=0x004e}
0x1324…132e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x006e}
0x132e…1340 Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000c, t01=0x0078}
0x1340…1354 Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000c, t01=0x008a}
0x1354…1368 Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000c, t01=0x009e}
0x1368…137c Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000c, t01=0x00b2}
0x137c…1392 Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000c, t01=0x00c6}
0x1392…13a8 Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000c, t01=0x00dc}
0x13a8…13be Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000c, t01=0x00f2}
0x13be…13da Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000c, t01=0x0108}
0x13da…13e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0124}
0x13e4…1412 Head {h00=0x002a, h01=0x0050, text=»* CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000c, t01=0x012e}
0x1412…141c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x015c}
0x141c…1430 Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000c, t01=0x0166}
0x1430…1444 Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000c, t01=0x017a}
0x1444…1458 Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000c, t01=0x018e}
0x1458…146c Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000d, t01=0x0012}
0x146c…1480 Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000d, t01=0x0026}
0x1480…1494 Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000d, t01=0x003a}
0x1494…14a8 Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000d, t01=0x004e}
0x14a8…14bc Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000d, t01=0x0062}
0x14bc…14d0 Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000d, t01=0x0076}
0x14d0…14e4 Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000d, t01=0x008a}
0x14e4…14f8 Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000d, t01=0x009e}
0x14f8…150c Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000d, t01=0x00b2}
0x150c…1516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c6}
0x1516…1536 Head {h00=0x001c, h01=0x0050, text=»* CC WORKBLOCK EQUATES«, t00=0x000d, t01=0x00d0}
0x1536…1540 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f0}
0x1540…1566 Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000d, t01=0x00fa}
0x1566…157a Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000d, t01=0x0120}
0x157a…158e Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000d, t01=0x0134}
0x158e…15b8 Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000d, t01=0x0148}
0x15b8…15e0 Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000d, t01=0x0172}
0x15e0…15f6 Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000e, t01=0x000a}
0x15f6…160c Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000e, t01=0x0020}
0x160c…1628 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000e, t01=0x0036}
0x1628…1632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0052}
0x1632…1658 Head {h00=0x0022, h01=0x0050, text=»* NETWORK WORKBLOCK EQUATES«, t00=0x000e, t01=0x005c}
0x1658…1662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0082}
0x1662…1690 Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000e, t01=0x008c}
0x1690…16b4 Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000e, t01=0x00ba}
0x16b4…16be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00de}
0x16be…16e0 Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000e, t01=0x00e8}
0x16e0…16f6 Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000e, t01=0x010a}
0x16f6…170c Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000e, t01=0x0120}
0x170c…1722 Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000e, t01=0x0136}
0x1722…1738 Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000e, t01=0x014c}
0x1738…174e Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000e, t01=0x0162}
0x174e…1764 Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000e, t01=0x0178}
0x1764…177a Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000e, t01=0x018e}
0x177a…1790 Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000f, t01=0x0014}
0x1790…17a6 Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000f, t01=0x002a}
0x17a6…17bc Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000f, t01=0x0040}
0x17bc…17d2 Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000f, t01=0x0056}
0x17d2…17dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006c}
0x17dc…1800 Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000f, t01=0x0076}
0x1800…1824 Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000f, t01=0x009a}
0x1824…1848 Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000f, t01=0x00be}
0x1848…1852 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e2}
0x1852…1876 Head {h00=0x0020, h01=0x0050, text=»* CC TEXT-INTERVAL EQUATES «, t00=0x000f, t01=0x00ec}
0x1876…1880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0110}
0x1880…1894 Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x000f, t01=0x011a}
0x1894…18a8 Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x000f, t01=0x012e}
0x18a8…18bc Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x000f, t01=0x0142}
0x18bc…18d0 Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x000f, t01=0x0156}
0x18d0…18e4 Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x000f, t01=0x016a}
0x18e4…18f8 Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x000f, t01=0x017e}
0x18f8…190c (16, 0, 400) Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x0010, t01=0x0004}
0x190c…1920 Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x0010, t01=0x0018}
0x1920…1934 Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x0010, t01=0x002c}
0x1934…1948 Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x0010, t01=0x0040}
0x1948…195c Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x0010, t01=0x0054}
0x195c…1970 Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x0010, t01=0x0068}
0x1970…198c Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0010, t01=0x007c}
0x198c…1996 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0098}
0x1996…19c6 Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x0010, t01=0x00a2}
0x19c6…19d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d2}
0x19d0…1a02 Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x0010, t01=0x00dc}
0x1a02…1a40 Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x0010, t01=0x010e}
0x1a40…1a72 Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0010, t01=0x014c}
0x1a72…1a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017e}
0x1a7c…1a9c Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0010, t01=0x0188}
0x1a9c…1ab0 Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0011, t01=0x0018}
0x1ab0…1ac4 Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0011, t01=0x002c}
0x1ac4…1ad8 Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0011, t01=0x0040}
0x1ad8…1aec Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0011, t01=0x0054}
0x1aec…1af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0068}
0x1af6…1b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0072}
0x1b00…1b2c Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0011, t01=0x007c}
0x1b2c…1b58 Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0011, t01=0x00a8}
0x1b58…1b74 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0011, t01=0x00d4}
0x1b74…1bb4 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x00f0}
0x1bb4…1bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0130}
0x1bbe…1be4 Head {h00=0x0022, h01=0x0050, text=»* SYSTEM ADAPTION PARAMETERS«, t00=0x0011, t01=0x013a}
0x1be4…1bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0160}
0x1bee…1c0e Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0011, t01=0x016a}
0x1c0e…1c30 Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /2F ENTRY K KEY«, t00=0x0011, t01=0x018a}
0x1c30…1c52 Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /28 ENTER U KEY«, t00=0x0012, t01=0x001c}
0x1c52…1c7a Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /2A END OF RECORD KEY «, t00=0x0012, t01=0x003e}
0x1c7a…1c9c Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /23 CANCEL KEY «, t00=0x0012, t01=0x0066}
0x1c9c…1cc4 Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0012, t01=0x0088}
0x1cc4…1cfe Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 60 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x00b0}
0x1cfe…1d3c Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 600 CC EXCHANGE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x00ea}
0x1d3c…1d54 Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0012, t01=0x0128}
0x1d54…1d8a Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1150 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0012, t01=0x0140}
0x1d8a…1dca Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0012, t01=0x0176}
0x1dca…1e02 Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 64 LENGTH OF CASSETTE BUFFER (WORDS) «, t00=0x0013, t01=0x0026}
0x1e02…1e2e Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 70 KB BUF LENGTH IN WORDS «, t00=0x0013, t01=0x005e}
0x1e2e…1e56 Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0013, t01=0x008a}
0x1e56…1e82 Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0013, t01=0x00b2}
0x1e82…1eb8 Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0013, t01=0x00de}
0x1eb8…1ef6 Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1150 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0013, t01=0x0114}
0x1ef6…1f04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0152}
0x1f04…1f58 Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0013, t01=0x0160}
0x1f58…1f82 Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0014, t01=0x0024}
0x1f82…1fa6 Head {h00=0x0020, h01=0x0050, text=» LEFT BYTE = SELECT ADDR. «, t00=0x0014, t01=0x004e}
0x1fa6…1fc8 Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE = POLL ADDR.«, t00=0x0014, t01=0x0072}
0x1fc8…2004 Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0014, t01=0x0094}
0x2004…2022 Head {h00=0x001a, h01=0x0050, text=» AND SYSTEM MESSAGES«, t00=0x0014, t01=0x00d0}
0x2022…205a Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0014, t01=0x00ee}
0x205a…2090 Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0014, t01=0x0126}
0x2090…2094 Head {h00=0x0054, h01=0x0050}
0x2094…2098 Head {h00=0x2a20, h01=0x5349}
0x2098…20c8 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 4e 51 55 49 52 59 2e 20 52 49 47 48 54 20 42 59 ┆MULATED TERMINAL ADDRESSES FOR INQUIRY. RIGHT BY┆
0x20c8…2118 (21, 0, 400) 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 5c 00 20 00 50 4b 3a 53 41 31 5c 45 51 55 5c 30 5c 53 49 4d 2e 20 54 45 52 4d 2e 20 4e 42 52 20 31 00 15 00 24 00 16 00 50 4b 3a 53 41 32 5c 45 51 ┆TE. IF SPECIFIED AT SYSTEM G PK:SA1 EQU 0 SIM. TERM. NBR 1 $ PK:SA2 EQ┆
0x2118…2168 55 5c 30 5c 4e 42 52 20 32 20 00 15 00 48 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 62 00 16 00 50 4b 3a 53 41 34 5c 45 51 55 5c 30 5c 4e 42 52 20 34 20 00 15 00 7c 00 16 00 50 4b 3a 53 41 35 5c 45 51 55 5c ┆U 0 NBR 2 H PK:SA3 EQU 0 NBR 3 b PK:SA4 EQU 0 NBR 4 | PK:SA5 EQU ┆
0x2168…21b8 30 5c 4e 42 52 20 35 20 00 15 00 96 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 b0 00 16 00 50 4b 3a 53 41 37 5c 45 51 55 5c 30 5c 4e 42 52 20 37 20 00 15 00 ca 00 16 00 50 4b 3a 53 41 38 5c 45 51 55 5c 30 5c ┆0 NBR 5 PK:SA6 EQU 0 NBR 6 PK:SA7 EQU 0 NBR 7 PK:SA8 EQU 0 ┆
0x21b8…2208 4e 42 52 20 38 20 00 15 00 e4 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 fe 00 18 00 50 4b 3a 53 41 31 30 5c 45 51 55 5c 30 5c 4e 42 52 20 31 30 20 00 15 01 18 00 18 00 50 4b 3a 53 41 31 31 5c 45 51 55 5c 30 ┆NBR 8 PK:SA9 EQU 0 NBR 9 PK:SA10 EQU 0 NBR 10 PK:SA11 EQU 0┆
0x2208…2258 5c 4e 42 52 20 31 31 20 00 15 01 34 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 50 00 18 00 50 4b 3a 53 41 31 33 5c 45 51 55 5c 30 5c 4e 42 52 20 31 33 20 00 15 01 6c 00 18 00 50 4b 3a 53 41 31 34 5c 45 ┆ NBR 11 4 PK:SA12 EQU 0 NBR 12 P PK:SA13 EQU 0 NBR 13 l PK:SA14 E┆
0x2258…22a8 (22, 0, 400) 51 55 5c 30 5c 4e 42 52 20 31 34 20 00 15 01 88 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 16 00 14 00 18 00 50 4b 3a 53 41 31 36 5c 45 51 55 5c 30 5c 4e 42 52 20 31 36 20 00 16 00 30 00 18 00 50 4b 3a 53 41 ┆QU 0 NBR 14 PK:SA15 EQU 0 NBR 15 PK:SA16 EQU 0 NBR 16 0 PK:SA┆
0x22a8…22f8 31 37 5c 45 51 55 5c 30 5c 4e 42 52 20 31 37 20 00 16 00 4c 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 68 00 18 00 50 4b 3a 53 41 31 39 5c 45 51 55 5c 30 5c 4e 42 52 20 31 39 20 00 16 00 84 00 18 00 50 ┆17 EQU 0 NBR 17 L PK:SA18 EQU 0 NBR 18 h PK:SA19 EQU 0 NBR 19 P┆
0x22f8…2348 4b 3a 53 41 32 30 5c 45 51 55 5c 30 5c 4e 42 52 20 32 30 20 00 16 00 a0 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 bc 00 18 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 d8 ┆K:SA20 EQU 0 NBR 20 PK:SA21 EQU 0 NBR 21 PK:SA22 EQU 0 NBR 22 ┆
0x2348…2398 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 f4 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 01 10 00 18 00 50 4b 3a 53 41 32 35 5c 45 51 55 5c 30 5c 4e 42 52 20 32 35 20 ┆ PK:SA23 EQU 0 NBR 23 PK:SA24 EQU 0 NBR 24 PK:SA25 EQU 0 NBR 25 ┆
0x2398…23e8 00 16 01 2c 00 18 00 50 4b 3a 53 41 32 36 5c 45 51 55 5c 30 5c 4e 42 52 20 32 36 20 00 16 01 48 00 0a 00 50 5c 45 4a 45 43 54 00 16 01 64 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 2a 2a 2a 2a 2a 2a 2a 2a ┆ , PK:SA26 EQU 0 NBR 26 H P EJECT d < P******************************┆
0x23e8…2438 (23, 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 20 00 16 01 72 00 06 00 50 2a 20 00 17 00 22 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 41 4c 20 41 53 53 45 4d ┆************************* r P* " , P* PARAMETERS FOR CONDITIONAL ASSEM┆
0x2438…2488 42 4c 59 20 00 17 00 2c 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 5c 00 06 00 50 2a 20 00 17 00 88 00 3c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆BLY , ( P* OF CONCENTRATOR PACKAGE MODULES P* < P**************┆
0x2488…24d8 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 92 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 30 20 00 17 00 d2 00 20 ┆***************************************** PX:A EQU 2 * NLINE <=10 ┆
0x24d8…2528 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 f2 00 1a 00 50 58 3a 42 5c 45 51 55 5c 31 35 5c 2a 20 20 4e 54 43 20 3c 3d 38 30 00 17 01 16 00 2e 00 50 5c 5c 5c 54 4f 54 41 4c 20 4e 55 4d ┆ P NUMBER OF TERMINAL LINES PX:B EQU 15 * NTC <=80 . P TOTAL NUM┆
0x2528…2578 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 01 34 00 1c 00 50 58 3a 43 5c 45 51 55 5c 32 36 5c 2a 20 20 4e 53 49 4d 20 3c 3d 32 36 20 00 17 01 66 00 24 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 ┆BER OF TC:S ON TERMINAL LINES 4 PX:C EQU 26 * NSIM <=26 f $ P NUMBER ┆
0x2578…25c8 (24, 0, 400) 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 86 00 14 00 50 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 18 00 1e 00 16 00 50 58 3a 44 5c 45 51 55 5c 30 5c 2a 20 20 4c 4f 4f 50 20 00 18 00 36 00 2e 00 50 ┆OF SIMULATED TERMINALS P FOR INQUIRIES PX:D EQU 0 * LOOP 6 . P┆
0x25c8…2618 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 50 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 55 52 41 54 49 4f 4e 20 ┆ IF = 0. MULTIPOINT CONFIG. DOWNSTREAMS P . P IF = 1. LOOP CONFIGURATION ┆
0x2618…2668 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 18 00 82 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 b4 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 45 44 49 54 20 42 55 46 46 45 52 53 20 46 4f ┆DOWNSTREAMS PX:E EQU 4 * NSPOOL <=4 ( P NUMBER OF EDIT BUFFERS FO┆
0x2668…26b8 52 20 53 50 4f 4f 4c 20 00 18 00 d4 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 01 00 00 20 00 50 58 3a 46 5c 45 51 55 5c 34 5c 2a 20 20 30 3c 20 4e 54 50 4c 49 4e 20 3c 3d 34 ┆R SPOOL " P FUNCTION TO OPERATORS TERM. PX:F EQU 4 * 0< NTPLIN <=4┆
0x26b8…2708 30 20 00 18 01 26 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 4a 00 26 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 ┆0 & ( P NUMBER OF TRASKS IN POOL 'TPLIN' J & P HANDLING TRANSACTIONS F┆
0x2708…2758 (25, 0, 398) 52 4f 4d 20 54 43 3a 53 00 18 01 76 00 1e 00 50 58 3a 47 5c 45 51 55 5c 32 5c 2a 20 20 30 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 19 00 10 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 ┆ROM TC:S v PX:G EQU 2 * 0< NTPSUP <=5 ( P NUMBER OF TRASKS IN POOL 'T┆
0x2758…27a8 50 53 55 50 27 20 00 19 00 32 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 5e 00 1c 00 50 5c 5c 5c 4f 52 20 4f 50 45 52 41 54 4f 52 53 20 54 45 ┆PSUP' 2 , P HANDLING TRANSACTIONS FROM MAIN FRAME ^ P OR OPERATORS TE┆
0x27a8…27f8 52 4d 49 4e 41 4c 00 19 00 8e 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 ae 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 44 20 00 19 00 ca 00 30 ┆RMINAL PX:H EQU 1 * LINTST $ P IF = 0. NO LINE TEST COMMAND 0┆
0x27f8…2848 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 f2 00 18 00 50 58 3a 49 5c 45 51 55 5c 32 5c 2a 20 20 4f 4e 4c 49 4e 45 20 00 19 01 26 00 24 ┆ P IF = 1. LINE TEST FACILITY (4-WIRE ONLY) PX:I EQU 2 * ONLINE & $┆
0x2848…2896 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 01 42 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 52 41 54 4f 52 20 ┆ P IF = 0. OFF LINE CONCENTRATOR B ( P IF = 1. ON/OFF LINE CONCENTRATOR ┆
0x2896…28e6 (26, 0, 398) 00 19 01 6a 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 1a 00 08 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 1a 00 30 00 06 00 50 2a 20 00 1a ┆ j $ P IF = 2. ON LINE CONCENTRATOR PX:K EQU 1 * SETADR 0 P* ┆
0x28e6…2936 00 4c 00 06 00 50 2a 20 00 1a 00 56 00 06 00 50 2a 20 00 1a 00 60 00 06 00 50 2a 20 00 1a 00 6a 00 0a 00 50 5c 4c 49 53 54 20 00 1a 00 74 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 1a 00 82 00 06 00 50 2a 20 ┆ L P* V P* ` P* j P LIST t P EJECT IDENT C:XNW P* ┆
0x2936…2986 00 1a 00 9e 00 06 00 50 2a 20 00 1a 00 a8 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 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 1a 00 b2 00 22 00 50 2a 20 20 20 53 50 45 43 49 46 49 45 44 20 ┆ P* , P* PARAMETERS FOR CONDITIONAL ASSEMBLY " P* SPECIFIED ┆
0x2986…29d6 49 4e 20 4d 4f 44 55 4c 45 20 43 3a 45 51 55 20 00 1a 00 e2 00 06 00 50 2a 20 00 1a 01 08 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆IN MODULE C:EQU P* @ P**********************************************┆
0x29d6…2a24 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1a 01 12 00 38 00 50 4c 4f 4f 50 5c 45 51 55 5c 58 3a 44 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 1a 01 56 ┆************** 8 PLOOP EQU X:D IF = 0. MULTIPOINT CONFIG. DOWNSTREAMS V┆
0x2a24…2a74 (27, 0, 398) 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 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 1b 00 04 00 30 00 50 4f 4e 4c 49 4e 45 5c 45 51 55 5c 58 3a 49 5c 49 46 20 3d 30 2e 20 4f 46 46 20 ┆ . P IF = 1. LOOP CONFIGURATION DOWNSTREAMS 0 PONLINE EQU X:I IF =0. OFF ┆
0x2a74…2ac4 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 1b 00 36 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 52 41 54 4f 52 20 00 1b 00 6a 00 24 00 50 5c 5c 5c 49 46 20 3d 20 32 2e ┆LINE CONCENTRATOR 6 ( P IF = 1. ON/OFF LINE CONCENTRATOR j $ P IF = 2.┆
0x2ac4…2b14 20 4f 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 1b 00 96 00 04 00 50 00 1b 00 be 00 04 00 50 00 1b 00 c6 00 04 00 50 00 1b 00 ce 00 04 00 50 00 1b 00 d6 00 06 00 50 2a 20 00 1b 00 de 00 2c 00 50 53 41 56 42 55 46 5c 44 ┆ ON LINE CONCENTRATOR P P P P P* , PSAVBUF D┆
0x2b14…2b64 41 54 41 5c 30 5c 53 41 56 45 20 49 4e 50 55 54 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 00 1b 00 e8 00 06 00 50 2a 20 00 1b 01 18 00 06 00 50 2a 20 00 1b 01 22 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 ┆ATA 0 SAVE INPUT BUFFER ADDRESS P* P* " P EJECT IDENT C:XNW ┆
0x2b64…2bb2 00 1b 01 2c 00 46 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 58 20 4c 20 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 1b 01 48 ┆ , F P******************* K : X L ************************************* H┆
0x2bb2…2c02 (28, 0, 400) 00 06 00 50 2a 20 00 1c 00 04 00 06 00 50 2a 20 00 1c 00 0e 00 26 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 4b 20 3a 20 58 20 4c 20 2c 20 20 4b 20 3a 20 58 20 4c 20 31 20 30 00 1c 00 18 00 06 00 50 2a 20 00 1c 00 42 00 38 00 50 2a 48 41 4c ┆ P* P* & P*SUBROUTINE K : X L , K : X L 1 0 P* B 8 P*HAL┆
0x2c02…2c52 54 53 20 50 4f 4c 4c 49 4e 47 2c 20 57 41 49 54 53 20 55 4e 54 49 4c 20 4e 4f 20 52 45 50 49 45 53 20 49 53 20 54 4f 20 42 45 20 53 45 4e 54 20 00 1c 00 4c 00 1e 00 50 2a 41 4e 44 20 54 48 45 4e 20 43 4c 4f 53 45 53 20 54 48 45 20 4c 49 4e ┆TS POLLING, WAITS UNTIL NO REPIES IS TO BE SENT L P*AND THEN CLOSES THE LIN┆
0x2c52…2ca2 45 20 00 1c 00 88 00 06 00 50 2a 20 00 1c 00 aa 00 06 00 50 2a 20 00 1c 00 b4 00 06 00 50 2a 20 00 1c 00 be 00 42 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 58 4c 5c 43 48 45 43 4b 53 20 46 49 ┆E P* P* P* B P* CALL SEQUENCE: CF A14,K:XL CHECKS FI┆
0x2ca2…2cf2 52 53 54 20 4c 49 4e 45 20 4e 42 52 20 56 41 4c 49 44 49 54 59 20 00 1c 00 c8 00 06 00 50 2a 20 00 1c 01 0e 00 26 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 41 38 20 3d 20 49 4e 50 55 54 20 42 55 46 46 45 52 00 1c 01 18 00 06 ┆RST LINE NBR VALIDITY P* & P* ENTRY PARAM: A8 = INPUT BUFFER ┆
0x2cf2…2d42 00 50 2a 20 00 1c 01 42 00 36 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 43 46 20 20 41 31 34 2c 4b 3a 58 4c 31 30 5c 4e 4f 20 4c 49 4e 45 20 4e 42 52 20 43 48 45 43 4b 20 00 1c 01 4c 00 06 00 50 2a 20 00 1c 01 86 00 32 00 50 ┆ P* B 6 P* CALL SEQUENCE: CF A14,K:XL10 NO LINE NBR CHECK L P* 2 P┆
0x2d42…2d92 (29, 0, 398) 2a 20 20 20 45 4e 54 52 59 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 43 48 41 52 29 20 00 1c 01 90 00 1c 00 50 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 1d ┆* ENTRY PARAM: A2 = LINE NBR (2 ASCII CHAR) P* A3 = LINE WB ADDRESS ┆
0x2d92…2de2 00 36 00 16 00 50 2a 5c 5c 4c 49 4e 45 20 57 42 20 49 4e 20 54 43 41 20 00 1d 00 56 00 06 00 50 2a 20 00 1d 00 70 00 1c 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b 3a 50 52 54 54 20 00 1d 00 7a 00 0c 00 50 2a 5c 5c 4b 3a 43 ┆ 6 P* LINE WB IN TCA V P* p P* SUBROUTINES: K:PRTT z P* K:C┆
0x2de2…2e32 4b 4c 00 1d 00 9a 00 0c 00 50 2a 5c 5c 4b 3a 4c 46 43 00 1d 00 aa 00 06 00 50 2a 20 00 1d 00 ba 00 1a 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 4d 3a 5c 4e 4f 4e 45 20 00 1d 00 c4 00 06 00 50 2a 20 00 1d 00 e2 00 24 00 50 2a 20 20 52 ┆KL P* K:LFC P* P* RETURN PARAM: NONE P* $ P* R┆
0x2e32…2e82 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 56 49 41 20 41 31 34 20 53 54 41 43 4b 45 52 00 1d 00 ec 00 06 00 50 2a 20 00 1d 01 14 00 22 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 31 2d 41 37 2c 41 39 2d 41 31 30 20 00 1d 01 1e ┆ETURN METOD: VIA A14 STACKER P* " P* CHANGED REGS: A1-A7,A9-A10 ┆
0x2e82…2ed0 00 06 00 50 2a 20 00 1d 01 44 00 16 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 20 00 1d 01 4e 00 06 00 50 2a 20 00 1d 01 68 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 1d 01 72 00 06 00 50 2a 20 ┆ P* D P* STACKER NEED: N P* h P* LIMITATIONS: r P* ┆
0x2ed0…2f20 (30, 0, 400) 00 1d 01 8c 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f 50 43 4f 4d 00 1e 00 08 00 06 00 50 2a 20 00 1e 00 26 00 06 00 50 2a 20 00 1e 00 30 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 ┆ P* CALLING TASK: OPCOM P* & P* 0 D P**********************┆
0x2f20…2f70 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 1e 00 3a 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 1e 00 82 00 0e 00 50 2a 5c ┆***************************************** : P EJECT IDENT C:XNW P* ┆
0x2f70…2fc0 5c 4b 20 3a 20 58 20 4c 00 1e 00 9e 00 06 00 50 2a 20 00 1e 00 b0 00 16 00 50 2a 20 20 20 43 48 45 43 4b 20 4c 49 4e 45 20 4e 42 52 00 1e 00 ba 00 06 00 50 2a 5c 00 1e 00 d4 00 0e 00 50 4b 3a 58 4c 5c 45 51 55 5c 2a 00 1e 00 de 00 12 00 50 ┆ K : X L P* P* CHECK LINE NBR P* PK:XL EQU * P┆
0x2fc0…3010 5c 43 46 5c 41 31 34 2c 4b 3a 43 4b 4c 20 00 1e 00 f0 00 1c 00 50 5c 52 46 28 4e 5a 29 5c 58 4c 45 4e 44 41 5c 4e 4f 54 20 56 41 4c 49 44 00 1e 01 06 00 06 00 50 2a 20 00 1e 01 26 00 1a 00 50 2a 20 20 20 49 53 20 54 48 45 20 4c 49 4e 45 20 ┆ CF A14,K:CKL P RF(NZ) XLENDA NOT VALID P* & P* IS THE LINE ┆
0x3010…3060 4f 50 45 4e 3f 20 00 1e 01 30 00 06 00 50 2a 20 00 1e 01 4e 00 10 00 50 4b 3a 58 4c 31 30 5c 45 51 55 5c 2a 00 1e 01 58 00 24 00 50 5c 53 54 5c 41 38 2c 53 41 56 42 55 46 5c 53 41 56 45 20 49 4e 42 55 46 20 41 44 44 52 45 53 53 00 1e 01 6c ┆OPEN? 0 P* N PK:XL10 EQU * X $ P ST A8,SAVBUF SAVE INBUF ADDRESS l┆
0x3060…30b0 (31, 0, 398) 00 10 00 50 5c 49 46 54 5c 4c 4f 4f 50 3d 30 20 00 1f 00 04 00 24 00 50 5c 4c 44 5c 41 31 2c 4b 3a 4c 53 54 2c 41 33 5c 47 45 54 20 4c 49 4e 45 20 53 54 41 54 55 53 20 00 1f 00 18 00 1e 00 50 5c 52 46 28 5a 29 5c 58 4c 33 30 30 5c 4c 49 4e ┆ P IFT LOOP=0 $ P LD A1,K:LST,A3 GET LINE STATUS P RF(Z) XL300 LIN┆
0x30b0…3100 45 20 4e 4f 54 20 4f 50 45 4e 00 1f 00 40 00 08 00 50 5c 58 49 46 00 1f 00 62 00 06 00 50 2a 20 00 1f 00 6e 00 14 00 50 2a 20 20 20 48 41 4c 54 20 50 4f 4c 4c 49 4e 47 00 1f 00 78 00 06 00 50 2a 20 00 1f 00 90 00 0e 00 50 58 4c 38 30 5c 45 ┆E NOT OPEN @ P XIF b P* n P* HALT POLLING x P* PXL80 E┆
0x3100…3150 51 55 5c 2a 00 1f 00 9a 00 2a 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 4c 46 43 5c 43 41 4c 43 55 4c 41 54 45 20 4c 49 4e 20 46 49 4c 45 20 43 4f 44 45 20 00 1f 00 ac 00 20 00 50 5c 4c 44 4b 5c 41 37 2c 2f 41 36 5c 4f 52 44 45 52 3a 20 48 41 4c ┆QU * * P CF A14,K:LFC CALCULATE LIN FILE CODE P LDK A7,/A6 ORDER: HAL┆
0x3150…31a0 54 20 50 4f 4c 4c 00 1f 00 da 00 0a 00 50 5c 4c 4b 4d 5c 20 00 1f 00 fe 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 1f 01 0c 00 06 00 50 2a 20 00 1f 01 1c 00 1c 00 50 2a 20 20 20 41 4e 41 4c 59 5a 45 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 1f ┆T POLL P LKM P DATA 1 P* P* ANALYZE RETURN CODE ┆
0x31a0…31ee 01 26 00 20 00 50 2a 5c 42 49 54 20 31 35 20 4d 4f 44 45 4d 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 20 00 1f 01 46 00 1a 00 50 2a 5c 42 49 54 20 31 31 20 4c 49 4e 45 20 4e 4f 54 20 4f 50 45 4e 00 1f 01 6a 00 06 00 50 2a 20 00 1f 01 88 ┆ & P* BIT 15 MODEM NOT OPERABLE F P* BIT 11 LINE NOT OPEN j P* ┆
0x31ee…323e (32, 0, 400) 00 14 00 50 5c 4c 44 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 20 00 20 00 04 00 1e 00 50 5c 52 46 28 4e 5a 29 5c 58 4c 32 35 30 5c 4c 49 4e 45 20 43 4c 4f 53 45 44 20 00 20 00 1c 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 32 20 00 20 00 3e 00 28 00 50 ┆ P LD A1,K:ERC,A8 P RF(NZ) XL250 LINE CLOSED P LDK A1,2 > ( P┆
0x323e…328e 5c 4f 52 53 5c 41 31 2c 4b 3a 4c 53 54 2c 41 33 5c 49 4e 44 49 43 41 54 45 20 48 41 4c 54 20 50 4f 4c 4c 20 00 20 00 50 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 20 00 7c 00 06 00 50 2a 20 00 20 00 98 00 24 ┆ ORS A1,K:LST,A3 INDICATE HALT POLL P P EJECT IDENT C:XNW | P* $┆
0x328e…32de 00 50 2a 20 20 20 57 41 49 54 20 54 49 4c 4c 20 41 4c 4c 20 4d 53 47 53 20 41 52 45 20 53 45 4e 54 20 00 20 00 a2 00 06 00 50 2a 20 00 20 00 ca 00 10 00 50 5c 4c 44 4b 4c 5c 41 35 2c 2d 33 20 00 20 00 d4 00 10 00 50 58 4c 31 30 30 5c 45 51 ┆ P* WAIT TILL ALL MSGS ARE SENT P* P LDKL A5,-3 PXL100 EQ┆
0x32de…332e 55 5c 2a 20 00 20 00 e8 00 14 00 50 5c 4c 44 5c 41 31 2c 4b 3a 52 45 50 43 2c 41 33 00 20 00 fc 00 24 00 50 5c 52 46 28 5a 29 5c 58 4c 32 30 30 5c 4e 4f 20 4d 45 53 53 41 47 45 53 20 57 41 49 54 49 4e 47 00 20 01 14 00 0e 00 50 5c 41 44 4b ┆U * P LD A1,K:REPC,A3 $ P RF(Z) XL200 NO MESSAGES WAITING P ADK┆
0x332e…337e 5c 41 35 2c 31 20 00 20 01 3c 00 1e 00 50 5c 52 46 28 50 29 5c 58 4c 32 30 30 5c 57 41 49 54 45 44 20 45 4e 4f 55 47 48 00 20 01 4e 00 1a 00 50 5c 4c 44 4b 4c 5c 41 38 2c 37 5c 44 45 4c 41 59 20 54 49 4d 45 20 00 20 01 70 00 08 00 50 5c 4c ┆ A5,1 < P RF(P) XL200 WAITED ENOUGH N P LDKL A8,7 DELAY TIME p P L┆
0x337e…33ce (33, 0, 400) 4b 4d 00 20 01 8e 00 12 00 50 5c 44 41 54 41 5c 36 5c 44 45 4c 41 59 20 00 21 00 0a 00 0e 00 50 5c 52 42 5c 58 4c 31 30 30 20 00 21 00 20 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 21 00 32 00 06 00 50 2a 20 ┆KM P DATA 6 DELAY ! P RB XL100 ! P EJECT IDENT C:XNW ! 2 P* ┆
0x33ce…341e 00 21 00 4e 00 12 00 50 2a 20 20 20 43 4c 4f 53 45 20 4c 49 4e 45 00 21 00 58 00 06 00 50 2a 20 00 21 00 6e 00 10 00 50 58 4c 32 30 30 5c 45 51 55 5c 2a 20 00 21 00 78 00 18 00 50 5c 4c 44 4b 5c 41 31 2c 30 5c 26 26 26 26 43 4d 38 35 35 20 ┆ ! N P* CLOSE LINE ! X P* ! n PXL200 EQU * ! x P LDK A1,0 &&&&CM855 ┆
0x341e…346e 00 21 00 8c 00 32 00 50 5c 53 54 5c 41 31 2c 4b 3a 4c 53 54 2c 41 33 5c 26 26 26 26 20 20 20 20 20 20 49 4e 44 49 43 41 54 45 20 4c 49 4e 45 20 43 4c 4f 53 45 44 00 21 00 a8 00 12 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 4c 43 45 00 21 00 de ┆ ! 2 P ST A1,K:LST,A3 &&&& INDICATE LINE CLOSED ! P LDKL A8,K:LCE ! ┆
0x346e…34be 00 1e 00 50 5c 4c 44 4b 5c 41 37 2c 2f 41 34 5c 43 4f 4e 52 45 4f 4c 20 4f 52 44 45 52 20 00 21 00 f4 00 0a 00 50 5c 4c 4b 4d 5c 20 00 21 01 16 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 21 01 24 00 06 00 50 2a 20 00 21 01 34 00 1c 00 50 2a 20 ┆ P LDK A7,/A4 CONREOL ORDER ! P LKM ! P DATA 1 ! $ P* ! 4 P* ┆
0x34be…350e 20 20 41 4e 41 4c 59 5a 45 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 21 01 3e 00 20 00 50 2a 5c 42 49 54 20 31 35 20 4d 4f 44 45 4d 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 20 00 21 01 5e 00 20 00 50 2a 5c 42 49 54 20 31 31 20 4c 49 4e 45 20 ┆ ANALYZE RETURN CODE ! > P* BIT 15 MODEM NOT OPERABLE ! ^ P* BIT 11 LINE ┆
0x350e…355e (34, 0, 400) 41 4c 52 45 41 44 59 20 43 4c 4f 53 45 44 00 21 01 82 00 06 00 50 2a 20 00 22 00 16 00 04 00 50 00 22 00 20 00 06 00 50 2a 20 00 22 00 28 00 22 00 50 2a 20 20 20 50 52 49 4e 54 20 41 4e 44 20 49 4e 44 49 43 41 54 45 20 43 4c 4f 53 45 44 20 ┆ALREADY CLOSED ! P* " P " P* " ( " P* PRINT AND INDICATE CLOSED ┆
0x355e…35ae 00 22 00 32 00 06 00 50 2a 20 00 22 00 58 00 10 00 50 58 4c 32 35 30 5c 45 51 55 5c 2a 20 00 22 00 62 00 10 00 50 5c 49 46 54 5c 4c 4f 4f 50 3d 31 20 00 22 00 76 00 18 00 50 5c 4c 44 5c 41 31 2c 4b 3a 4c 53 54 2c 41 33 5c 2a 2a 2a 2a 00 22 ┆ " 2 P* " X PXL250 EQU * " b P IFT LOOP=1 " v P LD A1,K:LST,A3 **** "┆
0x35ae…35fe 00 8a 00 22 00 50 5c 52 46 28 5a 29 5c 58 4c 33 30 30 5c 2a 2a 2a 41 4c 52 45 41 44 59 20 43 4c 4f 53 45 44 00 22 00 a6 00 08 00 50 5c 58 49 46 00 22 00 cc 00 18 00 50 5c 4c 44 4b 5c 41 31 2c 30 5c 26 26 26 26 43 4d 38 35 35 20 00 22 00 d8 ┆ " P RF(Z) XL300 ***ALREADY CLOSED " P XIF " P LDK A1,0 &&&&CM855 " ┆
0x35fe…364e 00 32 00 50 5c 53 54 5c 41 31 2c 4b 3a 4c 53 54 2c 41 33 5c 26 26 26 26 20 20 20 20 20 20 49 4e 44 49 43 41 54 45 20 4c 49 4e 45 20 43 4c 4f 53 45 44 00 22 00 f4 00 10 00 50 5c 4c 44 4b 4c 5c 41 31 2c 2d 31 20 00 22 01 2a 00 2e 00 50 5c 41 ┆ 2 P ST A1,K:LST,A3 &&&& INDICATE LINE CLOSED " P LDKL A1,-1 " * . P A┆
0x364e…369e 44 53 5c 41 31 2c 4b 3a 4f 50 45 4e 5c 44 45 43 52 45 41 53 45 20 4e 42 52 20 4f 46 20 4f 50 45 4e 20 4c 49 4e 45 53 20 00 22 01 3e 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 54 5c 27 4c 49 4e 45 20 43 4c 4f 53 45 44 27 00 22 01 70 ┆DS A1,K:OPEN DECREASE NBR OF OPEN LINES " > P CF A14,K:PRTT 'LINE CLOSED' " p┆
0x369e…36ee (35, 0, 400) 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 32 34 00 23 00 04 00 0e 00 50 5c 52 46 5c 58 4c 45 4e 44 20 00 23 00 18 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 23 00 2a 00 06 00 50 2a 20 00 23 00 46 00 1a 00 50 ┆ P DATA K:F324 # P RF XLEND # P EJECT IDENT C:XNW # * P* # F P┆
0x36ee…373e 2a 20 20 20 50 52 49 4e 54 20 27 4e 4f 54 20 4f 50 45 4e 45 44 27 00 23 00 50 00 06 00 50 2a 20 00 23 00 6e 00 10 00 50 58 4c 33 30 30 5c 45 51 55 5c 2a 20 00 23 00 78 00 24 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 54 5c 27 4c 49 4e 45 ┆* PRINT 'NOT OPENED' # P P* # n PXL300 EQU * # x $ P CF A14,K:PRTT 'LINE┆
0x373e…378e 20 4e 4f 54 20 4f 50 45 4e 45 44 27 00 23 00 8c 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 32 33 00 23 00 b4 00 06 00 50 2a 20 00 23 00 c8 00 0e 00 50 2a 20 20 20 52 45 54 55 52 4e 00 23 00 d2 00 06 00 50 2a 20 00 23 00 e4 00 10 00 50 58 4c ┆ NOT OPENED' # P DATA K:F323 # P* # P* RETURN # P* # PXL┆
0x378e…37de 45 4e 44 5c 45 51 55 5c 2a 20 00 23 00 ee 00 26 00 50 5c 4c 44 5c 41 38 2c 53 41 56 42 55 46 5c 52 45 4c 4f 41 44 20 49 4e 42 55 46 20 41 44 44 52 45 53 53 00 23 01 02 00 10 00 50 58 4c 45 4e 44 41 5c 45 51 55 5c 2a 00 23 01 2c 00 0c 00 50 ┆END EQU * # & P LD A8,SAVBUF RELOAD INBUF ADDRESS # PXLENDA EQU * # , P┆
0x37de…382e 5c 52 54 4e 5c 41 31 34 00 23 01 40 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 23 01 50 00 46 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 58 20 54 20 2a 2a 2a 2a 2a 2a 2a 2a ┆ RTN A14 # @ P EJECT IDENT C:XNW # P F P******************* K : X T ********┆
0x382e…387e (36, 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 20 00 23 01 6c 00 06 00 50 2a 20 00 24 00 26 00 06 00 50 2a 20 00 24 00 30 00 06 00 50 2a 20 00 24 00 3a 00 18 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 ┆***************************** # l P* $ & P* $ 0 P* $ : P*SUBROUTINE ┆
0x387e…38ce 4b 20 3a 20 58 20 54 20 00 24 00 44 00 06 00 50 2a 20 00 24 00 60 00 36 00 50 2a 43 48 45 43 4b 53 20 49 46 20 54 48 45 20 54 43 27 53 20 41 52 45 20 53 50 45 43 49 46 49 45 44 20 49 4e 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 00 24 00 6a ┆K : X T $ D P* $ ` 6 P*CHECKS IF THE TC'S ARE SPECIFIED IN CONFIGURATION $ j┆
0x38ce…391e 00 1e 00 50 2a 4c 49 53 54 20 41 4e 44 20 54 48 45 4e 20 43 4c 4f 53 45 53 20 54 48 45 4d 00 24 00 a4 00 06 00 50 2a 20 00 24 00 c6 00 06 00 50 2a 20 00 24 00 d0 00 06 00 50 2a 20 00 24 00 da 00 22 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 ┆ P*LIST AND THEN CLOSES THEM $ P* $ P* $ P* $ " P* CALL SEQUE┆
0x391e…396e 4e 43 45 3a 5c 43 46 20 20 20 41 31 34 2c 4b 3a 58 54 00 24 00 e4 00 06 00 50 2a 20 00 24 01 0a 00 26 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 41 38 20 3d 20 49 4e 50 55 54 20 42 55 46 46 45 52 00 24 01 14 00 06 00 50 2a 20 ┆NCE: CF A14,K:XT $ P* $ & P* ENTRY PARAM: A8 = INPUT BUFFER $ P* ┆
0x396e…39be 00 24 01 3e 00 28 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b 3a 50 52 54 54 20 49 4e 20 54 4f 53 53 46 55 4e 43 5c 00 24 01 48 00 16 00 50 2a 5c 5c 4b 3a 53 54 31 30 20 49 4e 20 4b 53 55 42 53 00 24 01 74 00 0e 00 50 2a 5c ┆ $ > ( P* SUBROUTINES: K:PRTT IN TOSSFUNC $ H P* K:ST10 IN KSUBS $ t P* ┆
0x39be…3a0e (37, 0, 400) 5c 4b 3a 4c 44 31 30 20 00 24 01 8e 00 16 00 50 2a 5c 5c 4b 3a 43 4b 4c 20 20 49 4e 20 4e 53 55 42 53 00 25 00 10 00 0c 00 50 2a 5c 5c 4b 3a 4c 46 43 00 25 00 2a 00 0c 00 50 2a 5c 5c 4b 3a 47 54 43 00 25 00 3a 00 06 00 50 2a 20 00 25 00 4a ┆ K:LD10 $ P* K:CKL IN NSUBS % P* K:LFC % * P* K:GTC % : P* % J┆
0x3a0e…3a5e 00 1a 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 4d 3a 5c 4e 4f 4e 45 20 00 25 00 54 00 06 00 50 2a 20 00 25 00 72 00 24 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 56 49 41 20 41 31 34 20 53 54 41 43 4b 45 52 00 25 00 7c ┆ P* RETURN PARAM: NONE % T P* % r $ P* RETURN METOD: VIA A14 STACKER % |┆
0x3a5e…3aae 00 06 00 50 2a 20 00 25 00 a4 00 22 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 31 2d 41 37 2c 41 39 2d 41 31 30 20 00 25 00 ae 00 06 00 50 2a 20 00 25 00 d4 00 16 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 20 ┆ P* % " P* CHANGED REGS: A1-A7,A9-A10 % P* % P* STACKER NEED: ┆
0x3aae…3afe 00 25 00 de 00 06 00 50 2a 20 00 25 00 f8 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 25 01 02 00 06 00 50 2a 20 00 25 01 1c 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f 50 43 4f 4d 00 25 01 26 ┆ % P* % P* LIMITATIONS: % P* % P* CALLING TASK: OPCOM % &┆
0x3afe…3b4e 00 06 00 50 2a 20 00 25 01 44 00 06 00 50 2a 20 00 25 01 4e 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 ┆ P* % D P* % N D P********************************************************┆
0x3b4e…3b9e (38, 0, 398) 2a 2a 2a 2a 2a 2a 2a 20 00 25 01 58 00 04 00 50 00 26 00 10 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 26 00 18 00 0e 00 50 2a 5c 5c 4b 20 3a 20 58 20 54 00 26 00 34 00 06 00 50 2a 20 00 26 00 46 00 18 00 50 ┆******* % X P & P EJECT IDENT C:XNW & P* K : X T & 4 P* & F P┆
0x3b9e…3bee 2a 20 20 20 56 41 4c 49 44 20 4c 49 4e 45 20 4e 42 52 3f 20 00 26 00 50 00 06 00 50 2a 20 00 26 00 6c 00 0e 00 50 4b 3a 58 54 5c 45 51 55 5c 2a 00 26 00 76 00 2a 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4f 4e 5c 43 4f 4e 56 45 52 54 20 54 4f ┆* VALID LINE NBR? & P P* & l PK:XT EQU * & v * P CF A14,K:CON CONVERT TO┆
0x3bee…3c3e 2d 2d 20 31 2d 31 35 20 54 4f 20 41 2d 5a 00 26 00 88 00 12 00 50 5c 52 46 28 4e 5a 29 5c 58 54 45 4e 44 20 00 26 00 b6 00 10 00 50 5c 49 46 54 5c 4c 4f 4f 50 3d 30 20 00 26 00 cc 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4b 4c 5c 43 48 ┆-- 1-15 TO A-Z & P RF(NZ) XTEND & P IFT LOOP=0 & P CF A14,K:CKL CH┆
0x3c3e…3c8e 45 43 4b 20 4c 49 4e 45 20 4e 42 52 00 26 00 e0 00 1c 00 50 5c 52 46 28 4e 5a 29 5c 58 54 45 4e 44 5c 4e 4f 54 20 56 41 4c 49 44 20 00 26 01 04 00 06 00 50 2a 20 00 26 01 24 00 30 00 50 2a 20 20 20 47 45 54 20 54 43 20 46 52 4f 4d 20 4b 42 ┆ECK LINE NBR & P RF(NZ) XTEND NOT VALID & P* & $ 0 P* GET TC FROM KB┆
0x3c8e…3cdc 42 20 41 4e 44 20 53 45 45 20 49 46 20 49 54 20 49 53 20 49 4e 20 4c 49 53 54 00 26 01 2e 00 06 00 50 2a 20 00 26 01 62 00 10 00 50 58 54 31 30 30 5c 45 51 55 5c 2a 20 00 26 01 6c 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 47 54 43 20 ┆B AND SEE IF IT IS IN LIST & . P* & b PXT100 EQU * & l P CF A14,K:GTC ┆
0x3cdc…3d2c (39, 0, 400) 00 26 01 80 00 1c 00 50 5c 52 46 28 4e 29 5c 58 54 45 4e 44 5c 45 4e 44 20 4f 46 20 54 43 27 53 00 27 00 08 00 20 00 50 5c 52 46 28 5a 29 5c 58 54 32 30 30 5c 54 43 20 4e 4f 54 20 49 4e 20 4c 49 53 54 20 00 27 00 28 00 18 00 50 5c 45 4a 45 ┆ & P RF(N) XTEND END OF TC'S ' P RF(Z) XT200 TC NOT IN LIST ' ( P EJE┆
0x3d2c…3d7c 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 27 00 4c 00 06 00 50 2a 20 00 27 00 68 00 12 00 50 2a 20 20 20 54 43 20 49 4e 20 4c 49 53 54 00 27 00 72 00 2a 00 50 2a 20 20 20 44 45 4c 45 44 54 45 20 54 43 20 46 52 4f 4d 20 43 4f 4e 46 ┆CT IDENT C:XNW ' L P* ' h P* TC IN LIST ' r * P* DELEDTE TC FROM CONF┆
0x3d7c…3dcc 49 47 55 52 41 54 49 4f 4e 20 4c 49 53 54 00 27 00 88 00 06 00 50 2a 20 00 27 00 b6 00 1a 00 50 5c 43 4d 52 5c 41 36 5c 52 45 53 45 54 20 54 43 20 4c 49 53 54 20 00 27 00 c0 00 06 00 50 2a 20 00 27 00 de 00 10 00 50 2a 20 20 20 43 4c 4f 53 ┆IGURATION LIST ' P* ' P CMR A6 RESET TC LIST ' P* ' P* CLOS┆
0x3dcc…3e1c 45 20 54 43 00 27 00 e8 00 06 00 50 2a 20 00 27 00 fc 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 53 54 38 20 00 27 01 06 00 1a 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 4c 46 43 5c 47 45 54 20 45 43 42 20 00 27 01 1c 00 18 00 50 5c 4c 44 4b 5c 41 ┆E TC ' P* ' P CF A14,K:ST8 ' P CF A14,K:LFC GET ECB ' P LDK A┆
0x3e1c…3e6c 37 2c 2f 42 38 5c 43 4c 4f 53 45 20 54 43 00 27 01 3a 00 1e 00 50 5c 53 43 5c 41 31 2c 4b 3a 45 43 57 2b 31 2c 41 38 5c 54 43 20 43 48 41 52 20 00 27 01 56 00 08 00 50 5c 4c 4b 4d 00 27 01 78 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 27 01 84 ┆7,/B8 CLOSE TC ' : P SC A1,K:ECW+1,A8 TC CHAR ' V P LKM ' x P DATA 1 ' ┆
0x3e6c…3ebc (40, 0, 400) 00 06 00 50 2a 20 00 28 00 04 00 1c 00 50 2a 20 20 20 41 4e 41 4c 49 5a 45 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 28 00 0e 00 20 00 50 2a 5c 42 49 54 20 31 35 20 4d 4f 44 45 4d 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 20 00 28 00 2e 00 18 ┆ P* ( P* ANALIZE RETURN CODE ( P* BIT 15 MODEM NOT OPERABLE ( . ┆
0x3ebc…3f0c 00 50 2a 5c 42 49 54 20 31 31 20 4c 49 4e 45 20 43 4c 4f 53 45 44 00 28 00 52 00 20 00 50 2a 5c 42 49 54 20 20 39 20 54 43 20 4e 4f 54 20 49 4e 20 50 4f 4c 4c 20 4c 49 53 54 00 28 00 6e 00 06 00 50 2a 20 00 28 00 92 00 04 00 50 00 28 00 9c ┆ P* BIT 11 LINE CLOSED ( R P* BIT 9 TC NOT IN POLL LIST ( n P* ( P ( ┆
0x3f0c…3f5c 00 06 00 50 2a 20 00 28 00 a4 00 1c 00 50 2a 20 20 20 50 52 49 4e 54 20 54 43 20 53 54 41 54 49 53 54 49 43 53 20 00 28 00 ae 00 06 00 50 2a 20 00 28 00 ce 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 4c 44 38 5c 52 45 4c 4f 41 44 20 38 20 52 ┆ P* ( P* PRINT TC STATISTICS ( P* ( P CF A14,K:LD8 RELOAD 8 R┆
0x3f5c…3fac 45 47 53 20 00 28 00 d8 00 32 00 50 5c 53 55 4b 4c 5c 41 31 34 2c 31 36 5c 4d 41 4b 45 20 49 54 20 50 4f 53 53 49 42 4c 45 20 54 4f 20 52 45 4c 4f 41 44 20 41 47 41 49 4e 20 00 28 00 fc 00 26 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 54 53 31 30 ┆EGS ( 2 P SUKL A14,16 MAKE IT POSSIBLE TO RELOAD AGAIN ( & P CF A14,K:TS10┆
0x3fac…3ffc 5c 50 52 49 4e 54 20 54 43 20 53 54 41 54 49 53 54 49 43 53 00 28 01 32 00 06 00 50 2a 20 00 28 01 5c 00 18 00 50 2a 20 20 20 50 52 49 4e 54 20 27 44 45 4c 45 54 45 44 27 20 00 28 01 66 00 06 00 50 2a 20 00 28 01 82 00 2a 00 50 5c 43 46 5c ┆ PRINT TC STATISTICS ( 2 P* ( P* PRINT 'DELETED' ( f P* ( * P CF ┆
0x3ffc…404c (41, 0, 400) 41 31 34 2c 4b 3a 50 52 54 4e 5c 27 4c 49 4e 45 20 4c 4c 20 54 43 20 54 54 20 44 45 4c 45 54 45 44 27 00 28 01 8c 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 34 34 00 29 00 2a 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 4c 44 38 20 00 29 00 3e ┆A14,K:PRTN 'LINE LL TC TT DELETED' ( P DATA K:F344 ) * P CF A14,K:LD8 ) >┆
0x404c…409c 00 2a 00 50 5c 43 4d 52 5c 41 35 5c 52 45 4c 45 41 53 45 20 54 43 20 53 50 45 43 49 46 49 43 41 54 49 4f 4e 20 41 52 45 41 20 00 29 00 54 00 16 00 50 5c 52 42 5c 58 54 31 30 30 5c 4e 45 58 54 20 54 43 20 00 29 00 82 00 18 00 50 5c 45 4a 45 ┆ * P CMR A5 RELEASE TC SPECIFICATION AREA ) T P RB XT100 NEXT TC ) P EJE┆
0x409c…40ec 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 29 00 9c 00 06 00 50 2a 20 00 29 00 b8 00 16 00 50 2a 20 20 20 54 43 20 4e 4f 54 20 49 4e 20 4c 49 53 54 00 29 00 c2 00 0e 00 50 2a 20 20 20 50 52 49 4e 54 20 00 29 00 dc 00 06 00 50 2a 20 ┆CT IDENT C:XNW ) P* ) P* TC NOT IN LIST ) P* PRINT ) P* ┆
0x40ec…413c 00 29 00 ee 00 10 00 50 58 54 32 30 30 5c 45 51 55 5c 2a 20 00 29 00 f8 00 22 00 50 5c 53 54 5c 41 31 2c 4b 3a 44 55 4d 5c 54 43 20 43 48 41 52 20 54 4f 20 54 43 20 57 42 20 00 29 01 0c 00 12 00 50 5c 4c 44 4b 4c 5c 41 39 2c 4b 3a 44 55 4d ┆ ) PXT200 EQU * ) " P ST A1,K:DUM TC CHAR TO TC WB ) P LDKL A9,K:DUM┆
0x413c…418c 00 29 01 32 00 22 00 50 5c 53 54 5c 41 39 2c 54 43 41 57 42 54 2c 41 31 33 5c 54 43 20 57 42 20 54 4f 20 54 43 41 00 29 01 48 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 00 29 01 6e 00 2c 00 50 5c 44 41 54 41 5c 4b 3a 46 33 34 33 ┆ ) 2 " P ST A9,TCAWBT,A13 TC WB TO TCA ) H P CF A14,K:PRTN ) n , P DATA K:F343┆
0x418c…41dc (42, 0, 400) 5c 27 4c 49 4e 45 20 4c 4c 20 54 43 20 54 54 20 4e 4f 54 20 49 4e 20 4c 49 53 54 27 00 29 01 84 00 16 00 50 5c 52 42 5c 58 54 31 30 30 5c 4e 45 58 54 20 54 43 20 00 2a 00 24 00 06 00 50 2a 20 00 2a 00 3e 00 14 00 50 2a 20 20 20 45 4e 44 20 ┆ 'LINE LL TC TT NOT IN LIST' ) P RB XT100 NEXT TC * $ P* * > P* END ┆
0x41dc…422c 4f 46 20 54 43 27 53 20 00 2a 00 48 00 06 00 50 2a 20 00 2a 00 60 00 08 00 50 5c 58 49 46 00 2a 00 6a 00 10 00 50 58 54 45 4e 44 5c 45 51 55 5c 2a 20 00 2a 00 76 00 0c 00 50 5c 52 54 4e 20 41 31 34 00 2a 00 8a 00 18 00 50 5c 45 4a 45 43 54 ┆OF TC'S * H P* * ` P XIF * j PXTEND EQU * * v P RTN A14 * P EJECT┆
0x422c…427c 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 2a 00 9a 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 58 20 53 20 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 ┆ IDENT C:XNW * @ P************* K : X S ************************************┆
0x427c…42cc 2a 20 00 2a 00 b6 00 06 00 50 2a 20 00 2a 00 fa 00 06 00 50 2a 20 00 2a 01 04 00 06 00 50 2a 20 00 2a 01 0e 00 18 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 58 20 53 00 2a 01 18 00 2e 00 50 2a 43 4c 4f 53 45 53 20 41 4c 4c 20 ┆* * P* * P* * P* * P*SUBROUTINE K : X S * . P*CLOSES ALL ┆
0x42cc…431c 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 41 4e 44 20 54 52 55 4e 4b 20 4c 49 4e 45 20 00 2a 01 34 00 06 00 50 2a 20 00 2a 01 66 00 06 00 50 2a 20 00 2a 01 70 00 06 00 50 2a 20 00 2a 01 7a 00 1e 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 ┆TERMINAL LINES AND TRUNK LINE * 4 P* * f P* * p P* * z P* CALL SEQUE┆
0x431c…436c (43, 0, 400) 4e 43 45 3a 5c 41 31 34 2c 4b 3a 58 53 20 00 2a 01 84 00 06 00 50 2a 20 00 2b 00 16 00 1a 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 4e 4f 4e 45 20 00 2b 00 20 00 06 00 50 2a 20 00 2b 00 3e 00 26 00 50 2a 20 20 20 53 55 42 52 ┆NCE: A14,K:XS * P* + P* ENTRY PARAM: NONE + P* + > & P* SUBR┆
0x436c…43bc 4f 55 54 49 4e 45 53 3a 5c 4b 3a 50 52 54 54 20 20 54 4f 53 53 46 55 4e 43 20 00 2b 00 48 00 16 00 50 2a 5c 5c 4b 3a 58 4c 31 30 20 49 4e 20 58 4e 45 54 57 00 2b 00 72 00 06 00 50 2a 20 00 2b 00 8c 00 1a 00 50 2a 20 20 52 45 54 55 52 4e 20 ┆OUTINES: K:PRTT TOSSFUNC + H P* K:XL10 IN XNETW + r P* + P* RETURN ┆
0x43bc…440c 50 41 52 41 4d 3a 5c 4e 4f 4e 45 20 00 2b 00 96 00 06 00 50 2a 20 00 2b 00 b4 00 24 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 56 49 41 20 41 31 34 20 53 54 41 43 4b 45 52 00 2b 00 be 00 06 00 50 2a 20 00 2b 00 e6 00 22 00 50 ┆PARAM: NONE + P* + $ P* RETURN METOD: VIA A14 STACKER + P* + " P┆
0x440c…445c 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 31 2d 41 37 2c 41 39 2c 41 31 30 20 00 2b 00 f0 00 06 00 50 2a 20 00 2b 01 16 00 18 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 34 20 00 2b 01 20 00 06 00 50 2a 20 00 2b ┆* CHANGED REGS: A1-A7,A9,A10 + P* + P* STACKER NEED: 14 + P* +┆
0x445c…44ac 01 3c 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 2b 01 46 00 06 00 50 2a 20 00 2b 01 60 00 1c 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f 50 43 4f 4d 5c 20 00 2b 01 6a 00 06 00 50 2a 20 00 2b 01 8a ┆ < P* LIMITATIONS: + F P* + ` P* CALLING TASK: OPCOM + j P* + ┆
0x44ac…44fc (44, 0, 398) 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 2a 2a 2a 2a 2a 20 00 2c 00 04 00 18 00 50 5c 45 4a 45 ┆ D P*************************************************************** , P EJE┆
0x44fc…454c 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 2c 00 4c 00 0e 00 50 2a 5c 5c 4b 20 3a 20 58 20 53 00 2c 00 68 00 06 00 50 2a 20 00 2c 00 7a 00 06 00 50 2a 20 00 2c 00 84 00 20 00 50 2a 20 20 20 47 45 54 20 4c 49 4e 45 20 57 42 20 41 4e ┆CT IDENT C:XNW , L P* K : X S , h P* , z P* , P* GET LINE WB AN┆
0x454c…459c 44 20 4c 49 4e 45 20 4e 42 52 00 2c 00 8e 00 06 00 50 2a 20 00 2c 00 b2 00 0e 00 50 4b 3a 58 53 5c 45 51 55 5c 2a 00 2c 00 bc 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 32 2c 4b 3a 43 4f 4e 46 00 2c 00 ce 00 10 00 50 58 53 31 30 30 5c 45 51 55 5c ┆D LINE NBR , P* , PK:XS EQU * , P LDKL A12,K:CONF , PXS100 EQU ┆
0x459c…45ec 2a 20 00 2c 00 e6 00 10 00 50 5c 4c 44 52 5c 41 33 2c 41 31 32 20 00 2c 00 fa 00 16 00 50 5c 53 54 5c 41 33 2c 54 43 41 57 42 4c 2c 41 31 33 20 00 2c 01 0e 00 10 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 33 20 00 2c 01 28 00 06 00 50 2a 20 00 2c ┆* , P LDR A3,A12 , P ST A3,TCAWBL,A13 , P LDR* A2,A3 , ( P* ,┆
0x45ec…463a 01 3c 00 20 00 50 2a 20 20 20 43 4c 4f 53 45 20 4f 4e 45 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 20 00 2c 01 46 00 06 00 50 2a 20 00 2c 01 6a 00 1e 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 4c 31 30 5c 43 4c 4f 53 45 20 4c 49 4e 45 20 ┆ < P* CLOSE ONE TERMINAL LINE , F P* , j P CF A14,K:XL10 CLOSE LINE ┆
0x463a…468a (45, 0, 400) 00 2c 01 74 00 14 00 50 5c 41 44 4b 4c 5c 41 31 32 2c 4b 3a 4c 45 4e 44 00 2d 00 08 00 14 00 50 5c 43 57 4b 5c 41 31 32 2c 4b 3a 43 4f 4e 45 20 00 2d 00 20 00 22 00 50 5c 52 42 28 4c 29 5c 58 53 31 30 30 5c 4e 4f 54 20 45 4e 44 20 4f 46 20 ┆ , t P ADKL A12,K:LEND - P CWK A12,K:CONE - " P RB(L) XS100 NOT END OF ┆
0x468a…46da 4c 49 4e 45 53 20 00 2d 00 38 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 2d 00 5e 00 06 00 50 2a 20 00 2d 00 7a 00 18 00 50 2a 20 20 20 43 4c 4f 53 45 20 54 52 55 4e 4b 20 4c 49 4e 45 00 2d 00 84 00 06 00 50 ┆LINES - 8 P EJECT IDENT C:XNW - ^ P* - z P* CLOSE TRUNK LINE - P┆
0x46da…472a 2a 20 00 2d 00 a0 00 06 00 50 2a 20 00 2d 00 aa 00 10 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 43 00 2d 00 b4 00 06 00 50 2a 20 00 2d 00 c8 00 24 00 50 2a 20 20 20 50 52 49 4e 54 20 27 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 43 4c 4f 53 45 44 ┆* - P* - P CF A14,K:XC - P* - $ P* PRINT 'CONCENTRATOR CLOSED┆
0x472a…477a 27 20 00 2d 00 d2 00 06 00 50 2a 20 00 2d 00 fa 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 2d 01 04 00 20 00 50 5c 53 54 5c 41 31 2c 4b 3a 4f 50 45 4e 5c 4e 4f 44 20 4f 50 45 4e 20 4c 49 4e 45 53 00 2d 01 16 00 12 00 50 5c 43 46 5c 41 31 ┆' - P* - P LDK A1,0 - P ST A1,K:OPEN NOD OPEN LINES - P CF A1┆
0x477a…47ca 34 2c 4b 3a 50 52 54 4e 00 2d 01 3a 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 30 31 00 2d 01 50 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 00 2d 01 64 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 30 36 00 2d 01 7a 00 0c 00 50 5c 52 ┆4,K:PRTN - : P DATA K:F301 - P P CF A14,K:PRTN - d P DATA K:F306 - z P R┆
0x47ca…481a (46, 0, 400) 54 4e 5c 41 31 34 00 2d 01 8e 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 2e 00 0e 00 46 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 58 20 43 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆TN A14 - P EJECT IDENT C:XNW . F P******************* K : X C **********┆
0x481a…486a 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 2e 00 2a 00 06 00 50 2a 20 00 2e 00 74 00 06 00 50 2a 20 00 2e 00 7e 00 06 00 50 2a 20 00 2e 00 88 00 18 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b ┆*************************** . * P* . t P* . ~ P* . P*SUBROUTINE K┆
0x486a…48ba 20 3a 20 58 20 43 00 2e 00 92 00 42 00 50 2a 43 4c 4f 53 45 53 20 54 52 55 4e 4b 20 4c 49 4e 45 20 41 4e 44 20 53 45 54 53 20 54 48 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 49 4e 20 4f 46 46 20 4c 49 4e 45 20 4d 4f 44 45 20 00 2e 00 ae ┆ : X C . B P*CLOSES TRUNK LINE AND SETS THE CONCENTRATOR IN OFF LINE MODE . ┆
0x48ba…490a 00 06 00 50 2a 20 00 2e 00 f4 00 06 00 50 2a 20 00 2e 00 fe 00 06 00 50 2a 20 00 2e 01 08 00 22 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 43 46 20 20 41 31 34 2c 4b 3a 58 43 20 00 2e 01 12 00 06 00 50 2a 20 00 2e 01 38 00 1a ┆ P* . P* . P* . " P* CALL SEQUENCE: CF A14,K:XC . P* . 8 ┆
0x490a…495a 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 4e 4f 4e 45 20 00 2e 01 42 00 06 00 50 2a 20 00 2e 01 60 00 26 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 54 52 54 5a 20 20 49 4e 20 54 4f 53 53 46 55 4e 43 00 2e 01 6a ┆ P* ENTRY PARAM: NONE . B P* . ` & P* SUBROUTINES: TRTZ IN TOSSFUNC . j┆
0x495a…49aa (47, 0, 400) 00 06 00 50 2a 20 00 2f 00 04 00 1a 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 4d 3a 5c 4e 4f 4e 45 20 00 2f 00 0e 00 06 00 50 2a 20 00 2f 00 2c 00 1c 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 56 49 41 20 41 31 34 00 2f ┆ P* / P* RETURN PARAM: NONE / P* / , P* RETURN METOD: VIA A14 /┆
0x49aa…49fa 00 36 00 06 00 50 2a 20 00 2f 00 56 00 1c 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 31 2d 41 31 30 20 00 2f 00 60 00 06 00 50 2a 20 00 2f 00 80 00 16 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 34 00 2f 00 8a ┆ 6 P* / V P* CHANGED REGS: A1-A10 / ` P* / P* STACKER NEED: 4 / ┆
0x49fa…4a4a 00 06 00 50 2a 20 00 2f 00 a4 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 2f 00 ae 00 06 00 50 2a 20 00 2f 00 c8 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f 50 43 4f 4d 00 2f 00 d2 00 06 00 50 ┆ P* / P* LIMITATIONS: / P* / P* CALLING TASK: OPCOM / P┆
0x4a4a…4a9a 2a 20 00 2f 00 f0 00 06 00 50 2a 20 00 2f 00 fa 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 2a 2a ┆* / P* / D P************************************************************┆
0x4a9a…4aea 2a 2a 2a 20 00 2f 01 04 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 2f 01 4c 00 06 00 50 2a 20 00 2f 01 68 00 0e 00 50 2a 5c 5c 4b 20 3a 20 58 20 43 00 2f 01 72 00 06 00 50 2a 20 00 2f 01 84 00 12 00 50 2a 20 ┆*** / P EJECT IDENT C:XNW / L P* / h P* K : X C / r P* / P* ┆
0x4aea…4b3a (48, 0, 398) 43 43 20 4f 46 46 20 4c 49 4e 45 3f 00 2f 01 8e 00 06 00 50 2a 20 00 30 00 14 00 0e 00 50 4b 3a 58 43 5c 45 51 55 5c 2a 00 30 00 1e 00 12 00 50 5c 4c 44 5c 41 33 2c 4b 3a 43 43 53 54 20 00 30 00 30 00 12 00 50 5c 41 4e 4b 4c 5c 41 33 2c 2f ┆CC OFF LINE? / P* 0 PK:XC EQU * 0 P LD A3,K:CCST 0 0 P ANKL A3,/┆
0x4b3a…4b8a 46 46 46 43 00 30 00 46 00 2a 00 50 5c 4f 52 4b 5c 41 33 2c 2f 32 5c 49 4e 44 49 43 41 54 45 20 4c 4f 47 49 43 41 4c 4c 59 20 4f 46 20 4c 49 4e 45 20 00 30 00 5c 00 22 00 50 5c 52 46 28 4e 4e 29 5c 58 43 31 30 30 5c 41 4c 52 45 41 44 59 20 ┆FFFC 0 F * P ORK A3,/2 INDICATE LOGICALLY OF LINE 0 " P RF(NN) XC100 ALREADY ┆
0x4b8a…4bda 4f 46 46 20 4c 49 4e 45 00 30 00 8a 00 06 00 50 2a 20 00 30 00 b0 00 12 00 50 2a 20 43 43 20 4f 46 46 20 4c 49 4e 45 20 00 30 00 ba 00 06 00 50 2a 20 00 30 00 d0 00 24 00 50 5c 41 4e 4b 4c 5c 41 33 2c 2f 37 46 46 46 5c 49 4e 44 49 43 41 54 ┆OFF LINE 0 P* 0 P* CC OFF LINE 0 P* 0 $ P ANKL A3,/7FFF INDICAT┆
0x4bda…4c2a 45 20 4f 46 46 2d 4c 49 4e 45 00 30 00 da 00 12 00 50 5c 53 54 5c 41 33 2c 4b 3a 43 43 53 54 20 00 30 01 02 00 12 00 50 5c 49 46 54 5c 4f 4e 4c 49 4e 45 3d 32 20 00 30 01 18 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 30 01 2e 00 12 00 50 ┆E OFF-LINE 0 P ST A3,K:CCST 0 P IFT ONLINE=2 0 P LDK A1,0 0 . P┆
0x4c2a…4c78 5c 4c 44 4b 4c 5c 41 37 2c 27 43 43 27 20 00 30 01 40 00 18 00 50 5c 4c 4b 4d 5c 5c 41 43 54 49 56 41 54 45 20 44 43 43 43 20 00 30 01 56 00 14 00 50 5c 44 41 54 41 5c 2d 34 2c 4b 3a 44 43 50 4c 20 00 30 01 72 00 08 00 50 5c 58 49 46 ┆ LDKL A7,'CC' 0 @ P LKM ACTIVATE DCCC 0 V P DATA -4,K:DCPL 0 r P XIF┆
0x4c78…4cc8 (49, 2, 250) 00 30 01 8a 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 54 00 31 00 08 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 35 30 00 31 00 1e 00 0e 00 50 5c 52 46 5c 58 43 45 4e 44 20 00 31 00 32 00 06 00 50 2a 20 00 31 00 44 00 16 00 50 2a 20 ┆ 0 P CF A14,K:PRTT 1 P DATA K:F350 1 P RF XCEND 1 2 P* 1 D P* ┆
0x4cc8…4d18 41 4c 52 45 41 44 59 20 4f 46 46 20 4c 49 4e 45 00 31 00 4e 00 06 00 50 2a 20 00 31 00 68 00 10 00 50 58 43 31 30 30 5c 45 51 55 5c 2a 20 00 31 00 72 00 12 00 50 5c 53 54 5c 41 33 2c 4b 3a 43 43 53 54 20 00 31 00 86 00 12 00 50 5c 43 46 5c ┆ALREADY OFF LINE 1 N P* 1 h PXC100 EQU * 1 r P ST A3,K:CCST 1 P CF ┆
0x4d18…4d68 41 31 34 2c 4b 3a 50 52 54 54 00 31 00 9c 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 35 35 00 31 00 b2 00 10 00 50 58 43 45 4e 44 5c 45 51 55 5c 2a 20 00 31 00 c6 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 31 00 da 00 08 00 50 5c 45 4e 44 00 31 ┆A14,K:PRTT 1 P DATA K:F355 1 PXCEND EQU * 1 P RTN A14 1 P END 1┆
0x4d68…4d72 00 ea 40 04 00 00 00 31 00 f6 ┆ @ 1 ┆
0x4d72…4d7a (50, 1, 8) 20 04 00 00 00 32 00 04 ┆ 2 ┆