|
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: 14254 (0x37ae)
Notes: pts_type(SC)
Names: »PTSDE.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »S:DE/PTSDE.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »S:DE/PTSDE.SC«
IDENT PTSDE REL 10.0 80-04-11 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 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 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 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;
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-04-24/DALI«, t00=0x0000, t01=0x002a}
0x0042…005a Head {h00=0x0014, h01=0x0050, text=» 80-03-24/DALI«, t00=0x0000, t01=0x0046}
0x005a…006e Head {h00=0x0010, h01=0x000c, text=» DDUM DEDDIV«, t00=0x0000, t01=0x005e}
0x006e…007c Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0072}
0x007c…0090 Head {h00=0x0010, h01=0x000c, text=» ENTRY PTSDE«, t00=0x0000, t01=0x0080}
0x0090…009a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0094}
0x009a…00ce Head {h00=0x0030, h01=0x0050, text=»* ENTRIES FOR APPLICATIONAL HANDLING «, t00=0x0000, t01=0x009e}
0x00ce…00d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d2}
0x00d8…00ee Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAPPL «, t00=0x0000, t01=0x00dc}
0x00ee…0104 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK0 «, t00=0x0000, t01=0x00f2}
0x0104…011a Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK1 «, t00=0x0000, t01=0x0108}
0x011a…0130 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK2 «, t00=0x0000, t01=0x011e}
0x0130…0146 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAOK4 «, t00=0x0000, t01=0x0134}
0x0146…015c Head {h00=0x0012, h01=0x0050, text=» ENTRY DEANOK «, t00=0x0000, t01=0x014a}
0x015c…0172 Head {h00=0x0012, h01=0x0050, text=» ENTRY DETCHK «, t00=0x0000, t01=0x0160}
0x0172…0188 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEPMSK «, t00=0x0000, t01=0x0176}
0x0188…019e Head {h00=0x0012, h01=0x0050, text=» ENTRY DEPRUT «, t00=0x0000, t01=0x018c}
0x019e…01b4 Head {h00=0x0012, h01=0x0050, text=» ENTRY ATTPRT «, t00=0x0001, t01=0x0012}
0x01b4…01ca Head {h00=0x0012, h01=0x0050, text=» ENTRY DETPRT «, t00=0x0001, t01=0x0028}
0x01ca…01e0 Head {h00=0x0012, h01=0x0050, text=» ENTRY ATTDEV «, t00=0x0001, t01=0x003e}
0x01e0…01ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0054}
0x01ee…01f8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0062}
0x01f8…0226 Head {h00=0x002a, h01=0x002a, text=»* EXTERNAL REFERENCES TO SCREEN«, t00=0x0001, t01=0x006c}
0x0226…0230 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x009a}
0x0230…0244 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRA «, t00=0x0001, t01=0x00a4}
0x0244…0258 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRS «, t00=0x0001, t01=0x00b8}
0x0258…026c Head {h00=0x0010, h01=0x0050, text=» EXT DECLRN «, t00=0x0001, t01=0x00cc}
0x026c…0276 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x00e0}
0x0276…02ae Head {h00=0x0034, h01=0x0030, text=»* EXTERNAL REFERENCES TO DATA-ENTRY MODES«, t00=0x0001, t01=0x00ea}
0x02ae…02b8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0122}
0x02b8…02e2 Head {h00=0x0026, h01=0x0021, text=» EXT DE10ST SUPERVISORY FUNCTIONS «, t00=0x0001, t01=0x012c}
0x02e2…0308 Head {h00=0x0022, h01=0x001d, text=» EXT DE20ST FORMAT DEFINITION «, t00=0x0001, t01=0x0156}
0x0308…032a Head {h00=0x001e, h01=0x001a, text=» EXT DE30ST JOB DEFINITION«, t00=0x0001, t01=0x017c}
0x032a…0348 Head {h00=0x001a, h01=0x0016, text=» EXT DE40ST ENTRY MODE«, t00=0x0002, t01=0x000e}
0x0348…036e Head {h00=0x0022, h01=0x001d, text=» EXT DE50ST SEARCH/CORRECTION «, t00=0x0002, t01=0x002c}
0x036e…038e Head {h00=0x001c, h01=0x0018, text=» EXT DE60ST VERIFICATION«, t00=0x0002, t01=0x0052}
0x038e…03ac Head {h00=0x001a, h01=0x0016, text=» EXT DE70ST CONVERSION«, t00=0x0002, t01=0x0072}
0x03ac…03b6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0090}
0x03b6…03f0 Head {h00=0x0036, h01=0x0032, text=»* EXTERNAL REFRERENCES FOR DATA-ENTRY FILES«, t00=0x0002, t01=0x009a}
0x03f0…03fa Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x00d4}
0x03fa…041c Head {h00=0x001e, h01=0x0050, text=» EXT OPCL OPEN SYSTEM-FILE«, t00=0x0002, t01=0x00de}
0x041c…0440 Head {h00=0x0020, h01=0x0050, text=» EXT CHANFC CHANGE FILECODE «, t00=0x0002, t01=0x0100}
0x0440…0462 Head {h00=0x001e, h01=0x0050, text=» EXT GETVOL GET VOLUMENAME«, t00=0x0002, t01=0x0124}
0x0462…046c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0146}
0x046c…04a6 Head {h00=0x0036, h01=0x0050, text=»* EXTERNAL REFERENCES FOR SPECIAL ROUTINES «, t00=0x0002, t01=0x0150}
0x04a6…04b0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x018a}
0x04b0…04d0 (3, 0, 400) Head {h00=0x001c, h01=0x0050, text=» EXT DEPOOL TESTVARIANT «, t00=0x0003, t01=0x0004}
0x04d0…04e2 Head {h00=0x000e, h01=0x0050, text=» EXT DERR «, t00=0x0003, t01=0x0024}
0x04e2…04f4 Head {h00=0x000e, h01=0x0050, text=» EXT SAVE «, t00=0x0003, t01=0x0036}
0x04f4…0508 Head {h00=0x0010, h01=0x0050, text=» EXT RESTOR «, t00=0x0003, t01=0x0048}
0x0508…051c Head {h00=0x0010, h01=0x0050, text=» EXT ATTBUF «, t00=0x0003, t01=0x005c}
0x051c…052e Head {h00=0x000e, h01=0x0050, text=» EXT TESTB«, t00=0x0003, t01=0x0070}
0x052e…0542 Head {h00=0x0010, h01=0x0050, text=» EXT MSKOUT «, t00=0x0003, t01=0x0082}
0x0542…056c Head {h00=0x0026, h01=0x0050, text=» EXT COND SET/CLEAR CONDITION REG.«, t00=0x0003, t01=0x0096}
0x056c…0580 Head {h00=0x0010, h01=0x0050, text=» EXT UPDBOL «, t00=0x0003, t01=0x00c0}
0x0580…0592 Head {h00=0x000e, h01=0x0050, text=» EXT POOLA«, t00=0x0003, t01=0x00d4}
0x0592…05be Head {h00=0x0028, h01=0x0050, text=» EXT GETIND GETINDEX VARIABLE/LENGTH«, t00=0x0003, t01=0x00e6}
0x05be…05cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0112}
0x05cc…05d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0120}
0x05d6…0614 Head {h00=0x003a, h01=0x0050, text=»* EXTERNAL REFERENCES TO APPL HANDLING ROUTINES«, t00=0x0003, t01=0x012a}
0x0614…061e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0168}
0x061e…0632 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP1A «, t00=0x0003, t01=0x0172}
0x0632…0646 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP2A «, t00=0x0003, t01=0x0186}
0x0646…065a Head {h00=0x0010, h01=0x0050, text=» EXT DEAP3A «, t00=0x0004, t01=0x000a}
0x065a…066e Head {h00=0x0010, h01=0x0050, text=» EXT DEAP5A «, t00=0x0004, t01=0x001e}
0x066e…0682 Head {h00=0x0010, h01=0x0050, text=» EXT DEAP7A «, t00=0x0004, t01=0x0032}
0x0682…068c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0046}
0x068c…0696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0050}
0x0696…06ae Head {h00=0x0014, h01=0x0050, text=» INCLUDE DELITT «, t00=0x0004, t01=0x005a}
0x06ae…06b6 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0072}
0x06b6…06c4 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0004, t01=0x007a}
0x06c4…06ce Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x0088}
0x06ce…06f0 Head {h00=0x001e, h01=0x0020, text=»* START OF PROGRAM «, t00=0x0004, t01=0x0092}
0x06f0…06fa Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00b4}
0x06fa…0708 Head {h00=0x000a, h01=0x0005, text=»PTSDE «, t00=0x0004, t01=0x00be}
0x0708…0744 Head {h00=0x0038, h01=0x0050, text=» CALL SAVE,W0,W16,PWBDB4 SAVE ORIGINATE ADRESSES TO «, t00=0x0004, t01=0x00cc}
0x0744…076a Head {h00=0x0022, h01=0x0050, text=» WORKBLOCKS AND DESCRIPTORS «, t00=0x0004, t01=0x0108}
0x076a…07a6 Head {h00=0x0038, h01=0x0050, text=» CALL ATTBUF,DEDSSCRN,STATSH ATTACH BUFFERS FOR THE «, t00=0x0004, t01=0x012e}
0x07a6…07e0 Head {h00=0x0036, h01=0x0050, text=» CALL ATTBUF,DEDSPRT,STATSH SCREEN AND PRINT DSETS«, t00=0x0004, t01=0x016a}
0x07e0…07f2 Head {h00=0x000e, h01=0x0050, text=» SET UORG «, t00=0x0005, t01=0x0014}
0x07f2…0806 Head {h00=0x0010, h01=0x0050, text=» BNZ FINISH «, t00=0x0005, t01=0x0026}
0x0806…082e Head {h00=0x0024, h01=0x0050, text=» CALL GETIND,RBUF,RBUFLN,DEBINW1«, t00=0x0005, t01=0x003a}
0x082e…084e Head {h00=0x001c, h01=0x0050, text=» CALL POOLA ADJUST POOLS«, t00=0x0005, t01=0x0062}
0x084e…085c Head {h00=0x000a, h01=0x0050, text=»FINISH«, t00=0x0005, t01=0x0082}
0x085c…0868 Head {h00=0x0008, h01=0x0050, text=»DEST«, t00=0x0005, t01=0x0090}
0x0868…0892 Head {h00=0x0026, h01=0x0050, text=» SET BOOL1 PART OF FORMAT DISPLAY «, t00=0x0005, t01=0x009c}
0x0892…08a0 Head {h00=0x000a, h01=0x0050, text=»DEST00«, t00=0x0005, t01=0x00c6}
0x08a0…08b6 Head {h00=0x0012, h01=0x000d, text=» ATTFMT F00ST «, t00=0x0005, t01=0x00d4}
0x08b6…08e0 Head {h00=0x0026, h01=0x0050, text=» SET DEPROMPT PROMPT-TEXTS DISPLAY«, t00=0x0005, t01=0x00ea}
0x08e0…08ee Head {h00=0x000a, h01=0x0006, text=»STA050«, t00=0x0005, t01=0x0114}
0x08ee…0906 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0005, t01=0x0122}
0x0906…091a Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0005, t01=0x013a}
0x091a…0928 Head {h00=0x000a, h01=0x0006, text=»STA100«, t00=0x0005, t01=0x014e}
0x0928…094e Head {h00=0x0022, h01=0x0050, text=» IB DEBINW2,CANCEL,RETUR,ENTER«, t00=0x0005, t01=0x015c}
0x094e…0966 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0005, t01=0x0182}
0x0966…0978 Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0006, t01=0x000a}
0x0978…098a Head {h00=0x000e, h01=0x0050, text=» B STA100 «, t00=0x0006, t01=0x001c}
0x098a…0998 Head {h00=0x000a, h01=0x0006, text=»CANCEL«, t00=0x0006, t01=0x002e}
0x0998…09b0 Head {h00=0x0014, h01=0x0050, text=» CLEAR DEPROMPT «, t00=0x0006, t01=0x003c}
0x09b0…09c2 Head {h00=0x000e, h01=0x0009, text=» B STA050 «, t00=0x0006, t01=0x0054}
0x09c2…09cc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x0066}
0x09cc…09da Head {h00=0x000a, h01=0x0005, text=»RETUR «, t00=0x0006, t01=0x0070}
0x09da…09f0 Head {h00=0x0012, h01=0x0050, text=» ATTFMT F00RET«, t00=0x0006, t01=0x007e}
0x09f0…0a06 Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0006, t01=0x0094}
0x0a06…0a1a Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0006, t01=0x00aa}
0x0a1a…0a2a Head {h00=0x000c, h01=0x0050, text=» B DEST «, t00=0x0006, t01=0x00be}
0x0a2a…0a34 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x00ce}
0x0a34…0a42 Head {h00=0x000a, h01=0x0005, text=»ENTER «, t00=0x0006, t01=0x00d8}
0x0a42…0a5c Head {h00=0x0016, h01=0x0050, text=» CBE BIN1,W0,DEST «, t00=0x0006, t01=0x00e6}
0x0a5c…0a72 Head {h00=0x0012, h01=0x0050, text=» PERF OPCL,W1 «, t00=0x0006, t01=0x0100}
0x0a72…0a84 Head {h00=0x000e, h01=0x0050, text=» BOK ENT4 «, t00=0x0006, t01=0x0116}
0x0a84…0a98 Head {h00=0x0010, h01=0x0050, text=» BNERR ENT32«, t00=0x0006, t01=0x0128}
0x0a98…0ab0 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W0«, t00=0x0006, t01=0x013c}
0x0ab0…0ac2 Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0006, t01=0x0154}
0x0ac2…0ad4 Head {h00=0x000e, h01=0x0050, text=» B STA100 «, t00=0x0006, t01=0x0166}
0x0ad4…0ae2 Head {h00=0x000a, h01=0x0050, text=»ENT32 «, t00=0x0006, t01=0x0178}
0x0ae2…0afa Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W0«, t00=0x0006, t01=0x0186}
0x0afa…0b0c Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0007, t01=0x000e}
0x0b0c…0b30 Head {h00=0x0020, h01=0x0050, text=» IB DEBINW2,ENT52,ENT52,ENT5«, t00=0x0007, t01=0x0020}
0x0b30…0b48 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0007, t01=0x0044}
0x0b48…0b58 Head {h00=0x000c, h01=0x0050, text=» B ENT32«, t00=0x0007, t01=0x005c}
0x0b58…0b64 Head {h00=0x0008, h01=0x0050, text=»ENT4«, t00=0x0007, t01=0x006c}
0x0b64…0b84 Head {h00=0x001c, h01=0x0050, text=» MOVE MODE,MODTAB(BIN1) «, t00=0x0007, t01=0x0078}
0x0b84…0bb8 Head {h00=0x0030, h01=0x002b, text=» PERFI BIN1,DE10ST,DE20ST,DE30ST,DE40ST, C «, t00=0x0007, t01=0x0098}
0x0bb8…0bec Head {h00=0x0030, h01=0x0050, text=» DE50ST,DE60ST,DE70ST,DE00ER,DE00ER,DE00ER «, t00=0x0007, t01=0x00cc}
0x0bec…0bf8 Head {h00=0x0008, h01=0x0050, text=»ENT5«, t00=0x0007, t01=0x0100}
0x0bf8…0c38 Head {h00=0x003c, h01=0x0050, text=» CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO«, t00=0x0007, t01=0x010c}
0x0c38…0c5e Head {h00=0x0022, h01=0x0050, text=» WORKBLOCKS AND DESCRIPTORS «, t00=0x0007, t01=0x014c}
0x0c5e…0c72 Head {h00=0x0010, h01=0x0050, text=» CLEAR BOOL1«, t00=0x0007, t01=0x0172}
0x0c72…0c8c Head {h00=0x0016, h01=0x0050, text=» CBNE BIN1,W0,ENT4«, t00=0x0007, t01=0x0186}
0x0c8c…0c9a Head {h00=0x000a, h01=0x0050, text=»ENT52 «, t00=0x0008, t01=0x0010}
0x0c9a…0cb0 Head {h00=0x0012, h01=0x0050, text=» PERF OPCL,W2 «, t00=0x0008, t01=0x001e}
0x0cb0…0cc2 Head {h00=0x000e, h01=0x0050, text=» BOK ENT6 «, t00=0x0008, t01=0x0034}
0x0cc2…0cd4 Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0008, t01=0x0046}
0x0cd4…0ce0 Head {h00=0x0008, h01=0x0050, text=»ENT6«, t00=0x0008, t01=0x0058}
0x0ce0…0cfc Head {h00=0x0018, h01=0x0050, text=» CBNE BIN2,W0,DEST00«, t00=0x0008, t01=0x0064}
0x0cfc…0d0c Head {h00=0x000c, h01=0x0050, text=» B DEST «, t00=0x0008, t01=0x0080}
0x0d0c…0d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0090}
0x0d16…0d2a Head {h00=0x0010, h01=0x0050, text=»DE00ER PROC «, t00=0x0008, t01=0x009a}
0x0d2a…0d40 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN1,W0 «, t00=0x0008, t01=0x00ae}
0x0d40…0d4c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x00c4}
0x0d4c…0d5a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0008, t01=0x00d0}
0x0d5a…0d68 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0008, t01=0x00de}
0x0d68…0d72 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x00ec}
0x0d72…0d96 Head {h00=0x0020, h01=0x001c, text=»* APPLICATION ROUTINE«, t00=0x0008, t01=0x00f6}
0x0d96…0da0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x011a}
0x0da0…0db4 Head {h00=0x0010, h01=0x0050, text=»DEAPPL PROC «, t00=0x0008, t01=0x0124}
0x0db4…0dd8 Head {h00=0x0020, h01=0x0050, text=» CBG DEBINW3,=W'100',DEAPP0 «, t00=0x0008, t01=0x0138}
0x0dd8…0dee Head {h00=0x0012, h01=0x0050, text=» IB DEBINW3 C«, t00=0x0008, t01=0x015c}
0x0dee…0e04 Head {h00=0x0012, h01=0x0050, text=» DEAPRTES C «, t00=0x0008, t01=0x0172}
0x0e04…0e18 Head {h00=0x0010, h01=0x0050, text=» DEAUNIT C«, t00=0x0008, t01=0x0188}
0x0e18…0e2c Head {h00=0x0010, h01=0x0050, text=» DEAJOB C «, t00=0x0009, t01=0x000c}
0x0e2c…0e42 Head {h00=0x0012, h01=0x0050, text=» DEABATCH C «, t00=0x0009, t01=0x0020}
0x0e42…0e58 Head {h00=0x0012, h01=0x0050, text=» DEAENKEY C «, t00=0x0009, t01=0x0036}
0x0e58…0e6a Head {h00=0x000e, h01=0x0050, text=» DEUNENT «, t00=0x0009, t01=0x004c}
0x0e6a…0e7c Head {h00=0x000e, h01=0x0050, text=» B DEAER6 «, t00=0x0009, t01=0x005e}
0x0e7c…0ea2 Head {h00=0x0022, h01=0x0050, text=»DEAPRTES CHECK OF NEW PRNUM «, t00=0x0009, t01=0x0070}
0x0ea2…0ebe Head {h00=0x0018, h01=0x0050, text=» MOVE BCD13A,DEINPUT«, t00=0x0009, t01=0x0096}
0x0ebe…0ed8 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,BCD13A «, t00=0x0009, t01=0x00b2}
0x0ed8…0f00 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN2,BIN1 SAVE KEYED INPUT«, t00=0x0009, t01=0x00cc}
0x0f00…0f14 Head {h00=0x0010, h01=0x0050, text=» DIV BIN1,W8«, t00=0x0009, t01=0x00f4}
0x0f14…0f46 Head {h00=0x002e, h01=0x0050, text=» XCOPY DEBINW4,W0,W2,PROGNR,BIN1 PROGRAMNR«, t00=0x0009, t01=0x0108}
0x0f46…0f5a Head {h00=0x0010, h01=0x0050, text=» MUL BIN1,W8«, t00=0x0009, t01=0x013a}
0x0f5a…0f70 Head {h00=0x0012, h01=0x0050, text=» SUB BIN2,BIN1«, t00=0x0009, t01=0x014e}
0x0f70…0fa2 Head {h00=0x002e, h01=0x0050, text=» CALL TESTB,DEBINW4,BIN2 LOOK IF EXISTING «, t00=0x0009, t01=0x0164}
0x0fa2…0fc2 Head {h00=0x001c, h01=0x0050, text=» BZ DEAPRERR JUMP IF NOT«, t00=0x000a, t01=0x0008}
0x0fc2…0fd8 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN1,W0 «, t00=0x000a, t01=0x0028}
0x0fd8…1002 Head {h00=0x0026, h01=0x0050, text=» CALL UPDBOL,BIN1 CLEAR ALL BOOLS «, t00=0x000a, t01=0x003e}
0x1002…101c Head {h00=0x0016, h01=0x0050, text=» MOVE BCD2A,BCD13A«, t00=0x000a, t01=0x0068}
0x101c…1034 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN2,BCD2A«, t00=0x000a, t01=0x0082}
0x1034…104c Head {h00=0x0014, h01=0x0050, text=» MOVE BCD3A,W10 «, t00=0x000a, t01=0x009a}
0x104c…1066 Head {h00=0x0016, h01=0x0050, text=» DIV BCD13A,BCD3A «, t00=0x000a, t01=0x00b2}
0x1066…1080 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,BCD13A «, t00=0x000a, t01=0x00cc}
0x1080…1094 Head {h00=0x0010, h01=0x0050, text=» PERF DEPMSK«, t00=0x000a, t01=0x00e6}
0x1094…10a4 Head {h00=0x000c, h01=0x0050, text=»DEAENKEY«, t00=0x000a, t01=0x00fa}
0x10a4…10bc Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x000a, t01=0x010a}
0x10bc…10d6 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW2,W17 «, t00=0x000a, t01=0x0122}
0x10d6…10e8 Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000a, t01=0x013c}
0x10e8…10f8 Head {h00=0x000c, h01=0x0050, text=»DEAPRERR«, t00=0x000a, t01=0x014e}
0x10f8…1110 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W7«, t00=0x000a, t01=0x015e}
0x1110…1122 Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x000a, t01=0x0176}
0x1122…112c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0188}
0x112c…1136 (11, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1136…115e Head {h00=0x0024, h01=0x0050, text=» ATTFMT FORMN DUMMY INSTRUCTION «, t00=0x000b, t01=0x000e}
0x115e…117e Head {h00=0x001c, h01=0x0050, text=» ATTFMT FORMA - " - «, t00=0x000b, t01=0x0036}
0x117e…1192 Head {h00=0x0010, h01=0x0050, text=» ATTFMT VSET«, t00=0x000b, t01=0x0056}
0x1192…11a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x006a}
0x11a0…11b0 Head {h00=0x000c, h01=0x0050, text=»DEUNENT «, t00=0x000b, t01=0x0078}
0x11b0…11ca Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW2,W17 «, t00=0x000b, t01=0x0088}
0x11ca…11da Head {h00=0x000c, h01=0x0050, text=»DEAUNIT «, t00=0x000b, t01=0x00a2}
0x11da…1208 Head {h00=0x002a, h01=0x0050, text=» MOVE BCD2A,DEINPUT CHECK IF SPECIFIED«, t00=0x000b, t01=0x00b2}
0x1208…1232 Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,BCD2A UNIT NUMBER IS«, t00=0x000b, t01=0x00e0}
0x1232…1250 Head {h00=0x001a, h01=0x0050, text=» MOVE FILINDUS,DEBINW4«, t00=0x000b, t01=0x010a}
0x1250…1288 Head {h00=0x0034, h01=0x0050, text=» XCOPY DEBINW4,W1,W1,DUNIT,FILINDUS GET FILECODE«, t00=0x000b, t01=0x0128}
0x1288…12a0 Head {h00=0x0014, h01=0x0050, text=» ADD FILINDUS,W2«, t00=0x000b, t01=0x0160}
0x12a0…12ca Head {h00=0x0026, h01=0x0050, text=» CBE FCOUNTER(FILINDUS),W0,DEAUN0 «, t00=0x000b, t01=0x0178}
0x12ca…12e0 Head {h00=0x0012, h01=0x0050, text=» ERASE 1,W2,W2«, t00=0x000c, t01=0x0012}
0x12e0…1306 Head {h00=0x0022, h01=0x0050, text=» MOVE TABLE,FVOLNAME(FILINDUS)«, t00=0x000c, t01=0x0028}
0x1306…1318 Head {h00=0x000e, h01=0x0050, text=» B DEAUN5 «, t00=0x000c, t01=0x004e}
0x1318…1326 Head {h00=0x000a, h01=0x0050, text=»DEAUN0«, t00=0x000c, t01=0x0060}
0x1326…1358 Head {h00=0x002e, h01=0x0050, text=» CALL CHANFC,DISK,DEBINW4 CHANGE FILECODE «, t00=0x000c, t01=0x006e}
0x1358…1396 Head {h00=0x003a, h01=0x0050, text=» CALL GETVOL,DISK,RBUF,STRG10A,DEBINW4 GET VOLUMENAME «, t00=0x000c, t01=0x00a0}
0x1396…13c2 Head {h00=0x0028, h01=0x0050, text=» CBE DEBINW4,W0,DEAUN4 JUMP IF OKEY «, t00=0x000c, t01=0x00de}
0x13c2…13e4 Head {h00=0x001e, h01=0x0050, text=» MOVE DEBINW4,W9 NOT FOUND«, t00=0x000c, t01=0x010a}
0x13e4…13f6 Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x000c, t01=0x012c}
0x13f6…1404 Head {h00=0x000a, h01=0x0050, text=»DEAUN4«, t00=0x000c, t01=0x013e}
0x1404…141a Head {h00=0x0012, h01=0x0050, text=» ERASE 1,W2,W2«, t00=0x000c, t01=0x014c}
0x141a…1436 Head {h00=0x0018, h01=0x0050, text=» MOVE TABLE,STRG10A «, t00=0x000c, t01=0x0162}
0x1436…145c Head {h00=0x0022, h01=0x0050, text=» MOVE FVOLNAME(FILINDUS),TABLE«, t00=0x000c, t01=0x017e}
0x145c…146a Head {h00=0x000a, h01=0x0050, text=»DEAUN5«, t00=0x000d, t01=0x0014}
0x146a…1482 Head {h00=0x0014, h01=0x0050, text=» DISPLAY 2,W1,W1«, t00=0x000d, t01=0x0022}
0x1482…1494 Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000d, t01=0x003a}
0x1494…14a2 Head {h00=0x000a, h01=0x0050, text=»DEAUN2«, t00=0x000d, t01=0x004c}
0x14a2…14ba Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W7«, t00=0x000d, t01=0x005a}
0x14ba…14cc Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x000d, t01=0x0072}
0x14cc…14f0 Head {h00=0x0020, h01=0x0050, text=»DEAJOB CHECK IF SPECIFIED «, t00=0x000d, t01=0x0084}
0x14f0…1510 Head {h00=0x001c, h01=0x0050, text=» MOVE STSAVE(W1),DEINPUT«, t00=0x000d, t01=0x00a8}
0x1510…1536 Head {h00=0x0022, h01=0x0050, text=» JOBNAME EXISTS ON USERFILE «, t00=0x000d, t01=0x00c8}
0x1536…1548 Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000d, t01=0x00ee}
0x1548…156e Head {h00=0x0022, h01=0x0050, text=»DEABATCH CHECK IF SPECIFIED «, t00=0x000d, t01=0x0100}
0x156e…1592 Head {h00=0x0020, h01=0x0050, text=» BATCH EXISTS ON USERFILE «, t00=0x000d, t01=0x0126}
0x1592…15b2 Head {h00=0x001c, h01=0x0050, text=» MOVE STSAVE(W2),DEINPUT«, t00=0x000d, t01=0x014a}
0x15b2…15c4 Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x000d, t01=0x016a}
0x15c4…15d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x017c}
0x15d2…15dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018a}
0x15dc…161c (14, 0, 400) Head {h00=0x003c, h01=0x0050, text=»* JUMP TO APPL HANDLING IN CORRESPONDING PROGRAM «, t00=0x000e, t01=0x0004}
0x161c…1626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0044}
0x1626…1634 Head {h00=0x000a, h01=0x0050, text=»DEAPP0«, t00=0x000e, t01=0x004e}
0x1634…1650 Head {h00=0x0018, h01=0x0050, text=» SUB DEBINW3,=W'100'«, t00=0x000e, t01=0x005c}
0x1650…1678 Head {h00=0x0024, h01=0x0050, text=» MOVE DEBINW4,PRNUM SAVE PRNNUM «, t00=0x000e, t01=0x0078}
0x1678…1698 Head {h00=0x001c, h01=0x0050, text=» MOVE BCD3A,W10 LOAD +10«, t00=0x000e, t01=0x00a0}
0x1698…16c6 Head {h00=0x002a, h01=0x0050, text=» DIV PRNUM,BCD3A GET MODE TENTH FIGURE«, t00=0x000e, t01=0x00c0}
0x16c6…16f2 Head {h00=0x0028, h01=0x0050, text=» MOVE DEBIN1,PRNUM LOAD MODE BINARY «, t00=0x000e, t01=0x00ee}
0x16f2…171c Head {h00=0x0026, h01=0x0050, text=» MOVE PRNUM,DEBINW4 RESTORE PRNUM «, t00=0x000e, t01=0x011a}
0x171c…174e Head {h00=0x002e, h01=0x0050, text=» MOVE BCD2A,PRNUM GET MODE LEVEL ONETH FIG«, t00=0x000e, t01=0x0144}
0x174e…1780 Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,BCD2A LOAD MODE LEVEL BINARY«, t00=0x000e, t01=0x0176}
0x1780…17a4 Head {h00=0x0020, h01=0x0050, text=» IB DEBIN1 JUMP MODE APPL C «, t00=0x000f, t01=0x0018}
0x17a4…17b8 Head {h00=0x0010, h01=0x0050, text=» DEAP1A C «, t00=0x000f, t01=0x003c}
0x17b8…17cc Head {h00=0x0010, h01=0x0050, text=» DEAP2A C «, t00=0x000f, t01=0x0050}
0x17cc…17e0 Head {h00=0x0010, h01=0x0050, text=» DEAP3A C «, t00=0x000f, t01=0x0064}
0x17e0…17f4 Head {h00=0x0010, h01=0x0050, text=» DEAER6 C «, t00=0x000f, t01=0x0078}
0x17f4…1808 Head {h00=0x0010, h01=0x0050, text=» DEAP5A C «, t00=0x000f, t01=0x008c}
0x1808…181c Head {h00=0x0010, h01=0x0050, text=» DEAER6 C «, t00=0x000f, t01=0x00a0}
0x181c…1830 Head {h00=0x0010, h01=0x0050, text=» DEAP7A C «, t00=0x000f, t01=0x00b4}
0x1830…1840 Head {h00=0x000c, h01=0x0050, text=» DEAER6«, t00=0x000f, t01=0x00c8}
0x1840…1852 Head {h00=0x000e, h01=0x0050, text=» B DEAER6 «, t00=0x000f, t01=0x00d8}
0x1852…1860 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00ea}
0x1860…18a2 Head {h00=0x003e, h01=0x0050, text=»* RETURNS FROM APPL HANDLING IN CORRESPONDING PROGRAM«, t00=0x000f, t01=0x00f8}
0x18a2…18ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013a}
0x18ac…18ba Head {h00=0x000a, h01=0x0050, text=»DEAOK0«, t00=0x000f, t01=0x0144}
0x18ba…18d2 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x000f, t01=0x0152}
0x18d2…18de Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x000f, t01=0x016a}
0x18de…18ec Head {h00=0x000a, h01=0x0050, text=»DEAOK1«, t00=0x000f, t01=0x0176}
0x18ec…1904 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x000f, t01=0x0184}
0x1904…1910 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x000c}
0x1910…191e Head {h00=0x000a, h01=0x0050, text=»DEAOK2«, t00=0x0010, t01=0x0018}
0x191e…1936 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W2«, t00=0x0010, t01=0x0026}
0x1936…1942 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x003e}
0x1942…1950 Head {h00=0x000a, h01=0x0050, text=»DEAOK4«, t00=0x0010, t01=0x004a}
0x1950…1968 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W4«, t00=0x0010, t01=0x0058}
0x1968…1974 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0070}
0x1974…1982 Head {h00=0x000a, h01=0x0050, text=»DEAER6«, t00=0x0010, t01=0x007c}
0x1982…19a8 Head {h00=0x0022, h01=0x0050, text=» MOVE DEBINW4,W6 ILLEGAL VALUE«, t00=0x0010, t01=0x008a}
0x19a8…19b6 Head {h00=0x000a, h01=0x0050, text=»DEANOK«, t00=0x0010, t01=0x00b0}
0x19b6…19ce Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W3«, t00=0x0010, t01=0x00be}
0x19ce…19da Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0010, t01=0x00d6}
0x19da…19e8 Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0010, t01=0x00e2}
0x19e8…19f6 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0010, t01=0x00f0}
0x19f6…1a00 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x00fe}
0x1a00…1a2a Head {h00=0x0026, h01=0x0021, text=»* TABULATION-CHECK ROUTINE «, t00=0x0010, t01=0x0108}
0x1a2a…1a34 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x0132}
0x1a34…1a48 Head {h00=0x0010, h01=0x0050, text=»DETCHK PROC «, t00=0x0010, t01=0x013c}
0x1a48…1a62 Head {h00=0x0016, h01=0x0050, text=» TBF DOOL3,DCHKUT «, t00=0x0010, t01=0x0150}
0x1a62…1a7a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W2«, t00=0x0010, t01=0x016a}
0x1a7a…1a86 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0182}
0x1a86…1a94 Head {h00=0x000a, h01=0x0050, text=»DCHKUT«, t00=0x0010, t01=0x018e}
0x1a94…1aac Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0011, t01=0x000c}
0x1aac…1ab8 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0011, t01=0x0024}
0x1ab8…1ac6 Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0011, t01=0x0030}
0x1ac6…1ad4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x003e}
0x1ad4…1b1e Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0011, t01=0x004c}
0x1b1e…1b68 Head {h00=0x0046, h01=0x0050, text=»* THIS PROCEDURE RETURNS THE PROGRAMNUMBER SPLIT INTO TO BINARYS *«, t00=0x0011, t01=0x0096}
0x1b68…1bb2 Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0011, t01=0x00e0}
0x1bb2…1bd6 Head {h00=0x0020, h01=0x0050, text=»DEPRUT PROC NUM,FIRST,SECOND«, t00=0x0011, t01=0x012a}
0x1bd6…1bee Head {h00=0x0014, h01=0x0050, text=» MOVE FIRST,NUM «, t00=0x0011, t01=0x014e}
0x1bee…1c04 Head {h00=0x0012, h01=0x0050, text=» DIV FIRST,W10«, t00=0x0011, t01=0x0166}
0x1c04…1c1c Head {h00=0x0014, h01=0x0050, text=» MOVE BCD2A,NUM «, t00=0x0011, t01=0x017c}
0x1c1c…1c36 (18, 0, 400) Head {h00=0x0016, h01=0x0050, text=» MOVE SECOND,BCD2A«, t00=0x0012, t01=0x0004}
0x1c36…1c42 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x001e}
0x1c42…1c50 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0012, t01=0x002a}
0x1c50…1c5e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0038}
0x1c5e…1c8e Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0012, t01=0x0046}
0x1c8e…1cbe Head {h00=0x002c, h01=0x0050, text=»* THIS PROCEDURE FIX THE PROGRAMMASKS. *«, t00=0x0012, t01=0x0076}
0x1cbe…1cee Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0012, t01=0x00a6}
0x1cee…1d02 Head {h00=0x0010, h01=0x0050, text=»DEPMSK PROC «, t00=0x0012, t01=0x00d6}
0x1d02…1d1a Head {h00=0x0014, h01=0x0050, text=» MOVE PINACC,W0 «, t00=0x0012, t01=0x00ea}
0x1d1a…1d32 Head {h00=0x0014, h01=0x0050, text=» MOVE PJOBCUR,W0«, t00=0x0012, t01=0x0102}
0x1d32…1d4a Head {h00=0x0014, h01=0x0050, text=» MOVE PINDFR,W0 «, t00=0x0012, t01=0x011a}
0x1d4a…1d62 Head {h00=0x0014, h01=0x0050, text=» MOVE PINDTB,W0 «, t00=0x0012, t01=0x0132}
0x1d62…1d7a Head {h00=0x0014, h01=0x0050, text=» MOVE BIN4,BIN1 «, t00=0x0012, t01=0x014a}
0x1d7a…1da4 Head {h00=0x0026, h01=0x0050, text=» SUB BIN4,W1 FIRST DIGIT IN PRNUM «, t00=0x0012, t01=0x0162}
0x1da4…1dc6 Head {h00=0x001e, h01=0x0050, text=» BNL DEAPR10 JUMP IF > 00 «, t00=0x0012, t01=0x018c}
0x1dc6…1dde Head {h00=0x0014, h01=0x0050, text=» MOVE KEYMSK,W0 «, t00=0x0013, t01=0x001e}
0x1dde…1dea Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x0036}
0x1dea…1dfa Head {h00=0x000c, h01=0x0050, text=»DEAPR10 «, t00=0x0013, t01=0x0042}
0x1dfa…1e10 Head {h00=0x0012, h01=0x0050, text=» MUL BIN4,W10 «, t00=0x0013, t01=0x0052}
0x1e10…1e3a Head {h00=0x0026, h01=0x0050, text=» ADD BIN4,BIN2 NEXT DIGIT IN PRNUM«, t00=0x0013, t01=0x0068}
0x1e3a…1e62 Head {h00=0x0024, h01=0x0050, text=» DIV BIN4,W2 BYTE POS IN PRKEYS «, t00=0x0013, t01=0x0092}
0x1e62…1e7a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0013, t01=0x00ba}
0x1e7a…1ea2 Head {h00=0x0024, h01=0x0050, text=» XCOPY DEBINW3,W1,W1,PRKEYS,BIN4«, t00=0x0013, t01=0x00d2}
0x1ea2…1ed2 Head {h00=0x002c, h01=0x0050, text=» CALL TESTB,BIN2,W15 LOOK WHICH HALFBYTE«, t00=0x0013, t01=0x00fa}
0x1ed2…1ef4 Head {h00=0x001e, h01=0x0050, text=» BZ DEAPR20 JUMP IF FIRST «, t00=0x0013, t01=0x012a}
0x1ef4…1f0e Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW2,W15 «, t00=0x0013, t01=0x014c}
0x1f0e…1f32 Head {h00=0x0020, h01=0x0050, text=» CALL MSKOUT,DEBINW2,DEBINW3«, t00=0x0013, t01=0x0166}
0x1f32…1f4e Head {h00=0x0018, h01=0x0050, text=» MOVE KEYMSK,DEBINW2«, t00=0x0013, t01=0x018a}
0x1f4e…1f5a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0016}
0x1f5a…1f6a Head {h00=0x000c, h01=0x0050, text=»DEAPR20 «, t00=0x0014, t01=0x0022}
0x1f6a…1f82 Head {h00=0x0014, h01=0x0050, text=» DIV DEBINW3,W16«, t00=0x0014, t01=0x0032}
0x1f82…1f9e Head {h00=0x0018, h01=0x0050, text=» MOVE KEYMSK,DEBINW3«, t00=0x0014, t01=0x004a}
0x1f9e…1faa Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0066}
0x1faa…1fb8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0014, t01=0x0072}
0x1fb8…1fc6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0080}
0x1fc6…1fd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x008e}
0x1fd0…201e Head {h00=0x004a, h01=0x0050, text=»* ATTACH DE-PRINTER. SHOULD BE PERFORMED BEFORE ANY PRINTING IS DONE«, t00=0x0014, t01=0x0098}
0x201e…2050 Head {h00=0x002e, h01=0x0050, text=»* CONDITION-REGISTER IS SET TO 0 : OKAY«, t00=0x0014, t01=0x00e6}
0x2050…208c Head {h00=0x0038, h01=0x0050, text=»* 1 : PRINTER BUSY; «, t00=0x0014, t01=0x0118}
0x208c…2090 Head {h00=0x0054, h01=0x0050}
0x2090…2094 Head {h00=0x2a20, h01=0x2020}
0x2094…20cc 49 46 20 54 48 45 20 50 52 49 4e 54 45 52 20 49 53 20 42 55 53 59 2c 20 54 48 45 20 45 52 52 4f 52 2d 49 4e 44 49 43 41 54 49 4f 4e 20 31 31 20 28 49 4e 20 55 53 45 29 ┆IF THE PRINTER IS BUSY, THE ERROR-INDICATION 11 (IN USE)┆
0x20cc…211c (21, 0, 398) 20 49 53 20 47 49 56 45 4e 20 49 4e 20 44 45 42 49 4e 57 34 00 14 01 54 00 54 00 50 2a 20 20 20 49 4e 20 44 45 42 49 4e 31 2c 20 54 48 45 20 54 45 52 4d 49 4e 41 4c 4e 55 4d 42 45 52 20 4f 46 20 54 48 45 20 43 55 52 52 45 4e 54 20 54 41 53 ┆ IS GIVEN IN DEBINW4 T T P* IN DEBIN1, THE TERMINALNUMBER OF THE CURRENT TAS┆
0x211c…216c 4b 20 49 53 20 52 47 49 56 45 4e 20 46 4f 52 20 45 56 20 50 52 49 4e 54 49 4e 47 2e 00 15 00 1c 00 06 00 50 2a 20 00 15 00 74 00 10 00 50 41 54 54 50 52 54 5c 50 52 4f 43 20 00 15 00 7e 00 1a 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 34 2c ┆K IS RGIVEN FOR EV PRINTING. P* t PATTPRT PROC ~ P MOVE DEBINW4,┆
0x216c…21bc 3d 58 27 30 30 33 30 27 00 15 00 92 00 18 00 50 20 50 45 52 46 20 41 54 54 44 45 56 2c 44 45 42 49 4e 57 34 00 15 00 b0 00 08 00 50 20 52 45 54 00 15 00 cc 00 0a 00 50 20 50 45 4e 44 20 00 15 00 d8 00 12 00 50 41 54 54 44 45 56 20 50 52 4f ┆=X'0030' P PERF ATTDEV,DEBINW4 P RET P PEND PATTDEV PRO┆
0x21bc…220c 43 20 46 43 00 15 00 e6 00 1c 00 50 20 43 41 4c 4c 20 43 48 41 4e 46 43 2c 44 45 44 53 50 52 54 2c 46 43 20 00 15 00 fc 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 34 2c 57 30 00 15 01 1c 00 36 00 50 5c 44 53 43 30 5c 2e 4e 57 2c 44 45 ┆C FC P CALL CHANFC,DEDSPRT,FC P MOVE DEBINW4,W0 6 P DSC0 .NW,DE┆
0x220c…225a 44 53 50 52 54 2c 54 53 54 41 54 5c 43 48 45 43 4b 20 49 46 20 50 52 49 4e 54 45 52 20 41 56 41 49 4c 41 42 4c 45 00 15 01 34 00 20 00 50 5c 44 45 4c 41 59 5c 57 34 5c 57 41 49 54 20 46 4f 52 20 34 2f 31 30 30 20 53 45 43 00 15 01 6e ┆DSPRT,TSTAT CHECK IF PRINTER AVAILABLE 4 P DELAY W4 WAIT FOR 4/100 SEC n┆
0x225a…22aa (22, 0, 400) 00 14 00 50 5c 54 45 53 54 49 4f 5c 44 45 44 53 50 52 54 20 00 16 00 04 00 0e 00 50 5c 42 4e 5a 5c 4e 4f 54 4f 4b 00 16 00 1c 00 12 00 50 5c 57 41 49 54 5c 44 45 44 53 50 52 54 20 00 16 00 2e 00 1a 00 50 5c 58 53 54 41 54 5c 44 45 44 53 50 ┆ P TESTIO DEDSPRT P BNZ NOTOK P WAIT DEDSPRT . P XSTAT DEDSP┆
0x22aa…22fa 52 54 2c 44 45 42 49 4e 57 34 00 16 00 44 00 16 00 50 5c 43 42 45 5c 44 45 42 49 4e 57 34 2c 57 30 2c 4f 4b 00 16 00 62 00 14 00 50 5c 42 5c 41 54 54 31 30 5c 4e 4f 54 20 4f 4b 20 00 16 00 7c 00 0a 00 50 4e 4f 54 4f 4b 20 00 16 00 94 00 12 ┆RT,DEBINW4 D P CBE DEBINW4,W0,OK b P B ATT10 NOT OK | PNOTOK ┆
0x22fa…234a 00 50 5c 41 42 4f 52 54 5c 44 45 44 53 50 52 54 00 16 00 a2 00 18 00 50 5c 42 5c 41 54 54 31 30 5c 4e 4f 20 50 52 49 4e 54 45 52 20 00 16 00 b8 00 06 00 50 4f 4b 00 16 00 d4 00 1c 00 50 20 44 53 43 31 20 44 45 44 53 50 52 54 2c 41 54 54 41 ┆ P ABORT DEDSPRT P B ATT10 NO PRINTER POK P DSC1 DEDSPRT,ATTA┆
0x234a…239a 43 48 2c 57 32 30 00 16 00 de 00 0c 00 50 5c 42 4f 4b 5c 4f 55 54 00 16 00 fe 00 16 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 34 2c 57 31 31 20 00 16 01 0e 00 0a 00 50 20 42 20 4f 55 54 00 16 01 28 00 0a 00 50 41 54 54 31 30 20 00 16 01 36 ┆CH,W20 P BOK OUT P MOVE DEBINW4,W11 P B OUT ( PATT10 6┆
0x239a…23ea 00 30 00 50 5c 4d 4f 56 45 5c 44 45 42 49 4e 57 34 2c 3d 57 27 33 35 27 5c 27 4f 55 54 2d 44 45 56 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 27 20 00 16 01 44 00 08 00 50 4f 55 54 20 00 16 01 78 00 28 00 50 5c 50 45 52 46 5c 43 4f 4e 44 5c 53 ┆ 0 P MOVE DEBINW4,=W'35' 'OUT-DEV NOT OPERABLE' D POUT x ( P PERF COND S┆
0x23ea…243a (23, 0, 400) 45 54 2f 43 4c 45 41 52 20 43 4f 4e 44 49 54 49 4f 4e 20 52 45 47 2e 20 00 16 01 84 00 08 00 50 20 52 45 54 00 17 00 20 00 0a 00 50 20 50 45 4e 44 20 00 17 00 2c 00 06 00 50 2a 20 00 17 00 3a 00 3e 00 50 2a 20 20 20 52 45 4c 45 41 53 45 20 ┆ET/CLEAR CONDITION REG. P RET P PEND , P* : > P* RELEASE ┆
0x243a…248a 44 45 2d 50 52 49 4e 54 45 52 2e 20 4d 55 53 54 20 42 45 20 50 45 52 46 4f 52 4d 45 44 20 41 46 54 45 52 20 50 52 49 4e 54 4f 55 54 2e 20 00 17 00 44 00 06 00 50 2a 20 00 17 00 86 00 10 00 50 44 45 54 50 52 54 20 50 52 4f 43 20 00 17 00 90 ┆DE-PRINTER. MUST BE PERFORMED AFTER PRINTOUT. D P* PDETPRT PROC ┆
0x248a…24da 00 1c 00 50 20 44 53 43 31 20 44 45 44 53 50 52 54 2c 44 45 54 41 43 48 2c 57 30 20 00 17 00 a4 00 08 00 50 20 52 45 54 00 17 00 c4 00 0a 00 50 20 50 45 4e 44 20 00 17 00 d0 00 04 00 50 00 17 00 de 00 0a 00 06 5c 45 4a 45 43 54 00 17 00 e6 ┆ P DSC1 DEDSPRT,DETACH,W0 P RET P PEND P EJECT ┆
0x24da…252a 00 06 00 03 2a 20 00 17 00 f4 00 14 00 10 2a 20 20 20 20 20 20 20 20 46 4f 52 4d 41 54 53 00 17 00 fe 00 06 00 03 2a 20 00 17 01 16 00 0e 00 0a 46 30 30 53 54 5c 46 52 4d 54 00 17 01 20 00 08 00 04 5c 46 53 4c 00 17 01 32 00 08 00 04 5c 46 ┆ * * FORMATS * F00ST FRMT FSL 2 F┆
0x252a…257a 55 4c 00 17 01 3e 00 12 00 50 20 46 43 4f 50 59 20 3d 43 27 50 54 53 27 00 17 01 4a 00 10 00 50 20 46 49 4c 4c 52 20 27 20 27 2c 31 00 17 01 60 00 14 00 50 20 46 43 4f 50 59 20 3d 43 27 44 41 54 41 27 20 00 17 01 74 00 10 00 50 20 46 49 4c ┆UL > P FCOPY =C'PTS' J P FILLR ' ',1 ` P FCOPY =C'DATA' t P FIL┆
0x257a…25ca (24, 0, 400) 4c 52 20 27 20 27 2c 31 00 17 01 8c 00 14 00 50 20 46 43 4f 50 59 20 3d 43 27 45 4e 54 52 59 27 00 18 00 10 00 10 00 50 20 46 49 4c 4c 52 20 27 20 27 2c 35 00 18 00 28 00 18 00 50 20 46 43 4f 50 59 20 3d 43 27 52 45 4c 20 31 30 2e 30 27 20 ┆LR ' ',1 P FCOPY =C'ENTRY' P FILLR ' ',5 ( P FCOPY =C'REL 10.0' ┆
0x25ca…261a 00 18 00 3c 00 0a 00 05 5c 46 4e 55 4c 20 00 18 00 58 00 08 00 04 5c 46 4e 4c 00 18 00 66 00 08 00 04 5c 46 4e 4c 00 18 00 72 00 18 00 50 5c 46 43 4f 50 59 5c 3d 43 27 50 52 4f 47 52 41 4d 3a 27 20 00 18 00 7e 00 28 00 50 20 46 4b 49 20 39 ┆ < FNUL X FNL f FNL r P FCOPY =C'PROGRAM:' ~ ( P FKI 9┆
0x261a…266a 2c 4d 49 4e 4c 3d 32 2c 4d 41 58 4c 3d 32 2c 4d 45 2c 4e 45 4f 49 2c 41 50 50 4c 3d 31 20 00 18 00 9a 00 14 00 50 20 46 4d 45 4c 20 27 58 58 27 2c 50 52 4e 55 4d 00 18 00 c6 00 16 00 11 5c 46 42 46 5c 42 4f 4f 4c 31 2c 46 30 30 4f 55 54 20 ┆,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM FBF BOOL1,F00OUT ┆
0x266a…26ba 00 18 00 de 00 08 00 04 5c 46 4e 4c 00 18 00 f8 00 28 00 50 5c 46 43 4f 50 59 5c 3d 43 27 31 30 20 53 55 50 45 52 56 49 53 4f 52 59 20 46 55 4e 43 54 49 4f 4e 53 27 20 00 18 01 04 00 08 00 04 5c 46 4e 4c 00 18 01 30 00 10 00 50 5c 46 54 45 ┆ FNL ( P FCOPY =C'10 SUPERVISORY FUNCTIONS' FNL 0 P FTE┆
0x26ba…270a 58 54 5c 27 32 30 20 27 00 18 01 3c 00 16 00 50 5c 46 43 4f 50 59 5c 3d 43 27 46 4f 52 4d 41 54 27 20 00 18 01 50 00 10 00 50 5c 46 49 4c 4c 52 5c 27 2d 27 2c 31 00 18 01 6a 00 1a 00 50 5c 46 43 4f 50 59 5c 3d 43 27 44 45 46 49 4e 49 54 49 ┆XT '20 ' < P FCOPY =C'FORMAT' P P FILLR '-',1 j P FCOPY =C'DEFINITI┆
0x270a…275a (25, 0, 400) 4f 4e 27 20 00 18 01 7e 00 08 00 04 5c 46 4e 4c 00 19 00 0c 00 10 00 50 5c 46 54 45 58 54 5c 27 33 30 20 27 00 19 00 18 00 12 00 50 5c 46 43 4f 50 59 5c 3d 43 27 4a 4f 42 27 00 19 00 2c 00 10 00 50 5c 46 49 4c 4c 52 5c 27 2d 27 2c 31 00 19 ┆ON' ~ FNL P FTEXT '30 ' P FCOPY =C'JOB' , P FILLR '-',1 ┆
0x275a…27aa 00 42 00 1a 00 50 5c 46 43 4f 50 59 5c 3d 43 27 44 45 46 49 4e 49 54 49 4f 4e 27 20 00 19 00 56 00 08 00 04 5c 46 4e 4c 00 19 00 74 00 10 00 50 5c 46 54 45 58 54 5c 27 34 30 20 27 00 19 00 80 00 14 00 50 20 46 43 4f 50 59 20 3d 43 27 45 4e ┆ B P FCOPY =C'DEFINITION' V FNL t P FTEXT '40 ' P FCOPY =C'EN┆
0x27aa…27fa 54 52 59 27 00 19 00 94 00 10 00 50 20 46 49 4c 4c 52 20 27 20 27 2c 31 00 19 00 ac 00 14 00 50 20 46 43 4f 50 59 20 3d 43 27 4d 4f 44 45 27 20 00 19 00 c0 00 08 00 04 5c 46 4e 4c 00 19 00 d8 00 10 00 50 5c 46 54 45 58 54 5c 27 35 30 20 27 ┆TRY' P FILLR ' ',1 P FCOPY =C'MODE' FNL P FTEXT '50 '┆
0x27fa…284a 00 19 00 e4 00 16 00 50 20 46 43 4f 50 59 20 3d 43 27 53 45 41 52 43 48 27 20 00 19 00 f8 00 10 00 50 20 46 49 4c 4c 52 20 27 20 27 2c 31 00 19 01 12 00 14 00 50 20 46 43 4f 50 59 20 3d 43 27 4d 4f 44 45 27 20 00 19 01 26 00 08 00 04 5c 46 ┆ P FCOPY =C'SEARCH' P FILLR ' ',1 P FCOPY =C'MODE' & F┆
0x284a…289a 4e 4c 00 19 01 3e 00 10 00 50 5c 46 54 45 58 54 5c 27 36 30 20 27 00 19 01 4a 00 16 00 50 20 46 43 4f 50 59 20 3d 43 27 56 45 52 49 46 59 27 20 00 19 01 5e 00 10 00 50 20 46 49 4c 4c 52 20 27 20 27 2c 31 00 19 01 78 00 14 00 50 20 46 43 4f ┆NL > P FTEXT '60 ' J P FCOPY =C'VERIFY' ^ P FILLR ' ',1 x P FCO┆
0x289a…28ea (26, 0, 400) 50 59 20 3d 43 27 4d 4f 44 45 27 20 00 19 01 8c 00 08 00 04 5c 46 4e 4c 00 1a 00 14 00 1c 00 50 5c 46 43 4f 50 59 5c 3d 43 27 37 30 20 43 4f 4e 56 45 52 53 49 4f 4e 27 00 1a 00 20 00 10 00 50 20 46 49 4c 4c 52 20 27 20 27 2c 31 00 1a 00 40 ┆PY =C'MODE' FNL P FCOPY =C'70 CONVERSION' P FILLR ' ',1 @┆
0x28ea…293a 00 14 00 50 20 46 43 4f 50 59 20 3d 43 27 4d 4f 44 45 27 20 00 1a 00 54 00 08 00 50 20 46 4e 4c 00 1a 00 6c 00 0a 00 06 46 30 30 4f 55 54 00 1a 00 78 00 0a 00 06 5c 46 4d 45 4e 44 00 1a 00 86 00 10 00 50 46 30 30 52 45 54 20 46 52 4d 54 20 ┆ P FCOPY =C'MODE' T P FNL l F00OUT x FMEND PF00RET FRMT ┆
0x293a…298a 00 1a 00 94 00 08 00 50 20 46 53 4c 00 1a 00 a8 00 24 00 50 20 46 54 45 58 54 20 27 52 45 54 55 52 4e 20 46 52 4f 4d 20 44 41 54 41 2d 45 4e 54 52 59 27 20 00 1a 00 b4 00 08 00 50 20 46 4e 4c 00 1a 00 dc 00 0a 00 50 20 46 4b 49 20 31 00 1a ┆ P FSL $ P FTEXT 'RETURN FROM DATA-ENTRY' P FNL P FKI 1 ┆
0x298a…29da 00 e8 00 10 00 50 20 46 43 4f 50 59 20 48 45 58 30 30 00 1a 00 f6 00 0a 00 50 20 46 4d 45 4e 44 00 1a 01 0a 00 0a 00 50 5c 45 4a 45 43 54 00 1a 01 18 00 24 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 ┆ P FCOPY HEX00 P FMEND P EJECT $ P**************************┆
0x29da…2a2a 2a 2a 2a 2a 2a 20 00 1a 01 26 00 24 00 50 2a 20 20 54 41 42 4c 45 20 20 3d 20 56 41 4c 55 45 2d 53 45 54 20 4e 4f 2e 20 20 20 20 20 2a 20 00 1a 01 4e 00 22 00 50 2a 20 20 54 49 4d 45 20 20 3d 20 53 49 5a 45 20 4f 46 20 45 4c 45 4d 45 4e 54 ┆***** & $ P* TABLE = VALUE-SET NO. * N " P* TIME = SIZE OF ELEMENT┆
0x2a2a…2a7a (27, 0, 398) 53 20 20 2a 00 1a 01 76 00 24 00 50 2a 20 20 41 43 4b 28 57 31 29 20 3d 20 45 4c 45 4d 45 4e 54 20 4e 4f 2e 20 20 20 20 20 20 20 2a 00 1b 00 0c 00 24 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 ┆S * v $ P* ACK(W1) = ELEMENT NO. * $ P****************************┆
0x2a7a…2aca 2a 2a 2a 20 00 1b 00 34 00 0e 00 50 56 53 45 54 5c 46 52 4d 54 20 00 1b 00 5c 00 08 00 50 5c 46 53 4c 00 1b 00 6e 00 14 00 50 5c 46 4d 45 4c 5c 27 39 39 27 2c 50 52 4e 55 4d 00 1b 00 7a 00 12 00 50 5c 46 42 54 5c 42 4f 4f 4c 31 2c 46 31 33 ┆*** 4 PVSET FRMT P FSL n P FMEL '99',PRNUM z P FBT BOOL1,F13┆
0x2aca…2b1a 00 1b 00 92 00 16 00 50 5c 46 43 4f 50 59 5c 3d 43 27 20 43 52 45 41 54 45 27 00 1b 00 a8 00 0c 00 50 5c 46 42 5c 46 31 32 41 00 1b 00 c2 00 16 00 50 46 31 33 5c 46 43 4f 50 59 5c 3d 43 27 20 47 45 54 27 00 1b 00 d2 00 1e 00 50 46 31 32 41 ┆ P FCOPY =C' CREATE' P FB F12A PF13 FCOPY =C' GET' PF12A┆
0x2b1a…2b6a 5c 46 43 4f 50 59 5c 3d 43 27 20 56 41 4c 55 45 2d 53 45 54 53 27 00 1b 00 ec 00 08 00 50 5c 46 4e 4c 00 1b 01 0e 00 16 00 50 5c 46 43 4f 50 59 5c 3d 43 27 4e 41 4d 45 3a 20 54 27 00 1b 01 1a 00 14 00 50 5c 46 42 54 5c 42 4f 4f 4c 32 2c 46 ┆ FCOPY =C' VALUE-SETS' P FNL P FCOPY =C'NAME: T' P FBT BOOL2,F┆
0x2b6a…2bb8 31 32 42 20 00 1b 01 34 00 0c 00 50 5c 46 49 4e 50 5c 37 20 00 1b 01 4c 00 10 00 50 5c 46 43 4f 50 59 5c 54 41 42 4c 45 00 1b 01 5c 00 0c 00 50 5c 46 42 5c 46 31 32 43 00 1b 01 70 00 12 00 50 46 31 32 42 5c 5c 5c 32 20 4c 49 4e 45 53 ┆12B 4 P FINP 7 L P FCOPY TABLE P FB F12C p PF12B 2 LINES┆
0x2bb8…2c08 (28, 0, 400) 00 1b 01 80 00 32 00 50 5c 46 4b 49 5c 38 2c 4e 55 4d 2c 4d 49 4e 4c 3d 32 2c 4d 41 58 4c 3d 32 2c 4d 45 2c 4e 43 4c 52 2c 4e 45 4f 49 2c 41 50 50 4c 3d 31 30 31 00 1c 00 08 00 10 00 50 5c 46 43 4f 50 59 5c 53 54 52 36 41 00 1c 00 3e 00 0e ┆ 2 P FKI 8,NUM,MINL=2,MAXL=2,ME,NCLR,NEOI,APPL=101 P FCOPY STR6A > ┆
0x2c08…2c58 00 50 5c 46 42 5c 46 31 32 55 54 20 00 1c 00 52 00 08 00 50 46 31 32 43 00 1c 00 64 00 10 00 50 5c 46 4c 49 4e 4b 5c 46 31 32 31 20 00 1c 00 70 00 10 00 50 46 31 32 55 54 5c 46 4d 45 4e 44 20 00 1c 00 84 00 06 00 50 2a 20 00 1c 00 98 00 0e ┆ P FB F12UT R PF12C d P FLINK F121 p PF12UT FMEND P* ┆
0x2c58…2ca8 00 50 46 31 32 31 5c 46 52 4d 54 20 00 1c 00 a2 00 08 00 50 5c 46 4e 4c 00 1c 00 b4 00 14 00 50 5c 46 43 4f 50 59 5c 3d 43 27 54 59 50 45 3a 27 00 1c 00 c0 00 14 00 50 5c 46 42 54 5c 42 4f 4f 4c 33 2c 46 31 32 31 41 00 1c 00 d8 00 1e 00 50 ┆ PF121 FRMT P FNL P FCOPY =C'TYPE:' P FBT BOOL3,F121A P┆
0x2ca8…2cf8 5c 46 42 46 5c 42 4f 4f 4c 31 2c 46 31 32 34 5c 49 46 20 43 52 45 41 54 45 20 00 1c 00 f0 00 0a 00 50 46 31 32 31 41 20 00 1c 01 12 00 0c 00 50 5c 46 49 4e 50 5c 37 20 00 1c 01 20 00 10 00 50 5c 46 43 4f 50 59 5c 53 54 52 32 41 00 1c 01 30 ┆ FBF BOOL1,F124 IF CREATE PF121A P FINP 7 P FCOPY STR2A 0┆
0x2cf8…2d48 00 0c 00 50 5c 46 42 5c 46 31 32 35 00 1c 01 44 00 08 00 50 46 31 32 34 00 1c 01 54 00 38 00 50 5c 46 4b 49 5c 37 2c 4d 49 4e 4c 3d 31 2c 4d 41 58 4c 3d 31 2c 41 4c 50 48 41 2c 4e 45 4f 49 2c 4d 45 2c 4e 43 4c 52 2c 41 50 50 4c 3d 31 30 32 ┆ P FB F125 D PF124 T 8 P FKI 7,MINL=1,MAXL=1,ALPHA,NEOI,ME,NCLR,APPL=102┆
0x2d48…2d98 (29, 0, 400) 5c 41 2f 4e 00 1c 01 60 00 10 00 50 5c 46 43 4f 50 59 5c 53 54 52 32 41 00 1d 00 0c 00 08 00 50 46 31 32 35 00 1d 00 20 00 0c 00 50 5c 46 54 41 42 5c 31 30 00 1d 00 2c 00 18 00 50 5c 46 43 4f 50 59 5c 3d 43 27 53 49 5a 45 20 4f 46 20 27 20 ┆ A/N ` P FCOPY STR2A PF125 P FTAB 10 , P FCOPY =C'SIZE OF ' ┆
0x2d98…2de8 00 1d 00 3c 00 16 00 50 5c 46 43 4f 50 59 5c 3d 43 27 45 4c 45 4d 45 4e 54 27 00 1d 00 58 00 12 00 50 5c 46 43 4f 50 59 5c 3d 43 27 53 3a 27 20 00 1d 00 72 00 14 00 50 5c 46 42 54 5c 42 4f 4f 4c 33 2c 46 31 32 35 41 00 1d 00 88 00 1e 00 50 ┆ < P FCOPY =C'ELEMENT' X P FCOPY =C'S:' r P FBT BOOL3,F125A P┆
0x2de8…2e38 5c 46 42 46 5c 42 4f 4f 4c 31 2c 46 31 32 37 5c 49 46 20 43 52 45 41 54 45 20 00 1d 00 a0 00 0a 00 50 46 31 32 35 41 20 00 1d 00 c2 00 0c 00 50 5c 46 49 4e 50 5c 32 38 00 1d 00 d0 00 14 00 50 5c 46 4d 45 4c 5c 27 58 58 27 2c 54 49 4d 45 20 ┆ FBF BOOL1,F127 IF CREATE PF125A P FINP 28 P FMEL 'XX',TIME ┆
0x2e38…2e88 00 1d 00 e0 00 0c 00 50 5c 46 42 5c 46 31 32 38 00 1d 00 f8 00 08 00 50 46 31 32 37 00 1d 01 08 00 3a 00 50 5c 46 4b 49 5c 32 38 2c 4d 49 4e 4c 3d 31 2c 4d 41 58 4c 3d 32 2c 4e 45 4f 49 2c 4d 45 2c 4e 43 4c 52 2c 52 45 57 52 54 2c 41 50 50 ┆ P FB F128 PF127 : P FKI 28,MINL=1,MAXL=2,NEOI,ME,NCLR,REWRT,APP┆
0x2e88…2ed8 4c 3d 31 30 33 5c 3c 36 31 20 00 1d 01 14 00 14 00 50 5c 46 4d 45 4c 5c 27 58 58 27 2c 54 49 4d 45 20 00 1d 01 52 00 08 00 50 46 31 32 38 00 1d 01 6a 00 08 00 50 5c 46 4e 4c 00 1d 01 76 00 16 00 50 5c 46 43 4f 50 59 5c 3d 43 27 45 4c 45 4d ┆L=103 <61 P FMEL 'XX',TIME R PF128 j P FNL v P FCOPY =C'ELEM┆
0x2ed8…2f28 (30, 0, 398) 45 4e 54 27 00 1d 01 82 00 14 00 50 5c 46 43 4f 50 59 5c 3d 43 27 20 4e 4f 2e 3a 27 00 1e 00 0c 00 20 00 50 5c 46 42 46 5c 42 4f 4f 4c 33 2c 46 45 4e 44 5c 49 46 20 4c 49 4e 45 20 31 2d 33 20 00 1e 00 24 00 12 00 50 5c 46 49 4e 50 5c 31 33 ┆ENT' P FCOPY =C' NO.:' P FBF BOOL3,FEND IF LINE 1-3 $ P FINP 13┆
0x2f28…2f78 5c 45 4e 54 45 52 00 1e 00 48 00 16 00 50 5c 46 4d 45 4c 5c 27 58 58 27 2c 41 43 4b 28 57 31 29 00 1e 00 5e 00 08 00 50 5c 46 4e 4c 00 1e 00 78 00 12 00 50 2a 5c 46 4c 49 4e 4b 5c 53 54 52 36 34 41 00 1e 00 84 00 16 00 50 5c 46 43 54 4c 5c ┆ ENTER H P FMEL 'XX',ACK(W1) ^ P FNL x P* FLINK STR64A P FCTL ┆
0x2f78…2fc8 58 27 44 45 27 2c 53 54 52 36 34 41 00 1e 00 9a 00 08 00 50 46 45 4e 44 00 1e 00 b4 00 0a 00 50 5c 46 4d 45 4e 44 00 1e 00 c0 00 06 00 50 2a 20 00 1e 00 ce 00 0e 00 50 46 4f 52 4d 4e 5c 46 52 4d 54 00 1e 00 d8 00 2a 00 50 5c 46 4b 49 5c 31 ┆X'DE',STR64A PFEND P FMEND P* PFORMN FRMT * P FKI 1┆
0x2fc8…3018 2c 4e 55 4d 2c 4d 49 4e 4c 3d 31 2c 4d 41 58 4c 3d 31 2c 52 45 57 52 54 2c 53 43 48 4b 3d 31 20 00 1e 00 ea 00 30 00 50 5c 46 4d 45 4c 5c 27 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 2d 27 2c 46 44 56 42 43 44 28 42 49 ┆,NUM,MINL=1,MAXL=1,REWRT,SCHK=1 0 P FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBCD(BI┆
0x3018…3066 4e 36 29 20 00 1e 01 18 00 08 00 50 5c 46 4e 4c 00 1e 01 4c 00 18 00 50 5c 46 4b 49 5c 31 2c 4d 49 4e 4c 3d 30 2c 4d 41 58 4c 3d 30 00 1e 01 58 00 10 00 50 5c 46 43 4f 50 59 5c 48 45 58 30 30 00 1e 01 74 00 0a 00 50 5c 46 4d 45 4e 44 ┆N6) P FNL L P FKI 1,MINL=0,MAXL=0 X P FCOPY HEX00 t P FMEND┆
0x3066…30b6 (31, 2, 256) 00 1e 01 88 00 06 00 50 2a 20 00 1f 00 08 00 0e 00 50 46 4f 52 4d 41 5c 46 52 4d 54 00 1f 00 12 00 28 00 50 2a 5c 46 4b 49 5c 31 2c 41 4c 50 48 41 2c 4d 49 4e 4c 3d 31 2c 4d 41 58 4c 3d 31 2c 4e 45 4f 49 2c 4d 45 20 00 1f 00 24 00 18 00 50 ┆ P* PFORMA FRMT ( P* FKI 1,ALPHA,MINL=1,MAXL=1,NEOI,ME $ P┆
0x30b6…3106 2a 5c 46 43 4f 50 59 5c 46 44 56 42 43 44 28 42 49 4e 36 29 00 1f 00 50 00 36 00 50 5c 46 43 54 4c 5c 58 27 46 30 27 2c 31 2c 58 27 43 31 27 2c 58 27 30 31 27 2c 58 27 30 30 27 2c 58 27 43 30 27 2c 46 44 56 42 43 44 28 42 49 4e 36 29 00 1f ┆* FCOPY FDVBCD(BIN6) P 6 P FCTL X'F0',1,X'C1',X'01',X'00',X'C0',FDVBCD(BIN6) ┆
0x3106…3156 00 6c 00 08 00 50 5c 46 4e 4c 00 1f 00 a6 00 18 00 50 5c 46 4b 49 5c 31 2c 4d 49 4e 4c 3d 30 2c 4d 41 58 4c 3d 30 00 1f 00 b2 00 10 00 50 5c 46 43 4f 50 59 5c 48 45 58 30 30 00 1f 00 ce 00 0a 00 50 5c 46 4d 45 4e 44 00 1f 00 e2 00 08 00 04 ┆ l P FNL P FKI 1,MINL=0,MAXL=0 P FCOPY HEX00 P FMEND ┆
0x3156…3166 5c 45 4e 44 00 1f 00 f0 40 04 00 00 00 1f 00 fc ┆ END @ ┆
0x3166…316e (32, 1, 8) 20 04 00 00 00 20 00 04 ┆ ┆
0x316e…31be (33, 0, 400) 06 e4 05 93 05 a2 06 7c 06 d8 06 dc 06 e0 80 01 21 34 00 80 01 22 34 00 80 01 23 34 00 80 01 24 34 00 00 90 20 80 01 20 34 00 40 7d 00 91 00 06 91 20 38 01 49 6e 30 36 91 04 00 07 57 0e 30 09 02 21 20 57 50 30 09 05 21 20 57 49 49 7e 07 30 ┆ | !4 "4 #4 $4 4 @} 8 In06 W 0 ! WP0 ! WII~ 0┆
0x31be…320e 0c 03 21 20 57 3f 48 7f 07 30 0c 17 21 20 57 35 30 0c 21 21 20 57 2e 40 6e 36 91 04 00 07 0c 0c 30 09 03 21 20 57 05 30 09 06 21 20 49 7e 07 30 0c 00 21 20 57 0f 48 7f 07 30 0c 14 21 20 57 05 30 0c 1e 21 20 00 91 28 30 23 93 3a 02 48 7e 02 ┆ ! W?H 0 ! W50 !! W.@n6 0 ! W 0 ! I~ 0 ! W H 0 ! W 0 ! (0# : H~ ┆
0x320e…325e 3f 02 30 24 00 93 92 50 07 3a 02 00 93 92 5f 0e 30 25 05 50 10 43 7b 50 07 41 e5 00 91 29 3f 02 48 e5 02 3f 02 30 26 48 6f 4f 00 90 20 00 92 21 48 7e 09 30 27 91 95 24 92 91 57 07 30 27 91 95 23 92 91 80 02 21 91 32 92 03 03 04 05 57 1a 30 ┆? 0$ P : _ 0% P C{P A )? H ? 0&HoO !H~ 0' $ W 0' # ! 2 W 0┆
0x325e…32ae 12 11 92 30 1b 92 11 5c 2f 31 28 92 16 5f 35 4b 7e 7c 30 0c 00 21 20 5f 44 32 91 03 05 06 07 04 91 23 49 8a 02 40 6f 34 01 48 7e 0b 80 03 32 93 04 08 09 07 0a 34 01 30 29 03 92 30 07 92 2f 50 0a 30 2a 95 30 27 90 91 93 57 08 30 2a 95 30 28 ┆ 0 /1( _5K~|0 ! _D2 #I @o4 H~ 2 4 0) 0 /P 0* 0' W 0* 0(┆
0x32ae…32fe 90 91 93 80 02 21 91 32 92 03 0b 0c 0d 57 0f 00 91 22 3f 0e 30 23 93 30 0c 01 93 93 5f 99 40 8c 32 91 10 0f 10 0f 0e 0e 11 0f 0f 0f 0f 0f 0f 06 07 12 13 57 03 00 91 23 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 ┆ ! 2 W "? 0# 0 _ @ 2 W # ┆
0x32fe…334e (34, 0, 400) 28 90 20 32 22 91 2b 0b 22 91 28 04 22 91 23 03 49 8a 02 3f 14 00 93 26 00 82 20 30 2b 0c 50 05 80 04 1a 3f 0a 30 22 0c 50 6d 30 29 03 93 30 07 93 2d 38 15 57 61 30 29 03 93 36 93 07 02 1d 1d 3e 02 1d 1d 57 3c 28 91 2c 12 00 91 20 00 92 21 ┆( 2" + " ( " # I ? & 0+ P ? 0" Pm0) 0 -8 Wa0) 6 > W<( , !┆
0x334e…339e 01 99 31 64 95 91 92 99 20 00 91 23 04 93 21 5f 27 30 29 01 92 04 92 90 50 13 30 25 00 50 05 01 6f 30 57 03 01 6f 32 64 95 20 92 6f 20 04 93 22 5f 48 49 8a 12 30 29 00 92 20 92 20 8d 80 05 32 92 03 16 17 01 57 83 40 88 40 8b 40 8d 40 8e 40 ┆ 1d # !_'0) P 0% P o0W o2d o "_HI 0) 2 W @ @ @ @ @┆
0x339e…33ee 68 40 6a 00 8d 20 00 7f 23 55 00 92 20 30 2c 1b 21 8a 8b 8c 54 64 24 91 2b 06 22 91 2c 02 30 26 80 06 20 00 90 e9 25 40 7c 50 49 30 25 00 54 10 00 88 2f 68 5a 88 22 95 20 21 54 04 66 95 20 21 20 82 20 0b 20 8a 20 07 6a 93 21 21 1b 8a 82 48 ┆h@j #U 0, ! Td$ + " , 0& %@|PI0% T /hZ " !T f ! j !! H┆
0x33ee…343e 7b 05 80 04 12 3f 0a 30 25 05 50 0d 30 2d 9a 50 03 48 e5 05 80 04 21 3f 18 80 04 18 3f 0a 30 2e 01 95 57 12 32 92 03 19 17 1a 20 90 20 17 10 92 21 14 30 2e 00 95 30 25 05 50 08 49 e5 07 30 2d 9a 50 02 41 6d 48 8a 26 20 91 2c 13 20 91 29 0f ┆{ ? 0% P 0- P H !? ? 0. W 2 ! 0. 0% P I 0- P AmH & , ) ┆
0x343e…348e 20 91 21 0b 30 2f 1b 21 8a 8b 8c 54 11 80 07 30 25 05 50 08 49 e5 07 30 2d 9a 50 02 41 6d 00 90 20 32 91 11 1b 1c 1d 1c 1c 1b 1e 02 1f 20 1d 1d 1c 1c 1c 1c 21 06 91 38 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 ┆ ! 0/ ! T 0% P I 0- P Am 2 ! 8 ┆
0x348e…34de (35, 0, 400) 38 22 04 91 2e 34 01 00 91 23 48 8a 2e 48 6a 0a 30 22 7f 23 54 04 40 6d 3f 23 40 68 50 1d 20 8d 20 19 00 93 8d 04 93 21 30 30 e2 00 93 92 30 31 e2 56 08 30 23 93 02 93 21 5f 13 24 91 2b 02 3f 24 49 8a 04 30 32 57 49 30 25 02 50 05 30 22 0c ┆8" .4 #H .Hj 0" #T @m?#@hP !00 01 V 0# !_ $ + ?$I 02WI0% P 0" ┆
0x34de…352e 39 25 30 23 93 02 93 21 30 30 e2 00 93 92 30 31 e2 54 2e 30 25 05 54 2f 57 4c 30 23 93 20 93 21 04 30 33 57 1c 00 91 23 49 7b 12 48 7e 11 49 7f 48 00 90 20 30 24 00 90 92 30 26 3f 05 41 e5 30 34 50 23 3a 26 3b 25 49 6f 1a 30 2d 9a 50 03 48 ┆9%0# !00 01 T.0% T/WL0# ! 03W #I{ H~ I H 0$ 0&? A 04P#:&;%Io 0- P H┆
0x352e…357e e5 12 80 08 20 92 20 0c 32 91 09 1c 1c 27 1c 1c 27 1e 27 20 3f 17 4a 41 05 4a 8a 08 4b 7b 0b 30 29 01 93 18 93 20 13 3f 28 00 8a 20 02 8a 21 30 30 93 04 8a 92 30 31 93 38 17 5f 5b 4a 8a d8 00 91 23 80 09 54 06 32 91 03 27 1c 0f 30 25 05 54 ┆ 2 ' ' ' ? JA J K{ 0) ?( !00 01 8 _[J # T 2 ' 0% T┆
0x357e…35ce 08 32 91 03 29 2a 2a 3f 01 32 91 03 2a 2a 2a 30 2d 9a 38 2b 4a e5 16 3f 2b 80 0a 00 90 20 3f 2c 80 0b 3c 01 31 28 93 17 00 92 21 30 35 13 92 20 80 0c 3f 17 48 7b 04 41 e5 57 02 42 e5 80 0d 2e 13 00 91 23 5f d3 30 25 05 50 0f 30 2d 9a 50 03 ┆ 2 )**? 2 ***0- 8+J ?+ ?, < 1( !05 ? H{ A W B . #_ 0% P 0- P ┆
0x35ce…361e 48 e5 07 00 91 25 40 6d 3f 2d 20 90 20 2d 00 90 21 30 29 01 92 28 92 20 06 31 28 92 16 3f 17 30 29 03 92 30 07 92 2f 50 09 30 36 95 26 90 91 93 3f 2e 30 36 95 22 90 91 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 ┆H %@m?- - !0) ( 1( ? 0) 0 /P 06 & ?.06 " ┆
0x361e…366e (36, 0, 400) 93 3f 2e 30 26 5f 2e 30 23 93 30 09 0a 93 20 48 8a 7b 00 91 2c 57 06 48 8a 73 00 91 2b 30 29 01 93 20 93 20 87 30 25 02 50 05 30 22 0c 51 87 06 91 2c 38 2f 3f 30 41 8c 30 23 93 02 93 21 30 30 e2 00 93 92 30 31 e2 50 06 3a 17 53 64 57 0d 30 ┆ ?.0&_.0# 0 H { ,W H s +0) 0% P 0" Q ,8/?0A 0# !00 01 P : SdW 0┆
0x366e…36be 25 05 58 37 30 2d 9a 50 03 4a e5 3f 80 08 10 92 20 45 4b 7b 48 10 91 2c 4c 80 09 54 5c 00 91 2b 5f 55 48 8a 18 4b 41 5e 30 29 01 93 20 93 20 06 31 28 92 16 3f 17 41 6d 00 91 23 34 01 00 90 20 30 24 00 90 92 53 1a 30 25 02 50 05 30 22 0c 51 ┆% X70- P J ? EK{H ,L T +_UH KA^0) 1( ? Am #4 0$ S 0% P 0" Q┆
0x36be…370e 10 49 8a 08 20 91 29 04 18 91 2a 26 4b 41 29 3f 17 30 24 00 92 91 00 93 25 00 90 20 30 25 05 50 2d 30 2d 9a 50 03 48 e5 25 80 04 21 57 2f 80 0e 3f 31 00 91 23 3f 19 06 91 30 38 13 20 91 24 2b 20 91 25 27 30 12 11 92 30 1b 92 11 3c 0d 48 7b ┆ I ) *&KA)? 0$ % 0% P-0- P H % !W/ ?1 #? 08 $+ %'0 0 < H{┆
0x370e…375e 05 80 04 12 57 03 80 04 13 20 91 21 0e 32 91 08 2a 2a 2a 32 33 34 1e 02 02 91 22 80 0f 40 8c 30 25 05 50 08 49 e5 15 30 2d 9a 50 10 32 91 03 17 17 35 04 91 23 49 8a 02 40 6f 34 01 32 91 03 17 17 36 5f 12 00 91 28 3f 1e 10 00 36 00 05 05 56 ┆ W ! 2 ***234 " @ 0% P I 0- P 2 5 #I @o4 2 6_ (? 6 V┆
0x375e…37ae 00 05 03 68 00 05 00 ff 00 05 00 ef 00 05 00 ca 00 05 03 f9 00 05 04 00 00 05 03 bc 00 05 00 86 00 05 05 61 00 05 00 7c 00 05 05 3f 00 05 01 4f 00 05 05 73 00 05 01 78 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 ┆ h a | ? O s x ┆