|
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: 26946 (0x6942)
Notes: pts_type(SC)
Names: »C:FIC.SC«
└─⟦2a21e4bb5⟧ Bits:30009691 Philips computer tape "600408"
└─⟦this⟧ »BDKAPP/C:FIC.SC«
IDENT C:FIC CONPAC REL=0.0 DATE= 77.10.12 UPDATE #9 77.09.29 JES *************************************************************** * * CONCENTRATOR APPLICATION PACKAGE PEAB-T * * PROGRAMMER: PER OMAN / PAN * * * C : F I C * * * * * THIS MODULE HANDLES CONFIGURATION LIST * COMMANDS: PRINT, READ AND WRITE ON CASSETTE * * * * * THIS MODULE RUNS UNDER TASK: OPCOM * * * THE MODULE CONTAINS THE SUBROUTINES: * * NAME REVDAT VERSION * * K:PC 76-04-09 * K:RC 77.08.12 * K:WC 77.08.12 * K:CLRC 77.09.26 * **************************************************************** EJECT IDENT C:FIC C:FIC * * * ENTRY ADDRESSES * *************************************************************** * * ENTRY DESCRIPTION * ENTRY K:PC PRINT CONFIGURATION LIST ENTRY K:RC READ CONF. LIST FROM CASSETTE ENTRY K:WC WRITE CONF. LIST ON CASSETTE ENTRY K:CLRC CLEAR CONF LIST AND TCWB EJECT IDENT C:FIC C:FIC * * * EXTERNAL REFERENSES * *************************************************************** * * ADDRESS IN MODULE * * EXTRN K:CCA C:TCA EXTRN K:CCZ EXTRN K:CCS EXTRN K:CCSA * EXTRN K:PRTN C:FUA EXTRN K:PRTT EXTRN K:PRT * EXTRN K:F102 C:TXT EXTRN K:F300 EXTRN K:F303 EXTRN K:F311 EXTRN K:F313 EXTRN K:F314 EXTRN K:F327 EXTRN K:F328 EXTRN K:F371 EXTRN K:F378 * EXTRN K:LTC C:FIG EXTRN K:CONF EXTRN K:LEND EXTRN K:LST EXTRN K:CONE EXTRN K:TCP EXTRN K:TCPE EXTRN K:TCE * EXTRN K:SCS C:SIC * EXTRN K:BPCT C:BPL * EXTRN K:LTA C:SET EXTRN K:PTA EXTRN K:XA * * * 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:FIC CONPAC REL=0.0 DATE= 77.10.12 «, t00=0x0000, t01=0x0004}
0x0034…0056 Head {h00=0x001e, h01=0x0050, text=» UPDATE #9 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…00da Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR APPLICATION PACKAGE PEAB-T«, t00=0x0000, t01=0x00ac}
0x00da…00e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00de}
0x00e4…010a Head {h00=0x0022, h01=0x0050, text=»* PROGRAMMER: PER OMAN / PAN «, t00=0x0000, t01=0x00e8}
0x010a…0114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…011e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0132 Head {h00=0x0010, h01=0x0050, text=»* C : F I C «, t00=0x0000, t01=0x0122}
0x0132…013c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…0146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0140}
0x0146…0154 Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0000, t01=0x014a}
0x0154…0186 Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE HANDLES CONFIGURATION LIST«, t00=0x0000, t01=0x0158}
0x0186…01be Head {h00=0x0034, h01=0x0050, text=»* COMMANDS: PRINT, READ AND WRITE ON CASSETTE «, t00=0x0000, t01=0x018a}
0x01be…01cc Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0032}
0x01cc…01d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0040}
0x01d6…01e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004a}
0x01e0…020e Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE RUNS UNDER TASK: OPCOM «, t00=0x0001, t01=0x0054}
0x020e…0218 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0082}
0x0218…0222 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008c}
0x0222…0250 Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x0096}
0x0250…025a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c4}
0x025a…0278 Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x00ce}
0x0278…0282 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ec}
0x0282…029a Head {h00=0x0014, h01=0x0050, text=»* K:PC 76-04-09 «, t00=0x0001, t01=0x00f6}
0x029a…02b2 Head {h00=0x0014, h01=0x0050, text=»* K:RC 77.08.12 «, t00=0x0001, t01=0x010e}
0x02b2…02ca Head {h00=0x0014, h01=0x0050, text=»* K:WC 77.08.12 «, t00=0x0001, t01=0x0126}
0x02ca…02e4 Head {h00=0x0016, h01=0x0050, text=»* K:CLRC 77.09.26 «, t00=0x0001, t01=0x013e}
0x02e4…02ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0158}
0x02ee…0336 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x0162}
0x0336…035a Head {h00=0x0020, h01=0x0050, text=» EJECT IDENT C:FIC C:FIC«, t00=0x0002, t01=0x001a}
0x035a…0364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003e}
0x0364…036e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0048}
0x036e…0388 Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0052}
0x0388…0392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006c}
0x0392…03da Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0076}
0x03da…03e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00be}
0x03e4…0400 Head {h00=0x0018, h01=0x0050, text=»* ENTRY DESCRIPTION«, t00=0x0002, t01=0x00c8}
0x0400…040a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e4}
0x040a…0436 Head {h00=0x0028, h01=0x0050, text=» ENTRY K:PC PRINT CONFIGURATION LIST«, t00=0x0002, t01=0x00ee}
0x0436…0468 Head {h00=0x002e, h01=0x0050, text=» ENTRY K:RC READ CONF. LIST FROM CASSETTE «, t00=0x0002, t01=0x011a}
0x0468…0498 Head {h00=0x002c, h01=0x0050, text=» ENTRY K:WC WRITE CONF. LIST ON CASSETTE«, t00=0x0002, t01=0x014c}
0x0498…04c6 Head {h00=0x002a, h01=0x0050, text=» ENTRY K:CLRC CLEAR CONF LIST AND TCWB«, t00=0x0002, t01=0x017c}
0x04c6…04ea Head {h00=0x0020, h01=0x0050, text=» EJECT IDENT C:FIC C:FIC«, t00=0x0003, t01=0x001a}
0x04ea…04f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003e}
0x04f4…04fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0048}
0x04fe…051c Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x0052}
0x051c…0526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…056e Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x007a}
0x056e…0578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c2}
0x0578…0594 Head {h00=0x0018, h01=0x0050, text=»* ADDRESS IN MODULE«, t00=0x0003, t01=0x00cc}
0x0594…059e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e8}
0x059e…05a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f2}
0x05a8…05c2 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:CCA C:TCA«, t00=0x0003, t01=0x00fc}
0x05c2…05d6 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCZ«, t00=0x0003, t01=0x0116}
0x05d6…05ea Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCS«, t00=0x0003, t01=0x012a}
0x05ea…0600 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCSA «, t00=0x0003, t01=0x013e}
0x0600…060a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0154}
0x060a…0626 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:PRTN C:FUA «, t00=0x0003, t01=0x015e}
0x0626…063c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:PRTT «, t00=0x0003, t01=0x017a}
0x063c…0650 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:PRT«, t00=0x0003, t01=0x0190}
0x0650…065a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0014}
0x065a…0676 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F102 C:TXT «, t00=0x0004, t01=0x001e}
0x0676…068c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F300 «, t00=0x0004, t01=0x003a}
0x068c…06a2 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F303 «, t00=0x0004, t01=0x0050}
0x06a2…06b8 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F311 «, t00=0x0004, t01=0x0066}
0x06b8…06ce Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F313 «, t00=0x0004, t01=0x007c}
0x06ce…06e4 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F314 «, t00=0x0004, t01=0x0092}
0x06e4…06fa Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F327 «, t00=0x0004, t01=0x00a8}
0x06fa…0710 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F328 «, t00=0x0004, t01=0x00be}
0x0710…0726 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F371 «, t00=0x0004, t01=0x00d4}
0x0726…073c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F378 «, t00=0x0004, t01=0x00ea}
0x073c…0746 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0100}
0x0746…0760 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:LTC C:FIG«, t00=0x0004, t01=0x010a}
0x0760…0776 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CONF «, t00=0x0004, t01=0x0124}
0x0776…078c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LEND «, t00=0x0004, t01=0x013a}
0x078c…07a0 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LST«, t00=0x0004, t01=0x0150}
0x07a0…07b6 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CONE «, t00=0x0004, t01=0x0164}
0x07b6…07ca Head {h00=0x0010, h01=0x0050, text=» EXTRN K:TCP«, t00=0x0004, t01=0x017a}
0x07ca…07e0 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TCPE «, t00=0x0004, t01=0x018e}
0x07e0…07f4 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:TCE«, t00=0x0005, t01=0x0014}
0x07f4…07fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0028}
0x07fe…0818 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:SCS C:SIC«, t00=0x0005, t01=0x0032}
0x0818…0822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004c}
0x0822…083e Head {h00=0x0018, h01=0x0050, text=» EXTRN K:BPCT C:BPL «, t00=0x0005, t01=0x0056}
0x083e…0848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0072}
0x0848…0862 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:LTA C:SET«, t00=0x0005, t01=0x007c}
0x0862…0876 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:PTA«, t00=0x0005, t01=0x0096}
0x0876…088a Head {h00=0x0010, h01=0x0050, text=» EXTRN K:XA «, t00=0x0005, t01=0x00aa}
0x088a…0894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00be}
0x0894…089e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c8}
0x089e…08ee Head {h00=0x004c, h01=0x0050, text=»* HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0005, t01=0x00d2}
0x08ee…08f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0122}
0x08f8…0906 Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0005, t01=0x012c}
0x0906…0910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013a}
0x0910…091a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0144}
0x091a…0924 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x014e}
0x0924…092e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0158}
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…0b68 Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0007, t01=0x004a}
0x0b68…0b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007c}
0x0b72…0b88 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x0086}
0x0b88…0b92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009c}
0x0b92…0ba6 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0007, t01=0x00a6}
0x0ba6…0bbc Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0007, t01=0x00ba}
0x0bbc…0bd0 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0007, t01=0x00d0}
0x0bd0…0be6 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0007, t01=0x00e4}
0x0be6…0bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fa}
0x0bf0…0c10 Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0007, t01=0x0104}
0x0c10…0c26 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0007, t01=0x0124}
0x0c26…0c3a Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0007, t01=0x013a}
0x0c3a…0c50 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0007, t01=0x014e}
0x0c50…0c6c Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0007, t01=0x0164}
0x0c6c…0c76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0180}
0x0c76…0c98 Head {h00=0x001e, h01=0x0050, text=»* FORMS FOR FORMAT CODES«, t00=0x0007, t01=0x018a}
0x0c98…0ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x001c}
0x0ca2…0ccc Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0008, t01=0x0026}
0x0ccc…0cf0 Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0008, t01=0x0050}
0x0cf0…0d16 Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0008, t01=0x0074}
0x0d16…0d48 Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0008, t01=0x009a}
0x0d48…0d7a Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0008, t01=0x00cc}
0x0d7a…0da8 Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0008, t01=0x00fe}
0x0da8…0dd4 Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0008, t01=0x012c}
0x0dd4…0df2 Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0008, t01=0x0158}
0x0df2…0e12 Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0008, t01=0x0176}
0x0e12…0e34 Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0009, t01=0x0008}
0x0e34…0e5e Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0009, t01=0x002a}
0x0e5e…0e74 Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x0009, t01=0x0054}
0x0e74…0e8c Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0009, t01=0x006a}
0x0e8c…0ea6 Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0009, t01=0x0082}
0x0ea6…0ecc Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x0009, t01=0x009c}
0x0ecc…0ef4 Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x0009, t01=0x00c2}
0x0ef4…0f1a Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x0009, t01=0x00ea}
0x0f1a…0f42 Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x0009, t01=0x0110}
0x0f42…0f6c Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x0009, t01=0x0138}
0x0f6c…0f98 Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x0009, t01=0x0162}
0x0f98…0fc2 Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x0009, t01=0x018e}
0x0fc2…0fee Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x000a, t01=0x0028}
0x0fee…100a Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000a, t01=0x0054}
0x100a…1014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0070}
0x1014…1034 Head {h00=0x001c, h01=0x0050, text=»* CONSTANT TCA EQUATES«, t00=0x000a, t01=0x007a}
0x1034…103e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x009a}
0x103e…1052 Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000a, t01=0x00a4}
0x1052…1066 Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000a, t01=0x00b8}
0x1066…107a Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000a, t01=0x00cc}
0x107a…1090 Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000a, t01=0x00e0}
0x1090…10a6 Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000a, t01=0x00f6}
0x10a6…10bc Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000a, t01=0x010c}
0x10bc…10d0 Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000a, t01=0x0122}
0x10d0…10e6 Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000a, t01=0x0136}
0x10e6…10fa Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000a, t01=0x014c}
0x10fa…110e Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000a, t01=0x0160}
0x110e…1122 Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000a, t01=0x0174}
0x1122…1136 Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000a, t01=0x0188}
0x1136…1140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000c}
0x1140…1164 Head {h00=0x0020, h01=0x0050, text=»* LINE WORKBLOCKS EQUATES «, t00=0x000b, t01=0x0016}
0x1164…116e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003a}
0x116e…118a Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000b, t01=0x0044}
0x118a…11ac Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000b, t01=0x0060}
0x11ac…11d0 Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000b, t01=0x0082}
0x11d0…11f4 Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000b, t01=0x00a6}
0x11f4…121e Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000b, t01=0x00ca}
0x121e…1234 Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000b, t01=0x00f4}
0x1234…124a Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000b, t01=0x010a}
0x124a…1254 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0120}
0x1254…1274 Head {h00=0x001c, h01=0x0050, text=»* TC WORKBLOCK EQUATES«, t00=0x000b, t01=0x012a}
0x1274…127e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014a}
0x127e…1290 Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000b, t01=0x0154}
0x1290…12a4 Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000b, t01=0x0166}
0x12a4…12b8 Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000b, t01=0x017a}
0x12b8…12cc Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000b, t01=0x018e}
0x12cc…12e2 Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000c, t01=0x0012}
0x12e2…12f8 Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000c, t01=0x0028}
0x12f8…130e Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000c, t01=0x003e}
0x130e…132a Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000c, t01=0x0054}
0x132a…1334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0070}
0x1334…1362 Head {h00=0x002a, h01=0x0050, text=»* CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000c, t01=0x007a}
0x1362…136c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00a8}
0x136c…1380 Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000c, t01=0x00b2}
0x1380…1394 Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000c, t01=0x00c6}
0x1394…13a8 Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000c, t01=0x00da}
0x13a8…13bc Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000c, t01=0x00ee}
0x13bc…13d0 Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000c, t01=0x0102}
0x13d0…13e4 Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000c, t01=0x0116}
0x13e4…13f8 Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000c, t01=0x012a}
0x13f8…140c Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000c, t01=0x013e}
0x140c…1420 Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000c, t01=0x0152}
0x1420…1434 Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000c, t01=0x0166}
0x1434…1448 Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000c, t01=0x017a}
0x1448…145c Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000c, t01=0x018e}
0x145c…1466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0012}
0x1466…1486 Head {h00=0x001c, h01=0x0050, text=»* CC WORKBLOCK EQUATES«, t00=0x000d, t01=0x001c}
0x1486…1490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003c}
0x1490…14b6 Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000d, t01=0x0046}
0x14b6…14ca Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000d, t01=0x006c}
0x14ca…14de Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000d, t01=0x0080}
0x14de…1508 Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000d, t01=0x0094}
0x1508…1530 Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000d, t01=0x00be}
0x1530…1546 Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000d, t01=0x00e6}
0x1546…155c Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000d, t01=0x00fc}
0x155c…1578 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000d, t01=0x0112}
0x1578…1582 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x012e}
0x1582…15a8 Head {h00=0x0022, h01=0x0050, text=»* NETWORK WORKBLOCK EQUATES«, t00=0x000d, t01=0x0138}
0x15a8…15b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x015e}
0x15b2…15e0 Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000d, t01=0x0168}
0x15e0…1604 Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000e, t01=0x0008}
0x1604…160e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002c}
0x160e…1630 Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000e, t01=0x0036}
0x1630…1646 Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000e, t01=0x0058}
0x1646…165c Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000e, t01=0x006e}
0x165c…1672 Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000e, t01=0x0084}
0x1672…1688 Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000e, t01=0x009a}
0x1688…169e Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000e, t01=0x00b0}
0x169e…16b4 Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000e, t01=0x00c6}
0x16b4…16ca Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000e, t01=0x00dc}
0x16ca…16e0 Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000e, t01=0x00f2}
0x16e0…16f6 Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000e, t01=0x0108}
0x16f6…170c Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000e, t01=0x011e}
0x170c…1722 Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000e, t01=0x0134}
0x1722…172c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014a}
0x172c…1750 Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000e, t01=0x0154}
0x1750…1774 Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000e, t01=0x0178}
0x1774…1798 Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000f, t01=0x000c}
0x1798…17a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0030}
0x17a2…17c6 Head {h00=0x0020, h01=0x0050, text=»* CC TEXT-INTERVAL EQUATES «, t00=0x000f, t01=0x003a}
0x17c6…17d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005e}
0x17d0…17e4 Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x000f, t01=0x0068}
0x17e4…17f8 Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x000f, t01=0x007c}
0x17f8…180c Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x000f, t01=0x0090}
0x180c…1820 Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x000f, t01=0x00a4}
0x1820…1834 Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x000f, t01=0x00b8}
0x1834…1848 Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x000f, t01=0x00cc}
0x1848…185c Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x000f, t01=0x00e0}
0x185c…1870 Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x000f, t01=0x00f4}
0x1870…1884 Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x000f, t01=0x0108}
0x1884…1898 Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x000f, t01=0x011c}
0x1898…18ac Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x000f, t01=0x0130}
0x18ac…18c0 Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x000f, t01=0x0144}
0x18c0…18dc Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000f, t01=0x0158}
0x18dc…18e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0174}
0x18e6…1916 Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x000f, t01=0x017e}
0x1916…1920 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x001e}
0x1920…1952 Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x0010, t01=0x0028}
0x1952…1990 Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x0010, t01=0x005a}
0x1990…19c2 Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0010, t01=0x0098}
0x19c2…19cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ca}
0x19cc…19ec Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0010, t01=0x00d4}
0x19ec…1a00 Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0010, t01=0x00f4}
0x1a00…1a14 Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0010, t01=0x0108}
0x1a14…1a28 Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0010, t01=0x011c}
0x1a28…1a3c Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0010, t01=0x0130}
0x1a3c…1a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0144}
0x1a46…1a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x014e}
0x1a50…1a7c Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0010, t01=0x0158}
0x1a7c…1aa8 Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0010, t01=0x0184}
0x1aa8…1ac4 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0011, t01=0x0020}
0x1ac4…1b04 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x003c}
0x1b04…1b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007c}
0x1b0e…1b34 Head {h00=0x0022, h01=0x0050, text=»* SYSTEM ADAPTION PARAMETERS«, t00=0x0011, t01=0x0086}
0x1b34…1b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ac}
0x1b3e…1b5e Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0011, t01=0x00b6}
0x1b5e…1b80 Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /2F ENTRY K KEY«, t00=0x0011, t01=0x00d6}
0x1b80…1ba2 Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /28 ENTER U KEY«, t00=0x0011, t01=0x00f8}
0x1ba2…1bca Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /2A END OF RECORD KEY «, t00=0x0011, t01=0x011a}
0x1bca…1bec Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /23 CANCEL KEY «, t00=0x0011, t01=0x0142}
0x1bec…1c14 Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0011, t01=0x0164}
0x1c14…1c4e Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 40 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0011, t01=0x018c}
0x1c4e…1c8c Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 3000 CC EXCHANGE REQUEST TIME OUT (X100 MS)«, t00=0x0012, t01=0x0036}
0x1c8c…1ca4 Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0012, t01=0x0074}
0x1ca4…1cda Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1100 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0012, t01=0x008c}
0x1cda…1d1a Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0012, t01=0x00c2}
0x1d1a…1d52 Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 128 LENGTH OF CASSETTE BUFFER (WORDS)«, t00=0x0012, t01=0x0102}
0x1d52…1d7e Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 60 KB BUF LENGTH IN WORDS «, t00=0x0012, t01=0x013a}
0x1d7e…1da6 Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0012, t01=0x0166}
0x1da6…1dd2 Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0012, t01=0x018e}
0x1dd2…1e08 Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0013, t01=0x002a}
0x1e08…1e46 Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1100 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0013, t01=0x0060}
0x1e46…1e54 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x009e}
0x1e54…1ea8 Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0013, t01=0x00ac}
0x1ea8…1ed2 Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0013, t01=0x0100}
0x1ed2…1ef6 Head {h00=0x0020, h01=0x0050, text=» LEFT BYTE = SELECT ADDR. «, t00=0x0013, t01=0x012a}
0x1ef6…1f18 Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE = POLL ADDR.«, t00=0x0013, t01=0x014e}
0x1f18…1f54 Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0013, t01=0x0170}
0x1f54…1f72 Head {h00=0x001a, h01=0x0050, text=» AND SYSTEM MESSAGES«, t00=0x0014, t01=0x001c}
0x1f72…1faa Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0014, t01=0x003a}
0x1faa…1fe0 Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0014, t01=0x0072}
0x1fe0…1fe4 Head {h00=0x0054, h01=0x0050}
0x1fe4…1fe8 Head {h00=0x2a20, h01=0x5349}
0x1fe8…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 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 ┆MULATED TERMINAL ADDRESSES FOR INQUIRY. RIGHT BYTE. IF SPECIFIED AT SYST┆
0x2030…2080 45 4d 20 47 00 14 00 a8 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 00 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 24 00 16 00 50 4b 3a 53 41 33 5c ┆EM G PK:SA1 EQU 0 SIM. TERM. NBR 1 PK:SA2 EQU 0 NBR 2 $ PK:SA3 ┆
0x2080…20cc 45 51 55 5c 30 5c 4e 42 52 20 33 20 00 14 01 3e 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 58 00 16 00 50 4b 3a 53 41 35 5c 45 51 55 5c 30 5c 4e 42 52 20 35 20 00 14 01 72 00 16 00 50 4b 3a 53 41 ┆EQU 0 NBR 3 > PK:SA4 EQU 0 NBR 4 X PK:SA5 EQU 0 NBR 5 r PK:SA┆
0x20cc…211c (21, 0, 400) 36 5c 45 51 55 5c 30 5c 4e 42 52 20 36 20 00 14 01 8c 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 16 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 30 00 16 00 50 4b 3a 53 41 39 5c ┆6 EQU 0 NBR 6 PK:SA7 EQU 0 NBR 7 PK:SA8 EQU 0 NBR 8 0 PK:SA9 ┆
0x211c…216c 45 51 55 5c 30 5c 4e 42 52 20 39 20 00 15 00 4a 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 64 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 80 00 18 00 50 4b 3a 53 41 ┆EQU 0 NBR 9 J PK:SA10 EQU 0 NBR 10 d PK:SA11 EQU 0 NBR 11 PK:SA┆
0x216c…21bc 31 32 5c 45 51 55 5c 30 5c 4e 42 52 20 31 32 20 00 15 00 9c 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 b8 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 00 d4 00 18 00 50 ┆12 EQU 0 NBR 12 PK:SA13 EQU 0 NBR 13 PK:SA14 EQU 0 NBR 14 P┆
0x21bc…220c 4b 3a 53 41 31 35 5c 45 51 55 5c 30 5c 4e 42 52 20 31 35 20 00 15 00 f0 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 0c 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 28 ┆K:SA15 EQU 0 NBR 15 PK:SA16 EQU 0 NBR 16 PK:SA17 EQU 0 NBR 17 (┆
0x220c…225c 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 44 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 15 01 60 00 18 00 50 4b 3a 53 41 32 30 5c 45 51 55 5c 30 5c 4e 42 52 20 32 30 20 ┆ PK:SA18 EQU 0 NBR 18 D PK:SA19 EQU 0 NBR 19 ` PK:SA20 EQU 0 NBR 20 ┆
0x225c…22ac (22, 0, 400) 00 15 01 7c 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 08 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 24 00 18 00 50 4b 3a 53 41 32 33 5c 45 51 55 5c 30 5c 4e 42 52 ┆ | PK:SA21 EQU 0 NBR 21 PK:SA22 EQU 0 NBR 22 $ PK:SA23 EQU 0 NBR┆
0x22ac…22fc 20 32 33 20 00 16 00 40 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 5c 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 78 00 18 00 50 4b 3a 53 41 32 36 5c 45 51 55 5c 30 ┆ 23 @ PK:SA24 EQU 0 NBR 24 PK:SA25 EQU 0 NBR 25 x PK:SA26 EQU 0┆
0x22fc…234c 5c 4e 42 52 20 32 36 20 00 16 00 94 00 0a 00 50 5c 45 4a 45 43 54 00 16 00 b0 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 ┆ NBR 26 P EJECT < P**************************************************┆
0x234c…239c 2a 2a 2a 2a 2a 20 00 16 00 be 00 06 00 50 2a 20 00 16 00 fe 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 08 00 28 00 50 2a 20 20 20 4f 46 20 43 ┆***** P* , P* PARAMETERS FOR CONDITIONAL ASSEMBLY ( P* OF C┆
0x239c…23ec 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 38 00 06 00 50 2a 20 00 16 01 64 00 3c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ONCENTRATOR PACKAGE MODULES 8 P* d < P**********************************┆
0x23ec…243c (23, 0, 400) 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 6e 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 1e 00 20 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 45 52 4d 49 ┆********************* n PX:A EQU 2 * NLINE <=10 P NUMBER OF TERMI┆
0x243c…248c 4e 41 4c 20 4c 49 4e 45 53 20 00 17 00 3e 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 62 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 ┆NAL LINES > PX:B EQU 80 * NTC <=80 b . P TOTAL NUMBER OF TC:S ON TERMI┆
0x248c…24dc 4e 41 4c 20 4c 49 4e 45 53 20 00 17 00 80 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 b2 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 ┆NAL LINES PX:C EQU 26 * NSIM <=26 $ P NUMBER OF SIMULATED TERMINA┆
0x24dc…252c 4c 53 00 17 00 d2 00 14 00 50 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 17 00 fa 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 12 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4d 55 4c 54 49 50 4f 49 4e ┆LS P FOR INQUIRIES PX:D EQU 0 * LOOP . P IF = 0. MULTIPOIN┆
0x252c…257c 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 2c 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 17 01 5e 00 1c 00 50 ┆T CONFIG. DOWNSTREAMS , . P IF = 1. LOOP CONFIGURATION DOWNSTREAMS ^ P┆
0x257c…25cc (24, 0, 400) 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 17 01 90 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 20 00 22 00 50 5c 5c 5c 46 ┆X:E EQU 4 * NSPOOL <=4 ( P NUMBER OF EDIT BUFFERS FOR SPOOL " P F┆
0x25cc…261c 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 4c 00 20 00 50 58 3a 46 5c 45 51 55 5c 33 5c 2a 20 20 30 3c 20 4e 54 50 4c 49 4e 20 3c 3d 33 30 20 00 18 00 72 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 ┆UNCTION TO OPERATORS TERM. L PX:F EQU 3 * 0< NTPLIN <=30 r ( P NUMBER ┆
0x261c…266c 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 96 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 00 c2 00 1e 00 50 58 3a 47 5c ┆OF TRASKS IN POOL 'TPLIN' & P HANDLING TRANSACTIONS FROM TC:S PX:G ┆
0x266c…26bc 45 51 55 5c 34 5c 2a 20 20 30 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 18 00 ec 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 0e 00 2c 00 50 5c 5c 5c 48 41 4e ┆EQU 4 * 0< NTPSUP <=5 ( P NUMBER OF TRASKS IN POOL 'TPSUP' , P HAN┆
0x26bc…270c 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 3a 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 18 01 6a 00 18 00 50 58 3a 48 5c 45 51 ┆DLING TRANSACTIONS FROM MAIN FRAME : P OR OPERATORS TERMINAL j PX:H EQ┆
0x270c…275c (25, 0, 400) 55 5c 31 5c 2a 20 20 4c 49 4e 54 53 54 20 00 18 01 8a 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 16 00 30 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 49 4e 45 20 54 45 ┆U 1 * LINTST $ P IF = 0. NO LINE TEST COMMAND 0 P IF = 1. LINE TE┆
0x275c…27ac 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 3e 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 72 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4f 46 46 20 4c 49 4e ┆ST FACILITY (4-WIRE ONLY) > PX:I EQU 2 * ONLINE r $ P IF = 0. OFF LIN┆
0x27ac…27fc 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 19 00 8e 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 b6 00 24 00 50 5c 5c 5c 49 46 20 3d 20 32 2e 20 4f 4e 20 ┆E CONCENTRATOR ( P IF = 1. ON/OFF LINE CONCENTRATOR $ P IF = 2. ON ┆
0x27fc…284c 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 19 00 e2 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 0a 00 06 00 50 2a 20 00 19 01 26 00 06 00 50 2a 20 00 19 01 30 00 06 00 50 2a 20 00 19 01 3a ┆LINE CONCENTRATOR PX:K EQU 1 * SETADR P* & P* 0 P* :┆
0x284c…289c 00 06 00 50 2a 20 00 19 01 44 00 06 00 50 2a 20 00 19 01 4e 00 06 00 50 2a 20 00 19 01 58 00 06 00 50 2a 20 00 19 01 62 00 06 00 50 2a 20 00 19 01 6c 00 06 00 50 2a 20 00 19 01 76 00 0a 00 50 5c 4c 49 53 54 20 00 19 01 80 00 18 00 50 5c 45 ┆ P* D P* N P* X P* b P* l P* v P LIST P E┆
0x289c…28ec (26, 0, 400) 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 00 19 01 8e 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 ┆JECT IDENT C:FIC < P******************************************************┆
0x28ec…293c 2a 20 00 1a 00 1a 00 06 00 50 2a 20 00 1a 00 5a 00 2c 00 50 2a 20 20 20 50 41 52 41 4d 45 54 45 52 53 20 46 4f 52 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 1a 00 64 00 22 00 50 2a 20 20 20 53 50 45 43 49 46 49 45 ┆* P* Z , P* PARAMETERS FOR CONDITIONAL ASSEMBLY d " P* SPECIFIE┆
0x293c…298c 44 20 49 4e 20 4d 4f 44 55 4c 45 20 43 3a 45 51 55 20 00 1a 00 94 00 06 00 50 2a 20 00 1a 00 ba 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 ┆D IN MODULE C:EQU P* < P********************************************┆
0x298c…29dc 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1a 00 c4 00 2e 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 01 04 00 18 00 50 5c 5c 5c 55 53 45 44 20 46 4f ┆*********** . PNSIM EQU X:C NUMBER OF SIMULATED TERMINALS P USED FO┆
0x29dc…2a2c 52 20 49 4e 51 55 49 52 59 20 00 1a 01 36 00 20 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 1a 01 52 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 ┆R INQUIRY 6 P EJECT IDENT C:FIC C:FIC R F P******************* K : P ┆
0x2a2c…2a7c (27, 0, 400) 43 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 1a 01 76 00 06 00 50 2a 20 00 1b 00 30 00 06 00 50 2a 20 00 1b 00 3a 00 06 00 50 2a 20 00 1b 00 44 00 18 00 50 2a 53 ┆C ************************************* v P* 0 P* : P* D P*S┆
0x2a7c…2acc 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 50 20 43 00 1b 00 4e 00 26 00 50 2a 50 52 49 4e 54 53 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 4c 49 53 54 20 4f 4e 20 4f 50 54 20 00 1b 00 6a 00 06 00 50 2a 20 00 1b 00 94 00 06 00 50 2a 20 ┆UBROUTINE K : P C N & P*PRINTS CONFIGURATION LIST ON OPT j P* P* ┆
0x2acc…2b1c 00 1b 00 9e 00 06 00 50 2a 20 00 1b 00 a8 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 43 20 00 1b 00 b2 00 06 00 50 2a 20 00 1b 00 d8 00 1a 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 ┆ P* " P* CALL SEQUENCE: CF A14,K:PC P* P* ENTRY PARA┆
0x2b1c…2b6c 4d 3a 5c 4e 4f 4e 45 20 00 1b 00 e2 00 06 00 50 2a 20 00 1b 01 00 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 1b 01 0a 00 16 00 50 2a 5c 5c 4b 3a 50 54 41 20 49 4e 20 ┆M: NONE P* & P* SUBROUTINES: K:PRTN IN C:FUA P* K:PTA IN ┆
0x2b6c…2bbc 43 3a 53 45 54 20 00 1b 01 34 00 06 00 50 2a 20 00 1b 01 4e 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 1b 01 58 00 06 00 50 2a 20 00 1b 01 76 00 18 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a ┆C:SET 4 P* N P* RETURN PARAM: NONE X P* v P* RETURN METOD:┆
0x2bbc…2c0c (28, 0, 400) 5c 41 31 34 00 1b 01 80 00 06 00 50 2a 20 00 1c 00 0c 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 1c 00 16 00 06 00 50 2a 20 00 1c 00 34 00 2c 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 ┆ A14 P* P* CHANGED REGS: A1-A7 P* 4 , P* STACKER NEED: 1┆
0x2c0c…2c5c 38 20 57 4f 52 44 53 20 4f 4e 20 41 31 34 20 53 54 41 43 4b 45 52 00 1c 00 3e 00 06 00 50 2a 20 00 1c 00 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 00 78 00 06 00 50 2a 20 00 1c 00 92 00 1a 00 50 2a 20 20 43 ┆8 WORDS ON A14 STACKER > P* n P* LIMITATIONS: x P* P* C┆
0x2c5c…2cac 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 4f 50 43 4f 4d 00 1c 00 9c 00 06 00 50 2a 20 00 1c 00 ba 00 06 00 50 2a 20 00 1c 00 c4 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 ┆ALLING TASK: OPCOM P* P* D P**********************************┆
0x2cac…2cfc 2a 2a 2a 2a 2a 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 00 ce 00 20 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 1c 01 16 00 06 00 50 2a 20 00 1c 01 3a ┆***************************** P EJECT IDENT C:FIC C:FIC P* :┆
0x2cfc…2d4c 00 0e 00 50 2a 5c 5c 4b 20 3a 20 50 20 43 00 1c 01 44 00 06 00 50 2a 20 00 1c 01 56 00 1c 00 50 2a 20 20 20 50 52 49 4e 54 20 54 49 4d 45 20 41 4e 44 20 44 41 54 45 20 00 1c 01 60 00 06 00 50 2a 20 00 1c 01 80 00 0e 00 50 4b 3a 50 43 5c 45 ┆ P* K : P C D P* V P* PRINT TIME AND DATE ` P* PK:PC E┆
0x2d4c…2d9c (29, 0, 400) 51 55 5c 2a 00 1c 01 8a 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 54 00 1d 00 0c 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 31 30 32 00 1d 00 22 00 06 00 50 2a 20 00 1d 00 36 00 2c 00 50 2a 20 20 20 45 44 49 54 20 41 4e 44 20 50 52 49 ┆QU * P CF A14,K:PRTT P DATA K:F102 " P* 6 , P* EDIT AND PRI┆
0x2d9c…2dec 4e 54 20 54 52 55 4e 4b 20 4c 49 4e 45 20 41 44 44 52 45 53 53 45 53 20 00 1d 00 40 00 06 00 50 2a 20 00 1d 00 70 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 54 41 20 00 1d 00 7a 00 20 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a ┆NT TRUNK LINE ADDRESSES @ P* p P CF A14,K:PTA z P EJECT IDENT C:┆
0x2dec…2e3c 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 1d 00 90 00 06 00 50 2a 20 00 1d 00 b4 00 2a 00 50 2a 20 20 20 45 44 49 54 20 41 4e 44 20 50 52 49 4e 54 20 4c 49 4e 45 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 00 1d 00 be 00 06 00 50 2a 20 00 1d ┆FIC C:FIC P* * P* EDIT AND PRINT LINE CONFIGURATION P* ┆
0x2e3c…2e8c 00 ec 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 43 4f 4e 46 20 00 1d 00 f6 00 18 00 50 2a 45 44 49 54 20 4e 45 58 54 20 4c 49 4e 45 20 4e 42 52 20 00 1d 01 0e 00 10 00 50 50 43 32 30 30 5c 45 51 55 5c 2a 20 00 1d 01 2a 00 1e 00 50 5c 53 ┆ P LDKL A1,K:CONF P*EDIT NEXT LINE NBR PPC200 EQU * * P S┆
0x2e8c…2edc 54 5c 41 31 2c 54 43 41 57 42 4c 2c 41 31 33 5c 4c 49 4e 45 20 57 42 20 00 1d 01 3e 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 31 00 1d 01 60 00 0e 00 50 5c 4c 44 4b 5c 41 34 2c 30 20 00 1d 01 72 00 12 00 50 5c 4c 44 4b 4c 5c 41 35 2c 4b 3a 4c ┆T A1,TCAWBL,A13 LINE WB > P LDR A2,A1 ` P LDK A4,0 r P LDKL A5,K:L┆
0x2edc…2ee0 (30, 0, 398) 54 43 00 1d ┆TC ┆
0x2ee0…2f30 01 84 00 0e 00 50 5c 41 44 52 5c 41 32 2c 41 35 00 1e 00 0a 00 12 00 50 2a 45 44 49 54 20 4e 45 58 54 20 54 43 20 00 1e 00 1c 00 10 00 50 50 43 32 31 30 5c 45 51 55 5c 2a 20 00 1e 00 32 00 10 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 32 20 00 1e ┆ P ADR A2,A5 P*EDIT NEXT TC PPC210 EQU * 2 P LDR* A3,A2 ┆
0x2f30…2f80 00 46 00 22 00 50 5c 52 46 28 5a 29 5c 50 43 32 32 30 5c 54 43 20 4e 4f 54 20 53 50 45 43 49 46 49 45 44 20 00 1e 00 5a 00 1e 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 33 5c 47 45 54 20 54 43 20 41 44 44 52 45 53 53 00 1e 00 80 00 12 00 50 5c 41 ┆ F " P RF(Z) PC220 TC NOT SPECIFIED Z P LDR* A3,A3 GET TC ADDRESS P A┆
0x2f80…2fd0 44 4b 4c 5c 41 33 2c 2f 32 30 30 30 00 1e 00 a2 00 2c 00 50 5c 53 54 5c 41 33 2c 4b 3a 46 33 32 38 2c 41 34 5c 50 55 54 20 53 50 41 43 45 2b 54 43 41 20 49 4e 20 46 4f 52 4d 41 54 00 1e 00 b8 00 0e 00 50 5c 41 44 4b 5c 41 34 2c 32 20 00 1e ┆DKL A3,/2000 , P ST A3,K:F328,A4 PUT SPACE+TCA IN FORMAT P ADK A4,2 ┆
0x2fd0…2fe8 00 e8 00 10 00 50 50 43 32 32 30 5c 45 51 55 5c 2a 20 00 1e 00 fa 00 0e ┆ PPC220 EQU * ┆
0x2fe8…5942 […elided…]
0x5942…5960 44 4b 4c 5c 41 35 2c 4b 3a 4c 54 43 00 39 00 42 00 10 00 50 5c 4c 44 52 5c 41 31 30 2c 41 ┆DKL A5,K:LTC 9 B P LDR A10,A┆
0x5960…59b0 31 20 00 39 00 58 00 14 00 50 5c 41 44 4b 4c 5c 41 31 30 2c 4b 3a 4c 45 4e 44 00 39 00 6c 00 10 00 50 5c 4c 44 4b 5c 41 36 2c 2f 34 31 20 00 39 00 84 00 10 00 50 57 43 32 31 30 5c 45 51 55 5c 2a 20 00 39 00 98 00 10 00 50 5c 4c 44 52 2a 5c ┆1 9 X P ADKL A10,K:LEND 9 l P LDK A6,/41 9 PWC210 EQU * 9 P LDR* ┆
0x59b0…5a00 41 37 2c 41 35 20 00 39 00 ac 00 20 00 50 5c 52 46 28 5a 29 5c 57 43 32 32 30 5c 4e 4f 20 54 43 20 53 50 45 43 49 46 49 45 44 00 39 00 c0 00 22 00 50 5c 53 43 52 5c 41 36 2c 41 32 5c 54 43 20 54 4f 20 43 41 53 53 45 54 54 45 20 42 55 46 20 ┆A7,A5 9 P RF(Z) WC220 NO TC SPECIFIED 9 " P SCR A6,A2 TC TO CASSETTE BUF ┆
0x5a00…5a50 00 39 00 e4 00 26 00 50 5c 41 44 4b 5c 41 32 2c 31 5c 49 4e 43 52 20 50 4f 49 4e 54 45 52 20 49 4e 20 43 41 53 53 20 42 55 46 00 39 01 0a 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 31 20 00 39 01 34 00 10 00 50 57 43 32 32 30 5c 45 51 55 5c 2a 20 ┆ 9 & P ADK A2,1 INCR POINTER IN CASS BUF 9 P ADK A3,1 9 4 PWC220 EQU * ┆
0x5a50…5a8e 00 39 01 46 00 1e 00 50 5c 41 44 4b 5c 41 36 2c 31 5c 4e 45 58 54 20 54 43 20 41 44 44 52 45 53 53 20 00 39 01 5a 00 0e 00 50 5c 41 44 4b 5c 41 35 2c 32 20 00 39 01 7c 00 10 00 50 5c 43 ┆ 9 F P ADK A6,1 NEXT TC ADDRESS 9 Z P ADK A5,2 9 | P C┆
0x5a8e…5ade (58, 0, 398) 57 52 5c 41 35 2c 41 31 30 20 00 39 01 8e 00 22 00 50 5c 52 42 28 4c 29 5c 57 43 32 31 30 5c 4d 4f 52 45 20 54 43 20 41 44 44 52 45 53 53 45 53 00 3a 00 12 00 14 00 50 5c 41 44 4b 4c 5c 41 31 2c 4b 3a 4c 45 4e 44 20 00 3a 00 38 00 12 00 50 ┆WR A5,A10 9 " P RB(L) WC210 MORE TC ADDRESSES : P ADKL A1,K:LEND : 8 P┆
0x5ade…5b2e 5c 43 57 4b 5c 41 31 2c 4b 3a 43 4f 4e 45 00 3a 00 50 00 1c 00 50 5c 52 42 28 4c 29 5c 57 43 32 30 30 5c 4d 4f 52 45 20 4c 49 4e 45 53 20 00 3a 00 66 00 22 00 50 5c 53 54 5c 41 33 2c 4b 3a 45 52 4c 2c 41 38 5c 52 45 43 4f 52 44 20 4c 45 4e ┆ CWK A1,K:CONE : P P RB(L) WC200 MORE LINES : f " P ST A3,K:ERL,A8 RECORD LEN┆
0x5b2e…5b7e 47 54 48 20 00 3a 00 86 00 06 00 50 2a 20 00 3a 00 ac 00 22 00 50 2a 20 20 20 57 52 49 54 45 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 52 45 43 4f 52 44 00 3a 00 b6 00 06 00 50 2a 20 00 3a 00 dc 00 12 00 50 5c 43 46 5c 41 31 34 2c 57 52 ┆GTH : P* : " P* WRITE CONFIGURATION RECORD : P* : P CF A14,WR┆
0x5b7e…5bce 49 54 45 52 00 3a 00 e6 00 06 00 50 2a 20 00 3a 00 fc 00 1a 00 50 2a 20 20 20 57 52 49 54 45 20 32 20 54 41 50 45 4d 41 52 4b 53 20 00 3a 01 06 00 06 00 50 2a 20 00 3a 01 24 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 2f 41 32 20 00 3a 01 2e 00 08 ┆ITER : P* : P* WRITE 2 TAPEMARKS : P* : $ P LDK A7,/A2 : . ┆
0x5bce…5c1c 00 50 5c 4c 4b 4d 00 3a 01 42 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 3a 01 4e 00 08 00 50 5c 4c 4b 4d 00 3a 01 5e 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 3a 01 6a 00 0e 00 50 5c 52 46 5c 43 54 45 4e 44 20 00 3a 01 7a 00 06 00 50 2a 20 ┆ P LKM : B P DATA 1 : N P LKM : ^ P DATA 1 : j P RF CTEND : z P* ┆
0x5c1c…5c6c (59, 0, 400) 00 3a 01 8c 00 20 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 3b 00 08 00 06 00 50 2a 20 00 3b 00 2c 00 16 00 50 2a 20 20 20 43 41 53 53 45 54 54 45 20 45 52 52 4f 52 00 3b 00 36 00 06 00 50 ┆ : P EJECT IDENT C:FIC C:FIC ; P* ; , P* CASSETTE ERROR ; 6 P┆
0x5c6c…5cbc 2a 20 00 3b 00 50 00 10 00 50 43 54 39 30 30 5c 45 51 55 5c 2a 20 00 3b 00 5a 00 24 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 5c 27 43 41 53 53 45 54 54 45 20 45 52 52 4f 52 27 20 00 3b 00 6e 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 ┆* ; P PCT900 EQU * ; Z $ P CF A14,K:PRTN 'CASSETTE ERROR' ; n P DATA K:F3┆
0x5cbc…5d0c 37 31 00 3b 00 96 00 06 00 50 2a 20 00 3b 00 aa 00 1c 00 50 2a 20 20 20 52 45 4c 45 41 53 45 20 43 41 53 53 45 54 54 45 20 45 43 42 00 3b 00 b4 00 06 00 50 2a 20 00 3b 00 d4 00 10 00 50 43 54 45 4e 44 5c 45 51 55 5c 2a 20 00 3b 00 de 00 10 ┆71 ; P* ; P* RELEASE CASSETTE ECB ; P* ; PCTEND EQU * ; ┆
0x5d0c…5d5c 00 50 5c 4c 44 4b 5c 41 37 2c 2f 42 38 20 00 3b 00 f2 00 10 00 50 5c 4c 4b 4d 5c 5c 55 4e 4c 4f 43 4b 00 3b 01 06 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 3b 01 1a 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 42 4c 54 43 20 00 3b 01 2a 00 22 ┆ P LDK A7,/B8 ; P LKM UNLOCK ; P DATA 1 ; P LDKL A1,K:BLTC ; * "┆
0x5d5c…5dac 00 50 5c 41 44 52 5c 41 31 2c 41 31 5c 44 4f 55 42 4c 45 20 57 4f 52 44 20 4c 45 4e 47 54 48 20 00 3b 01 42 00 30 00 50 5c 53 54 5c 41 31 2c 4b 3a 45 52 4c 2c 41 38 5c 52 45 53 54 4f 52 45 20 43 41 53 53 45 54 54 45 20 42 55 46 20 4c 45 4e ┆ P ADR A1,A1 DOUBLE WORD LENGTH ; B 0 P ST A1,K:ERL,A8 RESTORE CASSETTE BUF LEN┆
0x5dac…5dfc (60, 0, 400) 47 54 48 20 00 3b 01 68 00 08 00 50 5c 4c 4b 4d 00 3c 00 0c 00 14 00 50 5c 44 41 54 41 5c 2d 38 2c 4b 3a 42 50 43 54 20 00 3c 00 18 00 0e 00 50 5c 4c 44 52 5c 41 38 2c 41 39 00 3c 00 30 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 3c 00 42 00 20 ┆GTH ; h P LKM < P DATA -8,K:BPCT < P LDR A8,A9 < 0 P RTN A14 < B ┆
0x5dfc…5e4c 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 3c 00 52 00 06 00 50 2a 20 00 3c 00 76 00 36 00 50 2a 20 20 20 53 55 42 52 3a 20 20 47 45 54 53 20 43 48 41 52 41 43 54 45 52 20 46 52 4f 4d 20 43 ┆ P EJECT IDENT C:FIC C:FIC < R P* < v 6 P* SUBR: GETS CHARACTER FROM C┆
0x5e4c…5e9c 41 53 53 45 54 54 45 20 42 55 46 20 54 4f 20 41 37 20 00 3c 00 80 00 06 00 50 2a 20 00 3c 00 ba 00 10 00 50 47 45 54 43 48 52 5c 45 51 55 5c 2a 00 3c 00 c4 00 0e 00 50 5c 43 57 52 5c 41 32 2c 41 31 00 3c 00 d8 00 1c 00 50 5c 52 46 28 45 29 ┆ASSETTE BUF TO A7 < P* < PGETCHR EQU * < P CWR A2,A1 < P RF(E)┆
0x5e9c…5eec 5c 47 45 54 31 30 30 5c 45 4e 44 20 4f 46 20 42 55 46 00 3c 00 ea 00 0e 00 50 5c 4c 43 52 5c 41 37 2c 41 32 00 3c 01 0a 00 0e 00 50 5c 41 44 4b 5c 41 32 2c 31 20 00 3c 01 1c 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 3c 01 2e 00 10 00 50 47 45 ┆ GET100 END OF BUF < P LCR A7,A2 < P ADK A2,1 < P RTN A14 < . PGE┆
0x5eec…5f3c 54 31 30 30 5c 45 51 55 5c 2a 00 3c 01 3e 00 10 00 50 5c 41 44 4b 4c 5c 41 31 34 2c 34 20 00 3c 01 52 00 0e 00 50 5c 41 42 4c 5c 52 43 34 30 30 00 3c 01 66 00 06 00 50 2a 20 00 3c 01 78 00 1e 00 50 2a 20 20 20 53 55 42 52 3a 20 20 57 52 49 ┆T100 EQU * < > P ADKL A14,4 < R P ABL RC400 < f P* < x P* SUBR: WRI┆
0x5f3c…5f8c (61, 0, 400) 54 45 20 41 20 52 45 43 4f 52 44 20 00 3c 01 82 00 06 00 50 2a 20 00 3d 00 14 00 10 00 50 57 52 49 54 45 52 5c 45 51 55 5c 2a 00 3d 00 1e 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 2f 38 36 20 00 3d 00 32 00 08 00 50 5c 4c 4b 4d 00 3d 00 46 00 0c ┆TE A RECORD < P* = PWRITER EQU * = P LDK A7,/86 = 2 P LKM = F ┆
0x5f8c…5fdc 00 50 5c 44 41 54 41 5c 31 20 00 3d 00 52 00 14 00 50 5c 4c 44 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 20 00 3d 00 62 00 1e 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 46 45 46 46 5c 4d 41 53 4b 20 42 2d 53 49 44 45 00 3d 00 7a 00 14 00 50 5c 52 46 28 ┆ P DATA 1 = R P LD A1,K:ERC,A8 = b P ANKL A1,/FEFF MASK B-SIDE = z P RF(┆
0x5fdc…602c 5a 29 5c 57 52 54 45 4e 44 5c 4f 4b 00 3d 00 9c 00 32 00 50 57 52 54 45 52 52 5c 41 44 4b 4c 5c 41 31 34 2c 34 5c 41 44 4a 55 53 54 20 53 54 41 43 4b 45 52 20 46 4f 52 20 4e 4f 20 52 45 54 55 52 4e 00 3d 00 b4 00 1c 00 50 5c 52 42 5c 43 54 ┆Z) WRTEND OK = 2 PWRTERR ADKL A14,4 ADJUST STACKER FOR NO RETURN = P RB CT┆
0x602c…607c 39 30 30 5c 43 41 53 53 45 54 54 45 20 45 52 52 4f 52 00 3d 00 ea 00 12 00 50 57 52 54 45 4e 44 5c 52 54 4e 5c 41 31 34 00 3d 01 0a 00 06 00 50 2a 20 00 3d 01 20 00 1c 00 50 2a 20 20 20 53 55 42 52 3a 20 20 52 45 41 44 20 41 20 52 45 43 4f ┆900 CASSETTE ERROR = PWRTEND RTN A14 = P* = P* SUBR: READ A RECO┆
0x607c…60cc 52 44 00 3d 01 2a 00 06 00 50 2a 20 00 3d 01 4a 00 10 00 50 52 45 41 44 52 5c 45 51 55 5c 2a 20 00 3d 01 54 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 2f 38 32 20 00 3d 01 68 00 08 00 50 5c 4c 4b 4d 00 3d 01 7c 00 0c 00 50 5c 44 41 54 41 5c 31 20 ┆RD = * P* = J PREADR EQU * = T P LDK A7,/82 = h P LKM = | P DATA 1 ┆
0x60cc…611c (62, 0, 398) 00 3d 01 88 00 14 00 50 5c 4c 44 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 20 00 3e 00 08 00 32 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 46 43 46 46 5c 4d 41 53 4b 20 42 2d 53 49 44 45 20 41 4e 44 20 57 52 49 54 45 20 50 52 4f 54 45 43 54 45 44 00 3e ┆ = P LD A1,K:ERC,A8 > 2 P ANKL A1,/FCFF MASK B-SIDE AND WRITE PROTECTED >┆
0x611c…616c 00 20 00 14 00 50 5c 52 42 28 5a 29 5c 57 52 54 45 4e 44 5c 4f 4b 00 3e 00 56 00 1e 00 50 5c 52 42 5c 57 52 54 45 52 52 5c 43 41 53 53 45 54 54 45 20 45 52 52 4f 52 20 00 3e 00 6e 00 20 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a ┆ P RB(Z) WRTEND OK > V P RB WRTERR CASSETTE ERROR > n P EJECT IDENT C:┆
0x616c…61bc 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 3e 00 90 00 06 00 50 2a 20 00 3e 00 b4 00 2c 00 50 2a 20 20 20 53 55 42 52 3a 20 20 4f 43 43 55 50 49 45 53 20 41 4e 44 20 52 45 57 49 4e 44 53 20 43 41 53 53 45 54 54 45 00 3e 00 be 00 06 00 50 2a 20 ┆FIC C:FIC > P* > , P* SUBR: OCCUPIES AND REWINDS CASSETTE > P* ┆
0x61bc…620c 00 3e 00 ee 00 10 00 50 4f 43 43 41 53 53 5c 45 51 55 5c 2a 00 3e 00 f8 00 0e 00 50 5c 4c 44 4b 5c 41 37 2c 31 20 00 3e 01 0c 00 08 00 50 5c 4c 4b 4d 00 3e 01 1e 00 14 00 50 5c 44 41 54 41 5c 2d 37 2c 4b 3a 42 50 43 54 20 00 3e 01 2a 00 20 ┆ > POCCASS EQU * > P LDK A7,1 > P LKM > P DATA -7,K:BPCT > * ┆
0x620c…625a 00 50 5c 43 4d 5c 4b 3a 45 43 57 2c 41 38 5c 4e 4f 20 53 45 51 55 45 42 43 45 20 4e 42 52 00 3e 01 42 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 2f 42 37 20 00 3e 01 66 00 18 00 50 5c 4c 4b 4d 5c 5c 4c 4f 41 44 20 43 41 53 53 45 54 54 45 20 ┆ P CM K:ECW,A8 NO SEQUEBCE NBR > B P LDK A7,/B7 > f P LKM LOAD CASSETTE ┆
0x625a…62aa (63, 0, 400) 00 3e 01 7a 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 3f 00 08 00 14 00 50 5c 4c 44 5c 41 37 2c 4b 3a 45 52 43 2c 41 38 20 00 3f 00 18 00 26 00 50 5c 41 4e 4b 4c 5c 41 37 2c 2f 42 41 46 46 5c 4d 41 53 4b 20 42 4f 54 20 41 4e 44 20 4c 45 41 44 ┆ > z P DATA 1 ? P LD A7,K:ERC,A8 ? & P ANKL A7,/BAFF MASK BOT AND LEAD┆
0x62aa…62fa 45 52 00 3f 00 30 00 10 00 50 4f 43 43 45 4e 44 5c 45 51 55 5c 2a 00 3f 00 5a 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 3f 00 6e 00 20 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 3f 00 7e 00 44 ┆ER ? 0 POCCEND EQU * ? Z P RTN A14 ? n P EJECT IDENT C:FIC C:FIC ? ~ D┆
0x62fa…634a 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 3f 00 a2 00 06 00 50 2a 20 00 3f 00 ea ┆ P*************************************************************** ? P* ? ┆
0x634a…639a 00 22 00 50 2a 20 20 20 52 45 53 45 54 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 41 52 45 41 53 20 00 3f 00 f4 00 06 00 50 2a 20 00 3f 01 1a 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 ┆ " P* RESET CONFIGURATION AREAS ? P* ? D P****************************┆
0x639a…63ea 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 3f 01 24 00 10 00 50 4b 3a 43 4c 52 43 5c 45 51 55 5c 2a 00 3f 01 6c 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 43 4f 4e 46 20 ┆*********************************** ? $ PK:CLRC EQU * ? l P LDKL A1,K:CONF ┆
0x63ea…643a (64, 0, 400) 00 3f 01 80 00 10 00 50 4b 4f 53 31 30 30 5c 45 51 55 5c 2a 00 40 00 08 00 0e 00 50 5c 4c 44 52 5c 41 35 2c 41 31 00 40 00 1c 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 30 00 40 00 2e 00 0e 00 50 5c 4c 44 4b 5c 41 33 2c 30 20 00 40 00 40 00 22 ┆ ? PKOS100 EQU * @ P LDR A5,A1 @ P ADK A1,20 @ . P LDK A3,0 @ @ "┆
0x643a…648a 00 50 5c 53 54 52 5c 41 33 2c 41 31 5c 52 45 53 45 54 20 52 45 50 4c 59 20 43 4f 55 4e 54 45 52 00 40 00 52 00 06 00 50 2a 20 00 40 00 78 00 1a 00 50 2a 20 20 20 52 45 53 45 54 20 4c 49 4e 45 20 53 54 41 54 55 53 20 00 40 00 82 00 06 00 50 ┆ P STR A3,A1 RESET REPLY COUNTER @ R P* @ x P* RESET LINE STATUS @ P┆
0x648a…64da 2a 20 00 40 00 a0 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 4c 53 54 00 40 00 aa 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 35 00 40 00 c0 00 0e 00 50 5c 53 54 52 5c 41 33 2c 41 31 00 40 00 d2 00 06 00 50 2a 20 00 40 00 e4 00 1e 00 50 2a 20 ┆* @ P LDKL A1,K:LST @ P ADR A1,A5 @ P STR A3,A1 @ P* @ P* ┆
0x64da…652a 20 20 52 45 53 45 54 20 54 43 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 00 40 00 ee 00 06 00 50 2a 20 00 40 01 10 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 4c 54 43 00 40 01 1a 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 35 00 40 01 30 00 10 ┆ RESET TC CONFIGURATION @ P* @ P LDKL A1,K:LTC @ P ADR A1,A5 @ 0 ┆
0x652a…657a 00 50 5c 4c 44 4b 4c 5c 41 34 2c 2d 32 36 00 40 01 42 00 10 00 50 4b 4f 53 31 31 30 5c 45 51 55 5c 2a 00 40 01 56 00 0e 00 50 5c 53 54 52 5c 41 33 2c 41 31 00 40 01 6a 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 40 01 7c 00 0e 00 50 5c 41 ┆ P LDKL A4,-26 @ B PKOS110 EQU * @ V P STR A3,A1 @ j P ADK A1,2 @ | P A┆
0x657a…65ca (65, 0, 400) 44 4b 5c 41 34 2c 31 20 00 40 01 8e 00 22 00 50 5c 52 42 28 4e 29 5c 4b 4f 53 31 31 30 5c 4e 4f 54 20 45 4e 44 20 4f 46 20 4c 49 53 54 20 00 41 00 10 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 4c 45 4e 44 20 00 41 00 36 00 0e 00 50 5c 41 ┆DK A4,1 @ " P RB(N) KOS110 NOT END OF LIST A P LDKL A1,K:LEND A 6 P A┆
0x65ca…661a 44 52 5c 41 31 2c 41 35 00 41 00 4e 00 12 00 50 5c 43 57 4b 5c 41 31 2c 4b 3a 43 4f 4e 45 00 41 00 60 00 24 00 50 5c 52 42 28 4e 45 29 5c 4b 4f 53 31 30 30 5c 4e 4f 54 20 45 4e 44 20 4f 46 20 4c 49 4e 45 53 20 00 41 00 76 00 20 00 50 5c 45 ┆DR A1,A5 A N P CWK A1,K:CONE A ` $ P RB(NE) KOS100 NOT END OF LINES A v P E┆
0x661a…666a 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 49 43 20 5c 5c 5c 43 3a 46 49 43 00 41 00 9e 00 06 00 50 2a 20 00 41 00 c2 00 24 00 50 2a 20 20 20 52 45 53 45 54 20 54 43 20 53 50 45 43 49 46 49 43 41 54 49 4f 4e 20 41 52 45 41 20 00 41 00 cc ┆JECT IDENT C:FIC C:FIC A P* A $ P* RESET TC SPECIFICATION AREA A ┆
0x666a…66ba 00 06 00 50 2a 20 00 41 00 f4 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 54 43 50 00 41 00 fe 00 10 00 50 4b 4f 53 31 32 30 5c 45 51 55 5c 2a 00 41 01 14 00 22 00 50 5c 53 54 52 5c 41 33 2c 41 31 5c 52 45 53 45 54 20 54 43 20 41 44 44 52 ┆ P* A P LDKL A1,K:TCP A PKOS120 EQU * A " P STR A3,A1 RESET TC ADDR┆
0x66ba…670a 45 53 53 45 53 20 00 41 01 28 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 30 00 41 01 4e 00 1e 00 50 5c 53 54 52 5c 41 33 2c 41 31 5c 52 45 53 45 54 20 54 43 20 53 54 41 54 55 53 00 41 01 60 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 41 01 82 ┆ESSES A ( P ADK A1,20 A N P STR A3,A1 RESET TC STATUS A ` P ADK A1,2 A ┆
0x670a…675a (66, 2, 160) 00 12 00 50 5c 43 57 4b 5c 41 31 2c 4b 3a 54 43 50 45 00 42 00 04 00 1c 00 50 5c 52 42 28 4e 45 29 5c 4b 4f 53 31 32 30 5c 4d 4f 52 45 20 54 43 27 53 00 42 00 1a 00 06 00 50 2a 20 00 42 00 3a 00 18 00 50 2a 20 20 20 52 45 53 45 54 20 57 4f ┆ P CWK A1,K:TCPE B P RB(NE) KOS120 MORE TC'S B P* B : P* RESET WO┆
0x675a…67aa 52 4b 42 4c 4f 43 4b 53 00 42 00 44 00 06 00 50 2a 20 00 42 00 60 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 53 43 53 20 00 42 00 6a 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 42 00 80 00 08 00 50 5c 45 4e 44 00 42 00 90 40 04 00 00 00 42 00 9c ┆RKBLOCKS B D P* B ` P CF A14,K:SCS B j P RTN A14 B P END B @ B ┆
0x67aa…67b2 (67, 1, 8) 20 04 00 00 00 43 00 04 ┆ C ┆
0x67b2…6802 (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┆
0x6802…6852 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┆
0x6852…68a2 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┆
0x68a2…68f2 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 ┆
0x68f2…6942 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┆