|
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: 25292 (0x62cc)
Notes: pts_type(SC)
Names: »C:SET.SC«
└─⟦2a21e4bb5⟧ Bits:30009691 Philips computer tape "600408"
└─⟦this⟧ »BDKAPP/C:SET.SC«
IDENT C:SET CONPAC REL=0.0 DATE= 77.10.12 UPDATE #0 77.09.29 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: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: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 40 CC WRITE REQUEST TIME OUT (X100 MS) K:QTIM EQU 3000 CC EXCHANGE REQUEST TIME OUT (X100 MS) * BUFFER LENGTHS K:CCBL EQU 1100 CCWRITE BUFFER LENGTH (WORDS) K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) K:BLTC EQU 128 LENGTH OF CASSETTE BUFFER (WORDS) K:KBL EQU 60 KB BUF LENGTH IN WORDS K:KBBL EQU K:KBL+K:KBL IN CHARS K:GPBL EQU 60 GP BUF LENGTH IN WORDS K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS) K:INBL EQU 1100 TERMINAL LINE INPUT BUF LENGTH (WORDS) EJECT * COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION K:CCAD EQU 0 CONCENTRATOR ADDRESS LEFT BYTE = SELECT ADDR. RIGHT BYTE = POLL ADDR. K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES AND SYSTEM MESSAGES K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT C:SET CONPAC REL=0.0 DATE= 77.10.12 «, t00=0x0000, t01=0x0004}
0x0034…0056 Head {h00=0x001e, h01=0x0050, text=» UPDATE #0 77.09.29 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:SA 77-04-26 «, t00=0x0001, t01=0x0106}
0x02aa…02c2 Head {h00=0x0014, h01=0x0050, text=»* K:LTA 77.09.29«, t00=0x0001, t01=0x011e}
0x02c2…02da Head {h00=0x0014, h01=0x0050, text=»* K:PTA 77.09.29«, t00=0x0001, t01=0x0136}
0x02da…02f2 Head {h00=0x0014, h01=0x0050, text=»* K:XA 77.09.29 «, t00=0x0001, t01=0x014e}
0x02f2…02fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0166}
0x02fc…0344 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x0170}
0x0344…0360 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:SET «, t00=0x0002, t01=0x0028}
0x0360…036a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0044}
0x036a…0374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004e}
0x0374…038e Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0058}
0x038e…0398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0072}
0x0398…03e0 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x007c}
0x03e0…03ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c4}
0x03ea…0406 Head {h00=0x0018, h01=0x0050, text=»* ENTRY DESCRIPTION«, t00=0x0002, t01=0x00ce}
0x0406…0410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ea}
0x0410…042c Head {h00=0x0018, h01=0x0050, text=» ENTRY K:ST SET TIME«, t00=0x0002, t01=0x00f4}
0x042c…0448 Head {h00=0x0018, h01=0x0050, text=» ENTRY K:SD SET DATE«, t00=0x0002, t01=0x0110}
0x0448…0450 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x012c}
0x0450…047c Head {h00=0x0028, h01=0x0050, text=» ENTRY K:SA SET CONCENTRATOR ADDRESS«, t00=0x0002, t01=0x0134}
0x047c…04aa Head {h00=0x002a, h01=0x0050, text=» ENTRY K:LTA LOAD TRUNK LINE ADDRESSES«, t00=0x0002, t01=0x0160}
0x04aa…04da Head {h00=0x002c, h01=0x0050, text=» ENTRY K:PTA PRINT TRUNK LINE ADDRESSES «, t00=0x0002, t01=0x018e}
0x04da…050e Head {h00=0x0030, h01=0x0050, text=» ENTRY K:XA ONE WORD CONVERSION HEX TO ASCII«, t00=0x0003, t01=0x002e}
0x050e…0542 Head {h00=0x0030, h01=0x0050, text=» ENTRY K:ASHX ASCII TO HEX CONVERSION TABLE «, t00=0x0003, t01=0x0062}
0x0542…0576 Head {h00=0x0030, h01=0x0050, text=» ENTRY K:HXAS HEX TO ASCII CONVERSION TABLE «, t00=0x0003, t01=0x0096}
0x0576…0592 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:SET «, t00=0x0003, t01=0x00ca}
0x0592…059c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e6}
0x059c…05a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f0}
0x05a6…05c4 Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x00fa}
0x05c4…05ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0118}
0x05ce…0616 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x0122}
0x0616…0620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016a}
0x0620…063c Head {h00=0x0018, h01=0x0050, text=»* ADDRESS IN MODULE«, t00=0x0003, t01=0x0174}
0x063c…0646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0190}
0x0646…0650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x000a}
0x0650…066a Head {h00=0x0016, h01=0x0050, text=» EXTRN K:WBT C:WBS«, t00=0x0004, t01=0x0014}
0x066a…067e Head {h00=0x0010, h01=0x0050, text=» EXTRN K:WBD«, t00=0x0004, t01=0x002e}
0x067e…0688 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0042}
0x0688…06a2 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:CCA C:TCA«, t00=0x0004, t01=0x004c}
0x06a2…06b6 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCZ«, t00=0x0004, t01=0x0066}
0x06b6…06ca Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCS«, t00=0x0004, t01=0x007a}
0x06ca…06e0 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCSA «, t00=0x0004, t01=0x008e}
0x06e0…06f6 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCSV «, t00=0x0004, t01=0x00a4}
0x06f6…070a Head {h00=0x0010, h01=0x0050, text=» EXTRN K:S0E«, t00=0x0004, t01=0x00ba}
0x070a…0720 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:RCCE «, t00=0x0004, t01=0x00ce}
0x0720…0734 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LCE«, t00=0x0004, t01=0x00e4}
0x0734…073e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f8}
0x073e…075a Head {h00=0x0018, h01=0x0050, text=» EXTRN K:PRTN C:FUA «, t00=0x0004, t01=0x0102}
0x075a…0770 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:PRTT «, t00=0x0004, t01=0x011e}
0x0770…077a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0134}
0x077a…0796 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F373 C:TXT «, t00=0x0004, t01=0x013e}
0x0796…07ac Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F374 «, t00=0x0004, t01=0x015a}
0x07ac…07c2 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F304 «, t00=0x0004, t01=0x0170}
0x07c2…07d8 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F305 «, t00=0x0004, t01=0x0186}
0x07d8…07ee Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F308 «, t00=0x0005, t01=0x000c}
0x07ee…0804 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC10 «, t00=0x0005, t01=0x0022}
0x0804…081a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC11 «, t00=0x0005, t01=0x0038}
0x081a…0830 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC12 «, t00=0x0005, t01=0x004e}
0x0830…0846 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FC13 «, t00=0x0005, t01=0x0064}
0x0846…085c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F361 «, t00=0x0005, t01=0x007a}
0x085c…0866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0090}
0x0866…0882 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:SIMP C:BPL «, t00=0x0005, t01=0x009a}
0x0882…088c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b6}
0x088c…08a8 Head {h00=0x0018, h01=0x0050, text=» EXTRN TRAPAR C:INI «, t00=0x0005, t01=0x00c0}
0x08a8…08b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00dc}
0x08b2…08bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e6}
0x08bc…08c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f0}
0x08c6…0916 Head {h00=0x004c, h01=0x0050, text=»* HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0005, t01=0x00fa}
0x0916…0920 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x014a}
0x0920…092e Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0005, t01=0x0154}
0x092e…0938 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0162}
0x0938…0942 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016c}
0x0942…094c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0176}
0x094c…0956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0180}
0x0956…0960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018a}
0x0960…096a (6, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x096a…0974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000e}
0x0974…097e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0018}
0x097e…0988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0022}
0x0988…0992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002c}
0x0992…099c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0036}
0x099c…09a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a6…09b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004a}
0x09b0…09ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0054}
0x09ba…09c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x005e}
0x09c4…09ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0068}
0x09ce…09d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0072}
0x09d8…09e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007c}
0x09e2…09ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0086}
0x09ec…09f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0090}
0x09f6…0a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009a}
0x0a00…0a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a4}
0x0a0a…0a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ae}
0x0a14…0a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b8}
0x0a1e…0a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c2}
0x0a28…0a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00cc}
0x0a32…0a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d6}
0x0a3c…0a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e0}
0x0a46…0a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ea}
0x0a50…0a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f4}
0x0a5a…0a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00fe}
0x0a64…0a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0108}
0x0a6e…0a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0112}
0x0a78…0a82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011c}
0x0a82…0a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0126}
0x0a8c…0a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0130}
0x0a96…0aa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013a}
0x0aa0…0aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0144}
0x0aaa…0ab4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014e}
0x0ab4…0abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0158}
0x0abe…0ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac8…0ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016c}
0x0ad2…0adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0176}
0x0adc…0ae6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0180}
0x0ae6…0af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018a}
0x0af0…0afa (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0afa…0b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b04…0b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0018}
0x0b0e…0b18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0022}
0x0b18…0b22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002c}
0x0b22…0b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0036}
0x0b2c…0b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0040}
0x0b36…0b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004a}
0x0b40…0b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0054}
0x0b4a…0b54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005e}
0x0b54…0b86 Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0007, t01=0x0068}
0x0b86…0b90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009a}
0x0b90…0ba6 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x00a4}
0x0ba6…0bb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ba}
0x0bb0…0bc4 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0007, t01=0x00c4}
0x0bc4…0bda Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0007, t01=0x00d8}
0x0bda…0bee Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0007, t01=0x00ee}
0x0bee…0c04 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0007, t01=0x0102}
0x0c04…0c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0118}
0x0c0e…0c2e Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0007, t01=0x0122}
0x0c2e…0c44 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0007, t01=0x0142}
0x0c44…0c58 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0007, t01=0x0158}
0x0c58…0c6e Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0007, t01=0x016c}
0x0c6e…0c8a Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0007, t01=0x0182}
0x0c8a…0c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000e}
0x0c94…0cb6 Head {h00=0x001e, h01=0x0050, text=»* FORMS FOR FORMAT CODES«, t00=0x0008, t01=0x0018}
0x0cb6…0cc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x003a}
0x0cc0…0cea Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0008, t01=0x0044}
0x0cea…0d0e Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0008, t01=0x006e}
0x0d0e…0d34 Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0008, t01=0x0092}
0x0d34…0d66 Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0008, t01=0x00b8}
0x0d66…0d98 Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0008, t01=0x00ea}
0x0d98…0dc6 Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0008, t01=0x011c}
0x0dc6…0df2 Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0008, t01=0x014a}
0x0df2…0e10 Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0008, t01=0x0176}
0x0e10…0e30 (9, 0, 400) Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0009, t01=0x0004}
0x0e30…0e52 Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0009, t01=0x0024}
0x0e52…0e7c Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0009, t01=0x0046}
0x0e7c…0e92 Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x0009, t01=0x0070}
0x0e92…0eaa Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0009, t01=0x0086}
0x0eaa…0ec4 Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0009, t01=0x009e}
0x0ec4…0eea Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x0009, t01=0x00b8}
0x0eea…0f12 Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x0009, t01=0x00de}
0x0f12…0f38 Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x0009, t01=0x0106}
0x0f38…0f60 Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x0009, t01=0x012c}
0x0f60…0f8a Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x0009, t01=0x0154}
0x0f8a…0fb6 Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x0009, t01=0x017e}
0x0fb6…0fe0 Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x000a, t01=0x001a}
0x0fe0…100c Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x000a, t01=0x0044}
0x100c…1028 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000a, t01=0x0070}
0x1028…1032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x008c}
0x1032…1052 Head {h00=0x001c, h01=0x0050, text=»* CONSTANT TCA EQUATES«, t00=0x000a, t01=0x0096}
0x1052…105c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00b6}
0x105c…1070 Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000a, t01=0x00c0}
0x1070…1084 Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000a, t01=0x00d4}
0x1084…1098 Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000a, t01=0x00e8}
0x1098…10ae Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000a, t01=0x00fc}
0x10ae…10c4 Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000a, t01=0x0112}
0x10c4…10da Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000a, t01=0x0128}
0x10da…10ee Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000a, t01=0x013e}
0x10ee…1104 Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000a, t01=0x0152}
0x1104…1118 Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000a, t01=0x0168}
0x1118…112c Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000a, t01=0x017c}
0x112c…1140 Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000a, t01=0x0190}
0x1140…1154 Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000b, t01=0x0014}
0x1154…115e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0028}
0x115e…1182 Head {h00=0x0020, h01=0x0050, text=»* LINE WORKBLOCKS EQUATES «, t00=0x000b, t01=0x0032}
0x1182…118c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0056}
0x118c…11a8 Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000b, t01=0x0060}
0x11a8…11ca Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000b, t01=0x007c}
0x11ca…11ee Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000b, t01=0x009e}
0x11ee…1212 Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000b, t01=0x00c2}
0x1212…123c Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000b, t01=0x00e6}
0x123c…1252 Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000b, t01=0x0110}
0x1252…1268 Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000b, t01=0x0126}
0x1268…1272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x013c}
0x1272…1292 Head {h00=0x001c, h01=0x0050, text=»* TC WORKBLOCK EQUATES«, t00=0x000b, t01=0x0146}
0x1292…129c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0166}
0x129c…12ae Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000b, t01=0x0170}
0x12ae…12c2 Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000b, t01=0x0182}
0x12c2…12d6 Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000c, t01=0x0008}
0x12d6…12ea Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000c, t01=0x001c}
0x12ea…1300 Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000c, t01=0x0030}
0x1300…1316 Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000c, t01=0x0046}
0x1316…132c Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000c, t01=0x005c}
0x132c…1348 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000c, t01=0x0072}
0x1348…1352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008e}
0x1352…1380 Head {h00=0x002a, h01=0x0050, text=»* CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000c, t01=0x0098}
0x1380…138a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c6}
0x138a…139e Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000c, t01=0x00d0}
0x139e…13b2 Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000c, t01=0x00e4}
0x13b2…13c6 Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000c, t01=0x00f8}
0x13c6…13da Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000c, t01=0x010c}
0x13da…13ee Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000c, t01=0x0120}
0x13ee…1402 Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000c, t01=0x0134}
0x1402…1416 Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000c, t01=0x0148}
0x1416…142a Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000c, t01=0x015c}
0x142a…143e Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000c, t01=0x0170}
0x143e…1452 Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000c, t01=0x0184}
0x1452…1466 Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000d, t01=0x0008}
0x1466…147a Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000d, t01=0x001c}
0x147a…1484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0030}
0x1484…14a4 Head {h00=0x001c, h01=0x0050, text=»* CC WORKBLOCK EQUATES«, t00=0x000d, t01=0x003a}
0x14a4…14ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005a}
0x14ae…14d4 Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000d, t01=0x0064}
0x14d4…14e8 Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000d, t01=0x008a}
0x14e8…14fc Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000d, t01=0x009e}
0x14fc…1526 Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000d, t01=0x00b2}
0x1526…154e Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000d, t01=0x00dc}
0x154e…1564 Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000d, t01=0x0104}
0x1564…157a Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000d, t01=0x011a}
0x157a…1596 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000d, t01=0x0130}
0x1596…15a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014c}
0x15a0…15c6 Head {h00=0x0022, h01=0x0050, text=»* NETWORK WORKBLOCK EQUATES«, t00=0x000d, t01=0x0156}
0x15c6…15d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017c}
0x15d0…15fe Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000d, t01=0x0186}
0x15fe…1622 Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000e, t01=0x0024}
0x1622…162c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0048}
0x162c…164e Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000e, t01=0x0052}
0x164e…1664 Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000e, t01=0x0074}
0x1664…167a Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000e, t01=0x008a}
0x167a…1690 Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000e, t01=0x00a0}
0x1690…16a6 Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000e, t01=0x00b6}
0x16a6…16bc Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000e, t01=0x00cc}
0x16bc…16d2 Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000e, t01=0x00e2}
0x16d2…16e8 Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000e, t01=0x00f8}
0x16e8…16fe Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000e, t01=0x010e}
0x16fe…1714 Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000e, t01=0x0124}
0x1714…172a Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000e, t01=0x013a}
0x172a…1740 Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000e, t01=0x0150}
0x1740…174a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0166}
0x174a…176e Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000e, t01=0x0170}
0x176e…1792 (15, 0, 400) Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000f, t01=0x0004}
0x1792…17b6 Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000f, t01=0x0028}
0x17b6…17c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004c}
0x17c0…17e4 Head {h00=0x0020, h01=0x0050, text=»* CC TEXT-INTERVAL EQUATES «, t00=0x000f, t01=0x0056}
0x17e4…17ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007a}
0x17ee…1802 Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x000f, t01=0x0084}
0x1802…1816 Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x000f, t01=0x0098}
0x1816…182a Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x000f, t01=0x00ac}
0x182a…183e Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x000f, t01=0x00c0}
0x183e…1852 Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x000f, t01=0x00d4}
0x1852…1866 Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x000f, t01=0x00e8}
0x1866…187a Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x000f, t01=0x00fc}
0x187a…188e Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x000f, t01=0x0110}
0x188e…18a2 Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x000f, t01=0x0124}
0x18a2…18b6 Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x000f, t01=0x0138}
0x18b6…18ca Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x000f, t01=0x014c}
0x18ca…18de Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x000f, t01=0x0160}
0x18de…18fa Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000f, t01=0x0174}
0x18fa…1904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0190}
0x1904…1934 Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x0010, t01=0x000a}
0x1934…193e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003a}
0x193e…1970 Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x0010, t01=0x0044}
0x1970…19ae Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x0010, t01=0x0076}
0x19ae…19e0 Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0010, t01=0x00b4}
0x19e0…19ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00e6}
0x19ea…1a0a Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0010, t01=0x00f0}
0x1a0a…1a1e Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0010, t01=0x0110}
0x1a1e…1a32 Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0010, t01=0x0124}
0x1a32…1a46 Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0010, t01=0x0138}
0x1a46…1a5a Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0010, t01=0x014c}
0x1a5a…1a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0160}
0x1a64…1a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x016a}
0x1a6e…1a9a Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0010, t01=0x0174}
0x1a9a…1ac6 Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0011, t01=0x0010}
0x1ac6…1ae2 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0011, t01=0x003c}
0x1ae2…1b22 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x0058}
0x1b22…1b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0098}
0x1b2c…1b52 Head {h00=0x0022, h01=0x0050, text=»* SYSTEM ADAPTION PARAMETERS«, t00=0x0011, t01=0x00a2}
0x1b52…1b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00c8}
0x1b5c…1b7c Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0011, t01=0x00d2}
0x1b7c…1b9e Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /2F ENTRY K KEY«, t00=0x0011, t01=0x00f2}
0x1b9e…1bc0 Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /28 ENTER U KEY«, t00=0x0011, t01=0x0114}
0x1bc0…1be8 Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /2A END OF RECORD KEY «, t00=0x0011, t01=0x0136}
0x1be8…1c0a Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /23 CANCEL KEY «, t00=0x0011, t01=0x015e}
0x1c0a…1c32 Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0011, t01=0x0180}
0x1c32…1c6c Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 40 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x0018}
0x1c6c…1caa Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 3000 CC EXCHANGE REQUEST TIME OUT (X100 MS)«, t00=0x0012, t01=0x0052}
0x1caa…1cc2 Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0012, t01=0x0090}
0x1cc2…1cf8 Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1100 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0012, t01=0x00a8}
0x1cf8…1d38 Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0012, t01=0x00de}
0x1d38…1d70 Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 128 LENGTH OF CASSETTE BUFFER (WORDS)«, t00=0x0012, t01=0x011e}
0x1d70…1d9c Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 60 KB BUF LENGTH IN WORDS «, t00=0x0012, t01=0x0156}
0x1d9c…1dc4 Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0012, t01=0x0182}
0x1dc4…1df0 Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0013, t01=0x001a}
0x1df0…1e26 Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0013, t01=0x0046}
0x1e26…1e64 Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1100 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0013, t01=0x007c}
0x1e64…1e72 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x00ba}
0x1e72…1ec6 Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0013, t01=0x00c8}
0x1ec6…1ef0 Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0013, t01=0x011c}
0x1ef0…1f14 Head {h00=0x0020, h01=0x0050, text=» LEFT BYTE = SELECT ADDR. «, t00=0x0013, t01=0x0146}
0x1f14…1f36 Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE = POLL ADDR.«, t00=0x0013, t01=0x016a}
0x1f36…1f72 Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0013, t01=0x018c}
0x1f72…1f90 Head {h00=0x001a, h01=0x0050, text=» AND SYSTEM MESSAGES«, t00=0x0014, t01=0x0038}
0x1f90…1fc8 Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0014, t01=0x0056}
0x1fc8…1ffe Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0014, t01=0x008e}
0x1ffe…2002 Head {h00=0x0054, h01=0x0050}
0x2002…2006 Head {h00=0x2a20, h01=0x5349}
0x2006…2030 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 ┆MULATED TERMINAL ADDRESSES FOR INQUIRY. RI┆
0x2030…2080 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 c4 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 14 01 1c 00 16 00 50 4b 3a ┆GHT BYTE. IF SPECIFIED AT SYSTEM G PK:SA1 EQU 0 SIM. TERM. NBR 1 PK:┆
0x2080…20ce 53 41 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 20 00 14 01 40 00 16 00 50 4b 3a 53 41 33 5c 45 51 55 5c 30 5c 4e 42 52 20 33 20 00 14 01 5a 00 16 00 50 4b 3a 53 41 34 5c 45 51 55 5c 30 5c 4e 42 52 20 34 20 00 14 01 74 00 16 00 50 4b 3a ┆SA2 EQU 0 NBR 2 @ PK:SA3 EQU 0 NBR 3 Z PK:SA4 EQU 0 NBR 4 t PK:┆
0x20ce…211e (21, 0, 400) 53 41 35 5c 45 51 55 5c 30 5c 4e 42 52 20 35 20 00 14 01 8e 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 18 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 32 00 16 00 50 4b 3a 53 41 ┆SA5 EQU 0 NBR 5 PK:SA6 EQU 0 NBR 6 PK:SA7 EQU 0 NBR 7 2 PK:SA┆
0x211e…216e 38 5c 45 51 55 5c 30 5c 4e 42 52 20 38 20 00 15 00 4c 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 66 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 80 00 18 00 50 4b 3a 53 41 ┆8 EQU 0 NBR 8 L PK:SA9 EQU 0 NBR 9 f PK:SA10 EQU 0 NBR 10 PK:SA┆
0x216e…21be 31 31 5c 45 51 55 5c 30 5c 4e 42 52 20 31 31 20 00 15 00 9c 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 00 b8 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 d4 00 18 00 50 ┆11 EQU 0 NBR 11 PK:SA12 EQU 0 NBR 12 PK:SA13 EQU 0 NBR 13 P┆
0x21be…220e 4b 3a 53 41 31 34 5c 45 51 55 5c 30 5c 4e 42 52 20 31 34 20 00 15 00 f0 00 18 00 50 4b 3a 53 41 31 35 5c 45 51 55 5c 30 5c 4e 42 52 20 31 35 20 00 15 01 0c 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 28 ┆K:SA14 EQU 0 NBR 14 PK:SA15 EQU 0 NBR 15 PK:SA16 EQU 0 NBR 16 (┆
0x220e…225e 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 44 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 15 01 60 00 18 00 50 4b 3a 53 41 31 39 5c 45 51 55 5c 30 5c 4e 42 52 20 31 39 20 ┆ PK:SA17 EQU 0 NBR 17 D PK:SA18 EQU 0 NBR 18 ` PK:SA19 EQU 0 NBR 19 ┆
0x225e…22ae (22, 0, 400) 00 15 01 7c 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 08 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 24 00 18 00 50 4b 3a 53 41 32 32 5c 45 51 55 5c 30 5c 4e 42 52 ┆ | PK:SA20 EQU 0 NBR 20 PK:SA21 EQU 0 NBR 21 $ PK:SA22 EQU 0 NBR┆
0x22ae…22fe 20 32 32 20 00 16 00 40 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 5c 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 00 78 00 18 00 50 4b 3a 53 41 32 35 5c 45 51 55 5c 30 ┆ 22 @ PK:SA23 EQU 0 NBR 23 PK:SA24 EQU 0 NBR 24 x PK:SA25 EQU 0┆
0x22fe…234e 5c 4e 42 52 20 32 35 20 00 16 00 94 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 00 b0 00 0a 00 50 5c 45 4a 45 43 54 00 16 00 cc 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 ┆ NBR 25 PK:SA26 EQU 0 NBR 26 P EJECT < P**********************┆
0x234e…239e 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 00 da 00 06 00 50 2a 20 00 16 01 1a 00 2c 00 50 2a 20 20 20 50 41 52 41 4d 45 54 45 52 53 20 46 4f 52 20 43 4f 4e 44 49 54 49 4f 4e ┆********************************* P* , P* PARAMETERS FOR CONDITION┆
0x239e…23ee 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 16 01 24 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 16 01 54 00 06 00 50 2a 20 00 16 01 80 00 3c 00 50 2a 2a 2a 2a 2a 2a ┆AL ASSEMBLY $ ( P* OF CONCENTRATOR PACKAGE MODULES T P* < P******┆
0x23ee…243e (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 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 8a 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 ┆************************************************* PX:A EQU 2 * NLINE <=1┆
0x243e…248e 30 20 00 17 00 3a 00 20 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 17 00 5a 00 1a 00 50 58 3a 42 5c 45 51 55 5c 38 30 5c 2a 20 20 4e 54 43 20 3c 3d 38 30 00 17 00 7e 00 2e 00 50 5c 5c 5c 54 ┆0 : P NUMBER OF TERMINAL LINES Z PX:B EQU 80 * NTC <=80 ~ . P T┆
0x248e…24de 4f 54 41 4c 20 4e 55 4d 42 45 52 20 4f 46 20 54 43 3a 53 20 4f 4e 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 17 00 9c 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 ce 00 24 00 50 5c 5c ┆OTAL NUMBER OF TC:S ON TERMINAL LINES PX:C EQU 26 * NSIM <=26 $ P ┆
0x24de…252e 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 00 ee 00 14 00 50 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 17 01 16 00 16 00 50 58 3a 44 5c 45 51 55 5c 30 5c 2a 20 20 4c 4f 4f 50 20 ┆ NUMBER OF SIMULATED TERMINALS P FOR INQUIRIES PX:D EQU 0 * LOOP ┆
0x252e…257e 00 17 01 2e 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4d 55 4c 54 49 50 4f 49 4e 54 20 43 4f 4e 46 49 47 2e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 17 01 48 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 4f 4f 50 20 43 4f 4e 46 49 47 ┆ . . P IF = 0. MULTIPOINT CONFIG. DOWNSTREAMS H . P IF = 1. LOOP CONFIG┆
0x257e…25ce (24, 0, 400) 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 17 01 7a 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 1c 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 45 44 49 54 20 42 55 ┆URATION DOWNSTREAMS z PX:E EQU 4 * NSPOOL <=4 ( P NUMBER OF EDIT BU┆
0x25ce…261e 46 46 45 52 53 20 46 4f 52 20 53 50 4f 4f 4c 20 00 18 00 3c 00 22 00 50 5c 5c 5c 46 55 4e 43 54 49 4f 4e 20 54 4f 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 2e 00 18 00 68 00 20 00 50 58 3a 46 5c 45 51 55 5c 33 5c 2a 20 20 30 3c 20 4e 54 ┆FFERS FOR SPOOL < " P FUNCTION TO OPERATORS TERM. h PX:F EQU 3 * 0< NT┆
0x261e…266e 50 4c 49 4e 20 3c 3d 33 30 20 00 18 00 8e 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 00 b2 00 26 00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e 53 41 ┆PLIN <=30 ( P NUMBER OF TRASKS IN POOL 'TPLIN' & P HANDLING TRANSA┆
0x266e…26be 43 54 49 4f 4e 53 20 46 52 4f 4d 20 54 43 3a 53 00 18 00 de 00 1e 00 50 58 3a 47 5c 45 51 55 5c 34 5c 2a 20 20 30 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 18 01 08 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 52 41 53 4b 53 20 49 4e ┆CTIONS FROM TC:S PX:G EQU 4 * 0< NTPSUP <=5 ( P NUMBER OF TRASKS IN┆
0x26be…270e 20 50 4f 4f 4c 20 27 54 50 53 55 50 27 20 00 18 01 2a 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 18 01 56 00 1c 00 50 5c 5c 5c 4f 52 20 4f 50 45 52 ┆ POOL 'TPSUP' * , P HANDLING TRANSACTIONS FROM MAIN FRAME V P OR OPER┆
0x270e…275e (25, 0, 398) 41 54 4f 52 53 20 54 45 52 4d 49 4e 41 4c 00 18 01 86 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 16 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4e 4f 20 4c 49 4e 45 20 54 45 53 54 20 43 4f 4d 4d 41 4e ┆ATORS TERMINAL PX:H EQU 1 * LINTST $ P IF = 0. NO LINE TEST COMMAN┆
0x275e…27ae 44 20 00 19 00 32 00 30 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 49 4e 45 20 54 45 53 54 20 46 41 43 49 4c 49 54 59 20 28 34 2d 57 49 52 45 20 4f 4e 4c 59 29 20 00 19 00 5a 00 18 00 50 58 3a 49 5c 45 51 55 5c 32 5c 2a 20 20 4f 4e 4c 49 4e ┆D 2 0 P IF = 1. LINE TEST FACILITY (4-WIRE ONLY) Z PX:I EQU 2 * ONLIN┆
0x27ae…27fe 45 20 00 19 00 8e 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 19 00 aa 00 28 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4f 4e 2f 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 ┆E $ P IF = 0. OFF LINE CONCENTRATOR ( P IF = 1. ON/OFF LINE CONCENT┆
0x27fe…284e 52 41 54 4f 52 20 00 19 00 d2 00 24 00 50 5c 5c 5c 49 46 20 3d 20 32 2e 20 4f 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 19 00 fe 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 26 00 06 ┆RATOR $ P IF = 2. ON LINE CONCENTRATOR PX:K EQU 1 * SETADR & ┆
0x284e…289c 00 50 2a 20 00 19 01 42 00 06 00 50 2a 20 00 19 01 4c 00 06 00 50 2a 20 00 19 01 56 00 06 00 50 2a 20 00 19 01 60 00 06 00 50 2a 20 00 19 01 6a 00 06 00 50 2a 20 00 19 01 74 00 06 00 50 2a 20 00 19 01 7e 00 06 00 50 2a 20 00 19 01 88 ┆ P* B P* L P* V P* ` P* j P* t P* ~ P* ┆
0x289c…28ec (26, 0, 400) 00 06 00 50 2a 20 00 1a 00 04 00 06 00 50 2a 20 00 1a 00 0e 00 06 00 50 2a 20 00 1a 00 18 00 0a 00 50 5c 4c 49 53 54 20 00 1a 00 22 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 1a 00 30 00 3c 00 50 2a 2a 2a 2a ┆ P* P* P* P LIST " P EJECT IDENT C:SET 0 < P****┆
0x28ec…293c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 4c 00 06 00 50 2a 20 00 1a 00 8c 00 2c 00 50 2a 20 20 20 50 41 52 41 4d 45 ┆**************************************************** L P* , P* PARAME┆
0x293c…298c 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 96 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 00 1a 00 c6 00 06 00 50 2a 20 00 1a ┆TERS FOR CONDITIONAL ASSEMBLY " P* SPECIFIED IN MODULE C:EQU P* ┆
0x298c…29dc 00 ec 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 f6 00 2e 00 50 4e 53 49 4d 5c 45 51 55 5c 58 ┆ < P******************************************************** . PNSIM EQU X┆
0x29dc…2a2c 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 01 36 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 68 00 36 00 50 53 45 54 41 44 52 5c 45 51 55 5c 58 ┆:C NUMBER OF SIMULATED TERMINALS 6 P USED FOR INQUIRY h 6 PSETADR EQU X┆
0x2a2c…2a7c (27, 0, 398) 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 84 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 20 41 54 20 53 59 53 54 45 4d 20 47 ┆:K IF = 0. CONCENTRATOR AND SIM. TERM. * P ADDRESSES SPECIFIED AT SYSTEM G┆
0x2a7c…2acc 45 4e 2e 20 00 1b 00 2e 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 5c 00 20 00 50 5c 5c 5c 53 50 45 43 49 46 49 45 44 20 42 59 20 4f 50 45 52 ┆EN. . , P IF = 1.CONC. AND SIM. TERM. ADDRESSES P SPECIFIED BY OPER┆
0x2acc…2b1c 41 54 4f 52 20 4f 52 20 00 1b 00 8c 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 b0 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 1b 00 d6 00 48 ┆ATOR OR " P BY NETWORK CONFIG. CASSETTE P EJECT IDENT C:SET H┆
0x2b1c…2b6c 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 2a 20 00 1b 00 f2 00 06 00 50 2a 20 ┆ P******************* K : S E T ************************************* P* ┆
0x2b6c…2bba 00 1b 01 3e 00 06 00 50 2a 20 00 1b 01 48 00 06 00 50 2a 20 00 1b 01 52 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 45 20 41 4e 44 20 44 41 54 45 ┆ > P* H P* R 6 P*SUBROUTINE K : S T , K : S D SETS TIME AND DATE┆
0x2bba…2c0a (28, 0, 398) 00 1b 01 5c 00 06 00 50 2a 20 00 1c 00 08 00 06 00 50 2a 20 00 1c 00 12 00 06 00 50 2a 20 00 1c 00 1c 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 1c 00 26 00 12 00 50 2a 5c 5c 43 46 20 ┆ P* P* P* P* CALL SEQUENCE: CF A14,K:ST & P* CF ┆
0x2c0a…2c5a 41 31 34 2c 4b 3a 53 44 00 1c 00 4a 00 06 00 50 2a 20 00 1c 00 60 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 00 1c 00 6a 00 06 00 50 2a 20 ┆A14,K:SD J P* ` 0 P* ENTRY PARAM: A8 = INPUROT BUFFER ADDRESS j P* ┆
0x2c5a…2caa 00 1c 00 9e 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 a8 00 06 00 50 2a 20 00 1c 00 ce 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 1c ┆ " P* SUBROUTINES: K:PRTN C:FUA P* P* RETURN PARAM: NONE ┆
0x2caa…2cfa 00 d8 00 06 00 50 2a 20 00 1c 00 f6 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 01 00 00 06 00 50 2a 20 00 1c 01 20 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 34 ┆ P* P* RETURN METOD: VIA A14 P* P* CHANGED REGS: A1-A4┆
0x2cfa…2d48 00 1c 01 2a 00 06 00 50 2a 20 00 1c 01 48 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 52 00 06 00 50 2a 20 00 1c 01 6e 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 1c 01 78 ┆ * P* H P* STACKER NEED: 16 R P* n P* LIMITATIONS: x┆
0x2d48…2d98 (29, 0, 400) 00 06 00 50 2a 20 00 1d 00 04 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 1d 00 0e 00 06 00 50 2a 20 00 1d 00 2a 00 06 00 50 2a 20 00 1d 00 34 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ P* P* CALLING TASK: ANY P* * P* 4 D P******************┆
0x2d98…2de8 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 1d 00 3e 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 1d 00 86 00 06 ┆********************************************* > P EJECT IDENT C:SET ┆
0x2de8…2e38 00 50 2a 20 00 1d 00 a2 00 06 00 50 2a 20 00 1d 00 ac 00 0e 00 50 2a 5c 5c 4b 20 3a 20 53 20 54 00 1d 00 b6 00 06 00 50 2a 20 00 1d 00 c8 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 57 4f 52 4b 42 4c 4f 43 ┆ P* P* P* K : S T P* $ P* MOVE TIME TO TIME WORKBLOC┆
0x2e38…2e88 4b 20 00 1d 00 d2 00 06 00 50 2a 20 00 1d 00 fa 00 0e 00 50 4b 3a 53 54 5c 45 51 55 5c 2a 00 1d 01 04 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 38 00 1d 01 16 00 12 00 50 5c 4c 44 4b 4c 5c 41 33 2c 4b 3a 57 42 54 00 1d 01 28 00 24 00 50 5c 4c ┆K P* PK:ST EQU * P LDR A2,A8 P LDKL A3,K:WBT ( $ P L┆
0x2e88…2ed8 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 01 3e 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 00 1d 01 66 00 12 00 50 ┆DKL A1,-4 NBR OF BYTES TO MOVE > & P CF A14,SMOVE MOVE TIME TO TIME WB f P┆
0x2ed8…2ee0 (30, 0, 400) 5c 4c 44 4b 4c 5c 41 31 ┆ LDKL A1┆
0x2ee0…2f30 2c 2f 33 30 33 30 00 1d 01 90 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 32 20 00 1e 00 16 00 0e 00 50 5c 53 54 52 5c 41 31 2c 41 33 00 1e 00 28 00 06 00 50 2a 20 00 1e 00 3a 00 10 00 50 2a 20 20 20 53 45 54 20 54 49 4d 45 00 1e 00 44 00 06 00 50 ┆,/3030 P ADK A3,2 P STR A1,A3 ( P* : P* SET TIME D P┆
0x2f30…2f80 2a 20 00 1e 00 58 00 12 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 57 42 54 00 1e 00 62 00 0a 00 50 5c 4c 4b 4d 5c 20 00 1e 00 78 00 0c 00 50 5c 44 41 54 41 5c 31 33 00 1e 00 86 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 00 1e 00 96 ┆* X P LDKL A8,K:WBT b P LKM x P DATA 13 P CF A14,K:PRTN ┆
0x2f80…2fd0 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 37 34 00 1e 00 ac 00 0e 00 50 5c 4c 44 52 5c 41 38 2c 41 32 00 1e 00 c0 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 1e 00 d2 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 1e ┆ P DATA K:F374 P LDR A8,A2 P RTN A14 P EJECT IDENT C:SET ┆
0x2fd0…3006 00 e2 00 06 00 50 2a 20 00 1e 00 fe 00 0e 00 50 2a 5c 5c 4b 20 3a 20 53 20 44 00 1e 01 08 00 06 00 50 2a 20 00 1e 01 1a 00 24 00 50 2a 20 20 20 4d 4f 56 45 20 44 ┆ P* P* K : S D P* $ P* MOVE D┆
0x3006…52cc […elided…]
0x52cc…52d0 2a 20 00 35 ┆* 5┆
0x52d0…5320 00 0a 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 35 00 14 00 06 00 50 2a 20 00 35 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 35 00 3a 00 06 00 50 2a 20 ┆ P* RETURN METOD: A14 5 P* 5 0 P* CHANGED REGS: A2,A3,A6 5 : P* ┆
0x5320…5370 00 35 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 35 00 66 00 06 00 50 2a 20 00 35 00 96 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e ┆ 5 , P* STACKER NEED: 2 WORDS ON A14 STACKER 5 f P* 5 P* LIMITATION┆
0x5370…53c0 53 3a 5c 20 00 35 00 a0 00 06 00 50 2a 20 00 35 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 35 00 c4 00 06 00 50 2a 20 00 35 00 e2 00 06 00 50 2a 20 00 35 00 ec 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a ┆S: 5 P* 5 P* CALLING TASK: OPCOM 5 P* 5 P* 5 D P********┆
0x53c0…5410 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 35 00 f6 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a ┆******************************************************* 5 P EJECT IDENT C:┆
0x5410…5452 53 45 54 20 00 35 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 35 01 5a ┆SET 5 > 6 P************************************************** 5 Z┆
0x5452…54a2 (54, 0, 400) 00 06 00 50 2a 20 00 36 00 04 00 0e 00 50 2a 5c 4b 20 3a 20 58 20 41 20 00 36 00 0e 00 06 00 50 2a 20 00 36 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* 6 P* K : X A 6 P* 6 6 P**************************************┆
0x54a2…54f2 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 36 00 2a 00 06 00 50 2a 20 00 36 00 64 00 0e 00 50 4b 3a 58 41 5c 45 51 55 5c 2a 00 36 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 ┆************ 6 * P* 6 d PK:XA EQU * 6 n ( P LDR A6,A4 GET NUMBER OF CHARACT┆
0x54f2…5542 45 52 53 20 00 36 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 36 00 ac 00 12 00 50 58 41 31 30 30 5c 53 55 4b 5c 41 31 2c 31 00 36 00 ce 00 26 00 50 5c 4c 44 52 5c 41 32 2c 41 33 5c 47 ┆ERS 6 P ADR A1,A4 UPDATE POINTER 6 PXA100 SUK A1,1 6 & P LDR A2,A3 G┆
0x5542…5592 45 54 20 57 4f 52 44 20 46 4f 52 20 43 4f 4e 56 45 52 53 49 4f 4e 00 36 00 e4 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 30 46 20 00 36 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 6 P ANK A2,/0F 6 & P LC A2,K:HXAS,A2 CONVERT TO AS┆
0x5592…55e2 43 49 49 20 00 36 01 22 00 14 00 50 5c 53 43 52 5c 41 32 2c 41 31 5c 53 54 4f 52 45 00 36 01 4c 00 0e 00 50 5c 53 52 4c 5c 41 33 2c 34 20 00 36 01 64 00 0e 00 50 5c 53 55 4b 5c 41 36 2c 31 20 00 36 01 76 00 12 00 50 5c 52 42 28 4e 5a 29 5c ┆CII 6 " P SCR A2,A1 STORE 6 L P SRL A3,4 6 d P SUK A6,1 6 v P RB(NZ) ┆
0x55e2…5632 (55, 0, 398) 58 41 31 30 30 20 00 36 01 88 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 34 00 37 00 0e 00 14 00 50 5c 52 54 4e 5c 41 31 34 5c 52 45 54 55 52 4e 20 00 37 00 20 00 06 00 50 2a 20 00 37 00 38 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 ┆XA100 6 P ADR A1,A4 7 P RTN A14 RETURN 7 P* 7 8 P EJECT IDENT ┆
0x5632…5682 43 3a 53 45 54 20 00 37 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 7 B F P******************* K : P T A *********************************** ┆
0x5682…56d2 00 37 00 5e 00 06 00 50 2a 20 00 37 00 a8 00 06 00 50 2a 20 00 37 00 b2 00 06 00 50 2a 20 00 37 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 37 00 c6 00 3e 00 50 2a 50 52 49 4e 54 53 20 43 4f 4e 43 ┆ 7 ^ P* 7 P* 7 P* 7 P*SUBROUTINE K : P T A 7 > P*PRINTS CONC┆
0x56d2…5722 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 37 00 e4 00 06 00 50 2a 20 00 37 01 26 00 06 00 50 2a 20 00 37 01 30 00 06 00 50 2a 20 00 37 01 3a ┆ENTRATOR & SIMULATED TERMINAL ADDRESSES ON OPT 7 P* 7 & P* 7 0 P* 7 :┆
0x5722…5770 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 37 01 44 00 06 00 50 2a 20 00 37 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 37 01 74 ┆ " P* CALL SEQUENCE: CF A14,K:PTA 7 D P* 7 j P* ENTRY PARAM: NONE 7 t┆
0x5770…57c0 (56, 0, 400) 00 06 00 50 2a 20 00 38 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 38 00 0e 00 14 00 50 2a 5c 5c 4b 3a 58 41 20 49 4e 20 43 3a 53 45 54 00 38 00 38 00 06 00 50 ┆ P* 8 & P* SUBROUTINES: K:PRTN IN C:FUA 8 P* K:XA IN C:SET 8 8 P┆
0x57c0…5810 2a 20 00 38 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 38 00 5a 00 06 00 50 2a 20 00 38 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 38 00 82 00 06 00 50 2a 20 ┆* 8 P P* RETURN PARAM: NONE 8 Z P* 8 x P* RETURN METOD: A14 8 P* ┆
0x5810…5860 00 38 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 38 00 a8 00 06 00 50 2a 20 00 38 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 ┆ 8 P* CHANGED REGS: A1-A7 8 P* 8 , P* STACKER NEED: 16 WORDS ON A14┆
0x5860…58b0 20 53 54 41 43 4b 45 52 00 38 00 d0 00 06 00 50 2a 20 00 38 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 38 01 0a 00 06 00 50 2a 20 00 38 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 8 P* 8 P* LIMITATIONS: 8 P* 8 $ P* CALLING TASK: O┆
0x58b0…5900 50 43 4f 4d 00 38 01 2e 00 06 00 50 2a 20 00 38 01 4c 00 06 00 50 2a 20 00 38 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 8 . P* 8 L P* 8 V D P************************************************┆
0x5900…5950 (57, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 38 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 39 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 ┆*************** 8 ` P EJECT IDENT C:SET 9 6 P****************************┆
0x5950…59a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 39 00 34 00 06 00 50 2a 20 00 39 00 6e 00 10 00 50 2a 5c 4b 20 3a 20 50 20 54 20 41 20 00 39 00 78 00 06 00 50 2a 20 00 39 00 8c 00 36 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************** 9 4 P* 9 n P* K : P T A 9 x P* 9 6 P**********┆
0x59a0…59f0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 39 00 96 00 06 00 50 2a 20 00 39 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 ┆**************************************** 9 P* 9 , P* EDIT AND PRINT CON┆
0x59f0…5a40 43 45 4e 54 52 41 54 4f 52 20 41 44 44 52 45 53 53 20 00 39 00 da 00 06 00 50 2a 20 00 39 01 0a 00 10 00 50 4b 3a 50 54 41 5c 45 51 55 5c 2a 20 00 39 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 9 P* 9 PK:PTA EQU * 9 . P LDKL A1,K:F305 GET OUTP┆
0x5a40…5a90 55 54 20 46 4f 52 4d 41 54 20 41 44 44 52 45 53 53 20 00 39 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 39 01 5a 00 28 00 50 5c 4c 44 4b 5c 41 34 2c ┆UT FORMAT ADDRESS 9 ( * P LD A3,K:CCA GET CONCENTRATOR ADDRESS 9 Z ( P LDK A4,┆
0x5a90…5ae0 (58, 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 39 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 3a 00 24 ┆4 NUMBER OF CHAR. TO CONVERT 9 , P CF A14,K:XA CONVERT AND STORE IN FORMAT : $┆
0x5ae0…5b30 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 3a 00 54 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 30 34 00 3a 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 ┆
0x5b30…5b80 00 3a 00 8c 00 06 00 50 2a 20 00 3a 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 3a 00 b2 00 06 00 50 2a 20 00 3a ┆ : P* : 6 P* EDIT AND PRINT ADDRESSES OF SPECIAL TERMINALS : P* :┆
0x5b80…5bd0 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 3a 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┆
0x5bd0…5c20 20 4f 46 20 54 45 52 4d 49 4e 41 4c 20 27 5a 27 00 3a 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 3a 01 58 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 27 20 5a 27 20 00 3a 01 7a 00 22 00 50 ┆ OF TERMINAL 'Z' : ( P RF(Z) PC200 NOT IN SYSTEM : X P LDKL A2,' Z' : z " P┆
0x5c20…5c70 (59, 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 3a 01 90 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 3b 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 ; & & P LDK A4,2 NBR OF CHAR. T┆
0x5c70…5cc0 4f 20 43 4f 4e 56 45 52 54 20 00 3b 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 3b 00 62 00 32 00 50 50 43 32 30 30 5c 4c 44 5c 41 33 2c 4b 3a ┆O CONVERT ; 8 , P CF A14,K:XA CONVERT AND STORE IN FORMAT ; b 2 PPC200 LD A3,K:┆
0x5cc0…5d10 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 3b 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 3b 00 c8 00 12 00 50 5c 4c 44 4b 4c 5c ┆CCS GET ADDRESS OF TERMINAL 'S' ; P RF(Z) PC240 NOT IN SYSTEM ; P LDKL ┆
0x5d10…5d60 41 32 2c 27 20 53 27 20 00 3b 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 3b 01 00 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 3b 01 26 00 26 00 50 5c 4c 44 4b 5c 41 34 2c ┆A2,' S' ; " P STR A2,A1 STORE SPACE AND 'S' ; P ADK A1,2 ; & & P LDK A4,┆
0x5d60…5dae 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 3b 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 3b 01 62 ┆2 NBR OF CHAR. TO CONVERT ; 8 , P CF A14,K:XA CONVERT AND STORE IN FORMAT ; b┆
0x5dae…5dfe (60, 0, 400) 00 10 00 50 50 43 32 34 30 5c 45 51 55 5c 2a 20 00 3c 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 3c 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 * < P LDKL A2,/100 EOL < ( P STR A2,A1 STORE EOL LAST IN F┆
0x5dfe…5e4e 4f 52 4d 41 54 20 00 3c 00 32 00 14 00 50 5c 53 55 4b 4c 5c 41 31 2c 4b 3a 46 43 31 31 20 00 3c 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 3c 00 76 ┆ORMAT < 2 P SUKL A1,K:FC11 < ^ * P SC A1,K:FC11-1 STORE LENGTH OF FORMAT < v┆
0x5e4e…5e9e 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 3c 00 a4 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 43 31 30 00 3c 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 3c ┆ P CF A14,K:PRTN PRINT FOMAT < P DATA K:FC10 < P EJECT IDENT C:SET <┆
0x5e9e…5eee 00 da 00 06 00 50 2a 20 00 3c 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 3c 01 00 00 06 00 50 2a 20 00 3c 01 38 00 22 ┆ P* < 4 P* EDIT AND PRINT ADDRESSES OF INQUIRY TEMINALS < P* < 8 "┆
0x5eee…5f3e 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 3c 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 0 P LDKL A1,K:FC13 GET ADDRESS OF OUTPUT FO┆
0x5f3e…5f8e (61, 0, 400) 52 4d 41 54 00 3c 01 68 00 10 00 50 50 43 33 31 30 5c 45 51 55 5c 2a 20 00 3d 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 3d 00 20 00 22 00 50 5c 52 ┆RMAT < h PPC310 EQU * = * P LD A3,K:CCSA,A5 GET TERMINAL ADDRESS = " P R┆
0x5f8e…5fde 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 3d 00 4e 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 27 20 27 20 00 3d 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 3d ┆F(Z) PC330 END OF TERMINALS = N P LDK A2,' ' = t P SCR A2,A1 STORE SPACE =┆
0x5fde…602e 00 88 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 31 20 00 3d 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 3d 00 b8 00 2c 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 41 5c 43 ┆ P ADK A1,1 = & P LDK A4,2 NBR OF CHAR. TO CONVERT = , P CF A14,K:XA C┆
0x602e…607e 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 3d 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 3d 01 12 00 28 00 50 5c 43 57 4b 5c 41 ┆ONVERT AND STORE IN FORMAT = $ P ADK A5,2 UPDATE TERMINAL INDEX = ( P CWK A┆
0x607e…60ce 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 3d 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 3d 01 66 00 10 00 50 50 43 33 33 30 5c ┆5,NSIM+NSIM END OF TERMINALS? = : P RB(NE) PC310 NEXT TERMINAL = f PPC330 ┆
0x60ce…611e (62, 0, 400) 45 51 55 5c 2a 20 00 3d 01 8a 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 31 00 3e 00 0e 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 30 31 20 00 3e 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 3e 00 34 ┆EQU * = P LDR A2,A1 > P ANK A2,/01 > P RF(Z) PC340 EVEN BYTES > 4┆
0x611e…616e 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 3e 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 3e 00 7e 00 0e 00 50 ┆ & P LDK A2,' ' ADD SPACE IF ODD BYTES > T P SCR A2,A1 STORE IN FORMAT > ~ P┆
0x616e…61be 5c 41 44 4b 5c 41 31 2c 31 20 00 3e 00 a0 00 10 00 50 50 43 33 34 30 5c 45 51 55 5c 2a 20 00 3e 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 3e 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 > PPC340 EQU * > P LDKL A2,/100 EOL > & P STR A2,A1 PUT E┆
0x61be…620e 4f 4c 20 4c 41 53 54 20 49 4e 20 46 4f 52 4d 41 54 20 00 3e 00 e0 00 14 00 50 5c 53 55 4b 4c 5c 41 31 2c 4b 3a 46 43 31 33 20 00 3e 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 > P SUKL A1,K:FC13 > ( P SC A1,K:FC13-1 PUT LENGTH IN ┆
0x620e…625e 46 4f 52 4d 41 54 00 3e 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 3e 01 4e 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 43 31 32 00 3e 01 72 00 06 00 50 2a 20 00 3e 01 86 00 0e 00 50 ┆FORMAT > " P CF A14,K:PRTN PRINT FORMAT > N P DATA K:FC12 > r P* > P┆
0x625e…62ae (63, 2, 102) 2a 20 20 20 52 45 54 55 52 4e 00 3e 01 90 00 06 00 50 2a 20 00 3f 00 12 00 10 00 50 50 43 52 45 54 5c 45 51 55 5c 2a 20 00 3f 00 1c 00 08 00 50 5c 58 49 46 00 3f 00 30 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 3f 00 3c 00 06 00 50 2a 20 00 3f ┆* RETURN > P* ? PPCRET EQU * ? P XIF ? 0 P RTN A14 ? < P* ?┆
0x62ae…62c4 00 4c 00 08 00 50 5c 45 4e 44 00 3f 00 56 40 04 00 00 00 3f 00 62 ┆ L P END ? V@ ? b┆
0x62c4…62cc (64, 1, 8) 20 04 00 00 00 40 00 04 ┆ @ ┆