|
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: 14150 (0x3746)
Notes: pts_type(SC)
Names: »PTSDE.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DE/PTSDE.SC«
IDENT PTSDE REL 10.0 80-04-11 UPD 80-11-17/DALI UPD 80-10-22/DALI UPD 80-04-24/DALI 80-03-24/DALI DDUM DEDDIV PDIV ENTRY PTSDE * * ENTRIES FOR APPLICATIONAL HANDLING * ENTRY DEAPPL ENTRY DEAOK0 ENTRY DEAOK1 ENTRY DEAOK2 ENTRY DEAOK4 ENTRY DEANOK ENTRY DETCHK ENTRY DEPMSK ENTRY DEPRUT ENTRY ATTPRT ENTRY DETPRT ENTRY ATTDEV * ENTRY DEFIND ROUTINE FINDING FIELDINDEX EJECT * * EXTERNAL REFERENCES TO SCREEN * EXT DECLRA EXT DECLRS EXT DECLRN * * EXTERNAL REFERENCES TO DATA-ENTRY MODES * EXT DE10ST SUPERVISORY FUNCTIONS EXT DE20ST FORMAT DEFINITION EXT DE30ST JOB DEFINITION EXT DE40ST ENTRY MODE EXT DE50ST SEARCH/CORRECTION EXT DE60ST VERIFICATION EXT DE70ST CONVERSION * * EXTERNAL REFRERENCES FOR DATA-ENTRY FILES * EXT OPCL OPEN SYSTEM-FILE EXT CHANFC CHANGE FILECODE EXT GETVOL GET VOLUMENAME * * EXTERNAL REFERENCES FOR SPECIAL ROUTINES * EXT DEPOOL TESTVARIANT EXT DERR EXT SAVE EXT RESTOR EXT ATTBUF EXT TESTB EXT MSKOUT EXT COND SET/CLEAR CONDITION REG. EXT UPDBOL EXT POOLA EXT GETIND GETINDEX VARIABLE/LENGTH EJECT * * EXTERNAL REFERENCES TO APPL HANDLING ROUTINES * EXT DEAP1A EXT DEAP2A EXT DEAP3A EXT DEAP5A EXT DEAP7A * * INCLUDE DELITT EJECT * * START OF PROGRAM * PTSDE CALL SAVE,W0,W16,PWBDB4 SAVE ORIGINATE ADRESSES TO WORKBLOCKS AND DESCRIPTORS CALL ATTBUF,DEDSSCRN,STATSH ATTACH BUFFERS FOR THE CALL ATTBUF,DEDSPRT,STATSH SCREEN AND PRINT DSETS SET UORG BNZ FINISH CALL GETIND,RBUF,RBUFLN,DEBINW1 CALL POOLA ADJUST POOLS FINISH DEST SET BOOL1 PART OF FORMAT DISPLAY DEST00 ATTFMT F00ST SET DEPROMPT PROMPT-TEXTS DISPLAY STA050 CLEAR DECHANGE PERF DECLRA STA100 IB DEBINW2,CANCEL,RETUR,ENTER MOVE DEBINW4,W0 PERF DERR B STA100 CANCEL CLEAR DEPROMPT B STA050 * RETUR ATTFMT F00RET SET DEPROMPT PERF DECLRA B DEST * ENTER CBE BIN1,W0,DEST PERF OPCL,W1 BOK ENT4 BNERR ENT32 MOVE DEBINW1,W0 PERF DERR B STA100 ENT32 MOVE DEBINW1,W0 PERF DERR IB DEBINW2,ENT52,ENT52,ENT5 MOVE DEBINW4,W0 B ENT32 ENT4 MOVE MODE,MODTAB(BIN1) PERFI BIN1,DE10ST,DE20ST,DE30ST,DE40ST, C DE50ST,DE60ST,DE70ST,DE00ER,DE00ER,DE00ER PERF DEPMSK ENT5 CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO WORKBLOCKS AND DESCRIPTORS CLEAR BOOL1 CBNE BIN1,W0,ENT4 ENT52 PERF OPCL,W2 BOK ENT6 PERF DERR ENT6 CBNE BIN2,W0,DEST00 B DEST * DE00ER PROC MOVE BIN1,W0 RET PEND EJECT * * APPLICATION ROUTINE * DEAPPL PROC CBG DEBINW3,=W'100',DEAPP0 IB DEBINW3 C DEAPRTES C DEAUNIT C DEAJOB C DEABATCH C DEAENKEY C DEUNENT B DEAER6 DEAPRTES CHECK OF NEW PRNUM MOVE BCD13A,DEINPUT MOVE BIN1,BCD13A MOVE BIN2,BIN1 SAVE KEYED INPUT DIV BIN1,W8 XCOPY DEBINW4,W0,W2,PROGNR,BIN1 PROGRAMNR MUL BIN1,W8 SUB BIN2,BIN1 CALL TESTB,DEBINW4,BIN2 LOOK IF EXISTING BZ DEAPRERR JUMP IF NOT MOVE BIN1,W0 CALL UPDBOL,BIN1 CLEAR ALL BOOLS MOVE BCD2A,BCD13A MOVE BIN2,BCD2A MOVE BCD3A,W10 DIV BCD13A,BCD3A MOVE BIN1,BCD13A PERF DEPMSK DEAENKEY MOVE DEBINW3,W0 MOVE DEBINW2,W17 B DEAOK0 DEAPRERR MOVE DEBINW4,W7 B DEANOK * * ATTFMT FORMN DUMMY INSTRUCTION ATTFMT FORMA - " - ATTFMT VSET EJECT DEUNENT MOVE DEBINW2,W17 DEAUNIT MOVE BCD2A,DEINPUT CHECK IF SPECIFIED MOVE DEBINW4,BCD2A UNIT NUMBER IS MOVE FILINDUS,DEBINW4 XCOPY DEBINW4,W1,W1,DUNIT,FILINDUS GET FILECODE ADD FILINDUS,W2 CBE FCOUNTER(FILINDUS),W0,DEAUN0 ERASE 1,W2,W2 MOVE TABLE,FVOLNAME(FILINDUS) B DEAUN5 DEAUN0 CALL CHANFC,DISK,DEBINW4 CHANGE FILECODE CALL GETVOL,DISK,RBUF,STRG10A,DEBINW4 GET VOLUMENAME CBE DEBINW4,W0,DEAUN4 JUMP IF OKEY MOVE DEBINW4,W9 NOT FOUND B DEANOK DEAUN4 ERASE 1,W2,W2 MOVE TABLE,STRG10A MOVE FVOLNAME(FILINDUS),TABLE DEAUN5 DISPLAY 2,W1,W1 B DEAOK0 DEAUN2 MOVE DEBINW4,W7 B DEANOK DEAJOB CHECK IF SPECIFIED MOVE STSAVE(W1),DEINPUT JOBNAME EXISTS ON USERFILE B DEAOK0 DEABATCH CHECK IF SPECIFIED BATCH EXISTS ON USERFILE MOVE STSAVE(W2),DEINPUT B DEAOK0 EJECT * * JUMP TO APPL HANDLING IN CORRESPONDING PROGRAM * DEAPP0 SUB DEBINW3,=W'100' MOVE DEBINW4,PRNUM SAVE PRNNUM MOVE BCD3A,W10 LOAD +10 DIV PRNUM,BCD3A GET MODE TENTH FIGURE MOVE DEBIN1,PRNUM LOAD MODE BINARY MOVE PRNUM,DEBINW4 RESTORE PRNUM MOVE BCD2A,PRNUM GET MODE LEVEL ONETH FIG MOVE DEBINW4,BCD2A LOAD MODE LEVEL BINARY IB DEBIN1 JUMP MODE APPL C DEAP1A C DEAP2A C DEAP3A C DEAER6 C DEAP5A C DEAER6 C DEAP7A C DEAER6 B DEAER6 EJECT * RETURNS FROM APPL HANDLING IN CORRESPONDING PROGRAM * DEAOK0 MOVE DEBINW3,W0 RET DEAOK1 MOVE DEBINW3,W1 RET DEAOK2 MOVE DEBINW3,W2 RET DEAOK4 MOVE DEBINW3,W4 RET DEAER6 MOVE DEBINW4,W6 ILLEGAL VALUE DEANOK MOVE DEBINW3,W3 RET PEND EJECT * * TABULATION-CHECK ROUTINE * DETCHK PROC TBF DOOL3,DCHKUT MOVE DEBINW3,W2 RET DCHKUT MOVE DEBINW3,W0 RET PEND EJECT ****************************************************************** * THIS PROCEDURE RETURNS THE PROGRAMNUMBER SPLIT INTO TO BINARYS * ****************************************************************** DEPRUT PROC NUM,FIRST,SECOND PBCD NUM PBIN FIRST PBIN SECOND MOVE FIRST,NUM DIV FIRST,W10 MOVE BCD2A,NUM MOVE SECOND,BCD2A RET PEND EJECT **************************************** * THIS PROCEDURE FIX THE PROGRAMMASKS. * **************************************** DEPMSK PROC MOVE PINACC,W0 MOVE PJOBCUR,W0 MOVE PINDFR,W0 MOVE PINDTB,W0 MOVE BIN4,BIN1 SUB BIN4,W1 FIRST DIGIT IN PRNUM BNL DEAPR10 JUMP IF > 00 MOVE KEYMSK,W0 RET DEAPR10 MUL BIN4,W10 ADD BIN4,BIN2 NEXT DIGIT IN PRNUM DIV BIN4,W2 BYTE POS IN PRKEYS MOVE DEBINW3,W0 XCOPY DEBINW3,W1,W1,PRKEYS,BIN4 CALL TESTB,BIN2,W15 LOOK WHICH HALFBYTE BZ DEAPR20 JUMP IF FIRST MOVE DEBINW2,W15 CALL MSKOUT,DEBINW2,DEBINW3 MOVE KEYMSK,DEBINW2 RET DEAPR20 DIV DEBINW3,W16 MOVE KEYMSK,DEBINW3 RET PEND EJECT * * ATTACH DE-PRINTER. SHOULD BE PERFORMED BEFORE ANY PRINTING IS DONE * CONDITION-REGISTER IS SET TO 0 : OKAY * 1 : PRINTER BUSY; * IF THE PRINTER IS BUSY, THE ERROR-INDICATION 11 (IN USE) IS GIVEN IN * IN DEBIN1, THE TERMINALNUMBER OF THE CURRENT TASK IS RGIVEN FOR EV P * ATTPRT PROC MOVE DEBINW4,=X'0036' PERF ATTDEV,DEBINW4 RET PEND ATTDEV PROC FC CALL CHANFC,DEDSPRT,FC MOVE DEBINW4,W0 DSC0 .NW,DEDSPRT,TSTAT CHECK IF PRINTER AVAILABLE DELAY W4 WAIT FOR 4/100 SEC TESTIO DEDSPRT BNZ NOTOK WAIT DEDSPRT XSTAT DEDSPRT,DEBINW4 CBE DEBINW4,W0,OK B ATT10 NOT OK NOTOK ABORT DEDSPRT B ATT10 NO PRINTER OK DSC1 DEDSPRT,ATTACH,W20 BOK OUT MOVE DEBINW4,W11 B OUT ATT10 MOVE DEBINW4,=W'35' 'OUT-DEV NOT OPERABLE' OUT PERF COND SET/CLEAR CONDITION REG. RET PEND * * RELEASE DE-PRINTER. MUST BE PERFORMED AFTER PRINTOUT. * DETPRT PROC DSC1 DEDSPRT,DETACH,W0 RET PEND * * THIS ROUTINE CALCULATE FIELDNUMBER FOR A * RELATIVE FIELD ADRESSING TYP + OR - * DEFIND PROC VAR1,VAR2 PBIN VAR1 PBIN VAR2 XCOPY VAR1,W1,W1,BPOOL(BIN11),BIN12 CBL VAR1,=W'254',UTFIN ADD BIN12,W1 XCOPY VAR2,W1,W1,BPOOL(BIN11),BIN12 CBNE VAR1,=W'254',DEFI00 MOVE VAR1,BIN2 SUB VAR1,VAR2 RET DEFI00 ADD VAR2,BIN2 MOVE VAR1,VAR2 UTFIN RET PEND EJECT * * FORMATS * F00ST FRMT FSL FUL FCOPY =C'PTS' FILLR ' ',1 FCOPY =C'DATA' FILLR ' ',1 FCOPY =C'ENTRY' FILLR ' ',5 FCOPY =C'REL 10.0' FNUL FNL FNL FCOPY =C'PROGRAM:' FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 FMEL 'XX',PRNUM FBF BOOL1,F00OUT FNL FCOPY =C'10 SUPERVISORY FUNCTIONS' FNL FTEXT '20 ' FCOPY =C'FORMAT' FILLR '-',1 FCOPY =C'DEFINITION' FNL FTEXT '30 ' FCOPY =C'JOB' FILLR '-',1 FCOPY =C'DEFINITION' FNL FTEXT '40 ' FCOPY =C'ENTRY' FILLR ' ',1 FCOPY =C'MODE' FNL FTEXT '50 ' FCOPY =C'SEARCH' FILLR ' ',1 FCOPY =C'MODE' FNL FTEXT '60 ' FCOPY =C'VERIFY' FILLR ' ',1 FCOPY =C'MODE' FNL FCOPY =C'70 CONVERSION' FILLR ' ',1 FCOPY =C'MODE' FNL F00OUT FMEND F00RET FRMT FSL FTEXT 'RETURN FROM DATA-ENTRY' FNL FKI 1 FCOPY HEX00 FMEND EJECT ******************************* * TABLE = VALUE-SET NO. * * TIME = SIZE OF ELEMENTS * * ACK(W1) = ELEMENT NO. * ******************************* VSET FRMT FSL FMEL '99',PRNUM FBT BOOL1,F13 FCOPY =C' CREATE' FB F12A F13 FCOPY =C' GET' F12A FCOPY =C' VALUE-SETS' FNL FCOPY =C'NAME: T' FBT BOOL2,F12B FINP 7 FCOPY TABLE FB F12C F12B 2 LINES FKI 8,NUM,MINL=2,MAXL=2,ME,NCLR,NEOI,APPL=101 FCOPY STR6A FB F12UT F12C FLINK F121 F12UT FMEND * F121 FRMT FNL FCOPY =C'TYPE:' FBT BOOL3,F121A FBF BOOL1,F124 IF CREATE F121A FINP 7 FCOPY STR2A FB F125 F124 FKI 7,MINL=1,MAXL=1,ALPHA,NEOI,ME,NCLR,APPL=102 A/N FCOPY STR2A F125 FTAB 10 FCOPY =C'SIZE OF ' FCOPY =C'ELEMENT' FCOPY =C'S:' FBT BOOL3,F125A FBF BOOL1,F127 IF CREATE F125A FINP 28 FMEL 'XX',TIME FB F128 F127 FKI 28,MINL=1,MAXL=2,NEOI,ME,NCLR,REWRT,APPL=103 <61 FMEL 'XX',TIME F128 FNL FCOPY =C'ELEMENT' FCOPY =C' NO.:' FBF BOOL3,FEND IF LINE 1-3 FINP 13 ENTER FMEL 'XX',ACK(W1) FNL * FLINK STR64A FCTL X'DE',STR64A FEND FMEND * FORMN FRMT FKI 1,NUM,MINL=1,MAXL=1,REWRT,SCHK=1 FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBCD(BIN6) FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND * FORMA FRMT * FKI 1,ALPHA,MINL=1,MAXL=1,NEOI,ME * FCOPY FDVBCD(BIN6) FCTL X'F0',1,X'C1',X'01',X'00',X'C0',FDVBCD(BIN6) FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND END
0x0000…0026 (0, 0, 400) Head {h00=0x0022, h01=0x0050, text=» IDENT PTSDE REL 10.0 80-04-11«, t00=0x0000, t01=0x0004}
0x0026…0042 Head {h00=0x0018, h01=0x0050, text=» UPD 80-11-17/DALI«, t00=0x0000, t01=0x002a}
0x0042…005e Head {h00=0x0018, h01=0x0050, text=» UPD 80-10-22/DALI«, t00=0x0000, t01=0x0046}
0x005e…007a Head {h00=0x0018, h01=0x0050, text=» UPD 80-04-24/DALI«, t00=0x0000, t01=0x0062}
0x007a…0092 Head {h00=0x0014, h01=0x0050, text=» 80-03-24/DALI«, t00=0x0000, t01=0x007e}
0x0092…00a6 Head {h00=0x0010, h01=0x000c, text=» DDUM DEDDIV«, t00=0x0000, t01=0x0096}
0x00a6…00b4 Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x00aa}
0x00b4…00c8 Head {h00=0x0010, h01=0x000c, text=» ENTRY PTSDE«, t00=0x0000, t01=0x00b8}
0x00c8…00d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00cc}
0x00d2…0106 Head {h00=0x0030, h01=0x0050, text=»* ENTRIES FOR APPLICATIONAL HANDLING «, t00=0x0000, t01=0x00d6}
0x0106…0110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x0110…0126 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAPPL «, t00=0x0000, t01=0x0114}
0x0126…013c Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK0 «, t00=0x0000, t01=0x012a}
0x013c…0152 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK1 «, t00=0x0000, t01=0x0140}
0x0152…0168 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK2 «, t00=0x0000, t01=0x0156}
0x0168…017e Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK4 «, t00=0x0000, t01=0x016c}
0x017e…0194 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEANOK «, t00=0x0000, t01=0x0182}
0x0194…01aa Head {h00=0x0012, h01=0x0050, text=» ENTRY DETCHK «, t00=0x0001, t01=0x0008}
0x01aa…01c0 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEPMSK «, t00=0x0001, t01=0x001e}
0x01c0…01d6 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEPRUT «, t00=0x0001, t01=0x0034}
0x01d6…01ec Head {h00=0x0012, h01=0x0050, text=» ENTRY ATTPRT «, t00=0x0001, t01=0x004a}
0x01ec…0202 Head {h00=0x0012, h01=0x0050, text=» ENTRY DETPRT «, t00=0x0001, t01=0x0060}
0x0202…0218 Head {h00=0x0012, h01=0x0050, text=» ENTRY ATTDEV «, t00=0x0001, t01=0x0076}
0x0218…0222 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008c}
0x0222…0252 Head {h00=0x002c, h01=0x0050, text=» ENTRY DEFIND ROUTINE FINDING FIELDINDEX«, t00=0x0001, t01=0x0096}
0x0252…0260 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00c6}
0x0260…026a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x00d4}
0x026a…0298 Head {h00=0x002a, h01=0x002a, text=»* EXTERNAL REFERENCES TO SCREEN«, t00=0x0001, t01=0x00de}
0x0298…02a2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x010c}
0x02a2…02b6 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRA «, t00=0x0001, t01=0x0116}
0x02b6…02ca Head {h00=0x0010, h01=0x0050, text=» EXT DECLRS «, t00=0x0001, t01=0x012a}
0x02ca…02de Head {h00=0x0010, h01=0x0050, text=» EXT DECLRN «, t00=0x0001, t01=0x013e}
0x02de…02e8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0152}
0x02e8…0320 Head {h00=0x0034, h01=0x0030, text=»* EXTERNAL REFERENCES TO DATA-ENTRY MODES«, t00=0x0001, t01=0x015c}
0x0320…032a (2, 0, 398) Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0004}
0x032a…0354 Head {h00=0x0026, h01=0x0021, text=» EXT DE10ST SUPERVISORY FUNCTIONS «, t00=0x0002, t01=0x000e}
0x0354…037a Head {h00=0x0022, h01=0x001d, text=» EXT DE20ST FORMAT DEFINITION «, t00=0x0002, t01=0x0038}
0x037a…039c Head {h00=0x001e, h01=0x001a, text=» EXT DE30ST JOB DEFINITION«, t00=0x0002, t01=0x005e}
0x039c…03ba Head {h00=0x001a, h01=0x0016, text=» EXT DE40ST ENTRY MODE«, t00=0x0002, t01=0x0080}
0x03ba…03e0 Head {h00=0x0022, h01=0x001d, text=» EXT DE50ST SEARCH/CORRECTION «, t00=0x0002, t01=0x009e}
0x03e0…0400 Head {h00=0x001c, h01=0x0018, text=» EXT DE60ST VERIFICATION«, t00=0x0002, t01=0x00c4}
0x0400…041e Head {h00=0x001a, h01=0x0016, text=» EXT DE70ST CONVERSION«, t00=0x0002, t01=0x00e4}
0x041e…0428 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0102}
0x0428…0462 Head {h00=0x0036, h01=0x0032, text=»* EXTERNAL REFRERENCES FOR DATA-ENTRY FILES«, t00=0x0002, t01=0x010c}
0x0462…046c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0146}
0x046c…048e Head {h00=0x001e, h01=0x0050, text=» EXT OPCL OPEN SYSTEM-FILE«, t00=0x0002, t01=0x0150}
0x048e…04b2 Head {h00=0x0020, h01=0x0050, text=» EXT CHANFC CHANGE FILECODE «, t00=0x0002, t01=0x0172}
0x04b2…04d4 Head {h00=0x001e, h01=0x0050, text=» EXT GETVOL GET VOLUMENAME«, t00=0x0003, t01=0x0008}
0x04d4…04de Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x002a}
0x04de…0518 Head {h00=0x0036, h01=0x0050, text=»* EXTERNAL REFERENCES FOR SPECIAL ROUTINES «, t00=0x0003, t01=0x0034}
0x0518…0522 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x006e}
0x0522…0542 Head {h00=0x001c, h01=0x0050, text=» EXT DEPOOL TESTVARIANT «, t00=0x0003, t01=0x0078}
0x0542…0554 Head {h00=0x000e, h01=0x0050, text=» EXT DERR «, t00=0x0003, t01=0x0098}
0x0554…0566 Head {h00=0x000e, h01=0x0050, text=» EXT SAVE «, t00=0x0003, t01=0x00aa}
0x0566…057a Head {h00=0x0010, h01=0x0050, text=» EXT RESTOR «, t00=0x0003, t01=0x00bc}
0x057a…058e Head {h00=0x0010, h01=0x0050, text=» EXT ATTBUF «, t00=0x0003, t01=0x00d0}
0x058e…05a0 Head {h00=0x000e, h01=0x0050, text=» EXT TESTB«, t00=0x0003, t01=0x00e4}
0x05a0…05b4 Head {h00=0x0010, h01=0x0050, text=» EXT MSKOUT «, t00=0x0003, t01=0x00f6}
0x05b4…05de Head {h00=0x0026, h01=0x0050, text=» EXT COND SET/CLEAR CONDITION REG.«, t00=0x0003, t01=0x010a}
0x05de…05f2 Head {h00=0x0010, h01=0x0050, text=» EXT UPDBOL «, t00=0x0003, t01=0x0134}
0x05f2…0604 Head {h00=0x000e, h01=0x0050, text=» EXT POOLA«, t00=0x0003, t01=0x0148}
0x0604…0630 Head {h00=0x0028, h01=0x0050, text=» EXT GETIND GETINDEX VARIABLE/LENGTH«, t00=0x0003, t01=0x015a}
0x0630…063e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0186}
0x063e…0648 (4, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0004}
0x0648…0686 Head {h00=0x003a, h01=0x0050, text=»* EXTERNAL REFERENCES TO APPL HANDLING ROUTINES«, t00=0x0004, t01=0x000e}
0x0686…0690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004c}
0x0690…06a4 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP1A «, t00=0x0004, t01=0x0056}
0x06a4…06b8 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP2A «, t00=0x0004, t01=0x006a}
0x06b8…06cc Head {h00=0x0010, h01=0x0050, text=» EXT DEAP3A «, t00=0x0004, t01=0x007e}
0x06cc…06e0 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP5A «, t00=0x0004, t01=0x0092}
0x06e0…06f4 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP7A «, t00=0x0004, t01=0x00a6}
0x06f4…06fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ba}
0x06fe…0708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00c4}
0x0708…0720 Head {h00=0x0014, h01=0x0050, text=» INCLUDE DELITT «, t00=0x0004, t01=0x00ce}
0x0720…0728 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x00e6}
0x0728…0736 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0004, t01=0x00ee}
0x0736…0740 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00fc}
0x0740…0762 Head {h00=0x001e, h01=0x0020, text=»* START OF PROGRAM «, t00=0x0004, t01=0x0106}
0x0762…076c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x0128}
0x076c…077a Head {h00=0x000a, h01=0x0005, text=»PTSDE «, t00=0x0004, t01=0x0132}
0x077a…07b6 Head {h00=0x0038, h01=0x0050, text=» CALL SAVE,W0,W16,PWBDB4 SAVE ORIGINATE ADRESSES TO «, t00=0x0004, t01=0x0140}
0x07b6…07dc Head {h00=0x0022, h01=0x0050, text=» WORKBLOCKS AND DESCRIPTORS «, t00=0x0004, t01=0x017c}
0x07dc…0818 Head {h00=0x0038, h01=0x0050, text=» CALL ATTBUF,DEDSSCRN,STATSH ATTACH BUFFERS FOR THE «, t00=0x0005, t01=0x0012}
0x0818…0852 Head {h00=0x0036, h01=0x0050, text=» CALL ATTBUF,DEDSPRT,STATSH SCREEN AND PRINT DSETS«, t00=0x0005, t01=0x004e}
0x0852…0864 Head {h00=0x000e, h01=0x0050, text=» SET UORG «, t00=0x0005, t01=0x0088}
0x0864…0878 Head {h00=0x0010, h01=0x0050, text=» BNZ FINISH «, t00=0x0005, t01=0x009a}
0x0878…08a0 Head {h00=0x0024, h01=0x0050, text=» CALL GETIND,RBUF,RBUFLN,DEBINW1«, t00=0x0005, t01=0x00ae}
0x08a0…08c0 Head {h00=0x001c, h01=0x0050, text=» CALL POOLA ADJUST POOLS«, t00=0x0005, t01=0x00d6}
0x08c0…08ce Head {h00=0x000a, h01=0x0050, text=»FINISH«, t00=0x0005, t01=0x00f6}
0x08ce…08da Head {h00=0x0008, h01=0x0050, text=»DEST«, t00=0x0005, t01=0x0104}
0x08da…0904 Head {h00=0x0026, h01=0x0050, text=» SET BOOL1 PART OF FORMAT DISPLAY «, t00=0x0005, t01=0x0110}
0x0904…0912 Head {h00=0x000a, h01=0x0050, text=»DEST00«, t00=0x0005, t01=0x013a}
0x0912…0928 Head {h00=0x0012, h01=0x000d, text=» ATTFMT F00ST «, t00=0x0005, t01=0x0148}
0x0928…0952 Head {h00=0x0026, h01=0x0050, text=» SET DEPROMPT PROMPT-TEXTS DISPLAY«, t00=0x0005, t01=0x015e}
0x0952…0960 Head {h00=0x000a, h01=0x0006, text=»STA050«, t00=0x0005, t01=0x0188}
0x0960…0978 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0006, t01=0x0008}
0x0978…098c Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0006, t01=0x0020}
0x098c…099a Head {h00=0x000a, h01=0x0006, text=»STA100«, t00=0x0006, t01=0x0034}
0x099a…09c0 Head {h00=0x0022, h01=0x0050, text=» IB DEBINW2,CANCEL,RETUR,ENTER«, t00=0x0006, t01=0x0042}
0x09c0…09d8 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0006, t01=0x0068}
0x09d8…09ea Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0006, t01=0x0080}
0x09ea…09fc Head {h00=0x000e, h01=0x0050, text=» B STA100 «, t00=0x0006, t01=0x0092}
0x09fc…0a0a Head {h00=0x000a, h01=0x0006, text=»CANCEL«, t00=0x0006, t01=0x00a4}
0x0a0a…0a22 Head {h00=0x0014, h01=0x0050, text=» CLEAR DEPROMPT «, t00=0x0006, t01=0x00b2}
0x0a22…0a34 Head {h00=0x000e, h01=0x0009, text=» B STA050 «, t00=0x0006, t01=0x00ca}
0x0a34…0a3e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x00dc}
0x0a3e…0a4c Head {h00=0x000a, h01=0x0005, text=»RETUR «, t00=0x0006, t01=0x00e6}
0x0a4c…0a62 Head {h00=0x0012, h01=0x0050, text=» ATTFMT F00RET«, t00=0x0006, t01=0x00f4}
0x0a62…0a78 Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0006, t01=0x010a}
0x0a78…0a8c Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0006, t01=0x0120}
0x0a8c…0a9c Head {h00=0x000c, h01=0x0050, text=» B DEST «, t00=0x0006, t01=0x0134}
0x0a9c…0aa6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x0144}
0x0aa6…0ab4 Head {h00=0x000a, h01=0x0005, text=»ENTER «, t00=0x0006, t01=0x014e}
0x0ab4…0ace Head {h00=0x0016, h01=0x0050, text=» CBE BIN1,W0,DEST «, t00=0x0006, t01=0x015c}
0x0ace…0ae4 Head {h00=0x0012, h01=0x0050, text=» PERF OPCL,W1 «, t00=0x0006, t01=0x0176}
0x0ae4…0af6 Head {h00=0x000e, h01=0x0050, text=» BOK ENT4 «, t00=0x0006, t01=0x018c}
0x0af6…0b0a Head {h00=0x0010, h01=0x0050, text=» BNERR ENT32«, t00=0x0007, t01=0x000e}
0x0b0a…0b22 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W0«, t00=0x0007, t01=0x0022}
0x0b22…0b34 Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0007, t01=0x003a}
0x0b34…0b46 Head {h00=0x000e, h01=0x0050, text=» B STA100 «, t00=0x0007, t01=0x004c}
0x0b46…0b54 Head {h00=0x000a, h01=0x0050, text=»ENT32 «, t00=0x0007, t01=0x005e}
0x0b54…0b6c Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W0«, t00=0x0007, t01=0x006c}
0x0b6c…0b7e Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0007, t01=0x0084}
0x0b7e…0ba2 Head {h00=0x0020, h01=0x0050, text=» IB DEBINW2,ENT52,ENT52,ENT5«, t00=0x0007, t01=0x0096}
0x0ba2…0bba Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0007, t01=0x00ba}
0x0bba…0bca Head {h00=0x000c, h01=0x0050, text=» B ENT32«, t00=0x0007, t01=0x00d2}
0x0bca…0bd6 Head {h00=0x0008, h01=0x0050, text=»ENT4«, t00=0x0007, t01=0x00e2}
0x0bd6…0bf6 Head {h00=0x001c, h01=0x0050, text=» MOVE MODE,MODTAB(BIN1) «, t00=0x0007, t01=0x00ee}
0x0bf6…0c2a Head {h00=0x0030, h01=0x002b, text=» PERFI BIN1,DE10ST,DE20ST,DE30ST,DE40ST, C «, t00=0x0007, t01=0x010e}
0x0c2a…0c5e Head {h00=0x0030, h01=0x0050, text=» DE50ST,DE60ST,DE70ST,DE00ER,DE00ER,DE00ER «, t00=0x0007, t01=0x0142}
0x0c5e…0c72 Head {h00=0x0010, h01=0x0050, text=» PERF DEPMSK«, t00=0x0007, t01=0x0176}
0x0c72…0c7e Head {h00=0x0008, h01=0x0050, text=»ENT5«, t00=0x0007, t01=0x018a}
0x0c7e…0cbe Head {h00=0x003c, h01=0x0050, text=» CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO«, t00=0x0008, t01=0x0008}
0x0cbe…0ce4 Head {h00=0x0022, h01=0x0050, text=» WORKBLOCKS AND DESCRIPTORS «, t00=0x0008, t01=0x0048}
0x0ce4…0cf8 Head {h00=0x0010, h01=0x0050, text=» CLEAR BOOL1«, t00=0x0008, t01=0x006e}
0x0cf8…0d12 Head {h00=0x0016, h01=0x0050, text=» CBNE BIN1,W0,ENT4«, t00=0x0008, t01=0x0082}
0x0d12…0d20 Head {h00=0x000a, h01=0x0050, text=»ENT52 «, t00=0x0008, t01=0x009c}
0x0d20…0d36 Head {h00=0x0012, h01=0x0050, text=» PERF OPCL,W2 «, t00=0x0008, t01=0x00aa}
0x0d36…0d48 Head {h00=0x000e, h01=0x0050, text=» BOK ENT6 «, t00=0x0008, t01=0x00c0}
0x0d48…0d5a Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0008, t01=0x00d2}
0x0d5a…0d66 Head {h00=0x0008, h01=0x0050, text=»ENT6«, t00=0x0008, t01=0x00e4}
0x0d66…0d82 Head {h00=0x0018, h01=0x0050, text=» CBNE BIN2,W0,DEST00«, t00=0x0008, t01=0x00f0}
0x0d82…0d92 Head {h00=0x000c, h01=0x0050, text=» B DEST «, t00=0x0008, t01=0x010c}
0x0d92…0d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011c}
0x0d9c…0db0 Head {h00=0x0010, h01=0x0050, text=»DE00ER PROC «, t00=0x0008, t01=0x0126}
0x0db0…0dc6 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN1,W0 «, t00=0x0008, t01=0x013a}
0x0dc6…0dd2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x0150}
0x0dd2…0de0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0008, t01=0x015c}
0x0de0…0dee Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0008, t01=0x016a}
0x0dee…0df8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x0178}
0x0df8…0e1c Head {h00=0x0020, h01=0x001c, text=»* APPLICATION ROUTINE«, t00=0x0008, t01=0x0182}
0x0e1c…0e26 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x0016}
0x0e26…0e3a Head {h00=0x0010, h01=0x0050, text=»DEAPPL PROC «, t00=0x0009, t01=0x0020}
0x0e3a…0e5e Head {h00=0x0020, h01=0x0050, text=» CBG DEBINW3,=W'100',DEAPP0 «, t00=0x0009, t01=0x0034}
0x0e5e…0e74 Head {h00=0x0012, h01=0x0050, text=» IB DEBINW3 C«, t00=0x0009, t01=0x0058}
0x0e74…0e8a Head {h00=0x0012, h01=0x0050, text=» DEAPRTES C «, t00=0x0009, t01=0x006e}
0x0e8a…0e9e Head {h00=0x0010, h01=0x0050, text=» DEAUNIT C«, t00=0x0009, t01=0x0084}
0x0e9e…0eb2 Head {h00=0x0010, h01=0x0050, text=» DEAJOB C «, t00=0x0009, t01=0x0098}
0x0eb2…0ec8 Head {h00=0x0012, h01=0x0050, text=» DEABATCH C «, t00=0x0009, t01=0x00ac}
0x0ec8…0ede Head {h00=0x0012, h01=0x0050, text=» DEAENKEY C «, t00=0x0009, t01=0x00c2}
0x0ede…0ef0 Head {h00=0x000e, h01=0x0050, text=» DEUNENT «, t00=0x0009, t01=0x00d8}
0x0ef0…0f02 Head {h00=0x000e, h01=0x0050, text=» B DEAER6 «, t00=0x0009, t01=0x00ea}
0x0f02…0f28 Head {h00=0x0022, h01=0x0050, text=»DEAPRTES CHECK OF NEW PRNUM «, t00=0x0009, t01=0x00fc}
0x0f28…0f44 Head {h00=0x0018, h01=0x0050, text=» MOVE BCD13A,DEINPUT«, t00=0x0009, t01=0x0122}
0x0f44…0f5e Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,BCD13A «, t00=0x0009, t01=0x013e}
0x0f5e…0f86 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN2,BIN1 SAVE KEYED INPUT«, t00=0x0009, t01=0x0158}
0x0f86…0f9a Head {h00=0x0010, h01=0x0050, text=» DIV BIN1,W8«, t00=0x0009, t01=0x0180}
0x0f9a…0fcc (10, 0, 400) Head {h00=0x002e, h01=0x0050, text=» XCOPY DEBINW4,W0,W2,PROGNR,BIN1 PROGRAMNR«, t00=0x000a, t01=0x0004}
0x0fcc…0fe0 Head {h00=0x0010, h01=0x0050, text=» MUL BIN1,W8«, t00=0x000a, t01=0x0036}
0x0fe0…0ff6 Head {h00=0x0012, h01=0x0050, text=» SUB BIN2,BIN1«, t00=0x000a, t01=0x004a}
0x0ff6…1028 Head {h00=0x002e, h01=0x0050, text=» CALL TESTB,DEBINW4,BIN2 LOOK IF EXISTING «, t00=0x000a, t01=0x0060}
0x1028…1048 Head {h00=0x001c, h01=0x0050, text=» BZ DEAPRERR JUMP IF NOT«, t00=0x000a, t01=0x0092}
0x1048…105e Head {h00=0x0012, h01=0x0050, text=» MOVE BIN1,W0 «, t00=0x000a, t01=0x00b2}
0x105e…1088 Head {h00=0x0026, h01=0x0050, text=» CALL UPDBOL,BIN1 CLEAR ALL BOOLS «, t00=0x000a, t01=0x00c8}
0x1088…10a2 Head {h00=0x0016, h01=0x0050, text=» MOVE BCD2A,BCD13A«, t00=0x000a, t01=0x00f2}
0x10a2…10ba Head {h00=0x0014, h01=0x0050, text=» MOVE BIN2,BCD2A«, t00=0x000a, t01=0x010c}
0x10ba…10d2 Head {h00=0x0014, h01=0x0050, text=» MOVE BCD3A,W10 «, t00=0x000a, t01=0x0124}
0x10d2…10ec Head {h00=0x0016, h01=0x0050, text=» DIV BCD13A,BCD3A «, t00=0x000a, t01=0x013c}
0x10ec…1106 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,BCD13A «, t00=0x000a, t01=0x0156}
0x1106…111a Head {h00=0x0010, h01=0x0050, text=» PERF DEPMSK«, t00=0x000a, t01=0x0170}
0x111a…112a Head {h00=0x000c, h01=0x0050, text=»DEAENKEY«, t00=0x000a, t01=0x0184}
0x112a…1142 (11, 0, 398) Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x000b, t01=0x0004}
0x1142…115c Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW2,W17 «, t00=0x000b, t01=0x001c}
0x115c…116e Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000b, t01=0x0036}
0x116e…117e Head {h00=0x000c, h01=0x0050, text=»DEAPRERR«, t00=0x000b, t01=0x0048}
0x117e…1196 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W7«, t00=0x000b, t01=0x0058}
0x1196…11a8 Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x000b, t01=0x0070}
0x11a8…11b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0082}
0x11b2…11bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008c}
0x11bc…11e4 Head {h00=0x0024, h01=0x0050, text=» ATTFMT FORMN DUMMY INSTRUCTION «, t00=0x000b, t01=0x0096}
0x11e4…1204 Head {h00=0x001c, h01=0x0050, text=» ATTFMT FORMA - " - «, t00=0x000b, t01=0x00be}
0x1204…1218 Head {h00=0x0010, h01=0x0050, text=» ATTFMT VSET«, t00=0x000b, t01=0x00de}
0x1218…1226 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00f2}
0x1226…1236 Head {h00=0x000c, h01=0x0050, text=»DEUNENT «, t00=0x000b, t01=0x0100}
0x1236…1250 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW2,W17 «, t00=0x000b, t01=0x0110}
0x1250…1260 Head {h00=0x000c, h01=0x0050, text=»DEAUNIT «, t00=0x000b, t01=0x012a}
0x1260…128e Head {h00=0x002a, h01=0x0050, text=» MOVE BCD2A,DEINPUT CHECK IF SPECIFIED«, t00=0x000b, t01=0x013a}
0x128e…12b8 Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,BCD2A UNIT NUMBER IS«, t00=0x000b, t01=0x0168}
0x12b8…12d6 (12, 0, 400) Head {h00=0x001a, h01=0x0050, text=» MOVE FILINDUS,DEBINW4«, t00=0x000c, t01=0x0004}
0x12d6…130e Head {h00=0x0034, h01=0x0050, text=» XCOPY DEBINW4,W1,W1,DUNIT,FILINDUS GET FILECODE«, t00=0x000c, t01=0x0022}
0x130e…1326 Head {h00=0x0014, h01=0x0050, text=» ADD FILINDUS,W2«, t00=0x000c, t01=0x005a}
0x1326…1350 Head {h00=0x0026, h01=0x0050, text=» CBE FCOUNTER(FILINDUS),W0,DEAUN0 «, t00=0x000c, t01=0x0072}
0x1350…1366 Head {h00=0x0012, h01=0x0050, text=» ERASE 1,W2,W2«, t00=0x000c, t01=0x009c}
0x1366…138c Head {h00=0x0022, h01=0x0050, text=» MOVE TABLE,FVOLNAME(FILINDUS)«, t00=0x000c, t01=0x00b2}
0x138c…139e Head {h00=0x000e, h01=0x0050, text=» B DEAUN5 «, t00=0x000c, t01=0x00d8}
0x139e…13ac Head {h00=0x000a, h01=0x0050, text=»DEAUN0«, t00=0x000c, t01=0x00ea}
0x13ac…13de Head {h00=0x002e, h01=0x0050, text=» CALL CHANFC,DISK,DEBINW4 CHANGE FILECODE «, t00=0x000c, t01=0x00f8}
0x13de…141c Head {h00=0x003a, h01=0x0050, text=» CALL GETVOL,DISK,RBUF,STRG10A,DEBINW4 GET VOLUMENAME «, t00=0x000c, t01=0x012a}
0x141c…1448 Head {h00=0x0028, h01=0x0050, text=» CBE DEBINW4,W0,DEAUN4 JUMP IF OKEY «, t00=0x000c, t01=0x0168}
0x1448…146a (13, 0, 400) Head {h00=0x001e, h01=0x0050, text=» MOVE DEBINW4,W9 NOT FOUND«, t00=0x000d, t01=0x0004}
0x146a…147c Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x000d, t01=0x0026}
0x147c…148a Head {h00=0x000a, h01=0x0050, text=»DEAUN4«, t00=0x000d, t01=0x0038}
0x148a…14a0 Head {h00=0x0012, h01=0x0050, text=» ERASE 1,W2,W2«, t00=0x000d, t01=0x0046}
0x14a0…14bc Head {h00=0x0018, h01=0x0050, text=» MOVE TABLE,STRG10A «, t00=0x000d, t01=0x005c}
0x14bc…14e2 Head {h00=0x0022, h01=0x0050, text=» MOVE FVOLNAME(FILINDUS),TABLE«, t00=0x000d, t01=0x0078}
0x14e2…14f0 Head {h00=0x000a, h01=0x0050, text=»DEAUN5«, t00=0x000d, t01=0x009e}
0x14f0…1508 Head {h00=0x0014, h01=0x0050, text=» DISPLAY 2,W1,W1«, t00=0x000d, t01=0x00ac}
0x1508…151a Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000d, t01=0x00c4}
0x151a…1528 Head {h00=0x000a, h01=0x0050, text=»DEAUN2«, t00=0x000d, t01=0x00d6}
0x1528…1540 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W7«, t00=0x000d, t01=0x00e4}
0x1540…1552 Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x000d, t01=0x00fc}
0x1552…1576 Head {h00=0x0020, h01=0x0050, text=»DEAJOB CHECK IF SPECIFIED «, t00=0x000d, t01=0x010e}
0x1576…1596 Head {h00=0x001c, h01=0x0050, text=» MOVE STSAVE(W1),DEINPUT«, t00=0x000d, t01=0x0132}
0x1596…15bc Head {h00=0x0022, h01=0x0050, text=» JOBNAME EXISTS ON USERFILE «, t00=0x000d, t01=0x0152}
0x15bc…15ce Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000d, t01=0x0178}
0x15ce…15f4 Head {h00=0x0022, h01=0x0050, text=»DEABATCH CHECK IF SPECIFIED «, t00=0x000d, t01=0x018a}
0x15f4…1618 Head {h00=0x0020, h01=0x0050, text=» BATCH EXISTS ON USERFILE «, t00=0x000e, t01=0x0020}
0x1618…1638 Head {h00=0x001c, h01=0x0050, text=» MOVE STSAVE(W2),DEINPUT«, t00=0x000e, t01=0x0044}
0x1638…164a Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000e, t01=0x0064}
0x164a…1658 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0076}
0x1658…1662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0084}
0x1662…16a2 Head {h00=0x003c, h01=0x0050, text=»* JUMP TO APPL HANDLING IN CORRESPONDING PROGRAM «, t00=0x000e, t01=0x008e}
0x16a2…16ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ce}
0x16ac…16ba Head {h00=0x000a, h01=0x0050, text=»DEAPP0«, t00=0x000e, t01=0x00d8}
0x16ba…16d6 Head {h00=0x0018, h01=0x0050, text=» SUB DEBINW3,=W'100'«, t00=0x000e, t01=0x00e6}
0x16d6…16fe Head {h00=0x0024, h01=0x0050, text=» MOVE DEBINW4,PRNUM SAVE PRNNUM «, t00=0x000e, t01=0x0102}
0x16fe…171e Head {h00=0x001c, h01=0x0050, text=» MOVE BCD3A,W10 LOAD +10«, t00=0x000e, t01=0x012a}
0x171e…174c Head {h00=0x002a, h01=0x0050, text=» DIV PRNUM,BCD3A GET MODE TENTH FIGURE«, t00=0x000e, t01=0x014a}
0x174c…1778 Head {h00=0x0028, h01=0x0050, text=» MOVE DEBIN1,PRNUM LOAD MODE BINARY «, t00=0x000e, t01=0x0178}
0x1778…17a2 Head {h00=0x0026, h01=0x0050, text=» MOVE PRNUM,DEBINW4 RESTORE PRNUM «, t00=0x000f, t01=0x0014}
0x17a2…17d4 Head {h00=0x002e, h01=0x0050, text=» MOVE BCD2A,PRNUM GET MODE LEVEL ONETH FIG«, t00=0x000f, t01=0x003e}
0x17d4…1806 Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,BCD2A LOAD MODE LEVEL BINARY«, t00=0x000f, t01=0x0070}
0x1806…182a Head {h00=0x0020, h01=0x0050, text=» IB DEBIN1 JUMP MODE APPL C «, t00=0x000f, t01=0x00a2}
0x182a…183e Head {h00=0x0010, h01=0x0050, text=» DEAP1A C «, t00=0x000f, t01=0x00c6}
0x183e…1852 Head {h00=0x0010, h01=0x0050, text=» DEAP2A C «, t00=0x000f, t01=0x00da}
0x1852…1866 Head {h00=0x0010, h01=0x0050, text=» DEAP3A C «, t00=0x000f, t01=0x00ee}
0x1866…187a Head {h00=0x0010, h01=0x0050, text=» DEAER6 C «, t00=0x000f, t01=0x0102}
0x187a…188e Head {h00=0x0010, h01=0x0050, text=» DEAP5A C «, t00=0x000f, t01=0x0116}
0x188e…18a2 Head {h00=0x0010, h01=0x0050, text=» DEAER6 C «, t00=0x000f, t01=0x012a}
0x18a2…18b6 Head {h00=0x0010, h01=0x0050, text=» DEAP7A C «, t00=0x000f, t01=0x013e}
0x18b6…18c6 Head {h00=0x000c, h01=0x0050, text=» DEAER6«, t00=0x000f, t01=0x0152}
0x18c6…18d8 Head {h00=0x000e, h01=0x0050, text=» B DEAER6 «, t00=0x000f, t01=0x0162}
0x18d8…18e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0174}
0x18e6…1928 Head {h00=0x003e, h01=0x0050, text=»* RETURNS FROM APPL HANDLING IN CORRESPONDING PROGRAM«, t00=0x000f, t01=0x0182}
0x1928…1932 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x1932…1940 Head {h00=0x000a, h01=0x0050, text=»DEAOK0«, t00=0x0010, t01=0x003e}
0x1940…1958 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0010, t01=0x004c}
0x1958…1964 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0010, t01=0x0064}
0x1964…1972 Head {h00=0x000a, h01=0x0050, text=»DEAOK1«, t00=0x0010, t01=0x0070}
0x1972…198a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x0010, t01=0x007e}
0x198a…1996 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0096}
0x1996…19a4 Head {h00=0x000a, h01=0x0050, text=»DEAOK2«, t00=0x0010, t01=0x00a2}
0x19a4…19bc Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W2«, t00=0x0010, t01=0x00b0}
0x19bc…19c8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x00c8}
0x19c8…19d6 Head {h00=0x000a, h01=0x0050, text=»DEAOK4«, t00=0x0010, t01=0x00d4}
0x19d6…19ee Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W4«, t00=0x0010, t01=0x00e2}
0x19ee…19fa Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x00fa}
0x19fa…1a08 Head {h00=0x000a, h01=0x0050, text=»DEAER6«, t00=0x0010, t01=0x0106}
0x1a08…1a2e Head {h00=0x0022, h01=0x0050, text=» MOVE DEBINW4,W6 ILLEGAL VALUE«, t00=0x0010, t01=0x0114}
0x1a2e…1a3c Head {h00=0x000a, h01=0x0050, text=»DEANOK«, t00=0x0010, t01=0x013a}
0x1a3c…1a54 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W3«, t00=0x0010, t01=0x0148}
0x1a54…1a60 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0010, t01=0x0160}
0x1a60…1a6e Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0010, t01=0x016c}
0x1a6e…1a7c Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0010, t01=0x017a}
0x1a7c…1a86 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x0188}
0x1a86…1ab0 (17, 0, 400) Head {h00=0x0026, h01=0x0021, text=»* TABULATION-CHECK ROUTINE «, t00=0x0011, t01=0x0004}
0x1ab0…1aba Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x002e}
0x1aba…1ace Head {h00=0x0010, h01=0x0050, text=»DETCHK PROC «, t00=0x0011, t01=0x0038}
0x1ace…1ae8 Head {h00=0x0016, h01=0x0050, text=» TBF DOOL3,DCHKUT «, t00=0x0011, t01=0x004c}
0x1ae8…1b00 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W2«, t00=0x0011, t01=0x0066}
0x1b00…1b0c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x007e}
0x1b0c…1b1a Head {h00=0x000a, h01=0x0050, text=»DCHKUT«, t00=0x0011, t01=0x008a}
0x1b1a…1b32 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0011, t01=0x0098}
0x1b32…1b3e Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0011, t01=0x00b0}
0x1b3e…1b4c Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0011, t01=0x00bc}
0x1b4c…1b5a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00ca}
0x1b5a…1ba4 Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0011, t01=0x00d8}
0x1ba4…1bee Head {h00=0x0046, h01=0x0050, text=»* THIS PROCEDURE RETURNS THE PROGRAMNUMBER SPLIT INTO TO BINARYS *«, t00=0x0011, t01=0x0122}
0x1bee…1c38 Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0011, t01=0x016c}
0x1c38…1c5c Head {h00=0x0020, h01=0x0050, text=»DEPRUT PROC NUM,FIRST,SECOND«, t00=0x0012, t01=0x0026}
0x1c5c…1c6e Head {h00=0x000e, h01=0x0050, text=» PBCD NUM «, t00=0x0012, t01=0x004a}
0x1c6e…1c82 Head {h00=0x0010, h01=0x0050, text=» PBIN FIRST «, t00=0x0012, t01=0x005c}
0x1c82…1c96 Head {h00=0x0010, h01=0x0050, text=» PBIN SECOND«, t00=0x0012, t01=0x0070}
0x1c96…1cae Head {h00=0x0014, h01=0x0050, text=» MOVE FIRST,NUM «, t00=0x0012, t01=0x0084}
0x1cae…1cc4 Head {h00=0x0012, h01=0x0050, text=» DIV FIRST,W10«, t00=0x0012, t01=0x009c}
0x1cc4…1cdc Head {h00=0x0014, h01=0x0050, text=» MOVE BCD2A,NUM «, t00=0x0012, t01=0x00b2}
0x1cdc…1cf6 Head {h00=0x0016, h01=0x0050, text=» MOVE SECOND,BCD2A«, t00=0x0012, t01=0x00ca}
0x1cf6…1d02 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x00e4}
0x1d02…1d10 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0012, t01=0x00f0}
0x1d10…1d1e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00fe}
0x1d1e…1d4e Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0012, t01=0x010c}
0x1d4e…1d7e Head {h00=0x002c, h01=0x0050, text=»* THIS PROCEDURE FIX THE PROGRAMMASKS. *«, t00=0x0012, t01=0x013c}
0x1d7e…1dae Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0012, t01=0x016c}
0x1dae…1dc2 Head {h00=0x0010, h01=0x0050, text=»DEPMSK PROC «, t00=0x0013, t01=0x000c}
0x1dc2…1dda Head {h00=0x0014, h01=0x0050, text=» MOVE PINACC,W0 «, t00=0x0013, t01=0x0020}
0x1dda…1df2 Head {h00=0x0014, h01=0x0050, text=» MOVE PJOBCUR,W0«, t00=0x0013, t01=0x0038}
0x1df2…1e0a Head {h00=0x0014, h01=0x0050, text=» MOVE PINDFR,W0 «, t00=0x0013, t01=0x0050}
0x1e0a…1e22 Head {h00=0x0014, h01=0x0050, text=» MOVE PINDTB,W0 «, t00=0x0013, t01=0x0068}
0x1e22…1e3a Head {h00=0x0014, h01=0x0050, text=» MOVE BIN4,BIN1 «, t00=0x0013, t01=0x0080}
0x1e3a…1e64 Head {h00=0x0026, h01=0x0050, text=» SUB BIN4,W1 FIRST DIGIT IN PRNUM «, t00=0x0013, t01=0x0098}
0x1e64…1e86 Head {h00=0x001e, h01=0x0050, text=» BNL DEAPR10 JUMP IF > 00 «, t00=0x0013, t01=0x00c2}
0x1e86…1e9e Head {h00=0x0014, h01=0x0050, text=» MOVE KEYMSK,W0 «, t00=0x0013, t01=0x00e4}
0x1e9e…1eaa Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x00fc}
0x1eaa…1eba Head {h00=0x000c, h01=0x0050, text=»DEAPR10 «, t00=0x0013, t01=0x0108}
0x1eba…1ed0 Head {h00=0x0012, h01=0x0050, text=» MUL BIN4,W10 «, t00=0x0013, t01=0x0118}
0x1ed0…1efa Head {h00=0x0026, h01=0x0050, text=» ADD BIN4,BIN2 NEXT DIGIT IN PRNUM«, t00=0x0013, t01=0x012e}
0x1efa…1f22 Head {h00=0x0024, h01=0x0050, text=» DIV BIN4,W2 BYTE POS IN PRKEYS «, t00=0x0013, t01=0x0158}
0x1f22…1f3a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0013, t01=0x0180}
0x1f3a…1f62 Head {h00=0x0024, h01=0x0050, text=» XCOPY DEBINW3,W1,W1,PRKEYS,BIN4«, t00=0x0014, t01=0x0008}
0x1f62…1f92 Head {h00=0x002c, h01=0x0050, text=» CALL TESTB,BIN2,W15 LOOK WHICH HALFBYTE«, t00=0x0014, t01=0x0030}
0x1f92…1fb4 Head {h00=0x001e, h01=0x0050, text=» BZ DEAPR20 JUMP IF FIRST «, t00=0x0014, t01=0x0060}
0x1fb4…1fce Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW2,W15 «, t00=0x0014, t01=0x0082}
0x1fce…1ff2 Head {h00=0x0020, h01=0x0050, text=» CALL MSKOUT,DEBINW2,DEBINW3«, t00=0x0014, t01=0x009c}
0x1ff2…200e Head {h00=0x0018, h01=0x0050, text=» MOVE KEYMSK,DEBINW2«, t00=0x0014, t01=0x00c0}
0x200e…201a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x00dc}
0x201a…202a Head {h00=0x000c, h01=0x0050, text=»DEAPR20 «, t00=0x0014, t01=0x00e8}
0x202a…2042 Head {h00=0x0014, h01=0x0050, text=» DIV DEBINW3,W16«, t00=0x0014, t01=0x00f8}
0x2042…205e Head {h00=0x0018, h01=0x0050, text=» MOVE KEYMSK,DEBINW3«, t00=0x0014, t01=0x0110}
0x205e…206a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x012c}
0x206a…2078 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0014, t01=0x0138}
0x2078…2086 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0146}
0x2086…2090 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0154}
0x2090…20de Head {h00=0x004a, h01=0x0050, text=»* ATTACH DE-PRINTER. SHOULD BE PERFORMED BEFORE ANY PRINTING IS DONE«, t00=0x0014, t01=0x015e}
0x20de…2110 Head {h00=0x002e, h01=0x0050, text=»* CONDITION-REGISTER IS SET TO 0 : OKAY«, t00=0x0015, t01=0x001c}
0x2110…214c Head {h00=0x0038, h01=0x0050, text=»* 1 : PRINTER BUSY; «, t00=0x0015, t01=0x004e}
0x214c…219c Head {h00=0x004c, h01=0x0050, text=»* IF THE PRINTER IS BUSY, THE ERROR-INDICATION 11 (IN USE) IS GIVEN IN«, t00=0x0015, t01=0x008a}
0x219c…21ec Head {h00=0x004c, h01=0x0050, text=»* IN DEBIN1, THE TERMINALNUMBER OF THE CURRENT TASK IS RGIVEN FOR EV P«, t00=0x0015, t01=0x00da}
0x21ec…21f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x012a}
0x21f6…220a Head {h00=0x0010, h01=0x0050, text=»ATTPRT PROC «, t00=0x0015, t01=0x0134}
0x220a…2228 Head {h00=0x001a, h01=0x0050, text=» MOVE DEBINW4,=X'0036'«, t00=0x0015, t01=0x0148}
0x2228…2244 Head {h00=0x0018, h01=0x0050, text=» PERF ATTDEV,DEBINW4«, t00=0x0015, t01=0x0166}
0x2244…2250 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0182}
0x2250…225e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x018e}
0x225e…2274 Head {h00=0x0012, h01=0x0050, text=»ATTDEV PROC FC«, t00=0x0016, t01=0x000c}
0x2274…2294 Head {h00=0x001c, h01=0x0050, text=» CALL CHANFC,DEDSPRT,FC «, t00=0x0016, t01=0x0022}
0x2294…22ac Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0016, t01=0x0042}
0x22ac…22e6 Head {h00=0x0036, h01=0x0050, text=» DSC0 .NW,DEDSPRT,TSTAT CHECK IF PRINTER AVAILABLE«, t00=0x0016, t01=0x005a}
0x22e6…230a Head {h00=0x0020, h01=0x0050, text=» DELAY W4 WAIT FOR 4/100 SEC«, t00=0x0016, t01=0x0094}
0x230a…2322 Head {h00=0x0014, h01=0x0050, text=» TESTIO DEDSPRT «, t00=0x0016, t01=0x00b8}
0x2322…2334 Head {h00=0x000e, h01=0x0050, text=» BNZ NOTOK«, t00=0x0016, t01=0x00d0}
0x2334…234a Head {h00=0x0012, h01=0x0050, text=» WAIT DEDSPRT «, t00=0x0016, t01=0x00e2}
0x234a…2368 Head {h00=0x001a, h01=0x0050, text=» XSTAT DEDSPRT,DEBINW4«, t00=0x0016, t01=0x00f8}
0x2368…2382 Head {h00=0x0016, h01=0x0050, text=» CBE DEBINW4,W0,OK«, t00=0x0016, t01=0x0116}
0x2382…239a Head {h00=0x0014, h01=0x0050, text=» B ATT10 NOT OK «, t00=0x0016, t01=0x0130}
0x239a…23a8 Head {h00=0x000a, h01=0x0050, text=»NOTOK «, t00=0x0016, t01=0x0148}
0x23a8…23be Head {h00=0x0012, h01=0x0050, text=» ABORT DEDSPRT«, t00=0x0016, t01=0x0156}
0x23be…23da Head {h00=0x0018, h01=0x0050, text=» B ATT10 NO PRINTER «, t00=0x0016, t01=0x016c}
0x23da…23e4 Head {h00=0x0006, h01=0x0050, text=»OK«, t00=0x0016, t01=0x0188}
0x23e4…2404 (23, 0, 400) Head {h00=0x001c, h01=0x0050, text=» DSC1 DEDSPRT,ATTACH,W20«, t00=0x0017, t01=0x0004}
0x2404…2414 Head {h00=0x000c, h01=0x0050, text=» BOK OUT«, t00=0x0017, t01=0x0024}
0x2414…242e Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W11 «, t00=0x0017, t01=0x0034}
0x242e…243c Head {h00=0x000a, h01=0x0050, text=» B OUT«, t00=0x0017, t01=0x004e}
0x243c…244a Head {h00=0x000a, h01=0x0050, text=»ATT10 «, t00=0x0017, t01=0x005c}
0x244a…247e Head {h00=0x0030, h01=0x0050, text=» MOVE DEBINW4,=W'35' 'OUT-DEV NOT OPERABLE' «, t00=0x0017, t01=0x006a}
0x247e…248a Head {h00=0x0008, h01=0x0050, text=»OUT «, t00=0x0017, t01=0x009e}
0x248a…24b6 Head {h00=0x0028, h01=0x0050, text=» PERF COND SET/CLEAR CONDITION REG. «, t00=0x0017, t01=0x00aa}
0x24b6…24c2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x00d6}
0x24c2…24d0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x00e2}
0x24d0…24da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f0}
0x24da…251c Head {h00=0x003e, h01=0x0050, text=»* RELEASE DE-PRINTER. MUST BE PERFORMED AFTER PRINTOUT. «, t00=0x0017, t01=0x00fa}
0x251c…2526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x013c}
0x2526…253a Head {h00=0x0010, h01=0x0050, text=»DETPRT PROC «, t00=0x0017, t01=0x0146}
0x253a…255a Head {h00=0x001c, h01=0x0050, text=» DSC1 DEDSPRT,DETACH,W0 «, t00=0x0017, t01=0x015a}
0x255a…2566 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x017a}
0x2566…2574 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x0186}
0x2574…257e (24, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0004}
0x257e…25b2 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE CALCULATE FIELDNUMBER FOR A«, t00=0x0018, t01=0x000e}
0x25b2…25e2 Head {h00=0x002c, h01=0x0050, text=»* RELATIVE FIELD ADRESSING TYP + OR - «, t00=0x0018, t01=0x0042}
0x25e2…25ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0072}
0x25ec…260a Head {h00=0x001a, h01=0x0050, text=»DEFIND PROC VAR1,VAR2 «, t00=0x0018, t01=0x007c}
0x260a…261c Head {h00=0x000e, h01=0x0050, text=» PBIN VAR1«, t00=0x0018, t01=0x009a}
0x261c…262e Head {h00=0x000e, h01=0x0050, text=» PBIN VAR2«, t00=0x0018, t01=0x00ac}
0x262e…265a Head {h00=0x0028, h01=0x0050, text=» XCOPY VAR1,W1,W1,BPOOL(BIN11),BIN12«, t00=0x0018, t01=0x00be}
0x265a…267a Head {h00=0x001c, h01=0x0050, text=» CBL VAR1,=W'254',UTFIN «, t00=0x0018, t01=0x00ea}
0x267a…2690 Head {h00=0x0012, h01=0x0050, text=» ADD BIN12,W1 «, t00=0x0018, t01=0x010a}
0x2690…26bc Head {h00=0x0028, h01=0x0050, text=» XCOPY VAR2,W1,W1,BPOOL(BIN11),BIN12«, t00=0x0018, t01=0x0120}
0x26bc…26de Head {h00=0x001e, h01=0x0050, text=» CBNE VAR1,=W'254',DEFI00 «, t00=0x0018, t01=0x014c}
0x26de…26f6 Head {h00=0x0014, h01=0x0050, text=» MOVE VAR1,BIN2 «, t00=0x0018, t01=0x016e}
0x26f6…270c Head {h00=0x0012, h01=0x0050, text=» SUB VAR1,VAR2«, t00=0x0018, t01=0x0186}
0x270c…2718 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x000c}
0x2718…2726 Head {h00=0x000a, h01=0x0050, text=»DEFI00«, t00=0x0019, t01=0x0018}
0x2726…273c Head {h00=0x0012, h01=0x0050, text=» ADD VAR2,BIN2«, t00=0x0019, t01=0x0026}
0x273c…2754 Head {h00=0x0014, h01=0x0050, text=» MOVE VAR1,VAR2 «, t00=0x0019, t01=0x003c}
0x2754…2762 Head {h00=0x000a, h01=0x0050, text=»UTFIN «, t00=0x0019, t01=0x0054}
0x2762…276e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x0062}
0x276e…277c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0019, t01=0x006e}
0x277c…2784 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x007c}
0x2784…2792 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0019, t01=0x0084}
0x2792…279c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x0092}
0x279c…27b4 Head {h00=0x0014, h01=0x0010, text=»* FORMATS«, t00=0x0019, t01=0x009c}
0x27b4…27be Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x00b4}
0x27be…27d0 Head {h00=0x000e, h01=0x000a, text=»F00ST FRMT«, t00=0x0019, t01=0x00be}
0x27d0…27dc Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0019, t01=0x00d0}
0x27dc…27e8 Head {h00=0x0008, h01=0x0004, text=» FUL«, t00=0x0019, t01=0x00dc}
0x27e8…27fe Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'PTS'«, t00=0x0019, t01=0x00e8}
0x27fe…2812 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0019, t01=0x00fe}
0x2812…282a Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'DATA' «, t00=0x0019, t01=0x0112}
0x282a…283e Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0019, t01=0x012a}
0x283e…2856 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'ENTRY'«, t00=0x0019, t01=0x013e}
0x2856…286a Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x0019, t01=0x0156}
0x286a…2886 Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'REL 10.0' «, t00=0x0019, t01=0x016a}
0x2886…2894 Head {h00=0x000a, h01=0x0005, text=» FNUL «, t00=0x0019, t01=0x0186}
0x2894…28a0 (26, 0, 400) Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001a, t01=0x0004}
0x28a0…28ac Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001a, t01=0x0010}
0x28ac…28c8 Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'PROGRAM:' «, t00=0x001a, t01=0x001c}
0x28c8…28f4 Head {h00=0x0028, h01=0x0050, text=» FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 «, t00=0x001a, t01=0x0038}
0x28f4…290c Head {h00=0x0014, h01=0x0050, text=» FMEL 'XX',PRNUM«, t00=0x001a, t01=0x0064}
0x290c…2926 Head {h00=0x0016, h01=0x0011, text=» FBF BOOL1,F00OUT «, t00=0x001a, t01=0x007c}
0x2926…2932 Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001a, t01=0x0096}
0x2932…295e Head {h00=0x0028, h01=0x0050, text=» FCOPY =C'10 SUPERVISORY FUNCTIONS' «, t00=0x001a, t01=0x00a2}
0x295e…296a Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001a, t01=0x00ce}
0x296a…297e Head {h00=0x0010, h01=0x0050, text=» FTEXT '20 '«, t00=0x001a, t01=0x00da}
0x297e…2998 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'FORMAT' «, t00=0x001a, t01=0x00ee}
0x2998…29ac Head {h00=0x0010, h01=0x0050, text=» FILLR '-',1«, t00=0x001a, t01=0x0108}
0x29ac…29ca Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'DEFINITION' «, t00=0x001a, t01=0x011c}
0x29ca…29d6 Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001a, t01=0x013a}
0x29d6…29ea Head {h00=0x0010, h01=0x0050, text=» FTEXT '30 '«, t00=0x001a, t01=0x0146}
0x29ea…2a00 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'JOB'«, t00=0x001a, t01=0x015a}
0x2a00…2a14 Head {h00=0x0010, h01=0x0050, text=» FILLR '-',1«, t00=0x001a, t01=0x0170}
0x2a14…2a32 Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'DEFINITION' «, t00=0x001a, t01=0x0184}
0x2a32…2a3e Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001b, t01=0x0012}
0x2a3e…2a52 Head {h00=0x0010, h01=0x0050, text=» FTEXT '40 '«, t00=0x001b, t01=0x001e}
0x2a52…2a6a Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'ENTRY'«, t00=0x001b, t01=0x0032}
0x2a6a…2a7e Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001b, t01=0x004a}
0x2a7e…2a96 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001b, t01=0x005e}
0x2a96…2aa2 Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001b, t01=0x0076}
0x2aa2…2ab6 Head {h00=0x0010, h01=0x0050, text=» FTEXT '50 '«, t00=0x001b, t01=0x0082}
0x2ab6…2ad0 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'SEARCH' «, t00=0x001b, t01=0x0096}
0x2ad0…2ae4 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001b, t01=0x00b0}
0x2ae4…2afc Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001b, t01=0x00c4}
0x2afc…2b08 Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001b, t01=0x00dc}
0x2b08…2b1c Head {h00=0x0010, h01=0x0050, text=» FTEXT '60 '«, t00=0x001b, t01=0x00e8}
0x2b1c…2b36 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'VERIFY' «, t00=0x001b, t01=0x00fc}
0x2b36…2b4a Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001b, t01=0x0116}
0x2b4a…2b62 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001b, t01=0x012a}
0x2b62…2b6e Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x001b, t01=0x0142}
0x2b6e…2b8e Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'70 CONVERSION'«, t00=0x001b, t01=0x014e}
0x2b8e…2ba2 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001b, t01=0x016e}
0x2ba2…2bba Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001b, t01=0x0182}
0x2bba…2bc6 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001c, t01=0x000a}
0x2bc6…2bd4 Head {h00=0x000a, h01=0x0006, text=»F00OUT«, t00=0x001c, t01=0x0016}
0x2bd4…2be2 Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x001c, t01=0x0024}
0x2be2…2bf6 Head {h00=0x0010, h01=0x0050, text=»F00RET FRMT «, t00=0x001c, t01=0x0032}
0x2bf6…2c02 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x001c, t01=0x0046}
0x2c02…2c2a Head {h00=0x0024, h01=0x0050, text=» FTEXT 'RETURN FROM DATA-ENTRY' «, t00=0x001c, t01=0x0052}
0x2c2a…2c36 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001c, t01=0x007a}
0x2c36…2c44 Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x001c, t01=0x0086}
0x2c44…2c58 Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x001c, t01=0x0094}
0x2c58…2c66 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001c, t01=0x00a8}
0x2c66…2c74 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x00b6}
0x2c74…2c9c Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x001c, t01=0x00c4}
0x2c9c…2cc4 Head {h00=0x0024, h01=0x0050, text=»* TABLE = VALUE-SET NO. * «, t00=0x001c, t01=0x00ec}
0x2cc4…2cea Head {h00=0x0022, h01=0x0050, text=»* TIME = SIZE OF ELEMENTS *«, t00=0x001c, t01=0x0114}
0x2cea…2d12 Head {h00=0x0024, h01=0x0050, text=»* ACK(W1) = ELEMENT NO. *«, t00=0x001c, t01=0x013a}
0x2d12…2d3a Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x001c, t01=0x0162}
0x2d3a…2d4c Head {h00=0x000e, h01=0x0050, text=»VSET FRMT «, t00=0x001c, t01=0x018a}
0x2d4c…2d58 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x001d, t01=0x000c}
0x2d58…2d70 Head {h00=0x0014, h01=0x0050, text=» FMEL '99',PRNUM«, t00=0x001d, t01=0x0018}
0x2d70…2d86 Head {h00=0x0012, h01=0x0050, text=» FBT BOOL1,F13«, t00=0x001d, t01=0x0030}
0x2d86…2da0 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C' CREATE'«, t00=0x001d, t01=0x0046}
0x2da0…2db0 Head {h00=0x000c, h01=0x0050, text=» FB F12A«, t00=0x001d, t01=0x0060}
0x2db0…2dca Head {h00=0x0016, h01=0x0050, text=»F13 FCOPY =C' GET'«, t00=0x001d, t01=0x0070}
0x2dca…2dec Head {h00=0x001e, h01=0x0050, text=»F12A FCOPY =C' VALUE-SETS'«, t00=0x001d, t01=0x008a}
0x2dec…2df8 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001d, t01=0x00ac}
0x2df8…2e12 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'NAME: T'«, t00=0x001d, t01=0x00b8}
0x2e12…2e2a Head {h00=0x0014, h01=0x0050, text=» FBT BOOL2,F12B «, t00=0x001d, t01=0x00d2}
0x2e2a…2e3a Head {h00=0x000c, h01=0x0050, text=» FINP 7 «, t00=0x001d, t01=0x00ea}
0x2e3a…2e4e Head {h00=0x0010, h01=0x0050, text=» FCOPY TABLE«, t00=0x001d, t01=0x00fa}
0x2e4e…2e5e Head {h00=0x000c, h01=0x0050, text=» FB F12C«, t00=0x001d, t01=0x010e}
0x2e5e…2e74 Head {h00=0x0012, h01=0x0050, text=»F12B 2 LINES«, t00=0x001d, t01=0x011e}
0x2e74…2eaa Head {h00=0x0032, h01=0x0050, text=» FKI 8,NUM,MINL=2,MAXL=2,ME,NCLR,NEOI,APPL=101«, t00=0x001d, t01=0x0134}
0x2eaa…2ebe Head {h00=0x0010, h01=0x0050, text=» FCOPY STR6A«, t00=0x001d, t01=0x016a}
0x2ebe…2ed0 Head {h00=0x000e, h01=0x0050, text=» FB F12UT «, t00=0x001d, t01=0x017e}
0x2ed0…2edc Head {h00=0x0008, h01=0x0050, text=»F12C«, t00=0x001d, t01=0x0190}
0x2edc…2ef0 Head {h00=0x0010, h01=0x0050, text=» FLINK F121 «, t00=0x001e, t01=0x000c}
0x2ef0…2f04 Head {h00=0x0010, h01=0x0050, text=»F12UT FMEND «, t00=0x001e, t01=0x0020}
0x2f04…2f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0034}
0x2f0e…2f20 Head {h00=0x000e, h01=0x0050, text=»F121 FRMT «, t00=0x001e, t01=0x003e}
0x2f20…2f2c Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001e, t01=0x0050}
0x2f2c…2f44 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'TYPE:'«, t00=0x001e, t01=0x005c}
0x2f44…2f5c Head {h00=0x0014, h01=0x0050, text=» FBT BOOL3,F121A«, t00=0x001e, t01=0x0074}
0x2f5c…2f7e Head {h00=0x001e, h01=0x0050, text=» FBF BOOL1,F124 IF CREATE «, t00=0x001e, t01=0x008c}
0x2f7e…2f8c Head {h00=0x000a, h01=0x0050, text=»F121A «, t00=0x001e, t01=0x00ae}
0x2f8c…2f9c Head {h00=0x000c, h01=0x0050, text=» FINP 7 «, t00=0x001e, t01=0x00bc}
0x2f9c…2fb0 Head {h00=0x0010, h01=0x0050, text=» FCOPY STR2A«, t00=0x001e, t01=0x00cc}
0x2fb0…2fc0 Head {h00=0x000c, h01=0x0050, text=» FB F125«, t00=0x001e, t01=0x00e0}
0x2fc0…2fcc Head {h00=0x0008, h01=0x0050, text=»F124«, t00=0x001e, t01=0x00f0}
0x2fcc…3008 Head {h00=0x0038, h01=0x0050, text=» FKI 7,MINL=1,MAXL=1,ALPHA,NEOI,ME,NCLR,APPL=102 A/N«, t00=0x001e, t01=0x00fc}
0x3008…301c Head {h00=0x0010, h01=0x0050, text=» FCOPY STR2A«, t00=0x001e, t01=0x0138}
0x301c…3028 Head {h00=0x0008, h01=0x0050, text=»F125«, t00=0x001e, t01=0x014c}
0x3028…3038 Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x001e, t01=0x0158}
0x3038…3054 Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'SIZE OF ' «, t00=0x001e, t01=0x0168}
0x3054…306e Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'ELEMENT'«, t00=0x001e, t01=0x0184}
0x306e…3084 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'S:' «, t00=0x001f, t01=0x000e}
0x3084…309c Head {h00=0x0014, h01=0x0050, text=» FBT BOOL3,F125A«, t00=0x001f, t01=0x0024}
0x309c…30be Head {h00=0x001e, h01=0x0050, text=» FBF BOOL1,F127 IF CREATE «, t00=0x001f, t01=0x003c}
0x30be…30cc Head {h00=0x000a, h01=0x0050, text=»F125A «, t00=0x001f, t01=0x005e}
0x30cc…30dc Head {h00=0x000c, h01=0x0050, text=» FINP 28«, t00=0x001f, t01=0x006c}
0x30dc…30f4 Head {h00=0x0014, h01=0x0050, text=» FMEL 'XX',TIME «, t00=0x001f, t01=0x007c}
0x30f4…3104 Head {h00=0x000c, h01=0x0050, text=» FB F128«, t00=0x001f, t01=0x0094}
0x3104…3110 Head {h00=0x0008, h01=0x0050, text=»F127«, t00=0x001f, t01=0x00a4}
0x3110…314e Head {h00=0x003a, h01=0x0050, text=» FKI 28,MINL=1,MAXL=2,NEOI,ME,NCLR,REWRT,APPL=103 <61 «, t00=0x001f, t01=0x00b0}
0x314e…3166 Head {h00=0x0014, h01=0x0050, text=» FMEL 'XX',TIME «, t00=0x001f, t01=0x00ee}
0x3166…3172 Head {h00=0x0008, h01=0x0050, text=»F128«, t00=0x001f, t01=0x0106}
0x3172…317e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001f, t01=0x0112}
0x317e…3198 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'ELEMENT'«, t00=0x001f, t01=0x011e}
0x3198…31b0 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C' NO.:'«, t00=0x001f, t01=0x0138}
0x31b0…31d4 Head {h00=0x0020, h01=0x0050, text=» FBF BOOL3,FEND IF LINE 1-3 «, t00=0x001f, t01=0x0150}
0x31d4…31ea Head {h00=0x0012, h01=0x0050, text=» FINP 13 ENTER«, t00=0x001f, t01=0x0174}
0x31ea…3204 Head {h00=0x0016, h01=0x0050, text=» FMEL 'XX',ACK(W1)«, t00=0x001f, t01=0x018a}
0x3204…3210 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0020, t01=0x0014}
0x3210…3226 Head {h00=0x0012, h01=0x0050, text=»* FLINK STR64A«, t00=0x0020, t01=0x0020}
0x3226…3240 Head {h00=0x0016, h01=0x0050, text=» FCTL X'DE',STR64A«, t00=0x0020, t01=0x0036}
0x3240…324c Head {h00=0x0008, h01=0x0050, text=»FEND«, t00=0x0020, t01=0x0050}
0x324c…325a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0020, t01=0x005c}
0x325a…3264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006a}
0x3264…3276 Head {h00=0x000e, h01=0x0050, text=»FORMN FRMT«, t00=0x0020, t01=0x0074}
0x3276…32a4 Head {h00=0x002a, h01=0x0050, text=» FKI 1,NUM,MINL=1,MAXL=1,REWRT,SCHK=1 «, t00=0x0020, t01=0x0086}
0x32a4…32d8 Head {h00=0x0030, h01=0x0050, text=» FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBCD(BIN6) «, t00=0x0020, t01=0x00b4}
0x32d8…32e4 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0020, t01=0x00e8}
0x32e4…3300 Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x0020, t01=0x00f4}
0x3300…3314 Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0020, t01=0x0110}
0x3314…3322 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0020, t01=0x0124}
0x3322…332c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0132}
0x332c…333e Head {h00=0x000e, h01=0x0050, text=»FORMA FRMT«, t00=0x0020, t01=0x013c}
0x333e…336a Head {h00=0x0028, h01=0x0050, text=»* FKI 1,ALPHA,MINL=1,MAXL=1,NEOI,ME «, t00=0x0020, t01=0x014e}
0x336a…3386 Head {h00=0x0018, h01=0x0050, text=»* FCOPY FDVBCD(BIN6)«, t00=0x0020, t01=0x017a}
0x3386…33c0 Head {h00=0x0036, h01=0x0050, text=» FCTL X'F0',1,X'C1',X'01',X'00',X'C0',FDVBCD(BIN6)«, t00=0x0021, t01=0x0008}
0x33c0…33cc Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0021, t01=0x0042}
0x33cc…33e8 Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x0021, t01=0x004e}
0x33e8…33fc Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0021, t01=0x006a}
0x33fc…340a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0021, t01=0x007e}
0x340a…3416 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0021, t01=0x008c}
0x3416…341a Head {h00=0x4004, h01=0x0000}
0x341a…341e 00 21 00 98 ┆ ! ┆
0x341e…3426 (34, 1, 8) 20 04 00 00 00 22 00 04 ┆ " ┆
0x3426…3476 (35, 0, 400) 52 1c 81 58 00 0c 81 27 88 20 33 b2 03 01 81 58 00 12 21 01 88 20 33 9e 8f 20 33 a0 f6 a1 33 b6 81 58 00 10 e2 04 22 c0 39 62 21 20 91 08 e2 58 00 12 3a 63 91 08 e2 32 22 ff ea 20 00 07 89 20 52 64 94 a0 00 01 e2 48 27 f8 a1 09 8f 20 33 b0 ┆R X ' 3 X ! 3 3 3 X " 9b! X :c 2" Rd H' 3 ┆
0x3476…34c6 40 10 80 20 08 04 02 01 01 01 57 02 01 02 02 00 57 1c 01 03 57 16 01 04 57 12 01 05 57 06 01 08 57 0a 01 09 82 20 ff ff 57 04 01 07 02 01 f6 a1 33 b6 a0 59 00 28 82 59 00 30 39 48 81 59 00 2a a0 59 00 34 a0 59 00 32 a0 59 00 36 39 68 19 06 ┆@ W W W W W W W 3 Y ( Y 09H Y * Y 4 Y 2 Y 69h ┆
0x34c6…3516 51 10 82 58 00 0e 3a 68 92 59 00 30 f6 a1 2b 74 57 1a 19 01 55 12 81 58 00 0c 92 04 51 06 f6 a1 2c 72 57 08 82 59 00 30 f6 a1 2b 6c 8f 20 2c c6 f6 a1 37 b4 07 80 f6 a1 36 f2 f6 a1 33 b6 01 0c 39 48 81 59 00 2a 01 04 f6 a1 2a 2e 57 14 01 0a ┆Q X :h Y 0 +tW U X Q ,rW Y 0 +l , 7 6 3 9H Y * *.W ┆
0x3516…3566 57 02 01 0b f6 a1 2a 1e 07 80 80 d8 00 0a f6 a1 36 f2 82 58 00 30 54 04 8f 20 52 68 82 58 00 32 5a 0a e2 58 00 2b 22 ff 81 58 00 2a 39 68 e9 20 00 0b 50 3a 1a 0a 52 06 90 59 00 3e 5f 0a 12 0a 50 16 52 08 ea 20 00 04 50 12 52 04 8f 20 52 64 ┆W * 6 X 0T Rh X 2Z X +" X *9h P: R Y >_ P R P R Rd┆
0x3566…35b6 1a 01 e2 59 00 2b 57 6c f6 a1 29 d2 07 80 02 02 e2 59 00 2b f6 a1 29 c4 f6 a1 2b 70 57 5a 82 08 54 0c 52 28 f6 a1 29 c4 f6 a1 29 86 57 4a ea 20 00 08 51 04 03 02 57 04 84 15 00 00 89 00 00 00 80 00 01 00 85 4a 04 10 84 00 00 01 04 14 14 09 ┆ Y +Wl ) Y + ) +pWZ T R( ) ) WJ Q W J ┆
0x35b6…3606 (36, 0, 400) 03 00 1a 08 e3 59 00 2b 03 00 ea 20 00 03 55 10 1a 03 51 04 8f 20 52 64 ea 20 00 03 59 0a 03 80 ea 20 00 02 51 0e 50 06 ab 20 01 00 57 0a ab 20 03 00 57 04 ab 20 02 00 ab 59 00 28 f6 a1 2b 6c a0 43 00 10 f6 a1 33 b6 e1 58 00 2a 21 ff e9 20 ┆ Y + U Q Rd Y Q P W W Y ( +l C 3 X *! ┆
0x3606…3656 00 0c 50 0e 83 56 00 02 e1 4c ff fe 21 03 8c 20 33 b2 8f 20 3b 5e 82 58 00 30 82 59 00 38 f6 a1 29 b4 01 50 f6 a1 33 d2 90 59 00 30 81 58 00 30 e9 58 00 32 5d 18 82 58 00 38 82 59 00 30 f6 a1 29 b4 f0 3a 82 58 00 30 01 00 3a 48 2a 01 f6 a1 ┆ P V L ! 3 ;^ X 0 Y 8 ) P 3 Y 0 X 0 X 2] X 8 Y 0 ) : X 0 :H* ┆
0x3656…36a6 33 be f0 3a 82 58 00 32 54 06 02 18 82 59 00 32 f0 3a 80 d8 00 0a 01 02 81 43 00 04 01 31 87 42 00 02 e1 5d 00 01 07 86 f6 a1 37 16 f0 3a 01 06 f6 a1 2a 1e e1 58 00 2b 21 ff 19 06 8e 20 52 64 e1 58 00 2b 21 ff 19 02 55 0c 39 4b a9 59 00 28 ┆3 : X 2T Y 2 : C 1 B ] 7 : * X +! Rd X +! U 9K Y (┆
0x36a6…36f6 01 00 e1 59 00 2b f6 a1 2b 6c 8f 20 2c c6 f6 a1 33 b6 39 48 81 59 00 2a e1 32 94 a0 00 01 a0 59 00 28 a0 59 00 3e e1 59 00 2b f6 a1 3d f4 f6 a1 2a 68 81 d9 00 34 81 a6 81 d9 00 30 f6 a1 3d 4a f6 a1 2a 68 81 d9 00 36 81 a6 81 d9 00 32 81 58 ┆ Y + +l , 3 9H Y * 2 Y ( Y > Y + = *h 4 0 =J *h 6 2 X┆
0x36f6…3746 00 30 8a 20 52 68 f0 3a 81 0c 21 20 50 06 23 10 54 02 f0 3a 8f 20 52 1c 07 86 81 43 00 04 9c d6 ff f4 28 04 00 01 94 d6 ff f4 85 43 00 02 f0 3a 01 00 07 8b 80 d8 00 0a 00 10 00 01 10 00 a0 90 00 80 80 00 04 41 00 0a 80 02 81 40 20 10 00 00 ┆ 0 Rh : ! P # T : R C ( C : A @ ┆