|
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: 23172 (0x5a84)
Notes: pts_type(SC)
Names: »C:OPC.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKAPP/C:OPC.SC«
IDENT C:OPC CONPAC REL=1.0 DATE= 80.04.29 UPDATE #4 77.09.28 JES *************************************************************** * * CONCENTRATOR APPLICATION PACKAGE PEAB-T * * PROGRAMMER: PER OMAN / PAN * * * C : O P C * * * * * THIS MODULE HANDLES THE OPERATOR COMMUNICATION WITH BOTH * CONCENTRATOR PACKAGE AND USER COMMANDS * * * * THE MODULE RUNS UNDER TASK: OPCOM * * * THE MODULE CONTAINS THE SUBROUTINES: * * NAME REVDAT VERSION * * K:OPC 77.08.19 * K:OPM 770425 * K:OPCC 770406 * * * *************************************************************** EJECT IDENT C:OPC * * * ENTRY ADDRESSES * *************************************************************** * * ENTRY DESCRIPTION * ENTRY K:OPC READ OPERATORS TERMINAL ENTRY K:OINT ENTRY K:OPM PRINT MESSAGE ENTRY K:OPCC COMMAND FR 106 ENTRY K:DERR DISC ERROR ENTRY K:SF01 USED IN C:FUA * * EJECT IDENT C:OPC * * * EXTERNAL REFERENSES * *************************************************************** * * ADDRESS IN MODULE * * EXTRN K:KBE C:TCA EXTRN K:KBB EXTRN K:S0E EXTRN K:GPE EXTRN K:GPB EXTRN K:OPEN EXTRN TCOP * EXTRN K:ROPT C:FUA EXTRN K:PRTN EXTRN K:PRTT * EXTRN K:FTK C:LAY * EXTRN K:UFUN USERP EXTRN K:FTU * EXTRN K:F001 EXTRN K:F100 C:TXT EXTRN K:F101 EXTRN K:F002 EXTRN K:F370 EXTRN K:F372 EXTRN K:F376 * EXTRN K:OPED C:BPL * EXTRN K:TL C:NSU EJECT IDENT C:OPC * EXTRN K:OL C:ONW EXTRN K:OT EXTRN K:OS EXTRN K:OC * EXTRN K:XL C:XNW EXTRN K:XT EXTRN K:XS EXTRN K:XC * EXTRN K:SS C:SIC EXTRN K:SC EXTRN K:CS EXTRN K:LS EXTRN K:TS EXTRN K:NS * EXTRN K:DS C:SPY EXTRN K:DC EXTRN K:DL EXTRN K:DT EXTRN K:DN * EXTRN K:ST C:SET EXTRN K:SD EXTRN K:SA * EXTRN K:CKF C:SUB EXTRN K:ST10 EXTRN K:LD10 * EXTRN K:PC C:FIC EXTRN K:RC EXTRN K:WC * * * SWITCH INDICATING THAT PREVIOUS COMMAND IS TO BE REPEATED * YES=0 * EXTRN K:IRSW C:FUA EJECT IDENT C:OPC * * HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST * NLIST * * * * * * * * * * * * * * * * * * EJECT IDENT C:EQU **COMMON AREA FRAME** * * EXTERNALS * EXTRN T:ADD EXTRN T:ADDC EXTRN T:SUB EXTRN T:SUBC * EXTRN T:MUL TOSS-MULDIV EXTRN T:MULC EXTRN T:DIV EXTRN T:DIVC EJECT IDENT C:EQU * * FORMS FOR FORMAT CODES * EOL FORM 8=1,8 END OF FORMAT LIST EOR FORM 8=9,8 END OF RECORD TXT FORM 8=/10,8 TEXT ELEMENT CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT ENDSUB FORM 16=/1700 END OF SUBFORMAT COND FORM 8=/1F,8 CONDITIONAL FORMAT FILLER FORM 8,8 FILLER SPACE FORM 8=/20,8 SPACE PICT FORM 1=1,7,8 PICTURE PICREF FORM 8,8,16 GENERATE FORMS BYTE FORM 8,8 BCD FORM 4=0,12 ASCII FORM 4=8,12 ADD FORM 16=/F6A1,16=T:ADD,8,8 ADDC FORM 16=/F6A1,16=T:ADDC,8,8 SUB FORM 16=/F6A1,16=T:SUB,8,8 SUBC FORM 16=/F6A1,16=T:SUBC,8,8 MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8 MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8 DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8 DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8 EJECT IDENT C:EQU * * CONSTANT TCA EQUATES * CA1 EQU /10 CB1 EQU /20 CB10 EQU /21 CB100 EQU /22 CB1000 EQU /23 CB32K EQU /24 YEAR EQU /30 MONTH EQU /31 DAY EQU /32 HOUR EQU /40 MIN EQU /41 SEC EQU /42 * * LINE WORKBLOCKS EQUATES * LIN EQU /10 LINE NBR LINBC EQU /11 BUSY COUNTER LINTC EQU /12 TRANS COUNTER LINEC EQU /13 ERROR COUNTER LINHUR EQU /14 TIME OF LAST TRANS LINMIN EQU /15 LINSEC EQU /16 * * TC WORKBLOCK EQUATES * TC EQU /20 TCBC EQU /21 TCTC EQU /22 TCEC EQU /23 TCHUR EQU /24 TCMIN EQU /25 TCSEC EQU /26 EJECT IDENT C:EQU * * CC WORKBLOCK RESPONSETIME EQUATES * CC1 EQU /30 CC2 EQU /31 CC3 EQU /32 CC4 EQU /33 CC5 EQU /34 CC6 EQU /35 CC7 EQU /36 CC8 EQU /37 CC9 EQU /38 CC10 EQU /39 CC11 EQU /3A CC12 EQU /3B * * CC WORKBLOCK EQUATES * CCTO EQU /40 TIME OUT COUNTER CCTC EQU /41 CCEC EQU /42 CCSUP EQU /43 SUPERV MSGS COUNTER CCHUR EQU /44 TIME OF LAST REPLY CCMIN EQU /45 CCSEC EQU /46 EJECT IDENT C:EQU * * NETWORK WORKBLOCK EQUATES * NWTC EQU /5D ACCUMULATED TRANS COUNTER NWEC EQU /5E ACC ERROR COUNT * PCNT1 EQU /50 % INTERVALS PCNT2 EQU /51 PCNT3 EQU /52 PCNT4 EQU /53 PCNT5 EQU /54 PCNT6 EQU /55 PCNT7 EQU /56 PCNT8 EQU /57 PCNT9 EQU /58 PCNT10 EQU /59 PCNT11 EQU /5A PCNT12 EQU /5B * RSPTIM EQU /5C RESPONSE TIME PCNTW EQU /5F % WORK AREA 1 PCNTW2 EQU /6C %WORK AREA 2 * * CC TEXT-INTERVAL EQUATES * IN1 EQU /60 IN2 EQU /61 IN3 EQU /62 IN4 EQU /63 IN5 EQU /64 IN6 EQU /65 IN7 EQU /66 IN8 EQU /67 IN9 EQU /68 IN10 EQU /69 IN11 EQU /6A IN12 EQU /6B EJECT IDENT C:EQU * CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK * IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH * K:EBA EQU 2 ECB EQUATES K:ERL EQU 4 K:EEL EQU 6 K:ERC EQU 8 K:ECW EQU 10 * * TCAWBL EQU 6 INDEX IN TCA TO LINE WB TCAWBT EQU 10 INDEX IN TCA TO TC WB EJECT IDENT C:EQU ******************************************************* * * SYSTEM ADAPTION PARAMETERS * * KEYBOARD KONTROL KEYS K:KKEY EQU /2F ENTRY K KEY K:UKEY EQU /28 ENTER U KEY K:EOR EQU /2A END OF RECORD KEY CANCEL EQU /23 CANCEL KEY * TIME OUT VALUES OF TRUNK LINE K:WTIM EQU 60 CC WRITE REQUEST TIME OUT (X100 MS) K:QTIM EQU 600 CC EXCHANGE REQUEST TIME OUT (X100 MS) * BUFFER LENGTHS K:CCBL EQU 1150 CCWRITE BUFFER LENGTH (WORDS) K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) K:BLTC EQU 64 LENGTH OF CASSETTE BUFFER (WORDS) K:KBL EQU 70 KB BUF LENGTH IN WORDS K:KBBL EQU K:KBL+K:KBL IN CHARS K:GPBL EQU 60 GP BUF LENGTH IN WORDS K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS) K:INBL EQU 1150 TERMINAL LINE INPUT BUF LENGTH (WORDS) EJECT * COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION K:CCAD EQU 0 CONCENTRATOR ADDRESS LEFT BYTE = SELECT ADDR. RIGHT BYTE = POLL ADDR. K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES AND SYSTEM MESSAGES K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT C:OPC CONPAC REL=1.0 DATE= 80.04.29 «, t00=0x0000, t01=0x0004}
0x0034…0056 Head {h00=0x001e, h01=0x0050, text=» UPDATE #4 77.09.28 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 : O P 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…0198 Head {h00=0x0040, h01=0x0050, text=»* THIS MODULE HANDLES THE OPERATOR COMMUNICATION WITH BOTH«, t00=0x0000, t01=0x0158}
0x0198…01ca Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR PACKAGE AND USER COMMANDS«, t00=0x0001, t01=0x000c}
0x01ca…01d8 Head {h00=0x000a, h01=0x0050, text=»* * «, t00=0x0001, t01=0x003e}
0x01d8…01e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004c}
0x01e2…020e Head {h00=0x0028, h01=0x0050, text=»* THE MODULE RUNS UNDER TASK: OPCOM «, t00=0x0001, t01=0x0056}
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:OPC 77.08.19«, t00=0x0001, t01=0x00f6}
0x029a…02b0 Head {h00=0x0012, h01=0x0050, text=»* K:OPM 770425«, t00=0x0001, t01=0x010e}
0x02b0…02c8 Head {h00=0x0014, h01=0x0050, text=»* K:OPCC 770406 «, t00=0x0001, t01=0x0124}
0x02c8…02d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013c}
0x02d2…02dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0146}
0x02dc…02e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0150}
0x02e6…032e Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0001, t01=0x015a}
0x032e…034a Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:OPC «, t00=0x0002, t01=0x0012}
0x034a…0354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002e}
0x0354…035e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0038}
0x035e…0378 Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0042}
0x0378…0382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005c}
0x0382…03ca Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0066}
0x03ca…03d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ae}
0x03d4…03f0 Head {h00=0x0018, h01=0x0050, text=»* ENTRY DESCRIPTION«, t00=0x0002, t01=0x00b8}
0x03f0…03fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d4}
0x03fa…0426 Head {h00=0x0028, h01=0x0050, text=» ENTRY K:OPC READ OPERATORS TERMINAL«, t00=0x0002, t01=0x00de}
0x0426…043c Head {h00=0x0012, h01=0x0050, text=» ENTRY K:OINT «, t00=0x0002, t01=0x010a}
0x043c…045e Head {h00=0x001e, h01=0x0050, text=» ENTRY K:OPM PRINT MESSAGE«, t00=0x0002, t01=0x0120}
0x045e…0482 Head {h00=0x0020, h01=0x0050, text=» ENTRY K:OPCC COMMAND FR 106«, t00=0x0002, t01=0x0142}
0x0482…04a2 Head {h00=0x001c, h01=0x0050, text=» ENTRY K:DERR DISC ERROR«, t00=0x0002, t01=0x0166}
0x04a2…04c6 Head {h00=0x0020, h01=0x0050, text=» ENTRY K:SF01 USED IN C:FUA «, t00=0x0002, t01=0x0186}
0x04c6…04d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001a}
0x04d0…04da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0024}
0x04da…04f6 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:OPC «, t00=0x0003, t01=0x002e}
0x04f6…0500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004a}
0x0500…050a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0054}
0x050a…0528 Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x005e}
0x0528…0532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007c}
0x0532…057a Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x0086}
0x057a…0584 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ce}
0x0584…05a0 Head {h00=0x0018, h01=0x0050, text=»* ADDRESS IN MODULE«, t00=0x0003, t01=0x00d8}
0x05a0…05aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f4}
0x05aa…05b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00fe}
0x05b4…05ce Head {h00=0x0016, h01=0x0050, text=» EXTRN K:KBE C:TCA«, t00=0x0003, t01=0x0108}
0x05ce…05e2 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:KBB«, t00=0x0003, t01=0x0122}
0x05e2…05f6 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:S0E«, t00=0x0003, t01=0x0136}
0x05f6…060a Head {h00=0x0010, h01=0x0050, text=» EXTRN K:GPE«, t00=0x0003, t01=0x014a}
0x060a…061e Head {h00=0x0010, h01=0x0050, text=» EXTRN K:GPB«, t00=0x0003, t01=0x015e}
0x061e…0634 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:OPEN «, t00=0x0003, t01=0x0172}
0x0634…0648 Head {h00=0x0010, h01=0x0050, text=» EXTRN TCOP «, t00=0x0003, t01=0x0188}
0x0648…0652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x000c}
0x0652…066e Head {h00=0x0018, h01=0x0050, text=» EXTRN K:ROPT C:FUA «, t00=0x0004, t01=0x0016}
0x066e…0684 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:PRTN «, t00=0x0004, t01=0x0032}
0x0684…069a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:PRTT «, t00=0x0004, t01=0x0048}
0x069a…06a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005e}
0x06a4…06be Head {h00=0x0016, h01=0x0050, text=» EXTRN K:FTK C:LAY«, t00=0x0004, t01=0x0068}
0x06be…06c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0082}
0x06c8…06e4 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:UFUN USERP«, t00=0x0004, t01=0x008c}
0x06e4…06f8 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:FTU«, t00=0x0004, t01=0x00a8}
0x06f8…0702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00bc}
0x0702…0718 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F001 «, t00=0x0004, t01=0x00c6}
0x0718…0734 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F100 C:TXT «, t00=0x0004, t01=0x00dc}
0x0734…074a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F101 «, t00=0x0004, t01=0x00f8}
0x074a…0760 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F002 «, t00=0x0004, t01=0x010e}
0x0760…0776 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F370 «, t00=0x0004, t01=0x0124}
0x0776…078c Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F372 «, t00=0x0004, t01=0x013a}
0x078c…07a2 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F376 «, t00=0x0004, t01=0x0150}
0x07a2…07ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0166}
0x07ac…07c8 Head {h00=0x0018, h01=0x0050, text=» EXTRN K:OPED C:BPL «, t00=0x0004, t01=0x0170}
0x07c8…07d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018c}
0x07d2…07ec Head {h00=0x0016, h01=0x0050, text=» EXTRN K:TL C:NSU «, t00=0x0005, t01=0x0008}
0x07ec…0808 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:OPC «, t00=0x0005, t01=0x0022}
0x0808…0812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003e}
0x0812…082c Head {h00=0x0016, h01=0x0050, text=» EXTRN K:OL C:ONW «, t00=0x0005, t01=0x0048}
0x082c…0840 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:OT «, t00=0x0005, t01=0x0062}
0x0840…0854 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:OS «, t00=0x0005, t01=0x0076}
0x0854…0868 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:OC «, t00=0x0005, t01=0x008a}
0x0868…0872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x009e}
0x0872…088c Head {h00=0x0016, h01=0x0050, text=» EXTRN K:XL C:XNW «, t00=0x0005, t01=0x00a8}
0x088c…08a0 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:XT «, t00=0x0005, t01=0x00c2}
0x08a0…08b4 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:XS «, t00=0x0005, t01=0x00d6}
0x08b4…08c8 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:XC «, t00=0x0005, t01=0x00ea}
0x08c8…08d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fe}
0x08d2…08ec Head {h00=0x0016, h01=0x0050, text=» EXTRN K:SS C:SIC «, t00=0x0005, t01=0x0108}
0x08ec…0900 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:SC «, t00=0x0005, t01=0x0122}
0x0900…0914 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CS «, t00=0x0005, t01=0x0136}
0x0914…0928 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LS «, t00=0x0005, t01=0x014a}
0x0928…093c Head {h00=0x0010, h01=0x0050, text=» EXTRN K:TS «, t00=0x0005, t01=0x015e}
0x093c…0950 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:NS «, t00=0x0005, t01=0x0172}
0x0950…095a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0186}
0x095a…0974 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:DS C:SPY «, t00=0x0005, t01=0x0190}
0x0974…0988 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:DC «, t00=0x0006, t01=0x001a}
0x0988…099c Head {h00=0x0010, h01=0x0050, text=» EXTRN K:DL «, t00=0x0006, t01=0x002e}
0x099c…09b0 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:DT «, t00=0x0006, t01=0x0042}
0x09b0…09c4 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:DN «, t00=0x0006, t01=0x0056}
0x09c4…09ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006a}
0x09ce…09e8 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:ST C:SET «, t00=0x0006, t01=0x0074}
0x09e8…09fc Head {h00=0x0010, h01=0x0050, text=» EXTRN K:SD «, t00=0x0006, t01=0x008e}
0x09fc…0a10 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:SA «, t00=0x0006, t01=0x00a2}
0x0a10…0a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b6}
0x0a1a…0a34 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:CKF C:SUB«, t00=0x0006, t01=0x00c0}
0x0a34…0a4a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:ST10 «, t00=0x0006, t01=0x00da}
0x0a4a…0a60 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LD10 «, t00=0x0006, t01=0x00f0}
0x0a60…0a6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x0a6a…0a84 Head {h00=0x0016, h01=0x0050, text=» EXTRN K:PC C:FIC «, t00=0x0006, t01=0x0110}
0x0a84…0a98 Head {h00=0x0010, h01=0x0050, text=» EXTRN K:RC «, t00=0x0006, t01=0x012a}
0x0a98…0aac Head {h00=0x0010, h01=0x0050, text=» EXTRN K:WC «, t00=0x0006, t01=0x013e}
0x0aac…0ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0152}
0x0ab6…0ac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x015c}
0x0ac0…0b04 Head {h00=0x0040, h01=0x0050, text=»* SWITCH INDICATING THAT PREVIOUS COMMAND IS TO BE REPEATED «, t00=0x0006, t01=0x0166}
0x0b04…0b14 Head {h00=0x000c, h01=0x0050, text=»* YES=0 «, t00=0x0007, t01=0x001a}
0x0b14…0b1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002a}
0x0b1e…0b3a Head {h00=0x0018, h01=0x0050, text=» EXTRN K:IRSW C:FUA «, t00=0x0007, t01=0x0034}
0x0b3a…0b56 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:OPC «, t00=0x0007, t01=0x0050}
0x0b56…0b60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x006c}
0x0b60…0bb0 Head {h00=0x004c, h01=0x0050, text=»* HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0007, t01=0x0076}
0x0bb0…0bba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c6}
0x0bba…0bc8 Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0007, t01=0x00d0}
0x0bc8…0bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00de}
0x0bd2…0bdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e8}
0x0bdc…0be6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f2}
0x0be6…0bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fc}
0x0bf0…0bfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0106}
0x0bfa…0c04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0110}
0x0c04…0c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011a}
0x0c0e…0c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0124}
0x0c18…0c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012e}
0x0c22…0c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0138}
0x0c2c…0c36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0142}
0x0c36…0c40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x014c}
0x0c40…0c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0156}
0x0c4a…0c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0160}
0x0c54…0c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x016a}
0x0c5e…0c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0174}
0x0c68…0c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x017e}
0x0c72…0c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0188}
0x0c7c…0cae (8, 0, 400) Head {h00=0x002e, h01=0x0050, text=» EJECT IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0008, t01=0x0004}
0x0cae…0cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cb8…0cce Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0008, t01=0x0040}
0x0cce…0cd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0056}
0x0cd8…0cec Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0008, t01=0x0060}
0x0cec…0d02 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0008, t01=0x0074}
0x0d02…0d16 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0008, t01=0x008a}
0x0d16…0d2c Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0008, t01=0x009e}
0x0d2c…0d36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00b4}
0x0d36…0d56 Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0008, t01=0x00be}
0x0d56…0d6c Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0008, t01=0x00de}
0x0d6c…0d80 Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0008, t01=0x00f4}
0x0d80…0d96 Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0008, t01=0x0108}
0x0d96…0db2 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0008, t01=0x011e}
0x0db2…0dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x013a}
0x0dbc…0dde Head {h00=0x001e, h01=0x0050, text=»* FORMS FOR FORMAT CODES«, t00=0x0008, t01=0x0144}
0x0dde…0de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0166}
0x0de8…0e12 Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0008, t01=0x0170}
0x0e12…0e36 Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0009, t01=0x000a}
0x0e36…0e5c Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0009, t01=0x002e}
0x0e5c…0e8e Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0009, t01=0x0054}
0x0e8e…0ec0 Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0009, t01=0x0086}
0x0ec0…0eee Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0009, t01=0x00b8}
0x0eee…0f1a Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0009, t01=0x00e6}
0x0f1a…0f38 Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0009, t01=0x0112}
0x0f38…0f58 Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0009, t01=0x0130}
0x0f58…0f7a Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0009, t01=0x0150}
0x0f7a…0fa4 Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0009, t01=0x0172}
0x0fa4…0fba Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x000a, t01=0x000c}
0x0fba…0fd2 Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x000a, t01=0x0022}
0x0fd2…0fec Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x000a, t01=0x003a}
0x0fec…1012 Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x000a, t01=0x0054}
0x1012…103a Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x000a, t01=0x007a}
0x103a…1060 Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x000a, t01=0x00a2}
0x1060…1088 Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x000a, t01=0x00c8}
0x1088…10b2 Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x000a, t01=0x00f0}
0x10b2…10de Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x000a, t01=0x011a}
0x10de…1108 Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x000a, t01=0x0146}
0x1108…1134 Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x000a, t01=0x0170}
0x1134…1150 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000b, t01=0x000c}
0x1150…115a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0028}
0x115a…117a Head {h00=0x001c, h01=0x0050, text=»* CONSTANT TCA EQUATES«, t00=0x000b, t01=0x0032}
0x117a…1184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0052}
0x1184…1198 Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000b, t01=0x005c}
0x1198…11ac Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000b, t01=0x0070}
0x11ac…11c0 Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000b, t01=0x0084}
0x11c0…11d6 Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000b, t01=0x0098}
0x11d6…11ec Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000b, t01=0x00ae}
0x11ec…1202 Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000b, t01=0x00c4}
0x1202…1216 Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000b, t01=0x00da}
0x1216…122c Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000b, t01=0x00ee}
0x122c…1240 Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000b, t01=0x0104}
0x1240…1254 Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000b, t01=0x0118}
0x1254…1268 Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000b, t01=0x012c}
0x1268…127c Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000b, t01=0x0140}
0x127c…1286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0154}
0x1286…12aa Head {h00=0x0020, h01=0x0050, text=»* LINE WORKBLOCKS EQUATES «, t00=0x000b, t01=0x015e}
0x12aa…12b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0182}
0x12b4…12d0 Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000b, t01=0x018c}
0x12d0…12f2 Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000c, t01=0x0018}
0x12f2…1316 Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000c, t01=0x003a}
0x1316…133a Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000c, t01=0x005e}
0x133a…1364 Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000c, t01=0x0082}
0x1364…137a Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000c, t01=0x00ac}
0x137a…1390 Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000c, t01=0x00c2}
0x1390…139a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d8}
0x139a…13ba Head {h00=0x001c, h01=0x0050, text=»* TC WORKBLOCK EQUATES«, t00=0x000c, t01=0x00e2}
0x13ba…13c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0102}
0x13c4…13d6 Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000c, t01=0x010c}
0x13d6…13ea Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000c, t01=0x011e}
0x13ea…13fe Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000c, t01=0x0132}
0x13fe…1412 Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000c, t01=0x0146}
0x1412…1428 Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000c, t01=0x015a}
0x1428…143e Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000c, t01=0x0170}
0x143e…1454 Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000c, t01=0x0186}
0x1454…1470 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000d, t01=0x000c}
0x1470…147a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0028}
0x147a…14a8 Head {h00=0x002a, h01=0x0050, text=»* CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000d, t01=0x0032}
0x14a8…14b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0060}
0x14b2…14c6 Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000d, t01=0x006a}
0x14c6…14da Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000d, t01=0x007e}
0x14da…14ee Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000d, t01=0x0092}
0x14ee…1502 Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000d, t01=0x00a6}
0x1502…1516 Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000d, t01=0x00ba}
0x1516…152a Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000d, t01=0x00ce}
0x152a…153e Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000d, t01=0x00e2}
0x153e…1552 Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000d, t01=0x00f6}
0x1552…1566 Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000d, t01=0x010a}
0x1566…157a Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000d, t01=0x011e}
0x157a…158e Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000d, t01=0x0132}
0x158e…15a2 Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000d, t01=0x0146}
0x15a2…15ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x015a}
0x15ac…15cc Head {h00=0x001c, h01=0x0050, text=»* CC WORKBLOCK EQUATES«, t00=0x000d, t01=0x0164}
0x15cc…15d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0184}
0x15d6…15fc Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000d, t01=0x018e}
0x15fc…1610 Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000e, t01=0x0024}
0x1610…1624 Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000e, t01=0x0038}
0x1624…164e Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000e, t01=0x004c}
0x164e…1676 Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000e, t01=0x0076}
0x1676…168c Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000e, t01=0x009e}
0x168c…16a2 Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000e, t01=0x00b4}
0x16a2…16be Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x000e, t01=0x00ca}
0x16be…16c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e6}
0x16c8…16ee Head {h00=0x0022, h01=0x0050, text=»* NETWORK WORKBLOCK EQUATES«, t00=0x000e, t01=0x00f0}
0x16ee…16f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0116}
0x16f8…1726 Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000e, t01=0x0120}
0x1726…174a Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000e, t01=0x014e}
0x174a…1754 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0172}
0x1754…1776 Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000e, t01=0x017c}
0x1776…178c Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000f, t01=0x000e}
0x178c…17a2 Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000f, t01=0x0024}
0x17a2…17b8 Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000f, t01=0x003a}
0x17b8…17ce Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000f, t01=0x0050}
0x17ce…17e4 Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000f, t01=0x0066}
0x17e4…17fa Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000f, t01=0x007c}
0x17fa…1810 Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000f, t01=0x0092}
0x1810…1826 Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000f, t01=0x00a8}
0x1826…183c Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000f, t01=0x00be}
0x183c…1852 Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000f, t01=0x00d4}
0x1852…1868 Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000f, t01=0x00ea}
0x1868…1872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0100}
0x1872…1896 Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000f, t01=0x010a}
0x1896…18ba Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000f, t01=0x012e}
0x18ba…18de Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000f, t01=0x0152}
0x18de…18e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0176}
0x18e8…190c Head {h00=0x0020, h01=0x0050, text=»* CC TEXT-INTERVAL EQUATES «, t00=0x000f, t01=0x0180}
0x190c…1916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0014}
0x1916…192a Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x0010, t01=0x001e}
0x192a…193e Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x0010, t01=0x0032}
0x193e…1952 Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x0010, t01=0x0046}
0x1952…1966 Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x0010, t01=0x005a}
0x1966…197a Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x0010, t01=0x006e}
0x197a…198e Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x0010, t01=0x0082}
0x198e…19a2 Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x0010, t01=0x0096}
0x19a2…19b6 Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x0010, t01=0x00aa}
0x19b6…19ca Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x0010, t01=0x00be}
0x19ca…19de Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x0010, t01=0x00d2}
0x19de…19f2 Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x0010, t01=0x00e6}
0x19f2…1a06 Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x0010, t01=0x00fa}
0x1a06…1a22 Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0010, t01=0x010e}
0x1a22…1a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012a}
0x1a2c…1a5c Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x0010, t01=0x0134}
0x1a5c…1a66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0164}
0x1a66…1a98 Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x0010, t01=0x016e}
0x1a98…1ad6 Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x0011, t01=0x0010}
0x1ad6…1b08 Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0011, t01=0x004e}
0x1b08…1b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0080}
0x1b12…1b32 Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0011, t01=0x008a}
0x1b32…1b46 Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0011, t01=0x00aa}
0x1b46…1b5a Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0011, t01=0x00be}
0x1b5a…1b6e Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0011, t01=0x00d2}
0x1b6e…1b82 Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0011, t01=0x00e6}
0x1b82…1b8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00fa}
0x1b8c…1b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0104}
0x1b96…1bc2 Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0011, t01=0x010e}
0x1bc2…1bee Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0011, t01=0x013a}
0x1bee…1c0a Head {h00=0x0018, h01=0x0050, text=» EJECT IDENT C:EQU «, t00=0x0011, t01=0x0166}
0x1c0a…1c4a Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x0182}
0x1c4a…1c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0032}
0x1c54…1c7a Head {h00=0x0022, h01=0x0050, text=»* SYSTEM ADAPTION PARAMETERS«, t00=0x0012, t01=0x003c}
0x1c7a…1c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0062}
0x1c84…1ca4 Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0012, t01=0x006c}
0x1ca4…1cc6 Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /2F ENTRY K KEY«, t00=0x0012, t01=0x008c}
0x1cc6…1ce8 Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /28 ENTER U KEY«, t00=0x0012, t01=0x00ae}
0x1ce8…1d10 Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /2A END OF RECORD KEY «, t00=0x0012, t01=0x00d0}
0x1d10…1d32 Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /23 CANCEL KEY «, t00=0x0012, t01=0x00f8}
0x1d32…1d5a Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0012, t01=0x011a}
0x1d5a…1d94 Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 60 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x0142}
0x1d94…1dd2 Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 600 CC EXCHANGE REQUEST TIME OUT (X100 MS) «, t00=0x0012, t01=0x017c}
0x1dd2…1dea Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0013, t01=0x002a}
0x1dea…1e20 Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1150 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0013, t01=0x0042}
0x1e20…1e60 Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0013, t01=0x0078}
0x1e60…1e98 Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 64 LENGTH OF CASSETTE BUFFER (WORDS) «, t00=0x0013, t01=0x00b8}
0x1e98…1ec4 Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 70 KB BUF LENGTH IN WORDS «, t00=0x0013, t01=0x00f0}
0x1ec4…1eec Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0013, t01=0x011c}
0x1eec…1f18 Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0013, t01=0x0144}
0x1f18…1f4e Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0013, t01=0x0170}
0x1f4e…1f8c Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1150 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0014, t01=0x0016}
0x1f8c…1f9a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0054}
0x1f9a…1fee Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0014, t01=0x0062}
0x1fee…2018 Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0014, t01=0x00b6}
0x2018…203c Head {h00=0x0020, h01=0x0050, text=» LEFT BYTE = SELECT ADDR. «, t00=0x0014, t01=0x00e0}
0x203c…205e Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE = POLL ADDR.«, t00=0x0014, t01=0x0104}
0x205e…209a Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0014, t01=0x0126}
0x209a…20b8 Head {h00=0x001a, h01=0x0050, text=» AND SYSTEM MESSAGES«, t00=0x0014, t01=0x0162}
0x20b8…20f0 Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0014, t01=0x0180}
0x20f0…2126 Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0015, t01=0x0028}
0x2126…212a Head {h00=0x0054, h01=0x0050}
0x212a…212e Head {h00=0x2a20, h01=0x5349}
0x212e…2170 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 ┆MULATED TERMINAL ADDRESSES FOR INQUIRY. RIGHT BYTE. IF SPECIFIED A┆
0x2170…21c0 54 20 53 59 53 54 45 4d 20 47 00 15 00 5e 00 20 00 50 4b 3a 53 41 31 5c 45 51 55 5c 30 5c 53 49 4d 2e 20 54 45 52 4d 2e 20 4e 42 52 20 31 00 15 00 b6 00 16 00 50 4b 3a 53 41 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 20 00 15 00 da 00 16 00 50 ┆T SYSTEM G ^ PK:SA1 EQU 0 SIM. TERM. NBR 1 PK:SA2 EQU 0 NBR 2 P┆
0x21c0…2210 4b 3a 53 41 33 5c 45 51 55 5c 30 5c 4e 42 52 20 33 20 00 15 00 f4 00 16 00 50 4b 3a 53 41 34 5c 45 51 55 5c 30 5c 4e 42 52 20 34 20 00 15 01 0e 00 16 00 50 4b 3a 53 41 35 5c 45 51 55 5c 30 5c 4e 42 52 20 35 20 00 15 01 28 00 16 00 50 4b 3a ┆K:SA3 EQU 0 NBR 3 PK:SA4 EQU 0 NBR 4 PK:SA5 EQU 0 NBR 5 ( PK:┆
0x2210…225c 53 41 36 5c 45 51 55 5c 30 5c 4e 42 52 20 36 20 00 15 01 42 00 16 00 50 4b 3a 53 41 37 5c 45 51 55 5c 30 5c 4e 42 52 20 37 20 00 15 01 5c 00 16 00 50 4b 3a 53 41 38 5c 45 51 55 5c 30 5c 4e 42 52 20 38 20 00 15 01 76 00 16 00 50 ┆SA6 EQU 0 NBR 6 B PK:SA7 EQU 0 NBR 7 PK:SA8 EQU 0 NBR 8 v P┆
0x225c…22ac (22, 0, 400) 4b 3a 53 41 39 5c 45 51 55 5c 30 5c 4e 42 52 20 39 20 00 15 01 90 00 18 00 50 4b 3a 53 41 31 30 5c 45 51 55 5c 30 5c 4e 42 52 20 31 30 20 00 16 00 1a 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 16 00 36 00 18 ┆K:SA9 EQU 0 NBR 9 PK:SA10 EQU 0 NBR 10 PK:SA11 EQU 0 NBR 11 6 ┆
0x22ac…22fc 00 50 4b 3a 53 41 31 32 5c 45 51 55 5c 30 5c 4e 42 52 20 31 32 20 00 16 00 52 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 16 00 6e 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 16 ┆ PK:SA12 EQU 0 NBR 12 R PK:SA13 EQU 0 NBR 13 n PK:SA14 EQU 0 NBR 14 ┆
0x22fc…234c 00 8a 00 18 00 50 4b 3a 53 41 31 35 5c 45 51 55 5c 30 5c 4e 42 52 20 31 35 20 00 16 00 a6 00 18 00 50 4b 3a 53 41 31 36 5c 45 51 55 5c 30 5c 4e 42 52 20 31 36 20 00 16 00 c2 00 18 00 50 4b 3a 53 41 31 37 5c 45 51 55 5c 30 5c 4e 42 52 20 31 ┆ PK:SA15 EQU 0 NBR 15 PK:SA16 EQU 0 NBR 16 PK:SA17 EQU 0 NBR 1┆
0x234c…239c 37 20 00 16 00 de 00 18 00 50 4b 3a 53 41 31 38 5c 45 51 55 5c 30 5c 4e 42 52 20 31 38 20 00 16 00 fa 00 18 00 50 4b 3a 53 41 31 39 5c 45 51 55 5c 30 5c 4e 42 52 20 31 39 20 00 16 01 16 00 18 00 50 4b 3a 53 41 32 30 5c 45 51 55 5c 30 5c 4e ┆7 PK:SA18 EQU 0 NBR 18 PK:SA19 EQU 0 NBR 19 PK:SA20 EQU 0 N┆
0x239c…23ec 42 52 20 32 30 20 00 16 01 32 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 01 4e 00 18 00 50 4b 3a 53 41 32 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 32 20 00 16 01 6a 00 18 00 50 4b 3a 53 41 32 33 5c 45 51 55 ┆BR 20 2 PK:SA21 EQU 0 NBR 21 N PK:SA22 EQU 0 NBR 22 j PK:SA23 EQU┆
0x23ec…243c (23, 0, 400) 5c 30 5c 4e 42 52 20 32 33 20 00 16 01 86 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 17 00 12 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 17 00 2e 00 18 00 50 4b 3a 53 41 32 36 ┆ 0 NBR 23 PK:SA24 EQU 0 NBR 24 PK:SA25 EQU 0 NBR 25 . PK:SA26┆
0x243c…248c 5c 45 51 55 5c 30 5c 4e 42 52 20 32 36 20 00 17 00 4a 00 0a 00 50 5c 45 4a 45 43 54 00 17 00 66 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 ┆ EQU 0 NBR 26 J P EJECT f < P********************************************┆
0x248c…24dc 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 17 00 74 00 06 00 50 2a 20 00 17 00 b4 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 17 00 be 00 28 00 50 2a 20 ┆*********** t P* , P* PARAMETERS FOR CONDITIONAL ASSEMBLY ( P* ┆
0x24dc…252c 20 20 4f 46 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 50 41 43 4b 41 47 45 20 4d 4f 44 55 4c 45 53 20 00 17 00 ee 00 06 00 50 2a 20 00 17 01 1a 00 3c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ OF CONCENTRATOR PACKAGE MODULES P* < P****************************┆
0x252c…257c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 17 01 24 00 1c 00 50 58 3a 41 5c 45 51 55 5c 32 5c 2a 20 20 4e 4c 49 4e 45 20 3c 3d 31 30 20 00 17 01 64 00 20 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 ┆*************************** $ PX:A EQU 2 * NLINE <=10 d P NUMBER OF┆
0x257c…25cc (24, 0, 398) 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 17 01 84 00 1a 00 50 58 3a 42 5c 45 51 55 5c 31 35 5c 2a 20 20 4e 54 43 20 3c 3d 38 30 00 18 00 18 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 ┆ TERMINAL LINES PX:B EQU 15 * NTC <=80 . P TOTAL NUMBER OF TC:S ON┆
0x25cc…261c 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 18 00 36 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 18 00 68 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 ┆ TERMINAL LINES 6 PX:C EQU 26 * NSIM <=26 h $ P NUMBER OF SIMULATED T┆
0x261c…266c 45 52 4d 49 4e 41 4c 53 00 18 00 88 00 14 00 50 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 18 00 b0 00 16 00 50 58 3a 44 5c 45 51 55 5c 30 5c 2a 20 20 4c 4f 4f 50 20 00 18 00 c8 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4d 55 4c ┆ERMINALS P FOR INQUIRIES PX:D EQU 0 * LOOP . P IF = 0. MUL┆
0x266c…26bc 54 49 50 4f 49 4e 54 20 43 4f 4e 46 49 47 2e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 18 00 e2 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 4f 4f 50 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 18 ┆TIPOINT CONFIG. DOWNSTREAMS . P IF = 1. LOOP CONFIGURATION DOWNSTREAMS ┆
0x26bc…270a 01 14 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 01 46 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 45 44 49 54 20 42 55 46 46 45 52 53 20 46 4f 52 20 53 50 4f 4f 4c 20 00 18 01 66 ┆ PX:E EQU 4 * NSPOOL <=4 F ( P NUMBER OF EDIT BUFFERS FOR SPOOL f┆
0x270a…275a (25, 0, 400) 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 19 00 04 00 20 00 50 58 3a 46 5c 45 51 55 5c 34 5c 2a 20 20 30 3c 20 4e 54 50 4c 49 4e 20 3c 3d 34 30 20 00 19 00 2a 00 28 00 50 5c 5c ┆ " P FUNCTION TO OPERATORS TERM. PX:F EQU 4 * 0< NTPLIN <=40 * ( P ┆
0x275a…27aa 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 19 00 4e 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 19 00 7a ┆ NUMBER OF TRASKS IN POOL 'TPLIN' N & P HANDLING TRANSACTIONS FROM TC:S z┆
0x27aa…27fa 00 1e 00 50 58 3a 47 5c 45 51 55 5c 32 5c 2a 20 20 30 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 19 00 a4 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 19 00 c6 00 2c ┆ PX:G EQU 2 * 0< NTPSUP <=5 ( P NUMBER OF TRASKS IN POOL 'TPSUP' ,┆
0x27fa…284a 00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 20 46 52 4f 4d 20 4d 41 49 4e 20 46 52 41 4d 45 00 19 00 f2 00 1c 00 50 5c 5c 5c 4f 52 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 49 4e 41 4c 00 19 01 22 00 18 ┆ P HANDLING TRANSACTIONS FROM MAIN FRAME P OR OPERATORS TERMINAL " ┆
0x284a…289a 00 50 58 3a 48 5c 45 51 55 5c 31 5c 2a 20 20 4c 49 4e 54 53 54 20 00 19 01 42 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 01 5e 00 30 00 50 5c 5c 5c 49 46 20 3d 20 31 2e ┆ PX:H EQU 1 * LINTST B $ P IF = 0. NO LINE TEST COMMAND ^ 0 P IF = 1.┆
0x289a…28ea (26, 0, 400) 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 01 86 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 1a 00 2a 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e ┆ LINE TEST FACILITY (4-WIRE ONLY) PX:I EQU 2 * ONLINE * $ P IF = 0.┆
0x28ea…293a 20 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 1a 00 46 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 1a 00 6e 00 24 00 50 5c 5c 5c 49 46 20 ┆ OFF LINE CONCENTRATOR F ( P IF = 1. ON/OFF LINE CONCENTRATOR n $ P IF ┆
0x293a…298a 3d 20 32 2e 20 4f 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 1a 00 9a 00 18 00 50 58 3a 4b 5c 45 51 55 5c 31 5c 2a 20 20 53 45 54 41 44 52 20 00 1a 00 c2 00 06 00 50 2a 20 00 1a 00 de 00 06 00 50 2a 20 00 1a 00 e8 00 06 ┆= 2. ON LINE CONCENTRATOR PX:K EQU 1 * SETADR P* P* ┆
0x298a…29da 00 50 2a 20 00 1a 00 f2 00 06 00 50 2a 20 00 1a 00 fc 00 06 00 50 2a 20 00 1a 01 06 00 06 00 50 2a 20 00 1a 01 10 00 0a 00 50 5c 4c 49 53 54 20 00 1a 01 1a 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 1a 01 28 ┆ P* P* P* P* P LIST P EJECT IDENT C:OPC (┆
0x29da…2a2a 00 06 00 50 2a 20 00 1a 01 44 00 06 00 50 2a 20 00 1a 01 4e 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 01 58 00 22 00 50 2a 20 20 20 53 50 45 43 ┆ P* D P* N , P* PARAMETERS FOR CONDITIONAL ASSEMBLY X " P* SPEC┆
0x2a2a…2a7a (27, 0, 400) 49 46 49 45 44 20 49 4e 20 4d 4f 44 55 4c 45 20 43 3a 45 51 55 20 00 1a 01 88 00 06 00 50 2a 20 00 1b 00 1e 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆IFIED IN MODULE C:EQU P* @ P****************************************┆
0x2a7a…2aca 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1b 00 28 00 3e 00 50 4c 4f 4f 50 5c 45 51 55 5c 58 3a 44 5c 49 46 20 3d 20 30 2e 20 4d 55 4c 54 49 50 4f 49 4e 54 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 ┆******************** ( > PLOOP EQU X:D IF = 0. MULTIPOINT CONFIGURATION DOWNST┆
0x2aca…2b1a 52 45 41 4d 53 20 00 1b 00 6c 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 4f 4f 50 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 1b 00 ae 00 36 00 50 53 45 54 41 44 52 5c 45 51 55 5c 58 3a 4b 5c 49 ┆REAMS l . P IF = 1. LOOP CONFIGURATION DOWNSTREAMS 6 PSETADR EQU X:K I┆
0x2b1a…2b6a 46 20 3d 20 30 2e 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 20 00 1b 00 e0 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 45 4e 2e 20 ┆F = 0.CONCENTRATOR AND SIM. TERM. * P ADDRESSES SPECIFIED AT SYSTEM GEN. ┆
0x2b6a…2bba 00 1b 01 1a 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 01 48 00 20 00 50 5c 5c 5c 53 50 45 43 49 46 49 45 44 20 42 59 20 4f 50 45 52 41 54 4f 52 ┆ , P IF = 1.CONC. AND SIM. TERM. ADDRESSES H P SPECIFIED BY OPERATOR┆
0x2bba…2c0a (28, 0, 398) 20 4f 52 20 00 1b 01 78 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 1c 00 0c 00 30 00 50 4c 49 4e 54 53 54 5c 45 51 55 5c 58 3a 48 5c 49 46 20 3d 20 30 2e 20 4e 4f 20 4c 49 4e 45 ┆ OR x " P BY NETWORK CONFIG. CASSETTE 0 PLINTST EQU X:H IF = 0. NO LINE┆
0x2c0a…2c5a 20 54 45 53 54 20 43 4f 4d 4d 41 4e 44 20 00 1c 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 1c 00 66 00 18 00 50 5c 45 4a 45 43 54 ┆ TEST COMMAND 2 0 P IF = 1. LINE TEST FACILITY (4-WIRE ONLY) f P EJECT┆
0x2c5a…2caa 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 1c 00 9a 00 48 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 4f 20 50 20 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 ┆ IDENT C:OPC H P******************* K : O P C ****************************┆
0x2caa…2cfa 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1c 00 b6 00 06 00 50 2a 20 00 1c 01 02 00 06 00 50 2a 20 00 1c 01 0c 00 06 00 50 2a 20 00 1c 01 16 00 1a 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 4f 20 50 20 43 00 1c 01 20 00 32 00 50 2a 48 ┆********* P* P* P* P*SUBROUTINE K : O P C 2 P*H┆
0x2cfa…2d48 41 4e 44 4c 45 53 20 54 48 45 20 4f 50 45 52 41 54 4f 52 20 52 45 51 55 45 53 54 45 44 20 43 4f 4d 4d 55 4e 49 43 41 54 49 4f 4e 20 00 1c 01 3e 00 06 00 50 2a 20 00 1c 01 74 00 06 00 50 2a 20 00 1c 01 7e 00 06 00 50 2a 20 00 1c 01 88 ┆ANDLES THE OPERATOR REQUESTED COMMUNICATION > P* t P* ~ P* ┆
0x2d48…2d98 (29, 0, 398) 00 26 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 53 54 41 52 54 45 44 20 42 59 20 43 3a 49 4e 49 20 00 1d 00 04 00 06 00 50 2a 20 00 1d 00 2e 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 1d ┆ & P* CALL SEQUENCE: STARTED BY C:INI P* . P* ENTRY PARAM: NONE ┆
0x2d98…2de8 00 38 00 06 00 50 2a 20 00 1d 00 56 00 3c 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b 3a 52 4f 50 54 20 41 4e 44 20 41 4c 4c 20 43 4f 4d 4d 41 4e 44 20 52 45 53 50 4f 4e 53 45 20 4d 4f 44 55 4c 45 53 00 1d 00 60 00 06 00 50 ┆ 8 P* V < P* SUBROUTINES: K:ROPT AND ALL COMMAND RESPONSE MODULES ` P┆
0x2de8…2e38 2a 20 00 1d 00 a0 00 1e 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 4d 3a 5c 4e 4f 20 52 45 54 55 52 4e 00 1d 00 aa 00 06 00 50 2a 20 00 1d 00 cc 00 06 00 50 2a 20 00 1d 00 d6 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆* P* RETURN PARAM: NO RETURN P* P* D P****************┆
0x2e38…2e88 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 e0 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 1d 01 28 ┆*********************************************** P EJECT IDENT C:OPC (┆
0x2e88…2ed6 00 06 00 50 2a 20 00 1d 01 44 00 10 00 50 2a 5c 5c 4b 20 3a 20 4f 20 50 20 43 00 1d 01 4e 00 06 00 50 2a 20 00 1d 01 62 00 06 00 50 2a 20 00 1d 01 6c 00 18 00 50 2a 20 20 52 45 41 44 20 43 4f 4e 54 52 4f 4c 20 4b 45 59 53 00 1d 01 76 ┆ P* D P* K : O P C N P* b P* l P* READ CONTROL KEYS v┆
0x2ed6…2f26 (30, 0, 400) 00 06 00 50 2a 20 00 1e 00 04 00 06 00 50 2a 20 00 1e 00 0e 00 10 00 50 4b 3a 4f 50 43 5c 45 51 55 5c 2a 20 00 1e 00 18 00 1c 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 5c 4e 45 57 20 4c 49 4e 45 20 00 1e 00 2c 00 10 00 50 5c 44 41 54 ┆ P* P* PK:OPC EQU * P CF A14,K:PRTN NEW LINE , P DAT┆
0x2f26…2f76 41 5c 4b 3a 46 30 30 32 00 1e 00 4c 00 10 00 50 4b 3a 4f 50 43 31 5c 45 51 55 5c 2a 00 1e 00 60 00 20 00 50 5c 4c 44 4b 5c 41 37 2c 31 5c 4f 52 44 45 52 3a 20 42 41 53 49 43 20 52 45 41 44 20 00 1e 00 74 00 20 00 50 5c 4c 44 4b 4c 5c 41 38 ┆A K:F002 L PK:OPC1 EQU * ` P LDK A7,1 ORDER: BASIC READ t P LDKL A8┆
0x2f76…2fc6 2c 4b 3a 4b 42 45 5c 4b 45 59 20 42 4f 41 52 44 20 45 43 42 00 1e 00 98 00 0e 00 50 5c 4c 44 4b 5c 41 36 2c 31 20 00 1e 00 bc 00 30 00 50 5c 53 54 5c 41 36 2c 4b 3a 45 52 4c 2c 41 38 5c 52 45 54 55 52 4e 20 41 46 54 45 52 20 41 4e 59 20 4b ┆,K:KBE KEY BOARD ECB P LDK A6,1 0 P ST A6,K:ERL,A8 RETURN AFTER ANY K┆
0x2fc6…3016 45 59 20 50 52 45 53 53 45 44 00 1e 00 ce 00 0e 00 50 5c 4c 44 4b 5c 41 36 2c 30 20 00 1e 01 02 00 2a 00 50 5c 53 54 5c 41 36 2c 4b 3a 45 43 57 2c 41 38 5c 43 4c 45 41 52 20 45 43 42 20 43 4f 4e 54 52 4f 4c 20 57 4f 52 44 00 1e 01 14 00 08 ┆EY PRESSED P LDK A6,0 * P ST A6,K:ECW,A8 CLEAR ECB CONTROL WORD ┆
0x3016…3066 00 50 5c 4c 4b 4d 00 1e 01 42 00 32 00 50 5c 44 41 54 41 5c 2d 31 2c 4b 3a 4f 49 4e 54 5c 52 45 41 44 20 4b 42 20 41 4e 44 20 41 43 54 49 56 41 54 45 20 41 54 20 4b 3a 4f 49 4e 54 00 1e 01 4e 00 14 00 50 5c 4c 4b 4d 5c 5c 45 58 49 54 20 4f ┆ P LKM B 2 P DATA -1,K:OINT READ KB AND ACTIVATE AT K:OINT N P LKM EXIT O┆
0x3066…3070 (31, 0, 400) 50 43 4f 4d 00 1e 01 84 00 0c ┆PCOM ┆
0x3070…30c0 00 50 5c 44 41 54 41 5c 33 20 00 1f 00 0c 00 06 00 50 2a 20 00 1f 00 1c 00 06 00 50 2a 20 00 1f 00 26 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 1f 00 30 00 06 00 50 2a 20 00 1f 00 4c 00 06 00 50 2a 20 00 1f ┆ P DATA 3 P* P* & P EJECT IDENT C:OPC 0 P* L P* ┆
0x30c0…3110 00 56 00 26 00 50 2a 20 20 45 4e 54 52 59 20 41 46 54 45 52 20 50 52 45 53 53 45 44 20 43 4f 4e 54 52 4f 4c 20 4b 45 59 00 1f 00 60 00 06 00 50 2a 20 00 1f 00 8a 00 06 00 50 2a 20 00 1f 00 94 00 10 00 50 4b 3a 4f 49 4e 54 5c 45 51 55 5c 2a ┆ V & P* ENTRY AFTER PRESSED CONTROL KEY ` P* P* PK:OINT EQU *┆
0x3110…312e 00 1f 00 9e 00 16 00 50 5c 4c 44 4b 4c 5c 41 31 33 2c 54 43 4f 50 5c 54 49 44 00 1f 00 b2 ┆ P LDKL A13,TCOP TID ┆
0x312e…4a84 […elided…]
0x4a84…4ab0 4f 4e 45 20 00 2f 01 0c 00 06 00 50 2a 20 00 2f 01 2a 00 1a 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 45 58 49 54 20 ┆ONE / P* / * P* RETURN METOD: EXIT ┆
0x4ab0…4af6 00 2f 01 34 00 06 00 50 2a 20 00 2f 01 52 00 16 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 20 00 2f 01 5c 00 06 00 50 2a 20 00 2f 01 76 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a ┆ / 4 P* / R P* STACKER NEED: / P* / v P* LIMITATIONS:┆
0x4af6…4b46 (48, 0, 400) 5c 20 00 2f 01 80 00 06 00 50 2a 20 00 30 00 0a 00 22 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 41 4e 59 20 42 55 54 20 4f 50 43 4f 4d 00 30 00 14 00 06 00 50 2a 20 00 30 00 3a 00 06 00 50 2a 20 00 30 00 44 00 44 00 50 2a 2a ┆ / P* 0 " P* CALLING TASK: ANY BUT OPCOM 0 P* 0 : P* 0 D D P**┆
0x4b46…4b96 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 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 30 00 4e 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 ┆************************************************************* 0 N P EJECT ID┆
0x4b96…4be6 45 4e 54 20 43 3a 4f 50 43 20 00 30 00 96 00 06 00 50 2a 20 00 30 00 b2 00 12 00 50 2a 5c 5c 4b 20 3a 20 4f 20 50 20 43 20 43 00 30 00 bc 00 06 00 50 2a 20 00 30 00 d2 00 1a 00 50 2a 20 20 20 50 52 45 50 41 52 45 20 50 52 49 4e 54 20 45 43 ┆ENT C:OPC 0 P* 0 P* K : O P C C 0 P* 0 P* PREPARE PRINT EC┆
0x4be6…4c36 42 20 00 30 00 dc 00 06 00 50 2a 20 00 30 00 fa 00 10 00 50 4b 3a 4f 50 43 43 5c 45 51 55 5c 2a 00 30 01 04 00 1e 00 50 5c 4c 44 4b 4c 5c 41 31 33 2c 54 43 4f 50 5c 54 43 41 20 41 44 44 52 45 53 53 00 30 01 18 00 12 00 50 5c 4c 44 5c 41 31 ┆B 0 P* 0 PK:OPCC EQU * 0 P LDKL A13,TCOP TCA ADDRESS 0 P LD A1┆
0x4c36…4c86 34 2c 32 2c 41 31 33 20 00 30 01 3a 00 20 00 50 5c 41 44 52 5c 41 31 34 2c 41 31 33 5c 53 45 54 20 53 54 41 43 4b 20 42 41 53 45 20 00 30 01 50 00 12 00 50 5c 49 4d 5c 4f 52 49 47 49 4e 2c 41 31 33 00 30 01 74 00 22 00 50 5c 4c 44 4b 4c 5c ┆4,2,A13 0 : P ADR A14,A13 SET STACK BASE 0 P P IM ORIGIN,A13 0 t " P LDKL ┆
0x4c86…4cd6 (49, 0, 400) 41 38 2c 4b 3a 47 50 45 5c 47 45 54 20 50 52 49 4e 54 45 52 20 45 43 42 00 30 01 8a 00 1e 00 50 5c 4c 44 5c 41 34 2c 49 4e 50 42 4c 2c 41 31 5c 47 45 54 20 4c 45 4e 47 54 48 00 31 00 20 00 26 00 50 5c 4c 44 4b 4c 5c 41 33 2c 4b 3a 47 50 42 ┆A8,K:GPE GET PRINTER ECB 0 P LD A4,INPBL,A1 GET LENGTH 1 & P LDKL A3,K:GPB┆
0x4cd6…4d26 5c 47 45 54 20 50 52 49 4e 54 45 52 20 42 55 46 46 45 52 20 00 31 00 42 00 18 00 50 5c 4c 44 4b 5c 41 32 2c 30 5c 26 26 26 26 43 4d 52 38 35 35 00 31 00 6c 00 20 00 50 5c 53 54 52 5c 41 32 2c 41 33 5c 26 26 26 26 45 44 49 54 20 4e 45 57 20 ┆ GET PRINTER BUFFER 1 B P LDK A2,0 &&&&CMR855 1 l P STR A2,A3 &&&&EDIT NEW ┆
0x4d26…4d76 4c 49 4e 45 00 31 00 88 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 31 00 ac 00 06 00 50 2a 20 00 31 00 c8 00 26 00 50 2a 20 20 20 45 44 49 54 20 43 20 46 49 52 53 54 20 49 4e 20 50 52 49 4e 54 45 52 20 42 55 ┆LINE 1 P EJECT IDENT C:OPC 1 P* 1 & P* EDIT C FIRST IN PRINTER BU┆
0x4d76…4dc6 46 46 45 52 00 31 00 d2 00 06 00 50 2a 20 00 31 00 fc 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 34 33 30 30 00 31 01 06 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 33 20 00 31 01 1c 00 0e 00 50 5c 4c 43 52 5c 41 32 2c 41 31 00 31 01 2e 00 10 00 50 ┆FFER 1 P* 1 P LDKL A2,/4300 1 P ADK A1,3 1 P LCR A2,A1 1 . P┆
0x4dc6…4e16 5c 53 54 5c 41 32 2c 32 2c 41 33 20 00 31 01 40 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 33 41 32 30 00 31 01 54 00 10 00 50 5c 53 54 5c 41 32 2c 34 2c 41 33 20 00 31 01 6a 00 04 00 50 00 31 01 7e 00 06 00 50 2a 20 00 31 01 86 00 26 00 50 ┆ ST A2,2,A3 1 @ P LDKL A2,/3A20 1 T P ST A2,4,A3 1 j P 1 ~ P* 1 & P┆
0x4e16…4e66 (50, 0, 400) 2a 20 20 20 45 44 49 54 20 43 4f 4d 4d 41 4e 44 20 49 4e 54 4f 20 50 52 49 4e 54 20 42 55 46 46 45 52 00 31 01 90 00 06 00 50 2a 20 00 32 00 2a 00 20 00 50 5c 4c 44 52 5c 41 35 2c 41 31 5c 47 45 54 20 45 4e 44 20 4f 46 20 42 55 46 46 45 52 ┆* EDIT COMMAND INTO PRINT BUFFER 1 P* 2 * P LDR A5,A1 GET END OF BUFFER┆
0x4e66…4eb6 00 32 00 34 00 0e 00 50 5c 41 44 52 5c 41 35 2c 41 34 00 32 00 58 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 2f 33 00 32 00 6a 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 2f 36 00 32 00 7c 00 10 00 50 4f 43 43 30 35 30 5c 45 51 55 5c 2a 00 32 00 8e 00 0e ┆ 2 4 P ADR A5,A4 2 X P ADK A1,/3 2 j P ADK A3,/6 2 | POCC050 EQU * 2 ┆
0x4eb6…4f06 00 50 5c 4c 43 52 5c 41 32 2c 41 31 00 32 00 a2 00 0e 00 50 5c 53 43 52 5c 41 32 2c 41 33 00 32 00 b4 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 31 20 00 32 00 c6 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 31 20 00 32 00 d8 00 1e 00 50 5c 43 57 52 5c 41 ┆ P LCR A2,A1 2 P SCR A2,A3 2 P ADK A1,1 2 P ADK A3,1 2 P CWR A┆
0x4f06…4f56 31 2c 41 35 5c 45 4e 44 20 4f 46 20 43 4f 4d 4d 41 4e 44 3f 00 32 00 ea 00 12 00 50 5c 52 42 28 4c 29 5c 4f 43 43 30 35 30 20 00 32 01 0c 00 24 00 50 5c 53 54 5c 41 34 2c 4b 3a 45 52 4c 2c 41 38 5c 53 54 4f 52 45 20 49 54 20 49 4e 20 45 43 ┆1,A5 END OF COMMAND? 2 P RB(L) OCC050 2 $ P ST A4,K:ERL,A8 STORE IT IN EC┆
0x4f56…4fa6 42 20 00 32 01 22 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 32 01 4a 00 06 00 50 2a 20 00 32 01 66 00 20 00 50 2a 20 20 20 52 45 4c 45 41 53 45 20 49 4e 50 55 54 20 44 43 2d 42 55 46 46 45 52 20 00 32 01 70 ┆B 2 " P EJECT IDENT C:OPC 2 J P* 2 f P* RELEASE INPUT DC-BUFFER 2 p┆
0x4fa6…4ff6 (51, 0, 398) 00 06 00 50 2a 20 00 33 00 04 00 26 00 50 5c 53 55 52 5c 41 31 2c 41 34 5c 52 45 53 54 4f 52 45 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 00 33 00 0e 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 33 20 00 33 00 38 00 12 00 50 5c 4c 44 4b 4c 5c ┆ P* 3 & P SUR A1,A4 RESTORE BUFFER ADDRESS 3 P SUK A1,3 3 8 P LDKL ┆
0x4ff6…5046 41 38 2c 4b 3a 53 30 45 00 33 00 4a 00 14 00 50 5c 53 54 5c 41 31 2c 4b 3a 45 42 41 2c 41 38 20 00 33 00 60 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 2f 41 32 20 00 33 00 78 00 08 00 50 5c 4c 4b 4d 00 33 00 8c 00 0c 00 50 5c 44 41 54 41 5c 31 20 ┆A8,K:S0E 3 J P ST A1,K:EBA,A8 3 ` P LDK A7,/A2 3 x P LKM 3 P DATA 1 ┆
0x5046…5096 00 33 00 98 00 06 00 50 2a 20 00 33 00 a8 00 06 00 50 2a 20 00 33 00 b2 00 22 00 50 2a 5c 4d 4f 56 45 20 4d 45 53 53 2e 20 54 4f 20 4b 45 59 20 42 4f 41 52 44 20 42 55 46 46 00 33 00 bc 00 06 00 50 2a 20 00 33 00 e2 00 12 00 50 5c 43 46 5c ┆ 3 P* 3 P* 3 " P* MOVE MESS. TO KEY BOARD BUFF 3 P* 3 P CF ┆
0x5096…50e6 41 31 34 2c 4b 3a 53 54 31 30 00 33 00 ec 00 1c 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 47 50 45 5c 47 45 54 20 47 50 45 43 42 00 33 01 02 00 26 00 50 5c 4c 44 5c 41 31 2c 4b 3a 45 42 41 2c 41 38 5c 47 45 54 20 42 55 46 2c 49 4e 20 47 50 2d ┆A14,K:ST10 3 P LDKL A8,K:GPE GET GPECB 3 & P LD A1,K:EBA,A8 GET BUF,IN GP-┆
0x50e6…5134 45 43 42 20 00 33 01 22 00 1e 00 50 5c 4c 44 5c 41 35 2c 4b 3a 45 52 4c 2c 41 38 5c 47 45 54 20 4c 45 4e 47 54 48 00 33 01 4c 00 24 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 4b 42 45 5c 47 45 54 20 4b 45 59 20 42 4f 41 52 44 20 45 43 42 ┆ECB 3 " P LD A5,K:ERL,A8 GET LENGTH 3 L $ P LDKL A8,K:KBE GET KEY BOARD ECB┆
0x5134…5184 (52, 0, 400) 00 33 01 6e 00 0e 00 50 5c 53 55 4b 5c 41 35 2c 35 20 00 34 00 08 00 2c 00 50 5c 53 54 5c 41 35 2c 4b 3a 45 45 4c 2c 41 38 5c 4c 45 4e 47 54 48 20 54 4f 20 4b 45 59 20 42 4f 41 52 44 20 45 43 42 20 00 34 00 1a 00 0e 00 50 5c 53 55 4b 5c 41 ┆ 3 n P SUK A5,5 4 , P ST A5,K:EEL,A8 LENGTH TO KEY BOARD ECB 4 P SUK A┆
0x5184…51d4 35 2c 31 20 00 34 00 4a 00 1e 00 50 5c 4c 44 4b 4c 5c 41 33 2c 4b 3a 4b 42 42 5c 47 45 54 20 42 55 46 46 45 52 20 00 34 00 5c 00 14 00 50 5c 53 54 5c 41 35 2c 49 4e 50 42 4c 2c 41 33 20 00 34 00 7e 00 0e 00 50 5c 41 44 4b 5c 41 35 2c 36 20 ┆5,1 4 J P LDKL A3,K:KBB GET BUFFER 4 P ST A5,INPBL,A3 4 ~ P ADK A5,6 ┆
0x51d4…5224 00 34 00 96 00 0e 00 50 5c 41 44 52 5c 41 35 2c 41 31 00 34 00 a8 00 14 00 50 5c 53 54 5c 41 33 2c 4b 3a 45 42 41 2c 41 38 20 00 34 00 ba 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 36 20 00 34 00 d2 00 10 00 50 4f 43 43 30 36 30 5c 45 51 55 5c 2a ┆ 4 P ADR A5,A1 4 P ST A3,K:EBA,A8 4 P ADK A1,6 4 POCC060 EQU *┆
0x5224…5274 00 34 00 e4 00 0e 00 50 5c 4c 43 52 5c 41 32 2c 41 31 00 34 00 f8 00 0e 00 50 5c 53 43 52 5c 41 32 2c 41 33 00 34 01 0a 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 31 20 00 34 01 1c 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 31 20 00 34 01 2e 00 0e 00 50 ┆ 4 P LCR A2,A1 4 P SCR A2,A3 4 P ADK A1,1 4 P ADK A3,1 4 . P┆
0x5274…52c4 5c 43 57 52 5c 41 31 2c 41 35 00 34 01 40 00 12 00 50 5c 52 42 28 4c 29 5c 4f 43 43 30 36 30 20 00 34 01 52 00 12 00 50 5c 4c 44 4b 5c 41 32 2c 2f 31 32 5c 28 20 00 34 01 68 00 22 00 50 5c 53 43 52 5c 41 32 2c 41 33 5c 50 55 54 20 4c 41 53 ┆ CWR A1,A5 4 @ P RB(L) OCC060 4 R P LDK A2,/12 ( 4 h " P SCR A2,A3 PUT LAS┆
0x52c4…5314 (53, 0, 400) 54 20 49 4e 20 42 55 46 46 45 52 20 00 34 01 7e 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 4c 44 31 30 00 35 00 14 00 04 00 50 00 35 00 2a 00 06 00 50 2a 20 00 35 00 32 00 16 00 50 2a 20 20 20 50 52 49 4e 54 20 43 4f 4d 4d 41 4e 44 20 00 35 ┆T IN BUFFER 4 ~ P CF A14,K:LD10 5 P 5 * P* 5 2 P* PRINT COMMAND 5┆
0x5314…5364 00 3c 00 06 00 50 2a 20 00 35 00 56 00 12 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 47 50 45 00 35 00 60 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 2f 38 36 20 00 35 00 76 00 08 00 50 5c 4c 4b 4d 00 35 00 8a 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 35 ┆ < P* 5 V P LDKL A8,K:GPE 5 ` P LDK A7,/86 5 v P LKM 5 P DATA 1 5┆
0x5364…53b4 00 96 00 06 00 50 2a 20 00 35 00 a6 00 06 00 50 2a 20 00 35 00 b0 00 1a 00 50 2a 20 20 20 47 45 54 20 43 4f 4d 4d 41 4e 44 20 4d 4f 44 55 4c 45 00 35 00 ba 00 06 00 50 2a 20 00 35 00 d8 00 24 00 50 5c 53 55 52 5c 41 33 2c 41 34 5c 4d 4f 44 ┆ P* 5 P* 5 P* GET COMMAND MODULE 5 P* 5 $ P SUR A3,A4 MOD┆
0x53b4…5404 49 46 59 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 00 35 00 e2 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 36 20 00 35 01 0a 00 0e 00 50 5c 4c 44 52 5c 41 38 2c 41 33 00 35 01 1c 00 1c 00 50 5c 53 55 4b 5c 41 34 2c 36 5c 4d 4f 44 49 46 59 20 4c ┆IFY BUFFER ADDRESS 5 P ADK A3,6 5 P LDR A8,A3 5 P SUK A4,6 MODIFY L┆
0x5404…5454 45 4e 47 54 48 20 00 35 01 2e 00 12 00 50 5c 4c 43 5c 41 32 2c 4b 3a 47 50 42 2b 33 00 35 01 4e 00 0e 00 50 5c 45 43 52 5c 41 32 2c 41 32 00 35 01 64 00 12 00 50 5c 41 4e 4b 4c 5c 41 32 2c 2f 46 46 30 30 00 35 01 76 00 12 00 50 5c 43 43 4b ┆ENGTH 5 . P LC A2,K:GPB+3 5 N P ECR A2,A2 5 d P ANKL A2,/FF00 5 v P CCK┆
0x5454…54a4 (54, 0, 400) 5c 41 32 2c 2f 35 35 30 30 20 00 35 01 8c 00 14 00 50 5c 52 46 28 45 29 5c 4f 43 43 31 30 30 5c 55 3a 00 36 00 12 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 36 00 2a 00 06 00 50 2a 20 00 36 00 46 00 12 00 50 ┆ A2,/5500 5 P RF(E) OCC100 U: 6 P EJECT IDENT C:OPC 6 * P* 6 F P┆
0x54a4…54f4 2a 20 20 20 4b 3a 20 43 4f 4d 4d 41 4e 44 00 36 00 50 00 06 00 50 2a 20 00 36 00 66 00 28 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 46 54 4b 5c 46 4f 52 4d 41 54 20 54 41 42 4c 45 20 41 44 44 52 45 53 53 20 00 36 00 70 00 24 00 50 5c 4c 44 4b ┆* K: COMMAND 6 P P* 6 f ( P LDKL A1,K:FTK FORMAT TABLE ADDRESS 6 p $ P LDK┆
0x54f4…5544 4c 5c 41 38 2c 4b 3a 4b 42 45 5c 5c 46 4f 52 20 4b 3a 47 54 43 20 4d 4f 44 55 4c 45 00 36 00 9c 00 26 00 50 5c 4c 44 5c 41 38 2c 4b 3a 45 42 41 2c 41 38 5c 5c 46 4f 52 20 4b 3a 47 54 43 20 4d 4f 44 55 4c 45 20 00 36 00 c4 00 2c 00 50 5c 43 ┆L A8,K:KBE FOR K:GTC MODULE 6 & P LD A8,K:EBA,A8 FOR K:GTC MODULE 6 , P C┆
0x5544…5594 46 5c 41 31 34 2c 4b 3a 43 4b 46 5c 43 48 45 43 4b 20 49 46 20 49 4e 50 55 54 20 52 45 43 4f 47 4e 49 5a 45 44 20 00 36 00 ee 00 20 00 50 5c 52 46 28 5a 29 5c 4f 43 43 32 30 30 5c 49 4e 56 41 4c 49 44 20 4c 41 59 4f 55 54 00 36 01 1e 00 2e ┆F A14,K:CKF CHECK IF INPUT RECOGNIZED 6 P RF(Z) OCC200 INVALID LAYOUT 6 .┆
0x5594…55e4 00 50 5c 43 46 49 5c 41 31 34 2c 4b 46 55 4e 54 2c 41 32 5c 43 41 4c 4c 20 52 45 51 55 45 53 54 45 44 20 46 55 4e 43 54 49 4f 4e 20 00 36 01 42 00 0e 00 50 5c 52 46 5c 4f 43 43 45 4e 44 00 36 01 74 00 12 00 50 2a 20 20 20 55 3a 20 43 4f 4d ┆ P CFI A14,KFUNT,A2 CALL REQUESTED FUNCTION 6 B P RF OCCEND 6 t P* U: COM┆
0x55e4…5634 (55, 0, 400) 4d 41 4e 44 00 36 01 86 00 06 00 50 2a 20 00 37 00 0c 00 10 00 50 4f 43 43 31 30 30 5c 45 51 55 5c 2a 00 37 00 16 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4b 3a 46 54 55 00 37 00 2a 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4b 46 20 00 37 ┆MAND 6 P* 7 POCC100 EQU * 7 P LDKL A1,K:FTU 7 * P CF A14,K:CKF 7┆
0x5634…5684 00 40 00 20 00 50 5c 52 46 28 5a 29 5c 4f 43 43 32 30 30 5c 49 4e 56 41 4c 49 44 20 4c 41 59 4f 55 54 00 37 00 56 00 16 00 50 5c 43 46 49 5c 41 31 34 2c 4b 3a 55 46 55 4e 2c 41 32 00 37 00 7a 00 0e 00 50 5c 52 46 5c 4f 43 43 45 4e 44 00 37 ┆ @ P RF(Z) OCC200 INVALID LAYOUT 7 V P CFI A14,K:UFUN,A2 7 z P RF OCCEND 7┆
0x5684…56d4 00 94 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 4f 50 43 20 00 37 00 a6 00 06 00 50 2a 20 00 37 00 c2 00 18 00 50 2a 20 20 20 49 4e 56 41 4c 49 44 20 43 4f 4d 4d 41 4e 44 20 00 37 00 cc 00 06 00 50 2a 20 00 37 00 e8 00 10 ┆ P EJECT IDENT C:OPC 7 P* 7 P* INVALID COMMAND 7 P* 7 ┆
0x56d4…5724 00 50 4f 43 43 32 30 30 5c 45 51 55 5c 2a 00 37 00 f2 00 12 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 50 52 54 4e 00 37 01 06 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 37 30 00 37 01 1c 00 06 00 50 2a 20 00 37 01 30 00 0c 00 50 2a 20 20 20 45 58 ┆ POCC200 EQU * 7 P CF A14,K:PRTN 7 P DATA K:F370 7 P* 7 0 P* EX┆
0x5724…5774 49 54 00 37 01 3a 00 06 00 50 2a 20 00 37 01 4a 00 10 00 50 4f 43 43 45 4e 44 5c 45 51 55 5c 2a 00 37 01 54 00 08 00 50 5c 4c 4b 4d 00 37 01 68 00 0c 00 50 5c 44 41 54 41 5c 33 20 00 37 01 74 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e ┆IT 7 : P* 7 J POCCEND EQU * 7 T P LKM 7 h P DATA 3 7 t P EJECT IDEN┆
0x5774…57c4 (56, 0, 400) 54 20 43 3a 4f 50 43 20 00 37 01 84 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 38 00 10 ┆T C:OPC 7 @ P*********************************************************** 8 ┆
0x57c4…5814 00 06 00 50 2a 20 00 38 00 54 00 06 00 50 2a 20 00 38 00 5e 00 1c 00 50 2a 54 48 45 20 52 4f 55 54 49 4e 45 20 4b 20 3a 20 44 20 45 20 52 20 52 00 38 00 68 00 3e 00 50 2a 43 4c 4f 53 45 53 20 54 48 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 ┆ P* 8 T P* 8 ^ P*THE ROUTINE K : D E R R 8 h > P*CLOSES THE CONCENTRATOR┆
0x5814…5864 20 57 48 45 4e 20 41 20 54 52 41 4e 53 41 43 54 49 4f 4e 20 48 41 53 20 44 49 53 43 4f 56 45 52 45 44 00 38 00 88 00 12 00 50 2a 41 20 44 49 53 43 20 45 52 52 4f 52 20 00 38 00 ca 00 06 00 50 2a 20 00 38 00 e0 00 06 00 50 2a 20 00 38 00 ea ┆ WHEN A TRANSACTION HAS DISCOVERED 8 P*A DISC ERROR 8 P* 8 P* 8 ┆
0x5864…58b4 00 1e 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 41 43 54 49 56 41 54 45 44 00 38 00 f4 00 06 00 50 2a 20 00 38 01 16 00 24 00 50 2a 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 5c 4b 3a 58 53 20 49 4e 20 20 20 43 3a 58 4e 57 20 ┆ P* CALL SEQUENCE: ACTIVATED 8 P* 8 $ P* SUBROUTINES: K:XS IN C:XNW ┆
0x58b4…5904 00 38 01 20 00 06 00 50 2a 20 00 38 01 48 00 18 00 50 2a 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 45 58 49 54 00 38 01 52 00 06 00 50 2a 20 00 38 01 6e 00 22 00 50 2a 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 41 4e 59 20 42 55 54 20 ┆ 8 P* 8 H P* RETURN METOD: EXIT 8 R P* 8 n " P* CALLING TASK: ANY BUT ┆
0x5904…5954 (57, 2, 376) 4f 50 43 4f 4d 20 00 38 01 78 00 06 00 50 2a 20 00 39 00 0e 00 06 00 50 2a 20 00 39 00 18 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆OPCOM 8 x P* 9 P* 9 @ P**********************************************┆
0x5954…59a4 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 39 00 22 00 06 00 50 2a 20 00 39 00 66 00 10 00 50 4b 3a 44 45 52 52 5c 45 51 55 5c 2a 00 39 00 70 00 1e 00 50 5c 4c 44 4b 4c 5c 41 31 33 2c 54 43 4f 50 5c 54 43 41 20 41 44 44 52 45 53 53 00 39 ┆************** 9 " P* 9 f PK:DERR EQU * 9 p P LDKL A13,TCOP TCA ADDRESS 9┆
0x59a4…59f4 00 84 00 12 00 50 5c 4c 44 5c 41 31 34 2c 32 2c 41 31 33 20 00 39 00 a6 00 1c 00 50 5c 41 44 52 5c 41 31 34 2c 41 31 33 5c 53 54 41 43 4b 20 42 41 53 45 20 00 39 00 bc 00 12 00 50 5c 4c 44 5c 41 31 2c 4b 3a 4f 50 45 4e 20 00 39 00 dc 00 22 ┆ P LD A14,2,A13 9 P ADR A14,A13 STACK BASE 9 P LD A1,K:OPEN 9 "┆
0x59f4…5a44 00 50 5c 52 46 28 4e 50 29 5c 44 45 52 45 4e 44 5c 41 4c 52 45 41 44 59 20 43 4c 4f 53 45 44 20 00 39 00 f2 00 10 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 58 53 00 39 01 18 00 10 00 50 44 45 52 45 4e 44 5c 45 51 55 5c 2a 00 39 01 2c 00 08 00 50 ┆ P RF(NP) DEREND ALREADY CLOSED 9 P CF A14,K:XS 9 PDEREND EQU * 9 , P┆
0x5a44…5a7c 5c 4c 4b 4d 00 39 01 40 00 10 00 50 5c 44 41 54 41 5c 33 5c 45 58 49 54 00 39 01 4c 00 08 00 50 5c 45 4e 44 00 39 01 60 00 04 00 50 00 39 01 6c 40 04 00 00 00 39 01 74 ┆ LKM 9 @ P DATA 3 EXIT 9 L P END 9 ` P 9 l@ 9 t┆
0x5a7c…5a84 (58, 1, 8) 20 04 00 00 00 3a 00 04 ┆ : ┆