|
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: 27690 (0x6c2a)
Notes: pts_type(SC)
Names: »C:SET.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKAPP/C:SET.SC«
IDENT C:SET CONPAC REL=1.0 DATE= 80.04.29 UPDATE #2 77.03.08 JES *************************************************************** * * CONCENTRATOR APPLICATION PACKAGE PEAB-T * * PROGRAMMER: PER OMAN / PAN * * * C : S E T * * * * * THIS MODULE HANDLES TIME AND ADDRESS SETTING COMMANDS * * * * * THIS MODULE RUNS UNDER TASK: OPCOM * * * THE MODULE CONTAINS THE SUBROUTINES: * * NAME REVDAT VERSION * * K:ST 76-02-18 * K:SD 77.08.12 * K:ID 78.03.07 * K:SA 77-04-26 * K:LTA 77.09.29 * K:PTA 77.09.29 * K:XA 77.09.29 * **************************************************************** EJECT IDENT C:SET * * * ENTRY ADDRESSES * *************************************************************** * * ENTRY DESCRIPTION * ENTRY K:ST SET TIME ENTRY K:SD SET DATE ENTRY K:ID INCREMENT DATE ENTRY K:SA SET CONCENTRATOR ADDRESS ENTRY K:LTA LOAD TRUNK LINE ADDRESSES ENTRY K:PTA PRINT TRUNK LINE ADDRESSES ENTRY K:XA ONE WORD CONVERSION HEX TO ASCII ENTRY K:ASHX ASCII TO HEX CONVERSION TABLE ENTRY K:HXAS HEX TO ASCII CONVERSION TABLE EJECT IDENT C:SET * * * EXTERNAL REFERENSES * *************************************************************** * * ADDRESS IN MODULE * * EXTRN K:WBT C:WBS EXTRN K:WBD * EXTRN K:CCA C:TCA EXTRN K:CCZ EXTRN K:CCS EXTRN K:CCSA EXTRN K:CCSV EXTRN K:S0E EXTRN K:RCCE EXTRN K:LCE * EXTRN K:PRTN C:FUA EXTRN K:PRTT * EXTRN K:F373 C:TXT EXTRN K:F374 EXTRN K:F304 EXTRN K:F305 EXTRN K:F308 EXTRN K:FC10 EXTRN K:FC11 EXTRN K:FC12 EXTRN K:FC13 EXTRN K:F361 * EXTRN K:SIMP C:BPL * EXTRN TRAPAR C:INI * * * * HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST * NLIST * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 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, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT C:SET CONPAC REL=1.0 DATE= 80.04.29 «, t00=0x0000, t01=0x0004}
0x0034…0056 Head {h00=0x001e, h01=0x0050, text=» UPDATE #2 77.03.08 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…00b0 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00ac}
0x00b0…00e2 Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR APPLICATION PACKAGE PEAB-T«, t00=0x0000, t01=0x00b4}
0x00e2…00ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e6}
0x00ec…0112 Head {h00=0x0022, h01=0x0050, text=»* PROGRAMMER: PER OMAN / PAN «, t00=0x0000, t01=0x00f0}
0x0112…011c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x011c…0126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…013a Head {h00=0x0010, h01=0x0050, text=»* C : S E T «, t00=0x0000, t01=0x012a}
0x013a…0144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013e}
0x0144…014e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0148}
0x014e…015c Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0000, t01=0x0152}
0x015c…019e Head {h00=0x003e, h01=0x0050, text=»* THIS MODULE HANDLES TIME AND ADDRESS SETTING COMMANDS «, t00=0x0000, t01=0x0160}
0x019e…01ac Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0012}
0x01ac…01b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0020}
0x01b6…01c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002a}
0x01c0…01ee Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE RUNS UNDER TASK: OPCOM «, t00=0x0001, t01=0x0034}
0x01ee…01f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0062}
0x01f8…0202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006c}
0x0202…0230 Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x0076}
0x0230…023a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a4}
0x023a…0258 Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x00ae}
0x0258…0262 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00cc}
0x0262…027a Head {h00=0x0014, h01=0x0050, text=»* K:ST 76-02-18 «, t00=0x0001, t01=0x00d6}
0x027a…0292 Head {h00=0x0014, h01=0x0050, text=»* K:SD 77.08.12 «, t00=0x0001, t01=0x00ee}
0x0292…02aa Head {h00=0x0014, h01=0x0050, text=»* K:ID 78.03.07 «, t00=0x0001, t01=0x0106}
0x02aa…02c2 Head {h00=0x0014, h01=0x0050, text=»* K:SA 77-04-26 «, t00=0x0001, t01=0x011e}
0x02c2…02da Head {h00=0x0014, h01=0x0050, text=»* K:LTA 77.09.29«, t00=0x0001, t01=0x0136}
0x02da…02f2 Head {h00=0x0014, h01=0x0050, text=»* K:PTA 77.09.29«, t00=0x0001, t01=0x014e}
0x02f2…030a Head {h00=0x0014, h01=0x0050, text=»* K:XA 77.09.29 «, t00=0x0001, t01=0x0166}
0x030a…0314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017e}
0x0314…035c Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x0188}
0x035c…0378 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:SET «, t00=0x0002, t01=0x0040}
0x0378…0382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005c}
0x0382…038c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0066}
0x038c…03a6 Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0070}
0x03a6…03b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008a}
0x03b0…03f8 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0094}
0x03f8…0402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00dc}
0x0402…041e Head {h00=0x0018, h01=0x0050, text=»* ENTRY DESCRIPTION«, t00=0x0002, t01=0x00e6}
0x041e…0428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0102}
0x0428…0444 Head {h00=0x0018, h01=0x0050, text=» ENTRY K:ST SET TIME«, t00=0x0002, t01=0x010c}
0x0444…0460 Head {h00=0x0018, h01=0x0050, text=» ENTRY K:SD SET DATE«, t00=0x0002, t01=0x0128}
0x0460…0482 Head {h00=0x001e, h01=0x0050, text=» ENTRY K:ID INCREMENT DATE«, t00=0x0002, t01=0x0144}
0x0482…048a Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0166}
0x048a…04b6 Head {h00=0x0028, h01=0x0050, text=» ENTRY K:SA SET CONCENTRATOR ADDRESS«, t00=0x0002, t01=0x016e}
0x04b6…04e4 Head {h00=0x002a, h01=0x0050, text=» ENTRY K:LTA LOAD TRUNK LINE ADDRESSES«, t00=0x0003, t01=0x000a}
0x04e4…0514 Head {h00=0x002c, h01=0x0050, text=» ENTRY K:PTA PRINT TRUNK LINE ADDRESSES «, t00=0x0003, t01=0x0038}
0x0514…0548 Head {h00=0x0030, h01=0x0050, text=» ENTRY K:XA ONE WORD CONVERSION HEX TO ASCII«, t00=0x0003, t01=0x0068}
0x0548…057c Head {h00=0x0030, h01=0x0050, text=» ENTRY K:ASHX ASCII TO HEX CONVERSION TABLE «, t00=0x0003, t01=0x009c}
0x057c…05b0 Head {h00=0x0030, h01=0x0050, text=» ENTRY K:HXAS HEX TO ASCII CONVERSION TABLE «, t00=0x0003, t01=0x00d0}
0x05b0…05cc Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:SET «, t00=0x0003, t01=0x0104}
0x05cc…05d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0120}
0x05d6…05e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012a}
0x05e0…05fe Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x0134}
0x05fe…0608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0152}
0x0608…0650 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x015c}
0x0650…065a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0014}
0x065a…0676 Head {h00=0x0018, h01=0x0050, text=»* ADDRESS IN MODULE«, t00=0x0004, t01=0x001e}
0x0676…0680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003a}
0x0680…068a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0044}
0x068a…06a4 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:WBT C:WBS«, t00=0x0004, t01=0x004e}
0x06a4…06b8 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:WBD«, t00=0x0004, t01=0x0068}
0x06b8…06c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x007c}
0x06c2…06dc Head {h00=0x0016, h01=0x0050, text=» EXTRN K:CCA C:TCA«, t00=0x0004, t01=0x0086}
0x06dc…06f0 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCZ«, t00=0x0004, t01=0x00a0}
0x06f0…0704 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCS«, t00=0x0004, t01=0x00b4}
0x0704…071a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCSA «, t00=0x0004, t01=0x00c8}
0x071a…0730 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCSV «, t00=0x0004, t01=0x00de}
0x0730…0744 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:S0E«, t00=0x0004, t01=0x00f4}
0x0744…075a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:RCCE «, t00=0x0004, t01=0x0108}
0x075a…076e Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LCE«, t00=0x0004, t01=0x011e}
0x076e…0778 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0132}
0x0778…0794 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:PRTN C:FUA «, t00=0x0004, t01=0x013c}
0x0794…07aa Head {h00=0x0012, h01=0x0050, text=» EXTRN K:PRTT «, t00=0x0004, t01=0x0158}
0x07aa…07b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x016e}
0x07b4…07d0 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F373 C:TXT «, t00=0x0004, t01=0x0178}
0x07d0…07e6 (5, 0, 400) Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F374 «, t00=0x0005, t01=0x0004}
0x07e6…07fc Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F304 «, t00=0x0005, t01=0x001a}
0x07fc…0812 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F305 «, t00=0x0005, t01=0x0030}
0x0812…0828 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F308 «, t00=0x0005, t01=0x0046}
0x0828…083e Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC10 «, t00=0x0005, t01=0x005c}
0x083e…0854 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC11 «, t00=0x0005, t01=0x0072}
0x0854…086a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC12 «, t00=0x0005, t01=0x0088}
0x086a…0880 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC13 «, t00=0x0005, t01=0x009e}
0x0880…0896 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F361 «, t00=0x0005, t01=0x00b4}
0x0896…08a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ca}
0x08a0…08bc Head {h00=0x0018, h01=0x0050, text=» EXTRN K:SIMP C:BPL «, t00=0x0005, t01=0x00d4}
0x08bc…08c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f0}
0x08c6…08e2 Head {h00=0x0018, h01=0x0050, text=» EXTRN TRAPAR C:INI «, t00=0x0005, t01=0x00fa}
0x08e2…08ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0116}
0x08ec…08f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0120}
0x08f6…0900 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012a}
0x0900…0950 Head {h00=0x004c, h01=0x0050, text=»* HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0005, t01=0x0134}
0x0950…095a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0184}
0x095a…0968 Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0005, t01=0x018e}
0x0968…0972 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000c}
0x0972…097c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0016}
0x097c…0986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0020}
0x0986…0990 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002a}
0x0990…099a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0034}
0x099a…09a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003e}
0x09a4…09ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0048}
0x09ae…09b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0052}
0x09b8…09c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x005c}
0x09c2…09cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0066}
0x09cc…09d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x09d6…09e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007a}
0x09e0…09ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0084}
0x09ea…09f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008e}
0x09f4…09fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0098}
0x09fe…0a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a2}
0x0a08…0a12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ac}
0x0a12…0a1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b6}
0x0a1c…0a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c0}
0x0a26…0a30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ca}
0x0a30…0a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d4}
0x0a3a…0a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00de}
0x0a44…0a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e8}
0x0a4e…0a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f2}
0x0a58…0a62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00fc}
0x0a62…0a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x0a6c…0a76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0110}
0x0a76…0a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011a}
0x0a80…0a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0124}
0x0a8a…0a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012e}
0x0a94…0a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0138}
0x0a9e…0aa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0142}
0x0aa8…0ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0ab2…0abc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0156}
0x0abc…0ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0160}
0x0ac6…0ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016a}
0x0ad0…0ada Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0174}
0x0ada…0ae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017e}
0x0ae4…0aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0188}
0x0aee…0af8 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af8…0b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b02…0b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0018}
0x0b0c…0b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0022}
0x0b16…0b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002c}
0x0b20…0b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0036}
0x0b2a…0b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0040}
0x0b34…0b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004a}
0x0b3e…0b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0054}
0x0b48…0b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005e}
0x0b52…0b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0068}
0x0b5c…0b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0072}
0x0b66…0b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007c}
0x0b70…0b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0086}
0x0b7a…0bac Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0007, t01=0x0090}
0x0bac…0bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x0bb6…0bcc Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x00cc}
0x0bcc…0bd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e2}
0x0bd6…0bea Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0007, t01=0x00ec}
0x0bea…0c00 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0007, t01=0x0100}
0x0c00…0c14 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0007, t01=0x0116}
0x0c14…0c2a Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0007, t01=0x012a}
0x0c2a…0c34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0140}
0x0c34…0c54 Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0007, t01=0x014a}
0x0c54…0c6a Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0007, t01=0x016a}
0x0c6a…0c7e Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0007, t01=0x0180}
0x0c7e…0c94 (8, 0, 400) Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0008, t01=0x0004}
0x0c94…0cb0 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0008, t01=0x001a}
0x0cb0…0cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cba…0cdc Head {h00=0x001e, h01=0x0050, text=»* FORMS FOR FORMAT CODES«, t00=0x0008, t01=0x0040}
0x0cdc…0ce6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0062}
0x0ce6…0d10 Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0008, t01=0x006c}
0x0d10…0d34 Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0008, t01=0x0096}
0x0d34…0d5a Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0008, t01=0x00ba}
0x0d5a…0d8c Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0008, t01=0x00e0}
0x0d8c…0dbe Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0008, t01=0x0112}
0x0dbe…0dec Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0008, t01=0x0144}
0x0dec…0e18 Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0008, t01=0x0172}
0x0e18…0e36 Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0009, t01=0x000e}
0x0e36…0e56 Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0009, t01=0x002c}
0x0e56…0e78 Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0009, t01=0x004c}
0x0e78…0ea2 Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0009, t01=0x006e}
0x0ea2…0eb8 Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x0009, t01=0x0098}
0x0eb8…0ed0 Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0009, t01=0x00ae}
0x0ed0…0eea Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0009, t01=0x00c6}
0x0eea…0f10 Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x0009, t01=0x00e0}
0x0f10…0f38 Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x0009, t01=0x0106}
0x0f38…0f5e Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x0009, t01=0x012e}
0x0f5e…0f86 Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x0009, t01=0x0154}
0x0f86…0fb0 Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x0009, t01=0x017c}
0x0fb0…0fdc Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x000a, t01=0x0016}
0x0fdc…1006 Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x000a, t01=0x0042}
0x1006…1032 Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x000a, t01=0x006c}
0x1032…104e Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000a, t01=0x0098}
0x104e…1058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00b4}
0x1058…1078 Head {h00=0x001c, h01=0x0050, text=»* CONSTANT TCA EQUATES«, t00=0x000a, t01=0x00be}
0x1078…1082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00de}
0x1082…1096 Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000a, t01=0x00e8}
0x1096…10aa Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000a, t01=0x00fc}
0x10aa…10be Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000a, t01=0x0110}
0x10be…10d4 Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000a, t01=0x0124}
0x10d4…10ea Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000a, t01=0x013a}
0x10ea…1100 Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000a, t01=0x0150}
0x1100…1114 Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000a, t01=0x0166}
0x1114…112a Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000a, t01=0x017a}
0x112a…113e Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000a, t01=0x0190}
0x113e…1152 Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000b, t01=0x0014}
0x1152…1166 Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000b, t01=0x0028}
0x1166…117a Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000b, t01=0x003c}
0x117a…1184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0050}
0x1184…11a8 Head {h00=0x0020, h01=0x0050, text=»* LINE WORKBLOCKS EQUATES «, t00=0x000b, t01=0x005a}
0x11a8…11b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x007e}
0x11b2…11ce Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000b, t01=0x0088}
0x11ce…11f0 Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000b, t01=0x00a4}
0x11f0…1214 Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000b, t01=0x00c6}
0x1214…1238 Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000b, t01=0x00ea}
0x1238…1262 Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000b, t01=0x010e}
0x1262…1278 Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000b, t01=0x0138}
0x1278…128e Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000b, t01=0x014e}
0x128e…1298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0164}
0x1298…12b8 Head {h00=0x001c, h01=0x0050, text=»* TC WORKBLOCK EQUATES«, t00=0x000b, t01=0x016e}
0x12b8…12c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018e}
0x12c2…12d4 Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000c, t01=0x0008}
0x12d4…12e8 Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000c, t01=0x001a}
0x12e8…12fc Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000c, t01=0x002e}
0x12fc…1310 Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000c, t01=0x0042}
0x1310…1326 Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000c, t01=0x0056}
0x1326…133c Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000c, t01=0x006c}
0x133c…1352 Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000c, t01=0x0082}
0x1352…136e Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000c, t01=0x0098}
0x136e…1378 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00b4}
0x1378…13a6 Head {h00=0x002a, h01=0x0050, text=»* CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000c, t01=0x00be}
0x13a6…13b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ec}
0x13b0…13c4 Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000c, t01=0x00f6}
0x13c4…13d8 Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000c, t01=0x010a}
0x13d8…13ec Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000c, t01=0x011e}
0x13ec…1400 Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000c, t01=0x0132}
0x1400…1414 Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000c, t01=0x0146}
0x1414…1428 Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000c, t01=0x015a}
0x1428…143c Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000c, t01=0x016e}
0x143c…1450 Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000c, t01=0x0182}
0x1450…1464 Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000d, t01=0x0008}
0x1464…1478 Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000d, t01=0x001c}
0x1478…148c Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000d, t01=0x0030}
0x148c…14a0 Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000d, t01=0x0044}
0x14a0…14aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0058}
0x14aa…14ca Head {h00=0x001c, h01=0x0050, text=»* CC WORKBLOCK EQUATES«, t00=0x000d, t01=0x0062}
0x14ca…14d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0082}
0x14d4…14fa Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000d, t01=0x008c}
0x14fa…150e Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000d, t01=0x00b2}
0x150e…1522 Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000d, t01=0x00c6}
0x1522…154c Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000d, t01=0x00da}
0x154c…1574 Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000d, t01=0x0104}
0x1574…158a Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000d, t01=0x012c}
0x158a…15a0 Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000d, t01=0x0142}
0x15a0…15bc Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000d, t01=0x0158}
0x15bc…15c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0174}
0x15c6…15ec Head {h00=0x0022, h01=0x0050, text=»* NETWORK WORKBLOCK EQUATES«, t00=0x000d, t01=0x017e}
0x15ec…15f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0014}
0x15f6…1624 Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000e, t01=0x001e}
0x1624…1648 Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000e, t01=0x004c}
0x1648…1652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0070}
0x1652…1674 Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000e, t01=0x007a}
0x1674…168a Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000e, t01=0x009c}
0x168a…16a0 Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000e, t01=0x00b2}
0x16a0…16b6 Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000e, t01=0x00c8}
0x16b6…16cc Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000e, t01=0x00de}
0x16cc…16e2 Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000e, t01=0x00f4}
0x16e2…16f8 Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000e, t01=0x010a}
0x16f8…170e Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000e, t01=0x0120}
0x170e…1724 Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000e, t01=0x0136}
0x1724…173a Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000e, t01=0x014c}
0x173a…1750 Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000e, t01=0x0162}
0x1750…1766 Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000e, t01=0x0178}
0x1766…1770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x018e}
0x1770…1794 Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000f, t01=0x0008}
0x1794…17b8 Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000f, t01=0x002c}
0x17b8…17dc Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000f, t01=0x0050}
0x17dc…17e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0074}
0x17e6…180a Head {h00=0x0020, h01=0x0050, text=»* CC TEXT-INTERVAL EQUATES «, t00=0x000f, t01=0x007e}
0x180a…1814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a2}
0x1814…1828 Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x000f, t01=0x00ac}
0x1828…183c Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x000f, t01=0x00c0}
0x183c…1850 Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x000f, t01=0x00d4}
0x1850…1864 Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x000f, t01=0x00e8}
0x1864…1878 Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x000f, t01=0x00fc}
0x1878…188c Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x000f, t01=0x0110}
0x188c…18a0 Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x000f, t01=0x0124}
0x18a0…18b4 Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x000f, t01=0x0138}
0x18b4…18c8 Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x000f, t01=0x014c}
0x18c8…18dc Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x000f, t01=0x0160}
0x18dc…18f0 Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x000f, t01=0x0174}
0x18f0…1904 Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x000f, t01=0x0188}
0x1904…1920 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0010, t01=0x000c}
0x1920…192a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0028}
0x192a…195a Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x0010, t01=0x0032}
0x195a…1964 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0062}
0x1964…1996 Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x0010, t01=0x006c}
0x1996…19d4 Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x0010, t01=0x009e}
0x19d4…1a06 Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0010, t01=0x00dc}
0x1a06…1a10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x010e}
0x1a10…1a30 Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0010, t01=0x0118}
0x1a30…1a44 Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0010, t01=0x0138}
0x1a44…1a58 Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0010, t01=0x014c}
0x1a58…1a6c Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0010, t01=0x0160}
0x1a6c…1a80 Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0010, t01=0x0174}
0x1a80…1a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0188}
0x1a8a…1a94 (17, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0004}
0x1a94…1ac0 Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0011, t01=0x000e}
0x1ac0…1aec Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0011, t01=0x003a}
0x1aec…1b08 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0011, t01=0x0066}
0x1b08…1b48 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x0082}
0x1b48…1b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00c2}
0x1b52…1b78 Head {h00=0x0022, h01=0x0050, text=»* SYSTEM ADAPTION PARAMETERS«, t00=0x0011, t01=0x00cc}
0x1b78…1b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x1b82…1ba2 Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0011, t01=0x00fc}
0x1ba2…1bc4 Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /2F ENTRY K KEY«, t00=0x0011, t01=0x011c}
0x1bc4…1be6 Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /28 ENTER U KEY«, t00=0x0011, t01=0x013e}
0x1be6…1c0e Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /2A END OF RECORD KEY «, t00=0x0011, t01=0x0160}
0x1c0e…1c30 Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /23 CANCEL KEY «, t00=0x0011, t01=0x0188}
0x1c30…1c58 Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0012, t01=0x001a}
0x1c58…1c92 Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 60 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x0042}
0x1c92…1cd0 Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 600 CC EXCHANGE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x007c}
0x1cd0…1ce8 Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0012, t01=0x00ba}
0x1ce8…1d1e Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1150 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0012, t01=0x00d2}
0x1d1e…1d5e Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0012, t01=0x0108}
0x1d5e…1d96 Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 64 LENGTH OF CASSETTE BUFFER (WORDS) «, t00=0x0012, t01=0x0148}
0x1d96…1dc2 Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 70 KB BUF LENGTH IN WORDS «, t00=0x0012, t01=0x0180}
0x1dc2…1dea Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0013, t01=0x001c}
0x1dea…1e16 Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0013, t01=0x0044}
0x1e16…1e4c Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0013, t01=0x0070}
0x1e4c…1e8a Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1150 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0013, t01=0x00a6}
0x1e8a…1e98 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x00e4}
0x1e98…1eec Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0013, t01=0x00f2}
0x1eec…1f16 Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0013, t01=0x0146}
0x1f16…1f3a Head {h00=0x0020, h01=0x0050, text=» LEFT BYTE = SELECT ADDR. «, t00=0x0013, t01=0x0170}
0x1f3a…1f5c (20, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE = POLL ADDR.«, t00=0x0014, t01=0x0004}
0x1f5c…1f98 Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0014, t01=0x0026}
0x1f98…1fb6 Head {h00=0x001a, h01=0x0050, text=» AND SYSTEM MESSAGES«, t00=0x0014, t01=0x0062}
0x1fb6…1fee Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0014, t01=0x0080}
0x1fee…2024 Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0014, t01=0x00b8}
0x2024…2028 Head {h00=0x0054, h01=0x0050}
0x2028…202c Head {h00=0x2a20, h01=0x5349}
0x202c…2030 4d 55 4c 41 ┆MULA┆
0x2030…2080 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 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 00 ee 00 20 00 50 ┆TED TERMINAL ADDRESSES FOR INQUIRY. RIGHT BYTE. IF SPECIFIED AT SYSTEM G P┆
0x2080…20ca 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 14 01 46 00 16 00 50 4b 3a 53 41 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 20 00 14 01 6a 00 16 00 50 4b 3a 53 41 33 5c 45 51 55 5c 30 5c ┆K:SA1 EQU 0 SIM. TERM. NBR 1 F PK:SA2 EQU 0 NBR 2 j PK:SA3 EQU 0 ┆
0x20ca…211a (21, 0, 400) 4e 42 52 20 33 20 00 14 01 84 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 0e 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 28 00 16 00 50 4b 3a 53 41 36 5c 45 51 55 5c 30 5c 4e 42 ┆NBR 3 PK:SA4 EQU 0 NBR 4 PK:SA5 EQU 0 NBR 5 ( PK:SA6 EQU 0 NB┆
0x211a…216a 52 20 36 20 00 15 00 42 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 5c 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 76 00 16 00 50 4b 3a 53 41 39 5c 45 51 55 5c 30 5c 4e 42 52 20 ┆R 6 B PK:SA7 EQU 0 NBR 7 PK:SA8 EQU 0 NBR 8 v PK:SA9 EQU 0 NBR ┆
0x216a…21ba 39 20 00 15 00 90 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 00 aa 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 c6 00 18 00 50 4b 3a 53 41 31 32 5c 45 51 55 5c 30 5c 4e ┆9 PK:SA10 EQU 0 NBR 10 PK:SA11 EQU 0 NBR 11 PK:SA12 EQU 0 N┆
0x21ba…220a 42 52 20 31 32 20 00 15 00 e2 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 00 fe 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 1a 00 18 00 50 4b 3a 53 41 31 35 5c 45 51 55 ┆BR 12 PK:SA13 EQU 0 NBR 13 PK:SA14 EQU 0 NBR 14 PK:SA15 EQU┆
0x220a…225a 5c 30 5c 4e 42 52 20 31 35 20 00 15 01 36 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 15 01 52 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 15 01 6e 00 18 00 50 4b 3a 53 41 31 38 ┆ 0 NBR 15 6 PK:SA16 EQU 0 NBR 16 R PK:SA17 EQU 0 NBR 17 n PK:SA18┆
0x225a…22aa (22, 0, 400) 5c 45 51 55 5c 30 5c 4e 42 52 20 31 38 20 00 15 01 8a 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 16 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 32 00 18 00 50 4b 3a ┆ EQU 0 NBR 18 PK:SA19 EQU 0 NBR 19 PK:SA20 EQU 0 NBR 20 2 PK:┆
0x22aa…22fa 53 41 32 31 5c 45 51 55 5c 30 5c 4e 42 52 20 32 31 20 00 16 00 4e 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 6a 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 86 00 18 ┆SA21 EQU 0 NBR 21 N PK:SA22 EQU 0 NBR 22 j PK:SA23 EQU 0 NBR 23 ┆
0x22fa…234a 00 50 4b 3a 53 41 32 34 5c 45 51 55 5c 30 5c 4e 42 52 20 32 34 20 00 16 00 a2 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 be 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 ┆ PK:SA24 EQU 0 NBR 24 PK:SA25 EQU 0 NBR 25 PK:SA26 EQU 0 NBR 26 ┆
0x234a…239a 00 da 00 0a 00 50 5c 45 4a 45 43 54 00 16 00 f6 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 2a 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 04 ┆ P EJECT < P******************************************************* ┆
0x239a…23ea 00 06 00 50 2a 20 00 16 01 44 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 16 01 4e 00 28 00 50 2a 20 20 20 4f 46 20 43 4f 4e 43 45 4e 54 52 41 54 4f ┆ P* D , P* PARAMETERS FOR CONDITIONAL ASSEMBLY N ( P* OF CONCENTRATO┆
0x23ea…243a (23, 0, 400) 52 20 50 41 43 4b 41 47 45 20 4d 4f 44 55 4c 45 53 20 00 16 01 7e 00 06 00 50 2a 20 00 17 00 1a 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆R PACKAGE MODULES ~ P* < P********************************************┆
0x243a…248a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 17 00 24 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 64 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 ┆*********** $ PX:A EQU 2 * NLINE <=10 d P NUMBER OF TERMINAL LINES ┆
0x248a…24da 00 17 00 84 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 00 a8 00 2e 00 50 5c 5c 5c 54 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 ┆ PX:B EQU 15 * NTC <=80 . P TOTAL NUMBER OF TC:S ON TERMINAL LINES ┆
0x24da…252a 00 17 00 c6 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 00 f8 00 24 00 50 5c 5c 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 18 00 14 00 50 ┆ PX:C EQU 26 * NSIM <=26 $ P NUMBER OF SIMULATED TERMINALS P┆
0x252a…257a 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 17 01 40 00 16 00 50 58 3a 44 5c 45 51 55 5c 30 5c 2a 20 20 4c 4f 4f 50 20 00 17 01 58 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 ┆ FOR INQUIRIES @ PX:D EQU 0 * LOOP X . P IF = 0. MULTIPOINT CONFIG. ┆
0x257a…25ca (24, 0, 400) 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 17 01 72 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 18 00 14 00 1c 00 50 58 3a 45 5c 45 51 55 5c 34 5c ┆DOWNSTREAMS r . P IF = 1. LOOP CONFIGURATION DOWNSTREAMS PX:E EQU 4 ┆
0x25ca…261a 2a 20 20 4e 53 50 4f 4f 4c 20 3c 3d 34 20 00 18 00 46 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 52 20 53 50 4f 4f 4c 20 00 18 00 66 00 22 00 50 5c 5c 5c 46 55 4e 43 54 49 4f 4e 20 54 4f ┆* NSPOOL <=4 F ( P NUMBER OF EDIT BUFFERS FOR SPOOL f " P FUNCTION TO┆
0x261a…266a 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 2e 00 18 00 92 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 30 20 00 18 00 b8 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 52 41 53 4b 53 20 ┆ OPERATORS TERM. PX:F EQU 4 * 0< NTPLIN <=40 ( P NUMBER OF TRASKS ┆
0x266a…26ba 49 4e 20 50 4f 4f 4c 20 27 54 50 4c 49 4e 27 20 00 18 00 dc 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 52 4f 4d 20 54 43 3a 53 00 18 01 08 00 1e 00 50 58 3a 47 5c 45 51 55 5c 32 5c 2a 20 20 30 ┆IN POOL 'TPLIN' & P HANDLING TRANSACTIONS FROM TC:S PX:G EQU 2 * 0┆
0x26ba…270a 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 18 01 32 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 53 55 50 27 20 00 18 01 54 00 2c 00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e ┆< NTPSUP <=5 2 ( P NUMBER OF TRASKS IN POOL 'TPSUP' T , P HANDLING TRAN┆
0x270a…275a (25, 0, 398) 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 18 01 80 00 1c 00 50 5c 5c 5c 4f 52 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 49 4e 41 4c 00 19 00 20 00 18 00 50 58 3a 48 5c 45 51 55 5c 31 5c 2a 20 20 4c 49 4e ┆SACTIONS FROM MAIN FRAME P OR OPERATORS TERMINAL PX:H EQU 1 * LIN┆
0x275a…27aa 54 53 54 20 00 19 00 40 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 5c 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 ┆TST @ $ P IF = 0. NO LINE TEST COMMAND 0 P IF = 1. LINE TEST FACILIT┆
0x27aa…27fa 59 20 28 34 2d 57 49 52 45 20 4f 4e 4c 59 29 20 00 19 00 84 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 00 b8 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 ┆Y (4-WIRE ONLY) PX:I EQU 2 * ONLINE $ P IF = 0. OFF LINE CONCENTR┆
0x27fa…284a 41 54 4f 52 00 19 00 d4 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 19 00 fc 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 ┆ATOR ( P IF = 1. ON/OFF LINE CONCENTRATOR $ P IF = 2. ON LINE CONCE┆
0x284a…2898 4e 54 52 41 54 4f 52 20 00 19 01 28 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 50 00 0a 00 50 5c 4c 49 53 54 20 00 19 01 6c 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 53 45 54 20 ┆NTRATOR ( PX:K EQU 1 * SETADR P P LIST l P EJECT IDENT C:SET ┆
0x2898…28e8 (26, 0, 400) 00 19 01 7a 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1a 00 08 00 06 00 50 2a 20 00 1a 00 48 00 2c ┆ z < P******************************************************** P* H ,┆
0x28e8…2938 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 52 00 22 00 50 2a 20 20 20 53 50 45 43 49 46 49 45 44 20 49 4e 20 4d 4f 44 55 4c 45 20 43 3a 45 51 55 20 ┆ P* PARAMETERS FOR CONDITIONAL ASSEMBLY R " P* SPECIFIED IN MODULE C:EQU ┆
0x2938…2988 00 1a 00 82 00 06 00 50 2a 20 00 1a 00 a8 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1a 00 b2 00 2e ┆ P* < P******************************************************** .┆
0x2988…29d8 00 50 4e 53 49 4d 5c 45 51 55 5c 58 3a 43 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 1a 00 f2 00 18 00 50 5c 5c 5c 55 53 45 44 20 46 4f 52 20 49 4e 51 55 49 52 59 20 00 1a 01 24 00 36 00 50 ┆ PNSIM EQU X:C NUMBER OF SIMULATED TERMINALS P USED FOR INQUIRY $ 6 P┆
0x29d8…2a28 53 45 54 41 44 52 5c 45 51 55 5c 58 3a 4b 5c 49 46 20 3d 20 30 2e 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 41 4e 44 20 53 49 4d 2e 20 54 45 52 4d 2e 00 1a 01 40 00 2a 00 50 5c 5c 5c 41 44 44 52 45 53 53 45 53 20 53 50 45 43 49 46 49 45 44 ┆SETADR EQU X:K IF = 0. CONCENTRATOR AND SIM. TERM. @ * P ADDRESSES SPECIFIED┆
0x2a28…2a78 (27, 0, 400) 20 41 54 20 53 59 53 54 45 4d 20 47 45 4e 2e 20 00 1a 01 7a 00 2c 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 43 4f 4e 43 2e 20 41 4e 44 20 53 49 4d 2e 20 54 45 52 4d 2e 20 41 44 44 52 45 53 53 45 53 00 1b 00 18 00 20 00 50 5c 5c 5c 53 50 45 43 49 ┆ AT SYSTEM GEN. z , P IF = 1.CONC. AND SIM. TERM. ADDRESSES P SPECI┆
0x2a78…2ac8 46 49 45 44 20 42 59 20 4f 50 45 52 41 54 4f 52 20 4f 52 20 00 1b 00 48 00 22 00 50 5c 5c 5c 42 59 20 4e 45 54 57 4f 52 4b 20 43 4f 4e 46 49 47 2e 20 43 41 53 53 45 54 54 45 00 1b 00 6c 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 ┆FIED BY OPERATOR OR H " P BY NETWORK CONFIG. CASSETTE l P EJECT IDENT ┆
0x2ac8…2b18 43 3a 53 45 54 20 00 1b 00 92 00 48 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 53 20 45 20 54 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 ┆C:SET H P******************* K : S E T ************************************┆
0x2b18…2b68 2a 20 00 1b 00 ae 00 06 00 50 2a 20 00 1b 00 fa 00 06 00 50 2a 20 00 1b 01 04 00 06 00 50 2a 20 00 1b 01 0e 00 36 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 53 20 54 20 2c 20 20 4b 20 3a 20 53 20 44 20 53 45 54 53 20 54 49 4d ┆* P* P* P* 6 P*SUBROUTINE K : S T , K : S D SETS TIM┆
0x2b68…2bb8 45 20 41 4e 44 20 44 41 54 45 00 1b 01 18 00 06 00 50 2a 20 00 1b 01 52 00 06 00 50 2a 20 00 1b 01 5c 00 06 00 50 2a 20 00 1b 01 66 00 20 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 43 46 20 41 31 34 2c 4b 3a 53 54 00 1b 01 70 ┆E AND DATE P* R P* P* f P* CALL SEQUENCE: CF A14,K:ST p┆
0x2bb8…2c08 (28, 0, 400) 00 12 00 50 2a 5c 5c 43 46 20 41 31 34 2c 4b 3a 53 44 00 1c 00 04 00 06 00 50 2a 20 00 1c 00 1a 00 30 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 52 4f 54 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 ┆ P* CF A14,K:SD P* 0 P* ENTRY PARAM: A8 = INPUROT BUFFER ADDRESS┆
0x2c08…2c58 00 1c 00 24 00 06 00 50 2a 20 00 1c 00 58 00 22 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b 3a 50 52 54 4e 20 20 43 3a 46 55 41 00 1c 00 62 00 06 00 50 2a 20 00 1c 00 88 00 1a 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 ┆ $ P* X " P* SUBROUTINES: K:PRTN C:FUA b P* P* RETURN PARA┆
0x2c58…2ca8 4d 3a 5c 4e 4f 4e 45 20 00 1c 00 92 00 06 00 50 2a 20 00 1c 00 b0 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 1c 00 ba 00 06 00 50 2a 20 00 1c 00 da 00 1a 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 ┆M: NONE P* P* RETURN METOD: VIA A14 P* P* CHANGED R┆
0x2ca8…2cf8 45 47 53 3a 5c 41 31 2d 41 34 00 1c 00 e4 00 06 00 50 2a 20 00 1c 01 02 00 18 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 36 20 00 1c 01 0c 00 06 00 50 2a 20 00 1c 01 28 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e ┆EGS: A1-A4 P* P* STACKER NEED: 16 P* ( P* LIMITATION┆
0x2cf8…2d48 53 3a 5c 20 00 1c 01 32 00 06 00 50 2a 20 00 1c 01 4c 00 18 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 41 4e 59 00 1c 01 56 00 06 00 50 2a 20 00 1c 01 72 00 06 00 50 2a 20 00 1c 01 7c 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆S: 2 P* L P* CALLING TASK: ANY V P* r P* | D P**********┆
0x2d48…2d98 (29, 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1c 01 86 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 53 45 ┆***************************************************** P EJECT IDENT C:SE┆
0x2d98…2de8 54 20 00 1d 00 3e 00 06 00 50 2a 20 00 1d 00 5a 00 06 00 50 2a 20 00 1d 00 64 00 0e 00 50 2a 5c 5c 4b 20 3a 20 53 20 54 00 1d 00 6e 00 06 00 50 2a 20 00 1d 00 80 00 24 00 50 2a 20 20 20 4d 4f 56 45 20 54 49 4d 45 20 54 4f 20 54 49 4d 45 20 ┆T > P* Z P* d P* K : S T n P* $ P* MOVE TIME TO TIME ┆
0x2de8…2e38 57 4f 52 4b 42 4c 4f 43 4b 20 00 1d 00 8a 00 06 00 50 2a 20 00 1d 00 b2 00 0e 00 50 4b 3a 53 54 5c 45 51 55 5c 2a 00 1d 00 bc 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 38 00 1d 00 ce 00 12 00 50 5c 4c 44 4b 4c 5c 41 33 2c 4b 3a 57 42 54 00 1d ┆WORKBLOCK P* PK:ST EQU * P LDR A2,A8 P LDKL A3,K:WBT ┆
0x2e38…2e88 00 e0 00 24 00 50 5c 4c 44 4b 4c 5c 41 31 2c 2d 34 5c 4e 42 52 20 4f 46 20 42 59 54 45 53 20 54 4f 20 4d 4f 56 45 00 1d 00 f6 00 26 00 50 5c 43 46 5c 41 31 34 2c 53 4d 4f 56 45 5c 4d 4f 56 45 20 54 49 4d 45 20 54 4f 20 54 49 4d 45 20 57 42 ┆ $ P LDKL A1,-4 NBR OF BYTES TO MOVE & P CF A14,SMOVE MOVE TIME TO TIME WB┆
0x2e88…2ed8 00 1d 01 1e 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 2f 33 30 33 30 00 1d 01 48 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 32 20 00 1d 01 5e 00 0e 00 50 5c 53 54 52 5c 41 31 2c 41 33 00 1d 01 70 00 06 00 50 2a 20 00 1d 01 82 00 10 00 50 2a 20 20 20 ┆ P LDKL A1,/3030 H P ADK A3,2 ^ P STR A1,A3 p P* P* ┆
0x2ed8…2ee0 (30, 0, 400) 53 45 54 20 54 49 4d 45 ┆SET TIME┆
0x2ee0…2f30 00 1d 01 8c 00 06 00 50 2a 20 00 1e 00 10 00 12 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 57 42 54 00 1e 00 1a 00 0a 00 50 5c 4c 4b 4d 5c 20 00 1e 00 30 00 0c 00 50 5c 44 41 54 41 5c 31 33 00 1e 00 3e 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a ┆ P* P LDKL A8,K:WBT P LKM 0 P DATA 13 > P CF A14,K:┆
0x2f30…2f80 50 52 54 4e 00 1e 00 4e 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 37 34 00 1e 00 64 00 0e 00 50 5c 4c 44 52 5c 41 38 2c 41 32 00 1e 00 78 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 1e 00 8a 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 ┆PRTN N P DATA K:F374 d P LDR A8,A2 x P RTN A14 P EJECT IDENT ┆
0x2f80…2fd0 43 3a 53 45 54 20 00 1e 00 9a 00 06 00 50 2a 20 00 1e 00 b6 00 0e 00 50 2a 5c 5c 4b 20 3a 20 53 20 44 00 1e 00 c0 00 06 00 50 2a 20 00 1e 00 d2 00 24 00 50 2a 20 20 20 4d 4f 56 45 20 44 41 54 45 20 54 4f 20 44 41 54 45 20 57 4f 52 4b 42 4c ┆C:SET P* P* K : S D P* $ P* MOVE DATE TO DATE WORKBL┆
0x2fd0…3020 4f 43 4b 20 00 1e 00 dc 00 06 00 50 2a 20 00 1e 01 04 00 0e 00 50 4b 3a 53 44 5c 45 51 55 5c 2a 00 1e 01 0e 00 10 00 50 5c 53 54 5c 41 35 2c 53 41 56 31 20 00 1e 01 20 00 10 00 50 5c 53 54 5c 41 36 2c 53 41 56 32 20 00 1e 01 34 00 0e 00 50 ┆OCK P* PK:SD EQU * P ST A5,SAV1 P ST A6,SAV2 4 P┆
0x3020…302c 5c 4c 44 52 5c 41 33 2c 41 38 00 1e ┆ LDR A3,A8 ┆
0x302c…5c2a […elided…]
0x5c2a…5c30 2a 20 00 3b 00 0a ┆* ; ┆
0x5c30…5c80 00 18 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 41 31 34 00 3b 00 14 00 06 00 50 2a 20 00 3b 00 30 00 1e 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 32 2c 41 33 2c 41 36 20 00 3b 00 3a 00 06 00 50 2a 20 00 3b ┆ P* RETURN METOD: A14 ; P* ; 0 P* CHANGED REGS: A2,A3,A6 ; : P* ;┆
0x5c80…5cd0 00 5c 00 2c 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 32 20 57 4f 52 44 53 20 4f 4e 20 41 31 34 20 53 54 41 43 4b 45 52 20 00 3b 00 66 00 06 00 50 2a 20 00 3b 00 96 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a ┆ , P* STACKER NEED: 2 WORDS ON A14 STACKER ; f P* ; P* LIMITATIONS:┆
0x5cd0…5d20 5c 20 00 3b 00 a0 00 06 00 50 2a 20 00 3b 00 ba 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 3b 00 c4 00 06 00 50 2a 20 00 3b 00 e2 00 06 00 50 2a 20 00 3b 00 ec 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ; P* ; P* CALLING TASK: OPCOM ; P* ; P* ; D P**********┆
0x5d20…5d70 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 3b 00 f6 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 53 45 ┆***************************************************** ; P EJECT IDENT C:SE┆
0x5d70…5db0 54 20 00 3b 01 3e 00 36 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 00 3b 01 5a ┆T ; > 6 P************************************************** ; Z┆
0x5db0…5e00 (60, 0, 400) 00 06 00 50 2a 20 00 3c 00 04 00 0e 00 50 2a 5c 4b 20 3a 20 58 20 41 20 00 3c 00 0e 00 06 00 50 2a 20 00 3c 00 20 00 36 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 ┆ P* < P* K : X A < P* < 6 P**************************************┆
0x5e00…5e50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 3c 00 2a 00 06 00 50 2a 20 00 3c 00 64 00 0e 00 50 4b 3a 58 41 5c 45 51 55 5c 2a 00 3c 00 6e 00 28 00 50 5c 4c 44 52 5c 41 36 2c 41 34 5c 47 45 54 20 4e 55 4d 42 45 52 20 4f 46 20 43 48 41 52 41 43 54 ┆************ < * P* < d PK:XA EQU * < n ( P LDR A6,A4 GET NUMBER OF CHARACT┆
0x5e50…5ea0 45 52 53 20 00 3c 00 80 00 1e 00 50 5c 41 44 52 5c 41 31 2c 41 34 5c 55 50 44 41 54 45 20 50 4f 49 4e 54 45 52 20 00 3c 00 ac 00 12 00 50 58 41 31 30 30 5c 53 55 4b 5c 41 31 2c 31 00 3c 00 ce 00 26 00 50 5c 4c 44 52 5c 41 32 2c 41 33 5c 47 ┆ERS < P ADR A1,A4 UPDATE POINTER < PXA100 SUK A1,1 < & P LDR A2,A3 G┆
0x5ea0…5ef0 45 54 20 57 4f 52 44 20 46 4f 52 20 43 4f 4e 56 45 52 53 49 4f 4e 00 3c 00 e4 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 30 46 20 00 3c 01 0e 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 ┆ET WORD FOR CONVERSION < P ANK A2,/0F < & P LC A2,K:HXAS,A2 CONVERT TO AS┆
0x5ef0…5f40 43 49 49 20 00 3c 01 22 00 14 00 50 5c 53 43 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 00 3c 01 4c 00 0e 00 50 5c 53 52 4c 5c 41 33 2c 34 20 00 3c 01 64 00 0e 00 50 5c 53 55 4b 5c 41 36 2c 31 20 00 3c 01 76 00 12 00 50 5c 52 42 28 4e 5a 29 5c ┆CII < " P SCR A2,A1 STORE < L P SRL A3,4 < d P SUK A6,1 < v P RB(NZ) ┆
0x5f40…5f90 (61, 0, 398) 58 41 31 30 30 20 00 3c 01 88 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 34 00 3d 00 0e 00 14 00 50 5c 52 54 4e 5c 41 31 34 5c 52 45 54 55 52 4e 20 00 3d 00 20 00 06 00 50 2a 20 00 3d 00 38 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 ┆XA100 < P ADR A1,A4 = P RTN A14 RETURN = P* = 8 P EJECT IDENT ┆
0x5f90…5fe0 43 3a 53 45 54 20 00 3d 00 42 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 50 20 54 20 41 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 20 ┆C:SET = B F P******************* K : P T A *********************************** ┆
0x5fe0…6030 00 3d 00 5e 00 06 00 50 2a 20 00 3d 00 a8 00 06 00 50 2a 20 00 3d 00 b2 00 06 00 50 2a 20 00 3d 00 bc 00 1a 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 50 20 54 20 41 00 3d 00 c6 00 3e 00 50 2a 50 52 49 4e 54 53 20 43 4f 4e 43 ┆ = ^ P* = P* = P* = P*SUBROUTINE K : P T A = > P*PRINTS CONC┆
0x6030…6080 45 4e 54 52 41 54 4f 52 20 26 20 53 49 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 4f 4e 20 4f 50 54 00 3d 00 e4 00 06 00 50 2a 20 00 3d 01 26 00 06 00 50 2a 20 00 3d 01 30 00 06 00 50 2a 20 00 3d 01 3a ┆ENTRATOR & SIMULATED TERMINAL ADDRESSES ON OPT = P* = & P* = 0 P* = :┆
0x6080…60ce 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 50 54 41 00 3d 01 44 00 06 00 50 2a 20 00 3d 01 6a 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 3d 01 74 ┆ " P* CALL SEQUENCE: CF A14,K:PTA = D P* = j P* ENTRY PARAM: NONE = t┆
0x60ce…611e (62, 0, 400) 00 06 00 50 2a 20 00 3e 00 04 00 26 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b 3a 50 52 54 4e 20 20 20 49 4e 20 43 3a 46 55 41 00 3e 00 0e 00 14 00 50 2a 5c 5c 4b 3a 58 41 20 49 4e 20 43 3a 53 45 54 00 3e 00 38 00 06 00 50 ┆ P* > & P* SUBROUTINES: K:PRTN IN C:FUA > P* K:XA IN C:SET > 8 P┆
0x611e…616e 2a 20 00 3e 00 50 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 3e 00 5a 00 06 00 50 2a 20 00 3e 00 78 00 18 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 41 31 34 00 3e 00 82 00 06 00 50 2a 20 ┆* > P P* RETURN PARAM: NONE > Z P* > x P* RETURN METOD: A14 > P* ┆
0x616e…61be 00 3e 00 9e 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 37 00 3e 00 a8 00 06 00 50 2a 20 00 3e 00 c6 00 2c 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 36 20 57 4f 52 44 53 20 4f 4e 20 41 31 34 ┆ > P* CHANGED REGS: A1-A7 > P* > , P* STACKER NEED: 16 WORDS ON A14┆
0x61be…620e 20 53 54 41 43 4b 45 52 00 3e 00 d0 00 06 00 50 2a 20 00 3e 01 00 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 3e 01 0a 00 06 00 50 2a 20 00 3e 01 24 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f ┆ STACKER > P* > P* LIMITATIONS: > P* > $ P* CALLING TASK: O┆
0x620e…625e 50 43 4f 4d 00 3e 01 2e 00 06 00 50 2a 20 00 3e 01 4c 00 06 00 50 2a 20 00 3e 01 56 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 ┆PCOM > . P* > L P* > V D P************************************************┆
0x625e…62ae (63, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 3e 01 60 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 53 45 54 20 00 3f 00 18 00 36 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 ┆*************** > ` P EJECT IDENT C:SET ? 6 P****************************┆
0x62ae…62fe 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 3f 00 34 00 06 00 50 2a 20 00 3f 00 6e 00 10 00 50 2a 5c 4b 20 3a 20 50 20 54 20 41 20 00 3f 00 78 00 06 00 50 2a 20 00 3f 00 8c 00 36 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************** ? 4 P* ? n P* K : P T A ? x P* ? 6 P**********┆
0x62fe…634e 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 3f 00 96 00 06 00 50 2a 20 00 3f 00 d0 00 2c 00 50 2a 20 20 20 45 44 49 54 20 41 4e 44 20 50 52 49 4e 54 20 43 4f 4e ┆**************************************** ? P* ? , P* EDIT AND PRINT CON┆
0x634e…639e 43 45 4e 54 52 41 54 4f 52 20 41 44 44 52 45 53 53 20 00 3f 00 da 00 06 00 50 2a 20 00 3f 01 0a 00 10 00 50 4b 3a 50 54 41 5c 45 51 55 5c 2a 20 00 3f 01 14 00 2e 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 46 33 30 35 5c 47 45 54 20 4f 55 54 50 ┆CENTRATOR ADDRESS ? P* ? PK:PTA EQU * ? . P LDKL A1,K:F305 GET OUTP┆
0x639e…63ee 55 54 20 46 4f 52 4d 41 54 20 41 44 44 52 45 53 53 20 00 3f 01 28 00 2a 00 50 5c 4c 44 5c 41 33 2c 4b 3a 43 43 41 5c 47 45 54 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 41 44 44 52 45 53 53 20 00 3f 01 5a 00 28 00 50 5c 4c 44 4b 5c 41 34 2c ┆UT FORMAT ADDRESS ? ( * P LD A3,K:CCA GET CONCENTRATOR ADDRESS ? Z ( P LDK A4,┆
0x63ee…643e (64, 0, 400) 34 5c 4e 55 4d 42 45 52 20 4f 46 20 43 48 41 52 2e 20 54 4f 20 43 4f 4e 56 45 52 54 00 3f 01 88 00 2c 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 41 5c 43 4f 4e 56 45 52 54 20 41 4e 44 20 53 54 4f 52 45 20 49 4e 20 46 4f 52 4d 41 54 00 40 00 24 ┆4 NUMBER OF CHAR. TO CONVERT ? , P CF A14,K:XA CONVERT AND STORE IN FORMAT @ $┆
0x643e…648e 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 5c 50 52 49 4e 54 20 46 4f 52 4d 41 54 20 00 40 00 54 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 30 34 00 40 00 78 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 53 45 54 20 ┆ P CF A14,K:PRTN PRINT FORMAT @ T P DATA K:F304 @ x P EJECT IDENT C:SET ┆
0x648e…64de 00 40 00 8c 00 06 00 50 2a 20 00 40 00 a8 00 36 00 50 2a 20 20 20 45 44 49 54 20 41 4e 44 20 50 52 49 4e 54 20 41 44 44 52 45 53 53 45 53 20 4f 46 20 53 50 45 43 49 41 4c 20 54 45 52 4d 49 4e 41 4c 53 20 00 40 00 b2 00 06 00 50 2a 20 00 40 ┆ @ P* @ 6 P* EDIT AND PRINT ADDRESSES OF SPECIAL TERMINALS @ P* @┆
0x64de…652e 00 ec 00 2e 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 46 43 31 31 5c 47 45 54 20 4f 55 54 50 55 54 20 46 4f 52 4d 41 54 20 41 44 44 52 45 53 53 20 00 40 00 f6 00 2c 00 50 5c 4c 44 5c 41 33 2c 4b 3a 43 43 5a 5c 47 45 54 20 41 44 44 52 45 53 53 ┆ . P LDKL A1,K:FC11 GET OUTPUT FORMAT ADDRESS @ , P LD A3,K:CCZ GET ADDRESS┆
0x652e…657e 20 4f 46 20 54 45 52 4d 49 4e 41 4c 20 27 5a 27 00 40 01 28 00 1e 00 50 5c 52 46 28 5a 29 5c 50 43 32 30 30 5c 4e 4f 54 20 49 4e 20 53 59 53 54 45 4d 00 40 01 58 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 27 20 5a 27 20 00 40 01 7a 00 22 00 50 ┆ OF TERMINAL 'Z' @ ( P RF(Z) PC200 NOT IN SYSTEM @ X P LDKL A2,' Z' @ z " P┆
0x657e…65ce (65, 0, 398) 5c 53 54 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 20 53 50 41 43 45 20 41 4e 44 20 27 5a 27 00 40 01 90 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 41 00 26 00 26 00 50 5c 4c 44 4b 5c 41 34 2c 32 5c 4e 42 52 20 4f 46 20 43 48 41 52 2e 20 54 ┆ STR A2,A1 STORE SPACE AND 'Z' @ P ADK A1,2 A & & P LDK A4,2 NBR OF CHAR. T┆
0x65ce…661e 4f 20 43 4f 4e 56 45 52 54 20 00 41 00 38 00 2c 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 41 5c 43 4f 4e 56 45 52 54 20 41 4e 44 20 53 54 4f 52 45 20 49 4e 20 46 4f 52 4d 41 54 00 41 00 62 00 32 00 50 50 43 32 30 30 5c 4c 44 5c 41 33 2c 4b 3a ┆O CONVERT A 8 , P CF A14,K:XA CONVERT AND STORE IN FORMAT A b 2 PPC200 LD A3,K:┆
0x661e…666e 43 43 53 5c 47 45 54 20 41 44 44 52 45 53 53 20 4f 46 20 54 45 52 4d 49 4e 41 4c 20 27 53 27 20 00 41 00 92 00 1e 00 50 5c 52 46 28 5a 29 5c 50 43 32 34 30 5c 4e 4f 54 20 49 4e 20 53 59 53 54 45 4d 00 41 00 c8 00 12 00 50 5c 4c 44 4b 4c 5c ┆CCS GET ADDRESS OF TERMINAL 'S' A P RF(Z) PC240 NOT IN SYSTEM A P LDKL ┆
0x666e…66be 41 32 2c 27 20 53 27 20 00 41 00 ea 00 22 00 50 5c 53 54 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 20 53 50 41 43 45 20 41 4e 44 20 27 53 27 00 41 01 00 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 41 01 26 00 26 00 50 5c 4c 44 4b 5c 41 34 2c ┆A2,' S' A " P STR A2,A1 STORE SPACE AND 'S' A P ADK A1,2 A & & P LDK A4,┆
0x66be…670c 32 5c 4e 42 52 20 4f 46 20 43 48 41 52 2e 20 54 4f 20 43 4f 4e 56 45 52 54 20 00 41 01 38 00 2c 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 41 5c 43 4f 4e 56 45 52 54 20 41 4e 44 20 53 54 4f 52 45 20 49 4e 20 46 4f 52 4d 41 54 00 41 01 62 ┆2 NBR OF CHAR. TO CONVERT A 8 , P CF A14,K:XA CONVERT AND STORE IN FORMAT A b┆
0x670c…675c (66, 0, 400) 00 10 00 50 50 43 32 34 30 5c 45 51 55 5c 2a 20 00 42 00 04 00 16 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 31 30 30 5c 45 4f 4c 20 00 42 00 18 00 28 00 50 5c 53 54 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 20 45 4f 4c 20 4c 41 53 54 20 49 4e 20 46 ┆ PPC240 EQU * B P LDKL A2,/100 EOL B ( P STR A2,A1 STORE EOL LAST IN F┆
0x675c…67ac 4f 52 4d 41 54 20 00 42 00 32 00 14 00 50 5c 53 55 4b 4c 5c 41 31 2c 4b 3a 46 43 31 31 20 00 42 00 5e 00 2a 00 50 5c 53 43 5c 41 31 2c 4b 3a 46 43 31 31 2d 31 5c 53 54 4f 52 45 20 4c 45 4e 47 54 48 20 4f 46 20 46 4f 52 4d 41 54 00 42 00 76 ┆ORMAT B 2 P SUKL A1,K:FC11 B ^ * P SC A1,K:FC11-1 STORE LENGTH OF FORMAT B v┆
0x67ac…67fc 00 1e 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 5c 50 52 49 4e 54 20 46 4f 4d 41 54 00 42 00 a4 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 43 31 30 00 42 00 c6 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 53 45 54 20 00 42 ┆ P CF A14,K:PRTN PRINT FOMAT B P DATA K:FC10 B P EJECT IDENT C:SET B┆
0x67fc…684c 00 da 00 06 00 50 2a 20 00 42 00 f6 00 34 00 50 2a 20 20 20 45 44 49 54 20 41 4e 44 20 50 52 49 4e 54 20 41 44 44 52 45 53 53 45 53 20 4f 46 20 49 4e 51 55 49 52 59 20 54 45 4d 49 4e 41 4c 53 00 42 01 00 00 06 00 50 2a 20 00 42 01 38 00 22 ┆ P* B 4 P* EDIT AND PRINT ADDRESSES OF INQUIRY TEMINALS B P* B 8 "┆
0x684c…689c 00 50 5c 4c 44 4b 5c 41 35 2c 30 5c 49 4e 44 45 58 20 46 4f 52 20 54 45 52 4d 49 4e 41 4c 53 20 00 42 01 42 00 30 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 46 43 31 33 5c 47 45 54 20 41 44 44 52 45 53 53 20 4f 46 20 4f 55 54 50 55 54 20 46 4f ┆ P LDK A5,0 INDEX FOR TERMINALS B B 0 P LDKL A1,K:FC13 GET ADDRESS OF OUTPUT FO┆
0x689c…68ec (67, 0, 400) 52 4d 41 54 00 42 01 68 00 10 00 50 50 43 33 31 30 5c 45 51 55 5c 2a 20 00 43 00 0c 00 2a 00 50 5c 4c 44 5c 41 33 2c 4b 3a 43 43 53 41 2c 41 35 5c 47 45 54 20 54 45 52 4d 49 4e 41 4c 20 41 44 44 52 45 53 53 20 00 43 00 20 00 22 00 50 5c 52 ┆RMAT B h PPC310 EQU * C * P LD A3,K:CCSA,A5 GET TERMINAL ADDRESS C " P R┆
0x68ec…693c 46 28 5a 29 5c 50 43 33 33 30 5c 45 4e 44 20 4f 46 20 54 45 52 4d 49 4e 41 4c 53 20 00 43 00 4e 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 27 20 27 20 00 43 00 74 00 1a 00 50 5c 53 43 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 20 53 50 41 43 45 00 43 ┆F(Z) PC330 END OF TERMINALS C N P LDK A2,' ' C t P SCR A2,A1 STORE SPACE C┆
0x693c…698c 00 88 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 31 20 00 43 00 a6 00 26 00 50 5c 4c 44 4b 5c 41 34 2c 32 5c 4e 42 52 20 4f 46 20 43 48 41 52 2e 20 54 4f 20 43 4f 4e 56 45 52 54 20 00 43 00 b8 00 2c 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 41 5c 43 ┆ P ADK A1,1 C & P LDK A4,2 NBR OF CHAR. TO CONVERT C , P CF A14,K:XA C┆
0x698c…69dc 4f 4e 56 45 52 54 20 41 4e 44 20 53 54 4f 52 45 20 49 4e 20 46 4f 52 4d 41 54 00 43 00 e2 00 24 00 50 5c 41 44 4b 5c 41 35 2c 32 5c 55 50 44 41 54 45 20 54 45 52 4d 49 4e 41 4c 20 49 4e 44 45 58 20 00 43 01 12 00 28 00 50 5c 43 57 4b 5c 41 ┆ONVERT AND STORE IN FORMAT C $ P ADK A5,2 UPDATE TERMINAL INDEX C ( P CWK A┆
0x69dc…6a2c 35 2c 4e 53 49 4d 2b 4e 53 49 4d 5c 45 4e 44 20 4f 46 20 54 45 52 4d 49 4e 41 4c 53 3f 20 00 43 01 3a 00 20 00 50 5c 52 42 28 4e 45 29 5c 50 43 33 31 30 5c 4e 45 58 54 20 54 45 52 4d 49 4e 41 4c 20 00 43 01 66 00 10 00 50 50 43 33 33 30 5c ┆5,NSIM+NSIM END OF TERMINALS? C : P RB(NE) PC310 NEXT TERMINAL C f PPC330 ┆
0x6a2c…6a7c (68, 0, 400) 45 51 55 5c 2a 20 00 43 01 8a 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 31 00 44 00 0e 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 30 31 20 00 44 00 20 00 1c 00 50 5c 52 46 28 5a 29 5c 50 43 33 34 30 5c 45 56 45 4e 20 42 59 54 45 53 20 00 44 00 34 ┆EQU * C P LDR A2,A1 D P ANK A2,/01 D P RF(Z) PC340 EVEN BYTES D 4┆
0x6a7c…6acc 00 26 00 50 5c 4c 44 4b 5c 41 32 2c 27 20 27 5c 41 44 44 20 53 50 41 43 45 20 49 46 20 4f 44 44 20 42 59 54 45 53 00 44 00 54 00 1e 00 50 5c 53 43 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 20 49 4e 20 46 4f 52 4d 41 54 00 44 00 7e 00 0e 00 50 ┆ & P LDK A2,' ' ADD SPACE IF ODD BYTES D T P SCR A2,A1 STORE IN FORMAT D ~ P┆
0x6acc…6b1c 5c 41 44 4b 5c 41 31 2c 31 20 00 44 00 a0 00 10 00 50 50 43 33 34 30 5c 45 51 55 5c 2a 20 00 44 00 b2 00 16 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 31 30 30 5c 45 4f 4c 20 00 44 00 c6 00 26 00 50 5c 53 54 52 5c 41 32 2c 41 31 5c 50 55 54 20 45 ┆ ADK A1,1 D PPC340 EQU * D P LDKL A2,/100 EOL D & P STR A2,A1 PUT E┆
0x6b1c…6b6c 4f 4c 20 4c 41 53 54 20 49 4e 20 46 4f 52 4d 41 54 20 00 44 00 e0 00 14 00 50 5c 53 55 4b 4c 5c 41 31 2c 4b 3a 46 43 31 33 20 00 44 01 0a 00 28 00 50 5c 53 43 5c 41 31 2c 4b 3a 46 43 31 33 2d 31 5c 50 55 54 20 4c 45 4e 47 54 48 20 49 4e 20 ┆OL LAST IN FORMAT D P SUKL A1,K:FC13 D ( P SC A1,K:FC13-1 PUT LENGTH IN ┆
0x6b6c…6bbc 46 4f 52 4d 41 54 00 44 01 22 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 5c 50 52 49 4e 54 20 46 4f 52 4d 41 54 20 00 44 01 4e 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 43 31 32 00 44 01 72 00 06 00 50 2a 20 00 44 01 86 00 0e 00 50 ┆FORMAT D " P CF A14,K:PRTN PRINT FORMAT D N P DATA K:FC12 D r P* D P┆
0x6bbc…6c0c (69, 2, 102) 2a 20 20 20 52 45 54 55 52 4e 00 44 01 90 00 06 00 50 2a 20 00 45 00 12 00 10 00 50 50 43 52 45 54 5c 45 51 55 5c 2a 20 00 45 00 1c 00 08 00 50 5c 58 49 46 00 45 00 30 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 45 00 3c 00 06 00 50 2a 20 00 45 ┆* RETURN D P* E PPCRET EQU * E P XIF E 0 P RTN A14 E < P* E┆
0x6c0c…6c22 00 4c 00 08 00 50 5c 45 4e 44 00 45 00 56 40 04 00 00 00 45 00 62 ┆ L P END E V@ E b┆
0x6c22…6c2a (70, 1, 8) 20 04 00 00 00 46 00 04 ┆ F ┆