|
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: 20564 (0x5054)
Notes: pts_type(SC)
Names: »DE20FS.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »S:DE/DE20FS.SC«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »DEN10/DE20FS.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DE/DE20FS.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »DEN10/DE20FS.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »S:DE/DE20FS.SC«
IDENT DE20FS REL 10.0 80-04-11 80-03-20/JAER * * FORMAT DEFINITION SUBROUTINES * -2-BYTE ADRESSING COMPATIBLE * DDUM DEDDIV PDIV ENTRY FCOPY FORMAT COPYING ENTRY FMELI FORMAT EDITING ENTRY FTEXT FORMAT TEXT ENTRY FTAB FORMAT TABULATION ENTRY FLINK FORMAT LINKING ENTRY FSL FORMAT START LINE ENTRY FNL FORMAT NEW LINE ENTRY FKI FORMAT KEYED INPUT ENTRY FVAL FORMAT VALIDATION ENTRY FGEN FORMAT GENERATION (FIELD) ENTRY FACC FORMAT ACCUMULATION ENTRY FDUPL FORMAT DUPLICATION REFERENCE ENTRY FCODE FORMAT CODE GENERATION ENTRY FITEM FORMAT FIX-ITEM-ADRESS ENTRY NOPOOL NUMBER OF USED POOLS EXT DERROR ERROR-MESSAGES EXT DEPOOL BUFFERRESERVATIN-MODUL EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - EXT WCNTRL FORMAT FIELD CONTROL WORDS EXT FMOVE FORMAT MOVE EXT CONNUM CONVERT STRG=>BIN EXT LINIT LINE INITIALIZATION EXT PICMA PICTURELAYOUT CONVERTION EJECT * * KEYTABLE * CLR EQU X'8F' CLEAR CAN EQU X'91' CANCEL RET EQU X'92' RETURN NOK EQU X'FF' NO KEY TOT EQU X'93' TOTAL * DEKTAB6 KTAB CLR,CAN,RET,NOK,TOT * DEKTAB7 KTAB CLR,CAN,RET * EJECT * * FORMAT COPYING * * FCOPY = CO 0A <FIELD NR> * FCOPY PROC PERF FCODE,W1 GENERATE FCOPY=C0 PERF FFIELD RET PEND EJECT * * FORMAT EDITING * * FMELI = C2 <NUMB PIC.CHARS> <CH> <CH> ....<CH> 0A <FIELDNR> * FMELI PROC PERF FCODE,W2 GENERATE FMELI=C2 XCOPY BPOOL(BIN3),BIN1,W1,BIN12,W1 STORE NUMB PICCHARS ADD BIN1,W1 NEXT POS XCOPY BPOOL(BIN3),BIN1,BIN12,STATSH,W0 STORE PIC CHARS ADD BIN1,BIN12 NEXT POS TBF BOOL6,FMELI5 JUMP IF GENERAL FORMAT CALL FMOVE,STRG10A,FACK FETCH ACK-ITEM-ADRESS PERF FITEM LOAD ITEM-ADRESS SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE CBE BIN15,W2,FMELI3 JUMP IF 1-BYTE ADRESSING SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE FMELI3 MOVE BIN16,FDVBCD(W8) LOAD ACK-NR BINARY CALL FMOVE,STRG10A,FIND(BIN16) FETCH INDEX-ITEM-ADRESS PERF FITEM LOAD ITEM-ADRESS B FMELIR FMELI5 PERF FFIELD STORE FIELD NR FMELIR RET PEND EJECT * * FORMAT TEXT * * FTEXT = C3 <NUMB. OF CHARS> <CH> <CH> ........ * FTEXT PROC MOVE BIN16,W188 SUB BIN16,W6 LOAD LIMIT FOR FLINK PERF FLINK,BIN16,BIN9 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FTEXT9 ERROR-SIGNAL PERF FCODE,W3 GENERATE FTEXT=C3 XCOPY BPOOL(BIN3),BIN1,W1,BIN9,W1 STORE NUMB ADD BIN1,W1 NEXT BUFFER POS XCOPY BPOOL(BIN3),BIN1,BIN9,LDES,BIN11 STORE CH-STRG ADD BIN1,BIN9 ADJUST BUFFERPOS FTEXT9 RET PEND EJECT * * FORMAT TABULATION * * FTAB = C4 <TABPOS> * FTAB PROC MOVE BIN16,W188 SUB BIN16,W6 LOAD LIMIT FOR FLINK PERF FLINK,BIN16,W0 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FTAB99 ERROR-SIGNAL PERF FCODE,W4 GENERATE FTAB=C4 XCOPY BPOOL(BIN3),BIN1,W1,BIN8,W1 STORE TABPOS ADD BIN1,W1 NEXT BUFFERPOS FTAB99 RET PEND EJECT * * FORMAT VALIDATION * * FVAL = C5 <NUMB VAL.-CHARS> <CH> <CH> .......... * FVAL PROC MOVE BIN16,W188 SUB BIN16,W6 LOAD LIMIT FOR FLINK MOVE BIN15,FMTWK(W1) SUB BIN15,DEBIN4 SUBTRACT ENDPOS SUB BIN15,W3 ADJUST FOR FUNCTEXT PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FVAL9 ERROR-SIGNAL PERF FCODE,W5 GENERATE FVAL = C5 PERF CONNUM,JOBSPC,FMTWK,W1 CONVERT VARSTR=>BIN XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W1),W1 STORE NUMB OF CHARS ADD BIN1,W1 NEXT BUFFER POSITION XCOPY BPOOL(BIN3),BIN1,FMTWK(W1),JOBSPC,DEBIN1 STORE CHARSSTRG ADD BIN1,FMTWK(W1) ADJUST BUFFERPOS FVAL9 RET PEND EJECT * * FORMAT GENERATION (OF FIELDS) * * FGEN = C6 <NUMB OF GEN.-CHARS> <CH> <CH> ......... * FGEN PROC MOVE BIN16,W188 SUB BIN16,W6 LOAD LIMIT FOR FLINK MOVE BIN15,FMTWK(W2) SUB BIN15,DEBIN4 SUBTRACT ENDPOSITION SUB BIN15,W3 ADJUST FOR FUNCTEXT PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FGEN9 ERROR-SIGNAL PERF FCODE,W6 GENERATE FGEN = C6 PERF CONNUM,JOBSPC,FMTWK,W2 CONVERT VARSTR=>BIN XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W2),W1 STORE NUMB OF CHARS ADD BIN1,W1 NEXT BUFFERPOSITION XCOPY BPOOL(BIN3),BIN1,FMTWK(W2),JOBSPC,DEBIN1 STORE CHARSSTRG ADD BIN1,FMTWK(W2) FGEN9 RET PEND EJECT * * FORMAT ACCUMULATION * * FACC = C7 <NUMB OF ACC.-CHARS> <CH> <CH> .......... * FACC PROC MOVE BIN16,W188 SUB BIN16,W6 LOAD LIMIT FOR FLINK MOVE BIN15,FMTWK(W3) SUB BIN15,DEBIN4 SUBTRACT STARTPOSITION SUB BIN15,W3 ADJUST FOR FUNCTEXT PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FACC9 ERROR-SIGNAL PERF FCODE,W7 GENERATE FACC = C7 PERF CONNUM,JOBSPC,FMTWK,W3 CONVERT VARSTR=>BIN XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W3),W1 STORE NUMB OF CHARS ADD BIN1,W1 NEXT BUFFERPOSITION XCOPY BPOOL(BIN3),BIN1,FMTWK(W3),JOBSPC,DEBIN1 STORE CHARSSTRG ADD BIN1,FMTWK(W3) ADJUST BUFFERPOSITION FACC9 RET PEND EJECT * * FORMAT DUPLICATION REFERENCES * * FDUPL = CC <NUMB. OF CHARS> <CH> <CH> <CH>...... * FDUPL PROC MOVE BIN16,W188 SUB BIN16,W6 LOAD LIMIT FOR FLINK MOVE BIN15,FMTWK(W4) PERF FLINK,BIN16,BIN15 GENERATE FLINK CBNE DEBINW2,W0,FDUPL9 ERROR-SIGNAL PERF FCODE,W8 GENERATE FDUPL = CC PERF CONNUM,DUPL,FMTWK,W4 CONVERT VARSTR. BIN XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W4),W1 STORE NUM OF CHARS ADD BIN1,W1 NEXT BUFFERPOS XCOPY BPOOL(BIN3),BIN1,FMTWK(W4),DUPL,W0 STORE CHARS-STRG ADD BIN1,FMTWK(W4) ADJUST BUFFERPOS FDUPL9 RET PEND EJECT * * FORMAT LINKING * * FLINK = DF <BUFFERPOOLADRESS> <FORMATLINKINDEX> <CONSTANTADRESS> * * INPUT PARAMETERS : LIMIT = POSITION LIMIT IN CURRENT BUFFER * WHERE IT IS ENOUGH SPACE TO * GENERATE ACTUAL FORMAT DIREKTIVE * * CHARS = NUMBER OF CHARACTER-POSITIONS TO * COUNT BEFORE COMPARISON IS MADE * * * OUTPUT PARAMETER : * DEBINW2 = 0 OK * = 1 NO BUFFERS AVAILABLE KEY:CANCEL * = 2 NO BUFFERS AVAILABLE KEY:RETUR * = 4 MAXIMUM BUFFERS USED;KTOT SIMULATED * *********************************************************************** * FLINK PROC LIMIT,CHARS MOVE DEBINW2,W0 OK SUB LIMIT,CHARS ADJUST LIMIT WITH NUMBER OF CHARS TO COUNT (FTEXT,FMELI) CALL FMOVE,STRG10A,IND1 FETCH IND-ITEM-ADRESS MOVE BIN15,W1 WORK:=1 MATCH STRG10A,BIN15,W9,FDIR,W0,W1 CBE BIN15,W1,FLINKA JUMP IF 1-BYTE ADRESSING SUB LIMIT,W3 ADJUST FOR 2-BYTEADR FLINKA CBNG RNRFMCH,W29,FLINKF JUMP IF NOT LAST BUFFER SUB LIMIT,W3 ADJUST 3BYTE FDUM+FEXIT CBNE BIN15,W1,FLINKF JUMP IF NOT 1BYTE ADDR SUB LIMIT,W2 ADJUST 1BYTE FDUM+FEXIT FLINKF CBNG BIN1,LIMIT,FLINK9 JUMP IF NO FLINKGEN CBG RNRFMCH,W29,FLINK7 NO MORE BUFFERS ALLOWED MAX 24 PERF FCODE,W9 GENRATE FLINK = DF CALL FMOVE,STRG10A,FBPOOL FETCH BPOOL-ITEM-ADRESS PERF FITEM LOAD ITEM-ADRESS SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE CBE BIN15,W2,FLINK1 JUMP IF 1-BYTE ADRESSING SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE FLINK1 CALL FMOVE,STRG10A,FFLIND FETCH FLIND-ITEM-ADRESS PERF FITEM LOAD ITEM-ADRESS SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE CBE BIN15,W2,FLINK3 JUMP IF 1-BYTE ADRESS SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE FLINK3 CALL FMOVE,STRG10A,FIND(RNRFMCH) PERF FITEM LOAD ITEM ADRESS ADD RNRFMCH,W1 ADJUST FORMATLINKINDADR TBF DOOL2,FLINK5 MOVE BIN3,FMTWK(W8) RESTORE BUFFERIND ALREADY RES B FLINK6 FLINK5 MOVE BIN16,W1 WANTED BUFFERS MOVE STRG10A,FORMAT PERF DEPOOL,W3,BIN16,BIN3,STRG10A CHAIN ANOTHER BUFFER BNOK FLINK8 JUMP IF ERROR MOVE BIN3,BIN16 ADD PRECPR,W1 NUMBER FORMATBUFFERS+1 PERF NOPOOL NUMBER OF USED POOLS DISPLAY 2,W2,W2 DISPLAY DITO WHILE CHANGED XCOPY STR1A,W0,W1,FDIR,W0 LOAD 'E9' MOVE BPOOL(BIN3),STR1A FILL BUFFER WITH FEXIT E9 FLINK6 MOVE BIN1,W0 BPOOLBUFFERPOINTER:=0 B FLINK9 FLINK7 MOVE DEBINW4,W29 PERF DERROR,DEKTAB6 CBE DEBINW2,W1,FLINK7 JUMP IF CLEAR-KEY PERF FCODE,W11 GENERATE FNL B FLINKB FLINK8 PERF DERROR,DEKTAB7 CBE DEBINW2,W1,FLINK5 TRY AGAIN FLINKB SUB DEBINW2,W1 ADJUST FOR CANC RETURN FLINK9 CLEAR DOOL2 F=LINE NOT DEL LAST BUFF USED RET PEND EJECT * * FORMAT START LINE * * FSL= E0 * FSL PROC MOVE BIN1,W0 BPOOLBUFFER POINTER:=1 XCOPY STR1A,W0,W1,FDIR,W0 LOAD 'E9' MOVE BPOOL(BIN3),STR1A FILL BUFFER WITH FEXIT E9 PERF FCODE,W10 GENERATE FSL=E0 MOVE FMTWK(W6),BIN1 SAVE STARTPOINTER OF LASTLINE MOVE FMTWK(W7),BIN3 SAVE BUFFERINDEX OF LASTLINE MOVE BIN10,W0 FIELDNR:=0 CLEAR BOOL1 F=NO FIELD CONFIRMED CLEAR DOOL2 F=NO LINE DELETE DONE PERF LINIT LINE INIT OF WORKITEMS RET PEND EJECT * * FORMAT END-OF-LINE PROCESSING * * - PROCESSES FORMAT DIRECTIVE CODE : FNL * AND ADJUSTS WORKITEMS FOR NEW LINE PROCESSING * * OUTPUT VARIABLES: * DEBINW2 = 0 OK GO ON * = 1 NO AVAILABLE BUFFERS;CANCEL * = 2 NO AVAILABLE BUFFERS;RETUR * = 4 MAX LIMIT EXCEEDED;KTOT * *********************************************************************** * FNL PROC MOVE BIN16,W188 SUB BIN16,W5 LOAD LIMIT FOR FLINK PERF FLINK,BIN16,W0 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FNL99 ERROR SIGNAL PERF FCODE,W11 GENERATE FNL ADD FDVBCD(W2),=D'1' NEXT LINE DISPLAY 2,W1,W1 DISPLAY LINE NR/PAGE NR CBG FDVBCD(W2),FDVBCD(W1),FNL96 JUMP IF LINEMAX REACHED TBT DOOL8,FNL10 JUMP IF NO ERASE ERASE 10,W3,W0 B FNL15 FNL10 ERASE 11,W3,W0 CLEAR IN CORE FNL15 MOVE FMTWK(W6),BIN1 SAVE LASTLINE'S STPOINT MOVE FMTWK(W7),BIN3 SAVE LASTLINE'S BUFFIND CBE FMTWK(W5),W0,FNL90 MOVE RECLNTH,FMTWK(W5) SAVE LAST LINES NUMB CHARS FNL90 SET BOOL1 T=FIRST LINE CONFIRMED PERF LINIT LINE INIT WORKITEMS MOVE DEBINW2,W0 OK B FNL99 FNL96 MOVE DEBINW4,W28 MAXIMUM REACHED PERF DERROR,DEKTAB6 CBE DEBINW2,W1,FNL96 JUMP IF CLEAR-KEY SUB DEBINW2,W1 ADJUST FOR CANC RET FNL99 RET PEND EJECT * FORMAT KEYED INPUT * * FKI = FO <TABPOS> <CTL1> <CTL2> <CTL3> * = F2 <TABPOS> <APPLE1> <CTL1> <CTL2> <CTL3> * = F3 <TABPOS> <APPLE1> <APPLE2> <CTL1> <CTL2> <CTL3> * = F8 <TABPOS> <DUPL> <CTL1> <CTL2> <CTL3> * = FA <TABPOS> <APPLE1> <DUPL> <CTL1> <CTL2> <CTL3> * = FB <TABPOS> <APPLE1> <APPLE2> <DUPL> <CTL1> <CTL2> <CTL3> * FKI PROC MOVE BIN16,W188 TBT ALPHA,FKI01 JUMP IF ALPHANUM MOVE BIN15,BIN12 LOAD CHRS TO COUNT SUB BIN16,W15 LOAD LIMIT FOR FLINK B FKI03 FKI01 MOVE BIN15,W0 LOAD CHRS TO COUNT SUB BIN16,W14 LOAD LIMIT FOR FLINK FKI03 PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED CBNE DEBINW2,W0,FKI99 ERROR-SIGNAL MOVE BIN15,W13 GENERATE FKI=F0 MOVE BIN16,SPEC LOAD APPLE BINARY CBE BIN16,W0,FKI10 APPL=0 ADD BIN15,W1 FKI=F2 CBNG BIN16,=X'FF',FKI10 APPL < = 255 ADD BIN15,W1 FKI=F3 FKI10 CBNE FDVSTR(W1),='N',FKI20 ADD BIN15,W3 FKI=F8 OR FA OR FB FKI20 PERF FCODE,BIN15 GENERATE FKI-CODE EJECT * * TABULATION POSITION SETTING * XCOPY BPOOL(BIN3),BIN1,W1,BIN6,W1 STORE TABPOS ADD BIN1,W1 NEXT POS CBE BIN16,W0,FKI50 NO APPLE VALUEE * * APPLE VALUE SETTING * CBG BIN16,=X'FF',FKI40 APPLE > 255 XCOPY BPOOL(BIN3),BIN1,W1,BIN16,W1 STORE APPLE1 ADD BIN1,W1 NEXT POS B FKI50 FKI40 XCOPY BPOOL(BIN3),BIN1,W2,BIN16,W0 STORE APPLE1-2 ADD BIN1,W2 NEXT POS * * DUPL OF 'W1' INDICATING NO KEYED INPUT * FKI50 CBNE FDVSTR(W1),='N',FKI70 CALL FMOVE,STRG10A,IND1 PERF FITEM LOAD ITEM W1 FKI70 * * CONTROL WORDS SETTING CTL1 CTL2 CTL3 * MOVE BIN16,FDVBCD(W7) LOAD FDVBCD(W7)LENGTH BINARY CALL WCNTRL,BPOOL(BIN3),BIN1,DEBINW1,BIN16,BIN7 LOAD CTLS ADD BIN1,W3 FKI99 RET PEND EJECT * * FORMAT CODE GENERATION * * INPUT PARAMETER : FDIND = FORMAT DIRECTIVE INDEX * ***************************************************** FCODE PROC FDIND XCOPY BPOOL(BIN3),BIN1,W1,FDIR,FDIND ADD BIN1,W1 NEXT POSITION IN BUFFER RET PEND EJECT * * FORMAT FIELD NUMBER * * = 0A <FIELDNR> * FFIELD PROC XCOPY BPOOL(BIN3),BIN1,W1,W10,W1 STORE '0A'-FIELD ADD BIN1,W1 NEXT POS XCOPY BPOOL(BIN3),BIN1,W1,BIN10,W1 STORE FIELDNR ADD BIN1,W1 NEXT POS RET PEND EJECT * * THIS ROUTINE CHECKS WHICH ADRESSING TYPE IS USED. * 1- OR 2-BYTE ADRESSING * FETCHES THE FIX ITEM ADRESS , WHICH IS LOADED IN 'STRG10A' * AND STORES IT IN ACTUAL BUFFER AND THE CORRECT POSITION. * IT ALSO ADJUSTES THE BUFFERPOINTER (BIN1). * FITEM PROC MOVE BIN15,W1 START ADRESS FOR MATCH MATCH STRG10A,BIN15,W9,FDIR,W0,W1 CHECK 1-/2-BYTEADR XCOPY BPOOL(BIN3),BIN1,BIN15,STRG10A,W0 LOAD ITEM-ADRESS ADD BIN1,BIN15 ADJUST BUFFERPOS 1/2 RET PEND EJECT * * SET NUMBER OF POOLS * -LAYOUT: X+YY <X=NUMBER OF DESC-POOLS , YY=NUMBER OF FORMATPOOLS> * * USED VARIABLES : BIN16 = WORK * * CHANGED VARIABLES: FDVBCD(W3) = NUMBER OF USED POOLS ADJUSTED * *************************************************************************** NOPOOL PROC TBF BOOL7,NOPL10 JUMP IF NEWREG-MODE MOVE BIN16,WORK(W3) FETCH NUMB OF OLD DPOOLS CBNG PINDND,BIN16,NOPL20 JUMP IF NEW NUMB<OLD NUMB NOPL10 MOVE BIN16,PINDND FETCH NUMB OF DESC POOLS NOPL20 MUL BIN16,=X'64' MULTIPLY WITH 100 ADD BIN16,PRECPR ADD NUMBER OF FPRMATPOOLS TBF BOOL7,NOPL30 JUMP IF NEWREG.MODE ADD BIN16,WORK(W4) ADD NUMB OF OLD FPOOLS NOPL30 MOVE FDVBCD(W3),BIN16 'X+YY' RET PEND EJECT * * FORMAT LIST * FIX-ITEM-ADRESSES * FBPOOL FRMT FCTL BPOOL(W1) FMEND FFLIND FRMT FCTL FLIND(W1) FMEND FACK FRMT FCTL ACK(W1) FMEND FIND FTABLE IND1,IND2,IND3,IND4,IND5, C IND6,IND7,IND8,IND9,IND10, C IND11,IND12,IND13,IND14,IND15, C IND16,IND17,IND18,IND19,IND20, C IND21,IND22,IND23,IND24,IND25 C IND26,IND27,IND28,IND29 EJECT IND1 FRMT FCTL W1 FMEND IND2 FRMT FCTL W2 FMEND IND3 FRMT FCTL W3 FMEND IND4 FRMT FCTL W4 FMEND IND5 FRMT FCTL W5 FMEND IND6 FRMT FCTL W6 FMEND IND7 FRMT FCTL W7 FMEND IND8 FRMT FCTL W8 FMEND EJECT IND9 FRMT FCTL W9 FMEND IND10 FRMT FCTL W10 FMEND IND11 FRMT FCTL W11 FMEND IND12 FRMT FCTL W12 FMEND IND13 FRMT FCTL W13 FMEND IND14 FRMT FCTL W14 FMEND IND15 FRMT FCTL W15 FMEND IND16 FRMT FCTL W16 FMEND EJECT IND17 FRMT FCTL W17 FMEND IND18 FRMT FCTL W18 FMEND IND19 FRMT FCTL W19 FMEND IND20 FRMT FCTL W20 FMEND IND21 FRMT FCTL W21 FMEND IND22 FRMT FCTL W22 FMEND IND23 FRMT FCTL W23 FMEND IND24 FRMT FCTL W24 FMEND IND25 FRMT FCTL W25 FMEND IND26 FRMT FCTL W26 FMEND IND27 FRMT FCTL W27 FMEND IND28 FRMT FCTL W28 FMEND IND29 FRMT FCTL W29 FMEND END END
0x0000…0028 (0, 0, 400) Head {h00=0x0024, h01=0x0050, text=» IDENT DE20FS REL 10.0 80-04-11 «, t00=0x0000, t01=0x0004}
0x0028…0040 Head {h00=0x0014, h01=0x0050, text=» 80-03-20/JAER«, t00=0x0000, t01=0x002c}
0x0040…004a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0044}
0x004a…0078 Head {h00=0x002a, h01=0x0050, text=»* FORMAT DEFINITION SUBROUTINES«, t00=0x0000, t01=0x004e}
0x0078…00a6 Head {h00=0x002a, h01=0x0050, text=»* -2-BYTE ADRESSING COMPATIBLE«, t00=0x0000, t01=0x007c}
0x00a6…00b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00aa}
0x00b0…00c4 Head {h00=0x0010, h01=0x000c, text=» DDUM DEDDIV«, t00=0x0000, t01=0x00b4}
0x00c4…00d2 Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x00c8}
0x00d2…00f6 Head {h00=0x0020, h01=0x0050, text=» ENTRY FCOPY FORMAT COPYING «, t00=0x0000, t01=0x00d6}
0x00f6…011a Head {h00=0x0020, h01=0x0050, text=» ENTRY FMELI FORMAT EDITING «, t00=0x0000, t01=0x00fa}
0x011a…013a Head {h00=0x001c, h01=0x0050, text=» ENTRY FTEXT FORMAT TEXT«, t00=0x0000, t01=0x011e}
0x013a…0160 Head {h00=0x0022, h01=0x0050, text=» ENTRY FTAB FORMAT TABULATION «, t00=0x0000, t01=0x013e}
0x0160…0184 Head {h00=0x0020, h01=0x0050, text=» ENTRY FLINK FORMAT LINKING «, t00=0x0000, t01=0x0164}
0x0184…01a8 Head {h00=0x0020, h01=0x0050, text=» ENTRY FSL FORMAT START LINE«, t00=0x0000, t01=0x0188}
0x01a8…01ca Head {h00=0x001e, h01=0x0050, text=» ENTRY FNL FORMAT NEW LINE«, t00=0x0001, t01=0x001c}
0x01ca…01f0 Head {h00=0x0022, h01=0x0050, text=» ENTRY FKI FORMAT KEYED INPUT «, t00=0x0001, t01=0x003e}
0x01f0…0216 Head {h00=0x0022, h01=0x0050, text=» ENTRY FVAL FORMAT VALIDATION «, t00=0x0001, t01=0x0064}
0x0216…0244 Head {h00=0x002a, h01=0x0050, text=» ENTRY FGEN FORMAT GENERATION (FIELD) «, t00=0x0001, t01=0x008a}
0x0244…026c Head {h00=0x0024, h01=0x0050, text=» ENTRY FACC FORMAT ACCUMULATION «, t00=0x0001, t01=0x00b8}
0x026c…029e Head {h00=0x002e, h01=0x0050, text=» ENTRY FDUPL FORMAT DUPLICATION REFERENCE «, t00=0x0001, t01=0x00e0}
0x029e…02ca Head {h00=0x0028, h01=0x0050, text=» ENTRY FCODE FORMAT CODE GENERATION «, t00=0x0001, t01=0x0112}
0x02ca…02f6 Head {h00=0x0028, h01=0x0050, text=» ENTRY FITEM FORMAT FIX-ITEM-ADRESS «, t00=0x0001, t01=0x013e}
0x02f6…0320 Head {h00=0x0026, h01=0x0050, text=» ENTRY NOPOOL NUMBER OF USED POOLS«, t00=0x0001, t01=0x016a}
0x0320…0342 (2, 0, 400) Head {h00=0x001e, h01=0x0050, text=» EXT DERROR ERROR-MESSAGES«, t00=0x0002, t01=0x0004}
0x0342…036c Head {h00=0x0026, h01=0x0050, text=» EXT DEPOOL BUFFERRESERVATIN-MODUL«, t00=0x0002, t01=0x0026}
0x036c…039e Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - «, t00=0x0002, t01=0x0050}
0x039e…03cc Head {h00=0x002a, h01=0x0050, text=» EXT WCNTRL FORMAT FIELD CONTROL WORDS«, t00=0x0002, t01=0x0082}
0x03cc…03ea Head {h00=0x001a, h01=0x0050, text=» EXT FMOVE FORMAT MOVE«, t00=0x0002, t01=0x00b0}
0x03ea…0410 Head {h00=0x0022, h01=0x0050, text=» EXT CONNUM CONVERT STRG=>BIN «, t00=0x0002, t01=0x00ce}
0x0410…0436 Head {h00=0x0022, h01=0x0050, text=» EXT LINIT LINE INITIALIZATION«, t00=0x0002, t01=0x00f4}
0x0436…0462 Head {h00=0x0028, h01=0x0050, text=» EXT PICMA PICTURELAYOUT CONVERTION «, t00=0x0002, t01=0x011a}
0x0462…0470 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0146}
0x0470…047a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0154}
0x047a…0492 Head {h00=0x0014, h01=0x0050, text=»* KEYTABLE«, t00=0x0002, t01=0x015e}
0x0492…049c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x049c…04b8 Head {h00=0x0018, h01=0x0013, text=»CLR EQU X'8F' CLEAR «, t00=0x0002, t01=0x0180}
0x04b8…04d4 Head {h00=0x0018, h01=0x0014, text=»CAN EQU X'91' CANCEL«, t00=0x0003, t01=0x000c}
0x04d4…04f0 Head {h00=0x0018, h01=0x0050, text=»RET EQU X'92' RETURN«, t00=0x0003, t01=0x0028}
0x04f0…050c Head {h00=0x0018, h01=0x0050, text=»NOK EQU X'FF' NO KEY«, t00=0x0003, t01=0x0044}
0x050c…0528 Head {h00=0x0018, h01=0x0050, text=»TOT EQU X'93' TOTAL «, t00=0x0003, t01=0x0060}
0x0528…0532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007c}
0x0532…055a Head {h00=0x0024, h01=0x0050, text=»DEKTAB6 KTAB CLR,CAN,RET,NOK,TOT«, t00=0x0003, t01=0x0086}
0x055a…0564 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ae}
0x0564…0584 Head {h00=0x001c, h01=0x0050, text=»DEKTAB7 KTAB CLR,CAN,RET«, t00=0x0003, t01=0x00b8}
0x0584…058e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d8}
0x058e…059c Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0003, t01=0x00e2}
0x059c…05a6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x00f0}
0x05a6…05c6 Head {h00=0x001c, h01=0x0017, text=»* FORMAT COPYING «, t00=0x0003, t01=0x00fa}
0x05c6…05d0 Head {h00=0x0006, h01=0x0004, text=»* «, t00=0x0003, t01=0x011a}
0x05d0…05fa Head {h00=0x0026, h01=0x0021, text=»* FCOPY = CO 0A <FIELD NR> «, t00=0x0003, t01=0x0124}
0x05fa…0604 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x014e}
0x0604…0616 Head {h00=0x000e, h01=0x000a, text=»FCOPY PROC«, t00=0x0003, t01=0x0158}
0x0616…063e Head {h00=0x0024, h01=0x0020, text=» PERF FCODE,W1 GENERATE FCOPY=C0«, t00=0x0003, t01=0x016a}
0x063e…0652 (4, 0, 400) Head {h00=0x0010, h01=0x000c, text=» PERF FFIELD«, t00=0x0004, t01=0x0004}
0x0652…065e Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0004, t01=0x0018}
0x065e…066c Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0004, t01=0x0024}
0x066c…067a Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0004, t01=0x0032}
0x067a…0684 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x0040}
0x0684…06a4 Head {h00=0x001c, h01=0x0017, text=»* FORMAT EDITING «, t00=0x0004, t01=0x004a}
0x06a4…06ae Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x006a}
0x06ae…06fa Head {h00=0x0048, h01=0x0044, text=»* FMELI = C2 <NUMB PIC.CHARS> <CH> <CH> ....<CH> 0A <FIELDNR>«, t00=0x0004, t01=0x0074}
0x06fa…0704 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00c0}
0x0704…0716 Head {h00=0x000e, h01=0x000a, text=»FMELI PROC«, t00=0x0004, t01=0x00ca}
0x0716…073e Head {h00=0x0024, h01=0x0050, text=» PERF FCODE,W2 GENERATE FMELI=C2«, t00=0x0004, t01=0x00dc}
0x073e…077e Head {h00=0x003c, h01=0x0037, text=» XCOPY BPOOL(BIN3),BIN1,W1,BIN12,W1 STORE NUMB PICCHARS «, t00=0x0004, t01=0x0104}
0x077e…079c Head {h00=0x001a, h01=0x0050, text=» ADD BIN1,W1 NEXT POS «, t00=0x0004, t01=0x0144}
0x079c…07dc Head {h00=0x003c, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,BIN12,STATSH,W0 STORE PIC CHARS «, t00=0x0004, t01=0x0162}
0x07dc…07fc Head {h00=0x001c, h01=0x0018, text=» ADD BIN1,BIN12 NEXT POS«, t00=0x0005, t01=0x0012}
0x07fc…082c Head {h00=0x002c, h01=0x0050, text=» TBF BOOL6,FMELI5 JUMP IF GENERAL FORMAT«, t00=0x0005, t01=0x0032}
0x082c…0862 Head {h00=0x0032, h01=0x0050, text=» CALL FMOVE,STRG10A,FACK FETCH ACK-ITEM-ADRESS«, t00=0x0005, t01=0x0062}
0x0862…0886 Head {h00=0x0020, h01=0x0050, text=» PERF FITEM LOAD ITEM-ADRESS«, t00=0x0005, t01=0x0098}
0x0886…08b6 Head {h00=0x002c, h01=0x0050, text=» SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE «, t00=0x0005, t01=0x00bc}
0x08b6…08ec Head {h00=0x0032, h01=0x0050, text=» CBE BIN15,W2,FMELI3 JUMP IF 1-BYTE ADRESSING «, t00=0x0005, t01=0x00ec}
0x08ec…091c Head {h00=0x002c, h01=0x0050, text=» SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE «, t00=0x0005, t01=0x0122}
0x091c…092a Head {h00=0x000a, h01=0x0050, text=»FMELI3«, t00=0x0005, t01=0x0152}
0x092a…095c Head {h00=0x002e, h01=0x0050, text=» MOVE BIN16,FDVBCD(W8) LOAD ACK-NR BINARY «, t00=0x0005, t01=0x0160}
0x095c…099c (6, 0, 400) Head {h00=0x003c, h01=0x0050, text=» CALL FMOVE,STRG10A,FIND(BIN16) FETCH INDEX-ITEM-ADRESS «, t00=0x0006, t01=0x0004}
0x099c…09c0 Head {h00=0x0020, h01=0x0050, text=» PERF FITEM LOAD ITEM-ADRESS«, t00=0x0006, t01=0x0044}
0x09c0…09d2 Head {h00=0x000e, h01=0x0050, text=» B FMELIR «, t00=0x0006, t01=0x0068}
0x09d2…09e0 Head {h00=0x000a, h01=0x0050, text=»FMELI5«, t00=0x0006, t01=0x007a}
0x09e0…0a04 Head {h00=0x0020, h01=0x001b, text=» PERF FFIELD STORE FIELD NR «, t00=0x0006, t01=0x0088}
0x0a04…0a12 Head {h00=0x000a, h01=0x0050, text=»FMELIR«, t00=0x0006, t01=0x00ac}
0x0a12…0a1e Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0006, t01=0x00ba}
0x0a1e…0a2c Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0006, t01=0x00c6}
0x0a2c…0a3a Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0006, t01=0x00d4}
0x0a3a…0a44 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x00e2}
0x0a44…0a60 Head {h00=0x0018, h01=0x0014, text=»* FORMAT TEXT«, t00=0x0006, t01=0x00ec}
0x0a60…0a6a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x0108}
0x0a6a…0aaa Head {h00=0x003c, h01=0x0037, text=»* FTEXT = C3 <NUMB. OF CHARS> <CH> <CH> ........ «, t00=0x0006, t01=0x0112}
0x0aaa…0ab4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x0152}
0x0ab4…0ac6 Head {h00=0x000e, h01=0x000a, text=»FTEXT PROC«, t00=0x0006, t01=0x015c}
0x0ac6…0ade Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x0006, t01=0x016e}
0x0ade…0b08 Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W6 LOAD LIMIT FOR FLINK«, t00=0x0006, t01=0x0186}
0x0b08…0b40 Head {h00=0x0034, h01=0x0050, text=» PERF FLINK,BIN16,BIN9 GENERATE FLINK IF NEEDED «, t00=0x0007, t01=0x0020}
0x0b40…0b6c Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FTEXT9 ERROR-SIGNAL«, t00=0x0007, t01=0x0058}
0x0b6c…0b94 Head {h00=0x0024, h01=0x0020, text=» PERF FCODE,W3 GENERATE FTEXT=C3«, t00=0x0007, t01=0x0084}
0x0b94…0bca Head {h00=0x0032, h01=0x002d, text=» XCOPY BPOOL(BIN3),BIN1,W1,BIN9,W1 STORE NUMB «, t00=0x0007, t01=0x00ac}
0x0bca…0bee Head {h00=0x0020, h01=0x001c, text=» ADD BIN1,W1 NEXT BUFFER POS«, t00=0x0007, t01=0x00e2}
0x0bee…0c2c Head {h00=0x003a, h01=0x0035, text=» XCOPY BPOOL(BIN3),BIN1,BIN9,LDES,BIN11 STORE CH-STRG «, t00=0x0007, t01=0x0106}
0x0c2c…0c54 Head {h00=0x0024, h01=0x001f, text=» ADD BIN1,BIN9 ADJUST BUFFERPOS «, t00=0x0007, t01=0x0144}
0x0c54…0c62 Head {h00=0x000a, h01=0x0050, text=»FTEXT9«, t00=0x0007, t01=0x016c}
0x0c62…0c6e Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0007, t01=0x017a}
0x0c6e…0c7c Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0007, t01=0x0186}
0x0c7c…0c8a (8, 0, 400) Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0008, t01=0x0004}
0x0c8a…0c94 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x0012}
0x0c94…0cb6 Head {h00=0x001e, h01=0x001a, text=»* FORMAT TABULATION«, t00=0x0008, t01=0x001c}
0x0cb6…0cc0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x003e}
0x0cc0…0ce4 Head {h00=0x0020, h01=0x001b, text=»* FTAB = C4 <TABPOS> «, t00=0x0008, t01=0x0048}
0x0ce4…0cee Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x006c}
0x0cee…0d00 Head {h00=0x000e, h01=0x0009, text=»FTAB PROC «, t00=0x0008, t01=0x0076}
0x0d00…0d18 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x0008, t01=0x0088}
0x0d18…0d42 Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W6 LOAD LIMIT FOR FLINK«, t00=0x0008, t01=0x00a0}
0x0d42…0d78 Head {h00=0x0032, h01=0x0050, text=» PERF FLINK,BIN16,W0 GENERATE FLINK IF NEEDED «, t00=0x0008, t01=0x00ca}
0x0d78…0da4 Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FTAB99 ERROR-SIGNAL«, t00=0x0008, t01=0x0100}
0x0da4…0dcc Head {h00=0x0024, h01=0x001f, text=» PERF FCODE,W4 GENERATE FTAB=C4 «, t00=0x0008, t01=0x012c}
0x0dcc…0e04 Head {h00=0x0034, h01=0x002f, text=» XCOPY BPOOL(BIN3),BIN1,W1,BIN8,W1 STORE TABPOS «, t00=0x0008, t01=0x0154}
0x0e04…0e28 Head {h00=0x0020, h01=0x001b, text=» ADD BIN1,W1 NEXT BUFFERPOS «, t00=0x0008, t01=0x018c}
0x0e28…0e36 Head {h00=0x000a, h01=0x0050, text=»FTAB99«, t00=0x0009, t01=0x0020}
0x0e36…0e42 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0009, t01=0x002e}
0x0e42…0e50 Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0009, t01=0x003a}
0x0e50…0e5e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0048}
0x0e5e…0e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0056}
0x0e68…0e8a Head {h00=0x001e, h01=0x0050, text=»* FORMAT VALIDATION«, t00=0x0009, t01=0x0060}
0x0e8a…0e94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0082}
0x0e94…0ed6 Head {h00=0x003e, h01=0x0050, text=»* FVAL = C5 <NUMB VAL.-CHARS> <CH> <CH> .......... «, t00=0x0009, t01=0x008c}
0x0ed6…0ee0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ce}
0x0ee0…0ef2 Head {h00=0x000e, h01=0x0050, text=»FVAL PROC «, t00=0x0009, t01=0x00d8}
0x0ef2…0f0a Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x0009, t01=0x00ea}
0x0f0a…0f34 Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W6 LOAD LIMIT FOR FLINK«, t00=0x0009, t01=0x0102}
0x0f34…0f52 Head {h00=0x001a, h01=0x0050, text=» MOVE BIN15,FMTWK(W1) «, t00=0x0009, t01=0x012c}
0x0f52…0f7c Head {h00=0x0026, h01=0x0050, text=» SUB BIN15,DEBIN4 SUBTRACT ENDPOS «, t00=0x0009, t01=0x014a}
0x0f7c…0fa6 Head {h00=0x0026, h01=0x0050, text=» SUB BIN15,W3 ADJUST FOR FUNCTEXT «, t00=0x0009, t01=0x0174}
0x0fa6…0fde Head {h00=0x0034, h01=0x0050, text=» PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED«, t00=0x000a, t01=0x000e}
0x0fde…100a Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FVAL9 ERROR-SIGNAL «, t00=0x000a, t01=0x0046}
0x100a…1034 Head {h00=0x0026, h01=0x0050, text=» PERF FCODE,W5 GENERATE FVAL = C5 «, t00=0x000a, t01=0x0072}
0x1034…106c Head {h00=0x0034, h01=0x0050, text=» PERF CONNUM,JOBSPC,FMTWK,W1 CONVERT VARSTR=>BIN«, t00=0x000a, t01=0x009c}
0x106c…10b0 Head {h00=0x0040, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W1),W1 STORE NUMB OF CHARS «, t00=0x000a, t01=0x00d4}
0x10b0…10da Head {h00=0x0026, h01=0x0050, text=» ADD BIN1,W1 NEXT BUFFER POSITION «, t00=0x000a, t01=0x0118}
0x10da…1122 Head {h00=0x0044, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,FMTWK(W1),JOBSPC,DEBIN1 STORE CHARSSTRG «, t00=0x000a, t01=0x0142}
0x1122…114e Head {h00=0x0028, h01=0x0050, text=» ADD BIN1,FMTWK(W1) ADJUST BUFFERPOS«, t00=0x000a, t01=0x018a}
0x114e…115c Head {h00=0x000a, h01=0x0050, text=»FVAL9 «, t00=0x000b, t01=0x0026}
0x115c…1168 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x0034}
0x1168…1176 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000b, t01=0x0040}
0x1176…1184 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x004e}
0x1184…118e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005c}
0x118e…11bc Head {h00=0x002a, h01=0x0050, text=»* FORMAT GENERATION (OF FIELDS)«, t00=0x000b, t01=0x0066}
0x11bc…11c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0094}
0x11c6…120a Head {h00=0x0040, h01=0x0050, text=»* FGEN = C6 <NUMB OF GEN.-CHARS> <CH> <CH> ......... «, t00=0x000b, t01=0x009e}
0x120a…1214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e2}
0x1214…1226 Head {h00=0x000e, h01=0x0050, text=»FGEN PROC «, t00=0x000b, t01=0x00ec}
0x1226…123e Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x000b, t01=0x00fe}
0x123e…1268 Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W6 LOAD LIMIT FOR FLINK«, t00=0x000b, t01=0x0116}
0x1268…1286 Head {h00=0x001a, h01=0x0050, text=» MOVE BIN15,FMTWK(W2) «, t00=0x000b, t01=0x0140}
0x1286…12b4 Head {h00=0x002a, h01=0x0050, text=» SUB BIN15,DEBIN4 SUBTRACT ENDPOSITION«, t00=0x000b, t01=0x015e}
0x12b4…12de Head {h00=0x0026, h01=0x0050, text=» SUB BIN15,W3 ADJUST FOR FUNCTEXT «, t00=0x000b, t01=0x018c}
0x12de…1316 Head {h00=0x0034, h01=0x0050, text=» PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED«, t00=0x000c, t01=0x0026}
0x1316…1342 Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FGEN9 ERROR-SIGNAL «, t00=0x000c, t01=0x005e}
0x1342…136c Head {h00=0x0026, h01=0x0050, text=» PERF FCODE,W6 GENERATE FGEN = C6 «, t00=0x000c, t01=0x008a}
0x136c…13a4 Head {h00=0x0034, h01=0x0050, text=» PERF CONNUM,JOBSPC,FMTWK,W2 CONVERT VARSTR=>BIN«, t00=0x000c, t01=0x00b4}
0x13a4…13e8 Head {h00=0x0040, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W2),W1 STORE NUMB OF CHARS «, t00=0x000c, t01=0x00ec}
0x13e8…1410 Head {h00=0x0024, h01=0x0050, text=» ADD BIN1,W1 NEXT BUFFERPOSITION«, t00=0x000c, t01=0x0130}
0x1410…1458 Head {h00=0x0044, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,FMTWK(W2),JOBSPC,DEBIN1 STORE CHARSSTRG «, t00=0x000c, t01=0x0158}
0x1458…1474 Head {h00=0x0018, h01=0x0050, text=» ADD BIN1,FMTWK(W2) «, t00=0x000d, t01=0x0010}
0x1474…1482 Head {h00=0x000a, h01=0x0050, text=»FGEN9 «, t00=0x000d, t01=0x002c}
0x1482…148e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x003a}
0x148e…149c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000d, t01=0x0046}
0x149c…14aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0054}
0x14aa…14b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0062}
0x14b4…14d8 Head {h00=0x0020, h01=0x0050, text=»* FORMAT ACCUMULATION«, t00=0x000d, t01=0x006c}
0x14d8…14e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0090}
0x14e2…1526 Head {h00=0x0040, h01=0x0050, text=»* FACC = C7 <NUMB OF ACC.-CHARS> <CH> <CH> ..........«, t00=0x000d, t01=0x009a}
0x1526…1530 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00de}
0x1530…1542 Head {h00=0x000e, h01=0x0050, text=»FACC PROC «, t00=0x000d, t01=0x00e8}
0x1542…155a Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x000d, t01=0x00fa}
0x155a…1584 Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W6 LOAD LIMIT FOR FLINK«, t00=0x000d, t01=0x0112}
0x1584…15a2 Head {h00=0x001a, h01=0x0050, text=» MOVE BIN15,FMTWK(W3) «, t00=0x000d, t01=0x013c}
0x15a2…15d2 Head {h00=0x002c, h01=0x0050, text=» SUB BIN15,DEBIN4 SUBTRACT STARTPOSITION«, t00=0x000d, t01=0x015a}
0x15d2…15fc Head {h00=0x0026, h01=0x0050, text=» SUB BIN15,W3 ADJUST FOR FUNCTEXT «, t00=0x000d, t01=0x018a}
0x15fc…1634 Head {h00=0x0034, h01=0x0050, text=» PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED«, t00=0x000e, t01=0x0024}
0x1634…1660 Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FACC9 ERROR-SIGNAL «, t00=0x000e, t01=0x005c}
0x1660…168a Head {h00=0x0026, h01=0x0050, text=» PERF FCODE,W7 GENERATE FACC = C7 «, t00=0x000e, t01=0x0088}
0x168a…16c2 Head {h00=0x0034, h01=0x0050, text=» PERF CONNUM,JOBSPC,FMTWK,W3 CONVERT VARSTR=>BIN«, t00=0x000e, t01=0x00b2}
0x16c2…1706 Head {h00=0x0040, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W3),W1 STORE NUMB OF CHARS «, t00=0x000e, t01=0x00ea}
0x1706…172e Head {h00=0x0024, h01=0x0050, text=» ADD BIN1,W1 NEXT BUFFERPOSITION«, t00=0x000e, t01=0x012e}
0x172e…1776 Head {h00=0x0044, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,FMTWK(W3),JOBSPC,DEBIN1 STORE CHARSSTRG «, t00=0x000e, t01=0x0156}
0x1776…17a8 Head {h00=0x002e, h01=0x0050, text=» ADD BIN1,FMTWK(W3) ADJUST BUFFERPOSITION «, t00=0x000f, t01=0x000e}
0x17a8…17b6 Head {h00=0x000a, h01=0x0050, text=»FACC9 «, t00=0x000f, t01=0x0040}
0x17b6…17c2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x004e}
0x17c2…17d0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000f, t01=0x005a}
0x17d0…17de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0068}
0x17de…17e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0076}
0x17e8…1816 Head {h00=0x002a, h01=0x0050, text=»* FORMAT DUPLICATION REFERENCES «, t00=0x000f, t01=0x0080}
0x1816…1820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ae}
0x1820…1860 Head {h00=0x003c, h01=0x0050, text=»* FDUPL = CC <NUMB. OF CHARS> <CH> <CH> <CH>......«, t00=0x000f, t01=0x00b8}
0x1860…186a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f8}
0x186a…187c Head {h00=0x000e, h01=0x0050, text=»FDUPL PROC«, t00=0x000f, t01=0x0102}
0x187c…1894 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x000f, t01=0x0114}
0x1894…18be Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W6 LOAD LIMIT FOR FLINK«, t00=0x000f, t01=0x012c}
0x18be…18dc Head {h00=0x001a, h01=0x0050, text=» MOVE BIN15,FMTWK(W4) «, t00=0x000f, t01=0x0156}
0x18dc…190a Head {h00=0x002a, h01=0x0050, text=» PERF FLINK,BIN16,BIN15 GENERATE FLINK«, t00=0x000f, t01=0x0174}
0x190a…1936 Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FDUPL9 ERROR-SIGNAL«, t00=0x0010, t01=0x0012}
0x1936…1960 Head {h00=0x0026, h01=0x0050, text=» PERF FCODE,W8 GENERATE FDUPL = CC«, t00=0x0010, t01=0x003e}
0x1960…1996 Head {h00=0x0032, h01=0x0050, text=» PERF CONNUM,DUPL,FMTWK,W4 CONVERT VARSTR. BIN«, t00=0x0010, t01=0x0068}
0x1996…19d8 Head {h00=0x003e, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W4),W1 STORE NUM OF CHARS«, t00=0x0010, t01=0x009e}
0x19d8…19fc Head {h00=0x0020, h01=0x0050, text=» ADD BIN1,W1 NEXT BUFFERPOS «, t00=0x0010, t01=0x00e0}
0x19fc…1a3e Head {h00=0x003e, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,FMTWK(W4),DUPL,W0 STORE CHARS-STRG«, t00=0x0010, t01=0x0104}
0x1a3e…1a6a Head {h00=0x0028, h01=0x0050, text=» ADD BIN1,FMTWK(W4) ADJUST BUFFERPOS«, t00=0x0010, t01=0x0146}
0x1a6a…1a78 Head {h00=0x000a, h01=0x0050, text=»FDUPL9«, t00=0x0010, t01=0x0172}
0x1a78…1a84 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0180}
0x1a84…1a92 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0010, t01=0x018c}
0x1a92…1aa0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x000a}
0x1aa0…1aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0018}
0x1aaa…1ac8 Head {h00=0x001a, h01=0x0050, text=»* FORMAT LINKING«, t00=0x0011, t01=0x0022}
0x1ac8…1ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0040}
0x1ad2…1b22 Head {h00=0x004c, h01=0x0050, text=»* FLINK = DF <BUFFERPOOLADRESS> <FORMATLINKINDEX> <CONSTANTADRESS>«, t00=0x0011, t01=0x004a}
0x1b22…1b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x009a}
0x1b2c…1b78 Head {h00=0x0048, h01=0x0050, text=»* INPUT PARAMETERS : LIMIT = POSITION LIMIT IN CURRENT BUFFER«, t00=0x0011, t01=0x00a4}
0x1b78…1bc0 Head {h00=0x0044, h01=0x0050, text=»* WHERE IT IS ENOUGH SPACE TO «, t00=0x0011, t01=0x00f0}
0x1bc0…1c0c Head {h00=0x0048, h01=0x0050, text=»* GENERATE ACTUAL FORMAT DIREKTIVE«, t00=0x0011, t01=0x0138}
0x1c0c…1c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0184}
0x1c16…1c62 Head {h00=0x0048, h01=0x0050, text=»* CHARS = NUMBER OF CHARACTER-POSITIONS TO«, t00=0x0011, t01=0x018e}
0x1c62…1cae Head {h00=0x0048, h01=0x0050, text=»* COUNT BEFORE COMPARISON IS MADE «, t00=0x0012, t01=0x004a}
0x1cae…1cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0096}
0x1cb8…1cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a0}
0x1cc2…1ce4 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT PARAMETER :«, t00=0x0012, t01=0x00aa}
0x1ce4…1d16 Head {h00=0x002e, h01=0x0050, text=»* DEBINW2 = 0 OK«, t00=0x0012, t01=0x00cc}
0x1d16…1d66 Head {h00=0x004c, h01=0x0050, text=»* = 1 NO BUFFERS AVAILABLE KEY:CANCEL «, t00=0x0012, t01=0x00fe}
0x1d66…1db4 Head {h00=0x004a, h01=0x0050, text=»* = 2 NO BUFFERS AVAILABLE KEY:RETUR«, t00=0x0012, t01=0x014e}
0x1db4…1e08 Head {h00=0x0050, h01=0x0050, text=»* = 4 MAXIMUM BUFFERS USED;KTOT SIMULATED «, t00=0x0013, t01=0x000c}
0x1e08…1e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0060}
0x1e12…1e62 Head {h00=0x004c, h01=0x0050, text=»*********************************************************************** «, t00=0x0013, t01=0x006a}
0x1e62…1e6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ba}
0x1e6c…1e8a Head {h00=0x001a, h01=0x0050, text=»FLINK PROC LIMIT,CHARS«, t00=0x0013, t01=0x00c4}
0x1e8a…1ea6 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW2,W0 OK «, t00=0x0013, t01=0x00e2}
0x1ea6…1edc Head {h00=0x0032, h01=0x0050, text=» SUB LIMIT,CHARS ADJUST LIMIT WITH NUMBER OF «, t00=0x0013, t01=0x00fe}
0x1edc…1f04 Head {h00=0x0024, h01=0x0050, text=» CHARS TO COUNT (FTEXT,FMELI) «, t00=0x0013, t01=0x0134}
0x1f04…1f3a Head {h00=0x0032, h01=0x0050, text=» CALL FMOVE,STRG10A,IND1 FETCH IND-ITEM-ADRESS«, t00=0x0013, t01=0x015c}
0x1f3a…1f58 (20, 0, 400) Head {h00=0x001a, h01=0x0050, text=» MOVE BIN15,W1 WORK:=1«, t00=0x0014, t01=0x0004}
0x1f58…1f82 Head {h00=0x0026, h01=0x0050, text=» MATCH STRG10A,BIN15,W9,FDIR,W0,W1«, t00=0x0014, t01=0x0022}
0x1f82…1fb8 Head {h00=0x0032, h01=0x0050, text=» CBE BIN15,W1,FLINKA JUMP IF 1-BYTE ADRESSING «, t00=0x0014, t01=0x004c}
0x1fb8…1fe2 Head {h00=0x0026, h01=0x0050, text=» SUB LIMIT,W3 ADJUST FOR 2-BYTEADR«, t00=0x0014, t01=0x0082}
0x1fe2…1ff0 Head {h00=0x000a, h01=0x0050, text=»FLINKA«, t00=0x0014, t01=0x00ac}
0x1ff0…2028 Head {h00=0x0034, h01=0x0050, text=» CBNG RNRFMCH,W29,FLINKF JUMP IF NOT LAST BUFFER«, t00=0x0014, t01=0x00ba}
0x2028…2056 Head {h00=0x002a, h01=0x0050, text=» SUB LIMIT,W3 ADJUST 3BYTE FDUM+FEXIT «, t00=0x0014, t01=0x00f2}
0x2056…208a Head {h00=0x0030, h01=0x0050, text=» CBNE BIN15,W1,FLINKF JUMP IF NOT 1BYTE ADDR«, t00=0x0014, t01=0x0120}
0x208a…20b8 Head {h00=0x002a, h01=0x0050, text=» SUB LIMIT,W2 ADJUST 1BYTE FDUM+FEXIT «, t00=0x0014, t01=0x0154}
0x20b8…20c6 Head {h00=0x000a, h01=0x0050, text=»FLINKF«, t00=0x0014, t01=0x0182}
0x20c6…20fa Head {h00=0x0030, h01=0x0050, text=» CBNG BIN1,LIMIT,FLINK9 JUMP IF NO FLINKGEN «, t00=0x0014, t01=0x0190}
0x20fa…2138 Head {h00=0x003a, h01=0x0050, text=» CBG RNRFMCH,W29,FLINK7 NO MORE BUFFERS ALLOWED MAX 24«, t00=0x0015, t01=0x0034}
0x2138…2162 Head {h00=0x0026, h01=0x0050, text=» PERF FCODE,W9 GENRATE FLINK = DF «, t00=0x0015, t01=0x0072}
0x2162…219c Head {h00=0x0036, h01=0x0050, text=» CALL FMOVE,STRG10A,FBPOOL FETCH BPOOL-ITEM-ADRESS«, t00=0x0015, t01=0x009c}
0x219c…21c0 Head {h00=0x0020, h01=0x0050, text=» PERF FITEM LOAD ITEM-ADRESS«, t00=0x0015, t01=0x00d6}
0x21c0…21f0 Head {h00=0x002c, h01=0x0050, text=» SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE «, t00=0x0015, t01=0x00fa}
0x21f0…2226 Head {h00=0x0032, h01=0x0050, text=» CBE BIN15,W2,FLINK1 JUMP IF 1-BYTE ADRESSING «, t00=0x0015, t01=0x012a}
0x2226…2256 Head {h00=0x002c, h01=0x0050, text=» SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE «, t00=0x0015, t01=0x0160}
0x2256…2264 Head {h00=0x000a, h01=0x0050, text=»FLINK1«, t00=0x0015, t01=0x0190}
0x2264…229e Head {h00=0x0036, h01=0x0050, text=» CALL FMOVE,STRG10A,FFLIND FETCH FLIND-ITEM-ADRESS«, t00=0x0016, t01=0x000e}
0x229e…22c2 Head {h00=0x0020, h01=0x0050, text=» PERF FITEM LOAD ITEM-ADRESS«, t00=0x0016, t01=0x0048}
0x22c2…22f2 Head {h00=0x002c, h01=0x0050, text=» SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE «, t00=0x0016, t01=0x006c}
0x22f2…2324 Head {h00=0x002e, h01=0x0050, text=» CBE BIN15,W2,FLINK3 JUMP IF 1-BYTE ADRESS«, t00=0x0016, t01=0x009c}
0x2324…2354 Head {h00=0x002c, h01=0x0050, text=» SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE «, t00=0x0016, t01=0x00ce}
0x2354…2362 Head {h00=0x000a, h01=0x0050, text=»FLINK3«, t00=0x0016, t01=0x00fe}
0x2362…238c Head {h00=0x0026, h01=0x0050, text=» CALL FMOVE,STRG10A,FIND(RNRFMCH) «, t00=0x0016, t01=0x010c}
0x238c…23b0 Head {h00=0x0020, h01=0x0050, text=» PERF FITEM LOAD ITEM ADRESS«, t00=0x0016, t01=0x0136}
0x23b0…23e0 Head {h00=0x002c, h01=0x0050, text=» ADD RNRFMCH,W1 ADJUST FORMATLINKINDADR «, t00=0x0016, t01=0x015a}
0x23e0…23fa Head {h00=0x0016, h01=0x0050, text=» TBF DOOL2,FLINK5 «, t00=0x0016, t01=0x018a}
0x23fa…2434 Head {h00=0x0036, h01=0x0050, text=» MOVE BIN3,FMTWK(W8) RESTORE BUFFERIND ALREADY RES«, t00=0x0017, t01=0x0014}
0x2434…2446 Head {h00=0x000e, h01=0x0050, text=» B FLINK6 «, t00=0x0017, t01=0x004e}
0x2446…2454 Head {h00=0x000a, h01=0x0050, text=»FLINK5«, t00=0x0017, t01=0x0060}
0x2454…247a Head {h00=0x0022, h01=0x0050, text=» MOVE BIN16,W1 WANTED BUFFERS «, t00=0x0017, t01=0x006e}
0x247a…2496 Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,FORMAT«, t00=0x0017, t01=0x0094}
0x2496…24d6 Head {h00=0x003c, h01=0x0050, text=» PERF DEPOOL,W3,BIN16,BIN3,STRG10A CHAIN ANOTHER BUFFER «, t00=0x0017, t01=0x00b0}
0x24d6…24f8 Head {h00=0x001e, h01=0x0050, text=» BNOK FLINK8 JUMP IF ERROR«, t00=0x0017, t01=0x00f0}
0x24f8…2510 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN3,BIN16«, t00=0x0017, t01=0x0112}
0x2510…253e Head {h00=0x002a, h01=0x0050, text=» ADD PRECPR,W1 NUMBER FORMATBUFFERS+1 «, t00=0x0017, t01=0x012a}
0x253e…2568 Head {h00=0x0026, h01=0x0050, text=» PERF NOPOOL NUMBER OF USED POOLS «, t00=0x0017, t01=0x0158}
0x2568…259c Head {h00=0x0030, h01=0x0050, text=» DISPLAY 2,W2,W2 DISPLAY DITO WHILE CHANGED «, t00=0x0017, t01=0x0182}
0x259c…25c8 Head {h00=0x0028, h01=0x0050, text=» XCOPY STR1A,W0,W1,FDIR,W0 LOAD 'E9'«, t00=0x0018, t01=0x0026}
0x25c8…2602 Head {h00=0x0036, h01=0x0050, text=» MOVE BPOOL(BIN3),STR1A FILL BUFFER WITH FEXIT E9 «, t00=0x0018, t01=0x0052}
0x2602…2610 Head {h00=0x000a, h01=0x0050, text=»FLINK6«, t00=0x0018, t01=0x008c}
0x2610…263c Head {h00=0x0028, h01=0x0050, text=» MOVE BIN1,W0 BPOOLBUFFERPOINTER:=0 «, t00=0x0018, t01=0x009a}
0x263c…264e Head {h00=0x000e, h01=0x0050, text=» B FLINK9 «, t00=0x0018, t01=0x00c6}
0x264e…265c Head {h00=0x000a, h01=0x0050, text=»FLINK7«, t00=0x0018, t01=0x00d8}
0x265c…2676 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W29 «, t00=0x0018, t01=0x00e6}
0x2676…2692 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB6«, t00=0x0018, t01=0x0100}
0x2692…26c2 Head {h00=0x002c, h01=0x0050, text=» CBE DEBINW2,W1,FLINK7 JUMP IF CLEAR-KEY«, t00=0x0018, t01=0x011c}
0x26c2…26e6 Head {h00=0x0020, h01=0x0050, text=» PERF FCODE,W11 GENERATE FNL«, t00=0x0018, t01=0x014c}
0x26e6…26f8 Head {h00=0x000e, h01=0x0050, text=» B FLINKB «, t00=0x0018, t01=0x0170}
0x26f8…2706 Head {h00=0x000a, h01=0x0050, text=»FLINK8«, t00=0x0018, t01=0x0182}
0x2706…2722 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB7«, t00=0x0018, t01=0x0190}
0x2722…274a Head {h00=0x0024, h01=0x0050, text=» CBE DEBINW2,W1,FLINK5 TRY AGAIN«, t00=0x0019, t01=0x001c}
0x274a…2758 Head {h00=0x000a, h01=0x0050, text=»FLINKB«, t00=0x0019, t01=0x0044}
0x2758…2786 Head {h00=0x002a, h01=0x0050, text=» SUB DEBINW2,W1 ADJUST FOR CANC RETURN«, t00=0x0019, t01=0x0052}
0x2786…2794 Head {h00=0x000a, h01=0x0050, text=»FLINK9«, t00=0x0019, t01=0x0080}
0x2794…27c6 Head {h00=0x002e, h01=0x0050, text=» CLEAR DOOL2 F=LINE NOT DEL LAST BUFF USED«, t00=0x0019, t01=0x008e}
0x27c6…27d2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x00c0}
0x27d2…27e0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0019, t01=0x00cc}
0x27e0…27ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00da}
0x27ee…27f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e8}
0x27f8…281a Head {h00=0x001e, h01=0x0050, text=»* FORMAT START LINE «, t00=0x0019, t01=0x00f2}
0x281a…2824 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0114}
0x2824…283c Head {h00=0x0014, h01=0x0050, text=»* FSL= E0 «, t00=0x0019, t01=0x011e}
0x283c…2846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0136}
0x2846…2856 Head {h00=0x000c, h01=0x0050, text=»FSL PROC«, t00=0x0019, t01=0x0140}
0x2856…2882 Head {h00=0x0028, h01=0x0050, text=» MOVE BIN1,W0 BPOOLBUFFER POINTER:=1«, t00=0x0019, t01=0x0150}
0x2882…28ae Head {h00=0x0028, h01=0x0050, text=» XCOPY STR1A,W0,W1,FDIR,W0 LOAD 'E9'«, t00=0x0019, t01=0x017c}
0x28ae…28e8 Head {h00=0x0036, h01=0x0050, text=» MOVE BPOOL(BIN3),STR1A FILL BUFFER WITH FEXIT E9 «, t00=0x001a, t01=0x0018}
0x28e8…2910 Head {h00=0x0024, h01=0x0050, text=» PERF FCODE,W10 GENERATE FSL=E0 «, t00=0x001a, t01=0x0052}
0x2910…294a Head {h00=0x0036, h01=0x0050, text=» MOVE FMTWK(W6),BIN1 SAVE STARTPOINTER OF LASTLINE«, t00=0x001a, t01=0x007a}
0x294a…2984 Head {h00=0x0036, h01=0x0050, text=» MOVE FMTWK(W7),BIN3 SAVE BUFFERINDEX OF LASTLINE «, t00=0x001a, t01=0x00b4}
0x2984…29a6 Head {h00=0x001e, h01=0x0050, text=» MOVE BIN10,W0 FIELDNR:=0 «, t00=0x001a, t01=0x00ee}
0x29a6…29d0 Head {h00=0x0026, h01=0x0050, text=» CLEAR BOOL1 F=NO FIELD CONFIRMED «, t00=0x001a, t01=0x0110}
0x29d0…29fa Head {h00=0x0026, h01=0x0050, text=» CLEAR DOOL2 F=NO LINE DELETE DONE«, t00=0x001a, t01=0x013a}
0x29fa…2a24 Head {h00=0x0026, h01=0x0050, text=» PERF LINIT LINE INIT OF WORKITEMS«, t00=0x001a, t01=0x0164}
0x2a24…2a30 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x018e}
0x2a30…2a3e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x000a}
0x2a3e…2a4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0018}
0x2a4c…2a56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0026}
0x2a56…2a84 Head {h00=0x002a, h01=0x0050, text=»* FORMAT END-OF-LINE PROCESSING «, t00=0x001b, t01=0x0030}
0x2a84…2a8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x005e}
0x2a8e…2ac6 Head {h00=0x0034, h01=0x0050, text=»* - PROCESSES FORMAT DIRECTIVE CODE : FNL «, t00=0x001b, t01=0x0068}
0x2ac6…2b04 Head {h00=0x003a, h01=0x0050, text=»* AND ADJUSTS WORKITEMS FOR NEW LINE PROCESSING«, t00=0x001b, t01=0x00a0}
0x2b04…2b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00de}
0x2b0e…2b30 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT VARIABLES: «, t00=0x001b, t01=0x00e8}
0x2b30…2b68 Head {h00=0x0034, h01=0x0050, text=»* DEBINW2 = 0 OK GO ON «, t00=0x001b, t01=0x010a}
0x2b68…2bb2 Head {h00=0x0046, h01=0x0050, text=»* = 1 NO AVAILABLE BUFFERS;CANCEL«, t00=0x001b, t01=0x0142}
0x2bb2…2bfc Head {h00=0x0046, h01=0x0050, text=»* = 2 NO AVAILABLE BUFFERS;RETUR «, t00=0x001b, t01=0x018c}
0x2bfc…2c42 Head {h00=0x0042, h01=0x0050, text=»* = 4 MAX LIMIT EXCEEDED;KTOT«, t00=0x001c, t01=0x0046}
0x2c42…2c4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x008c}
0x2c4c…2c9c Head {h00=0x004c, h01=0x0050, text=»*********************************************************************** «, t00=0x001c, t01=0x0096}
0x2c9c…2ca6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00e6}
0x2ca6…2cb6 Head {h00=0x000c, h01=0x0050, text=»FNL PROC«, t00=0x001c, t01=0x00f0}
0x2cb6…2cce Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x001c, t01=0x0100}
0x2cce…2cf8 Head {h00=0x0026, h01=0x0050, text=» SUB BIN16,W5 LOAD LIMIT FOR FLINK«, t00=0x001c, t01=0x0118}
0x2cf8…2d2e Head {h00=0x0032, h01=0x0050, text=» PERF FLINK,BIN16,W0 GENERATE FLINK IF NEEDED «, t00=0x001c, t01=0x0142}
0x2d2e…2d5a Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FNL99 ERROR SIGNAL «, t00=0x001c, t01=0x0178}
0x2d5a…2d7e Head {h00=0x0020, h01=0x0050, text=» PERF FCODE,W11 GENERATE FNL«, t00=0x001d, t01=0x0014}
0x2d7e…2da6 Head {h00=0x0024, h01=0x0050, text=» ADD FDVBCD(W2),=D'1' NEXT LINE «, t00=0x001d, t01=0x0038}
0x2da6…2dd6 Head {h00=0x002c, h01=0x0050, text=» DISPLAY 2,W1,W1 DISPLAY LINE NR/PAGE NR«, t00=0x001d, t01=0x0060}
0x2dd6…2e16 Head {h00=0x003c, h01=0x0050, text=» CBG FDVBCD(W2),FDVBCD(W1),FNL96 JUMP IF LINEMAX REACHED«, t00=0x001d, t01=0x0090}
0x2e16…2e40 Head {h00=0x0026, h01=0x0050, text=» TBT DOOL8,FNL10 JUMP IF NO ERASE «, t00=0x001d, t01=0x00d0}
0x2e40…2e58 Head {h00=0x0014, h01=0x0050, text=» ERASE 10,W3,W0 «, t00=0x001d, t01=0x00fa}
0x2e58…2e68 Head {h00=0x000c, h01=0x0050, text=» B FNL15«, t00=0x001d, t01=0x0112}
0x2e68…2e76 Head {h00=0x000a, h01=0x0050, text=»FNL10 «, t00=0x001d, t01=0x0122}
0x2e76…2e9c Head {h00=0x0022, h01=0x0050, text=» ERASE 11,W3,W0 CLEAR IN CORE «, t00=0x001d, t01=0x0130}
0x2e9c…2eaa Head {h00=0x000a, h01=0x0050, text=»FNL15 «, t00=0x001d, t01=0x0156}
0x2eaa…2ede Head {h00=0x0030, h01=0x0050, text=» MOVE FMTWK(W6),BIN1 SAVE LASTLINE'S STPOINT«, t00=0x001d, t01=0x0164}
0x2ede…2f12 Head {h00=0x0030, h01=0x0050, text=» MOVE FMTWK(W7),BIN3 SAVE LASTLINE'S BUFFIND«, t00=0x001e, t01=0x0008}
0x2f12…2f32 Head {h00=0x001c, h01=0x0050, text=» CBE FMTWK(W5),W0,FNL90 «, t00=0x001e, t01=0x003c}
0x2f32…2f6c Head {h00=0x0036, h01=0x0050, text=» MOVE RECLNTH,FMTWK(W5) SAVE LAST LINES NUMB CHARS«, t00=0x001e, t01=0x005c}
0x2f6c…2f7a Head {h00=0x000a, h01=0x0050, text=»FNL90 «, t00=0x001e, t01=0x0096}
0x2f7a…2fa4 Head {h00=0x0026, h01=0x0050, text=» SET BOOL1 T=FIRST LINE CONFIRMED «, t00=0x001e, t01=0x00a4}
0x2fa4…2fcc Head {h00=0x0024, h01=0x0050, text=» PERF LINIT LINE INIT WORKITEMS «, t00=0x001e, t01=0x00ce}
0x2fcc…2fe8 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW2,W0 OK «, t00=0x001e, t01=0x00f6}
0x2fe8…2ff8 Head {h00=0x000c, h01=0x0050, text=» B FNL99«, t00=0x001e, t01=0x0112}
0x2ff8…3006 Head {h00=0x000a, h01=0x0050, text=»FNL96 «, t00=0x001e, t01=0x0122}
0x3006…3030 Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,W28 MAXIMUM REACHED «, t00=0x001e, t01=0x0130}
0x3030…304c Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB6«, t00=0x001e, t01=0x015a}
0x304c…307c Head {h00=0x002c, h01=0x0050, text=» CBE DEBINW2,W1,FNL96 JUMP IF CLEAR-KEY «, t00=0x001e, t01=0x0176}
0x307c…30a8 Head {h00=0x0028, h01=0x0050, text=» SUB DEBINW2,W1 ADJUST FOR CANC RET «, t00=0x001f, t01=0x0016}
0x30a8…30b6 Head {h00=0x000a, h01=0x0050, text=»FNL99 «, t00=0x001f, t01=0x0042}
0x30b6…30c2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001f, t01=0x0050}
0x30c2…30d0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001f, t01=0x005c}
0x30d0…30de Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x001f, t01=0x006a}
0x30de…3102 Head {h00=0x0020, h01=0x001b, text=»* FORMAT KEYED INPUT «, t00=0x001f, t01=0x0078}
0x3102…310c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x009c}
0x310c…3144 Head {h00=0x0034, h01=0x002f, text=»* FKI = FO <TABPOS> <CTL1> <CTL2> <CTL3> «, t00=0x001f, t01=0x00a6}
0x3144…3184 Head {h00=0x003c, h01=0x0038, text=»* = F2 <TABPOS> <APPLE1> <CTL1> <CTL2> <CTL3>«, t00=0x001f, t01=0x00de}
0x3184…31ce Head {h00=0x0046, h01=0x0041, text=»* = F3 <TABPOS> <APPLE1> <APPLE2> <CTL1> <CTL2> <CTL3> «, t00=0x001f, t01=0x011e}
0x31ce…320c Head {h00=0x003a, h01=0x0050, text=»* = F8 <TABPOS> <DUPL> <CTL1> <CTL2> <CTL3>«, t00=0x001f, t01=0x0168}
0x320c…3254 Head {h00=0x0044, h01=0x0050, text=»* = FA <TABPOS> <APPLE1> <DUPL> <CTL1> <CTL2> <CTL3> «, t00=0x0020, t01=0x0016}
0x3254…32a4 Head {h00=0x004c, h01=0x0050, text=»* = FB <TABPOS> <APPLE1> <APPLE2> <DUPL> <CTL1> <CTL2> <CTL3>«, t00=0x0020, t01=0x005e}
0x32a4…32ae Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x00ae}
0x32ae…32be Head {h00=0x000c, h01=0x0008, text=»FKI PROC«, t00=0x0020, t01=0x00b8}
0x32be…32d6 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN16,W188«, t00=0x0020, t01=0x00c8}
0x32d6…3300 Head {h00=0x0026, h01=0x0050, text=» TBT ALPHA,FKI01 JUMP IF ALPHANUM «, t00=0x0020, t01=0x00e0}
0x3300…332c Head {h00=0x0028, h01=0x0050, text=» MOVE BIN15,BIN12 LOAD CHRS TO COUNT«, t00=0x0020, t01=0x010a}
0x332c…3358 Head {h00=0x0028, h01=0x0050, text=» SUB BIN16,W15 LOAD LIMIT FOR FLINK «, t00=0x0020, t01=0x0136}
0x3358…3368 Head {h00=0x000c, h01=0x0050, text=» B FKI03«, t00=0x0020, t01=0x0162}
0x3368…3376 Head {h00=0x000a, h01=0x0050, text=»FKI01 «, t00=0x0020, t01=0x0172}
0x3376…33a0 Head {h00=0x0026, h01=0x0050, text=» MOVE BIN15,W0 LOAD CHRS TO COUNT «, t00=0x0020, t01=0x0180}
0x33a0…33cc Head {h00=0x0028, h01=0x0050, text=» SUB BIN16,W14 LOAD LIMIT FOR FLINK «, t00=0x0021, t01=0x001a}
0x33cc…33da Head {h00=0x000a, h01=0x0050, text=»FKI03 «, t00=0x0021, t01=0x0046}
0x33da…3412 Head {h00=0x0034, h01=0x0050, text=» PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED«, t00=0x0021, t01=0x0054}
0x3412…343e Head {h00=0x0028, h01=0x0050, text=» CBNE DEBINW2,W0,FKI99 ERROR-SIGNAL «, t00=0x0021, t01=0x008c}
0x343e…3466 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN15,W13 GENERATE FKI=F0 «, t00=0x0021, t01=0x00b8}
0x3466…3490 Head {h00=0x0026, h01=0x0022, text=» MOVE BIN16,SPEC LOAD APPLE BINARY«, t00=0x0021, t01=0x00e0}
0x3490…34b2 Head {h00=0x001e, h01=0x0050, text=» CBE BIN16,W0,FKI10 APPL=0«, t00=0x0021, t01=0x010a}
0x34b2…34ce Head {h00=0x0018, h01=0x0050, text=» ADD BIN15,W1 FKI=F2«, t00=0x0021, t01=0x012c}
0x34ce…34fc Head {h00=0x002a, h01=0x0050, text=» CBNG BIN16,=X'FF',FKI10 APPL < = 255 «, t00=0x0021, t01=0x0148}
0x34fc…3518 Head {h00=0x0018, h01=0x0050, text=» ADD BIN15,W1 FKI=F3«, t00=0x0021, t01=0x0176}
0x3518…3526 (34, 0, 398) Head {h00=0x000a, h01=0x0050, text=»FKI10 «, t00=0x0022, t01=0x0004}
0x3526…354a Head {h00=0x0020, h01=0x0050, text=» CBNE FDVSTR(W1),='N',FKI20 «, t00=0x0022, t01=0x0012}
0x354a…3572 Head {h00=0x0024, h01=0x0050, text=» ADD BIN15,W3 FKI=F8 OR FA OR FB«, t00=0x0022, t01=0x0036}
0x3572…3580 Head {h00=0x000a, h01=0x0050, text=»FKI20 «, t00=0x0022, t01=0x005e}
0x3580…35ac Head {h00=0x0028, h01=0x0050, text=» PERF FCODE,BIN15 GENERATE FKI-CODE «, t00=0x0022, t01=0x006c}
0x35ac…35ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0098}
0x35ba…35c4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x00a6}
0x35c4…35f0 Head {h00=0x0028, h01=0x0024, text=»* TABULATION POSITION SETTING«, t00=0x0022, t01=0x00b0}
0x35f0…35fa Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x00dc}
0x35fa…3632 Head {h00=0x0034, h01=0x002f, text=» XCOPY BPOOL(BIN3),BIN1,W1,BIN6,W1 STORE TABPOS «, t00=0x0022, t01=0x00e6}
0x3632…3650 Head {h00=0x001a, h01=0x0015, text=» ADD BIN1,W1 NEXT POS «, t00=0x0022, t01=0x011e}
0x3650…367c Head {h00=0x0028, h01=0x0050, text=» CBE BIN16,W0,FKI50 NO APPLE VALUEE «, t00=0x0022, t01=0x013c}
0x367c…3686 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x0168}
0x3686…36aa Head {h00=0x0020, h01=0x001c, text=»* APPLE VALUE SETTING«, t00=0x0022, t01=0x0172}
0x36aa…36b4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0023, t01=0x0008}
0x36b4…36e0 Head {h00=0x0028, h01=0x0023, text=» CBG BIN16,=X'FF',FKI40 APPLE > 255 «, t00=0x0023, t01=0x0012}
0x36e0…3718 Head {h00=0x0034, h01=0x0030, text=» XCOPY BPOOL(BIN3),BIN1,W1,BIN16,W1 STORE APPLE1«, t00=0x0023, t01=0x003e}
0x3718…3736 Head {h00=0x001a, h01=0x0015, text=» ADD BIN1,W1 NEXT POS «, t00=0x0023, t01=0x0076}
0x3736…3746 Head {h00=0x000c, h01=0x0050, text=» B FKI50«, t00=0x0023, t01=0x0094}
0x3746…3754 Head {h00=0x000a, h01=0x0005, text=»FKI40 «, t00=0x0023, t01=0x00a4}
0x3754…378e Head {h00=0x0036, h01=0x0032, text=» XCOPY BPOOL(BIN3),BIN1,W2,BIN16,W0 STORE APPLE1-2«, t00=0x0023, t01=0x00b2}
0x378e…37ac Head {h00=0x001a, h01=0x0015, text=» ADD BIN1,W2 NEXT POS «, t00=0x0023, t01=0x00ec}
0x37ac…37b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x010a}
0x37b6…37ec Head {h00=0x0032, h01=0x0050, text=»* DUPL OF 'W1' INDICATING NO KEYED INPUT«, t00=0x0023, t01=0x0114}
0x37ec…37f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x014a}
0x37f6…3804 Head {h00=0x000a, h01=0x0050, text=»FKI50 «, t00=0x0023, t01=0x0154}
0x3804…3828 Head {h00=0x0020, h01=0x0050, text=» CBNE FDVSTR(W1),='N',FKI70 «, t00=0x0023, t01=0x0162}
0x3828…3848 Head {h00=0x001c, h01=0x0050, text=» CALL FMOVE,STRG10A,IND1«, t00=0x0023, t01=0x0186}
0x3848…3868 Head {h00=0x001c, h01=0x0050, text=» PERF FITEM LOAD ITEM W1«, t00=0x0024, t01=0x0016}
0x3868…3876 Head {h00=0x000a, h01=0x0005, text=»FKI70 «, t00=0x0024, t01=0x0036}
0x3876…3880 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0044}
0x3880…38b6 Head {h00=0x0032, h01=0x002d, text=»* CONTROL WORDS SETTING CTL1 CTL2 CTL3 «, t00=0x0024, t01=0x004e}
0x38b6…38c0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0084}
0x38c0…38fc Head {h00=0x0038, h01=0x0050, text=» MOVE BIN16,FDVBCD(W7) LOAD FDVBCD(W7)LENGTH BINARY «, t00=0x0024, t01=0x008e}
0x38fc…393e Head {h00=0x003e, h01=0x0050, text=» CALL WCNTRL,BPOOL(BIN3),BIN1,DEBINW1,BIN16,BIN7 LOAD CTLS«, t00=0x0024, t01=0x00ca}
0x393e…3952 Head {h00=0x0010, h01=0x0050, text=» ADD BIN1,W3«, t00=0x0024, t01=0x010c}
0x3952…3960 Head {h00=0x000a, h01=0x0005, text=»FKI99 «, t00=0x0024, t01=0x0120}
0x3960…396c Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0024, t01=0x012e}
0x396c…397a Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0024, t01=0x013a}
0x397a…3988 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0024, t01=0x0148}
0x3988…3992 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0156}
0x3992…39ba Head {h00=0x0024, h01=0x001f, text=»* FORMAT CODE GENERATION «, t00=0x0024, t01=0x0160}
0x39ba…39c4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0188}
0x39c4…3a06 (37, 0, 400) Head {h00=0x003e, h01=0x003a, text=»* INPUT PARAMETER : FDIND = FORMAT DIRECTIVE INDEX«, t00=0x0025, t01=0x0004}
0x3a06…3a10 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x0046}
0x3a10…3a4e Head {h00=0x003a, h01=0x0035, text=»***************************************************** «, t00=0x0025, t01=0x0050}
0x3a4e…3a66 Head {h00=0x0014, h01=0x0010, text=»FCODE PROC FDIND«, t00=0x0025, t01=0x008e}
0x3a66…3a94 Head {h00=0x002a, h01=0x0025, text=» XCOPY BPOOL(BIN3),BIN1,W1,FDIR,FDIND «, t00=0x0025, t01=0x00a6}
0x3a94…3ac0 Head {h00=0x0028, h01=0x0024, text=» ADD BIN1,W1 NEXT POSITION IN BUFFER«, t00=0x0025, t01=0x00d4}
0x3ac0…3acc Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0025, t01=0x0100}
0x3acc…3ada Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0025, t01=0x010c}
0x3ada…3ae8 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0025, t01=0x011a}
0x3ae8…3af2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x0128}
0x3af2…3b16 Head {h00=0x0020, h01=0x001c, text=»* FORMAT FIELD NUMBER«, t00=0x0025, t01=0x0132}
0x3b16…3b20 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x0156}
0x3b20…3b46 Head {h00=0x0022, h01=0x001d, text=»* = 0A <FIELDNR> «, t00=0x0025, t01=0x0160}
0x3b46…3b50 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x0186}
0x3b50…3b64 Head {h00=0x0010, h01=0x000b, text=»FFIELD PROC «, t00=0x0025, t01=0x0190}
0x3b64…3b9e Head {h00=0x0036, h01=0x0032, text=» XCOPY BPOOL(BIN3),BIN1,W1,W10,W1 STORE '0A'-FIELD«, t00=0x0026, t01=0x0014}
0x3b9e…3bbc Head {h00=0x001a, h01=0x0015, text=» ADD BIN1,W1 NEXT POS «, t00=0x0026, t01=0x004e}
0x3bbc…3bf6 Head {h00=0x0036, h01=0x0031, text=» XCOPY BPOOL(BIN3),BIN1,W1,BIN10,W1 STORE FIELDNR «, t00=0x0026, t01=0x006c}
0x3bf6…3c14 Head {h00=0x001a, h01=0x0050, text=» ADD BIN1,W1 NEXT POS «, t00=0x0026, t01=0x00a6}
0x3c14…3c20 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0026, t01=0x00c4}
0x3c20…3c2e Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0026, t01=0x00d0}
0x3c2e…3c3c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x00de}
0x3c3c…3c46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00ec}
0x3c46…3c88 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE CHECKS WHICH ADRESSING TYPE IS USED. «, t00=0x0026, t01=0x00f6}
0x3c88…3cae Head {h00=0x0022, h01=0x0050, text=»* 1- OR 2-BYTE ADRESSING«, t00=0x0026, t01=0x0138}
0x3cae…3cf8 Head {h00=0x0046, h01=0x0050, text=»* FETCHES THE FIX ITEM ADRESS , WHICH IS LOADED IN 'STRG10A'«, t00=0x0026, t01=0x015e}
0x3cf8…3d40 Head {h00=0x0044, h01=0x0050, text=»* AND STORES IT IN ACTUAL BUFFER AND THE CORRECT POSITION.«, t00=0x0027, t01=0x0018}
0x3d40…3d7a Head {h00=0x0036, h01=0x0050, text=»* IT ALSO ADJUSTES THE BUFFERPOINTER (BIN1).«, t00=0x0027, t01=0x0060}
0x3d7a…3d84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x009a}
0x3d84…3d96 Head {h00=0x000e, h01=0x0050, text=»FITEM PROC«, t00=0x0027, t01=0x00a4}
0x3d96…3dc4 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN15,W1 START ADRESS FOR MATCH «, t00=0x0027, t01=0x00b6}
0x3dc4…3e02 Head {h00=0x003a, h01=0x0050, text=» MATCH STRG10A,BIN15,W9,FDIR,W0,W1 CHECK 1-/2-BYTEADR «, t00=0x0027, t01=0x00e4}
0x3e02…3e44 Head {h00=0x003e, h01=0x0050, text=» XCOPY BPOOL(BIN3),BIN1,BIN15,STRG10A,W0 LOAD ITEM-ADRESS «, t00=0x0027, t01=0x0122}
0x3e44…3e70 Head {h00=0x0028, h01=0x0050, text=» ADD BIN1,BIN15 ADJUST BUFFERPOS 1/2«, t00=0x0027, t01=0x0164}
0x3e70…3e7c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0027, t01=0x0190}
0x3e7c…3e8a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0028, t01=0x000c}
0x3e8a…3e98 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x001a}
0x3e98…3ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0028}
0x3ea2…3ec6 Head {h00=0x0020, h01=0x0050, text=»* SET NUMBER OF POOLS«, t00=0x0028, t01=0x0032}
0x3ec6…3f1a Head {h00=0x0050, h01=0x0050, text=»* -LAYOUT: X+YY <X=NUMBER OF DESC-POOLS , YY=NUMBER OF FORMATPOOLS> «, t00=0x0028, t01=0x0056}
0x3f1a…3f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00aa}
0x3f24…3f5a Head {h00=0x0032, h01=0x0050, text=»* USED VARIABLES : BIN16 = WORK«, t00=0x0028, t01=0x00b4}
0x3f5a…3f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ea}
0x3f64…3fb4 Head {h00=0x004c, h01=0x0050, text=»* CHANGED VARIABLES: FDVBCD(W3) = NUMBER OF USED POOLS ADJUSTED «, t00=0x0028, t01=0x00f4}
0x3fb4…3fbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0144}
0x3fbe…4012 Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0028, t01=0x014e}
0x4012…4026 Head {h00=0x0010, h01=0x0050, text=»NOPOOL PROC «, t00=0x0029, t01=0x0012}
0x4026…4054 Head {h00=0x002a, h01=0x0050, text=» TBF BOOL7,NOPL10 JUMP IF NEWREG-MODE «, t00=0x0029, t01=0x0026}
0x4054…408a Head {h00=0x0032, h01=0x0050, text=» MOVE BIN16,WORK(W3) FETCH NUMB OF OLD DPOOLS «, t00=0x0029, t01=0x0054}
0x408a…40c6 Head {h00=0x0038, h01=0x0050, text=» CBNG PINDND,BIN16,NOPL20 JUMP IF NEW NUMB<OLD NUMB «, t00=0x0029, t01=0x008a}
0x40c6…40d4 Head {h00=0x000a, h01=0x0050, text=»NOPL10«, t00=0x0029, t01=0x00c6}
0x40d4…4108 Head {h00=0x0030, h01=0x0050, text=» MOVE BIN16,PINDND FETCH NUMB OF DESC POOLS «, t00=0x0029, t01=0x00d4}
0x4108…4116 Head {h00=0x000a, h01=0x0050, text=»NOPL20«, t00=0x0029, t01=0x0108}
0x4116…4142 Head {h00=0x0028, h01=0x0050, text=» MUL BIN16,=X'64' MULTIPLY WITH 100 «, t00=0x0029, t01=0x0116}
0x4142…4176 Head {h00=0x0030, h01=0x0050, text=» ADD BIN16,PRECPR ADD NUMBER OF FPRMATPOOLS «, t00=0x0029, t01=0x0142}
0x4176…41a4 Head {h00=0x002a, h01=0x0050, text=» TBF BOOL7,NOPL30 JUMP IF NEWREG.MODE «, t00=0x0029, t01=0x0176}
0x41a4…41d6 Head {h00=0x002e, h01=0x0050, text=» ADD BIN16,WORK(W4) ADD NUMB OF OLD FPOOLS«, t00=0x002a, t01=0x0014}
0x41d6…41e4 Head {h00=0x000a, h01=0x0050, text=»NOPL30«, t00=0x002a, t01=0x0046}
0x41e4…420a Head {h00=0x0022, h01=0x0050, text=» MOVE FDVBCD(W3),BIN16 'X+YY' «, t00=0x002a, t01=0x0054}
0x420a…4216 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002a, t01=0x007a}
0x4216…4224 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002a, t01=0x0086}
0x4224…4232 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0094}
0x4232…423c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00a2}
0x423c…4258 Head {h00=0x0018, h01=0x0050, text=»* FORMAT LIST «, t00=0x002a, t01=0x00ac}
0x4258…427a Head {h00=0x001e, h01=0x0050, text=»* FIX-ITEM-ADRESSES«, t00=0x002a, t01=0x00c8}
0x427a…4284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ea}
0x4284…4298 Head {h00=0x0010, h01=0x0050, text=»FBPOOL FRMT «, t00=0x002a, t01=0x00f4}
0x4298…42b0 Head {h00=0x0014, h01=0x0050, text=» FCTL BPOOL(W1) «, t00=0x002a, t01=0x0108}
0x42b0…42be Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002a, t01=0x0120}
0x42be…42d2 Head {h00=0x0010, h01=0x0050, text=»FFLIND FRMT «, t00=0x002a, t01=0x012e}
0x42d2…42ea Head {h00=0x0014, h01=0x0050, text=» FCTL FLIND(W1) «, t00=0x002a, t01=0x0142}
0x42ea…42f8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002a, t01=0x015a}
0x42f8…430a Head {h00=0x000e, h01=0x0050, text=»FACK FRMT «, t00=0x002a, t01=0x0168}
0x430a…4320 Head {h00=0x0012, h01=0x0050, text=» FCTL ACK(W1) «, t00=0x002a, t01=0x017a}
0x4320…432e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002a, t01=0x0190}
0x432e…435e Head {h00=0x002c, h01=0x0050, text=»FIND FTABLE IND1,IND2,IND3,IND4,IND5, C«, t00=0x002b, t01=0x000e}
0x435e…4386 Head {h00=0x0024, h01=0x0050, text=» IND6,IND7,IND8,IND9,IND10, C «, t00=0x002b, t01=0x003e}
0x4386…43b2 Head {h00=0x0028, h01=0x0050, text=» IND11,IND12,IND13,IND14,IND15, C «, t00=0x002b, t01=0x0066}
0x43b2…43de Head {h00=0x0028, h01=0x0050, text=» IND16,IND17,IND18,IND19,IND20, C «, t00=0x002b, t01=0x0092}
0x43de…4408 Head {h00=0x0026, h01=0x0050, text=» IND21,IND22,IND23,IND24,IND25 C«, t00=0x002b, t01=0x00be}
0x4408…442a Head {h00=0x001e, h01=0x0050, text=» IND26,IND27,IND28,IND29 «, t00=0x002b, t01=0x00e8}
0x442a…4438 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x010a}
0x4438…444a Head {h00=0x000e, h01=0x0050, text=»IND1 FRMT «, t00=0x002b, t01=0x0118}
0x444a…445a Head {h00=0x000c, h01=0x0050, text=» FCTL W1«, t00=0x002b, t01=0x012a}
0x445a…4468 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002b, t01=0x013a}
0x4468…447a Head {h00=0x000e, h01=0x0050, text=»IND2 FRMT «, t00=0x002b, t01=0x0148}
0x447a…448a Head {h00=0x000c, h01=0x0050, text=» FCTL W2«, t00=0x002b, t01=0x015a}
0x448a…4498 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002b, t01=0x016a}
0x4498…44aa Head {h00=0x000e, h01=0x0050, text=»IND3 FRMT «, t00=0x002b, t01=0x0178}
0x44aa…44ba Head {h00=0x000c, h01=0x0050, text=» FCTL W3«, t00=0x002b, t01=0x018a}
0x44ba…44c8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x000a}
0x44c8…44da Head {h00=0x000e, h01=0x0050, text=»IND4 FRMT «, t00=0x002c, t01=0x0018}
0x44da…44ea Head {h00=0x000c, h01=0x0050, text=» FCTL W4«, t00=0x002c, t01=0x002a}
0x44ea…44f8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x003a}
0x44f8…450a Head {h00=0x000e, h01=0x0050, text=»IND5 FRMT «, t00=0x002c, t01=0x0048}
0x450a…451a Head {h00=0x000c, h01=0x0050, text=» FCTL W5«, t00=0x002c, t01=0x005a}
0x451a…4528 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x006a}
0x4528…453a Head {h00=0x000e, h01=0x0050, text=»IND6 FRMT «, t00=0x002c, t01=0x0078}
0x453a…454a Head {h00=0x000c, h01=0x0050, text=» FCTL W6«, t00=0x002c, t01=0x008a}
0x454a…4558 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x009a}
0x4558…456a Head {h00=0x000e, h01=0x0050, text=»IND7 FRMT «, t00=0x002c, t01=0x00a8}
0x456a…457a Head {h00=0x000c, h01=0x0050, text=» FCTL W7«, t00=0x002c, t01=0x00ba}
0x457a…4588 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x00ca}
0x4588…459a Head {h00=0x000e, h01=0x0050, text=»IND8 FRMT «, t00=0x002c, t01=0x00d8}
0x459a…45aa Head {h00=0x000c, h01=0x0050, text=» FCTL W8«, t00=0x002c, t01=0x00ea}
0x45aa…45b8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x00fa}
0x45b8…45c6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0108}
0x45c6…45d8 Head {h00=0x000e, h01=0x0050, text=»IND9 FRMT «, t00=0x002c, t01=0x0116}
0x45d8…45e8 Head {h00=0x000c, h01=0x0050, text=» FCTL W9«, t00=0x002c, t01=0x0128}
0x45e8…45f6 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x0138}
0x45f6…4608 Head {h00=0x000e, h01=0x0050, text=»IND10 FRMT«, t00=0x002c, t01=0x0146}
0x4608…461a Head {h00=0x000e, h01=0x0050, text=» FCTL W10 «, t00=0x002c, t01=0x0158}
0x461a…4628 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x016a}
0x4628…463a Head {h00=0x000e, h01=0x0050, text=»IND11 FRMT«, t00=0x002c, t01=0x0178}
0x463a…464c Head {h00=0x000e, h01=0x0050, text=» FCTL W11 «, t00=0x002c, t01=0x018a}
0x464c…465a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x000c}
0x465a…466c Head {h00=0x000e, h01=0x0050, text=»IND12 FRMT«, t00=0x002d, t01=0x001a}
0x466c…467e Head {h00=0x000e, h01=0x0050, text=» FCTL W12 «, t00=0x002d, t01=0x002c}
0x467e…468c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x003e}
0x468c…469e Head {h00=0x000e, h01=0x0050, text=»IND13 FRMT«, t00=0x002d, t01=0x004c}
0x469e…46b0 Head {h00=0x000e, h01=0x0050, text=» FCTL W13 «, t00=0x002d, t01=0x005e}
0x46b0…46be Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x0070}
0x46be…46d0 Head {h00=0x000e, h01=0x0050, text=»IND14 FRMT«, t00=0x002d, t01=0x007e}
0x46d0…46e2 Head {h00=0x000e, h01=0x0050, text=» FCTL W14 «, t00=0x002d, t01=0x0090}
0x46e2…46f0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x00a2}
0x46f0…4702 Head {h00=0x000e, h01=0x0050, text=»IND15 FRMT«, t00=0x002d, t01=0x00b0}
0x4702…4714 Head {h00=0x000e, h01=0x0050, text=» FCTL W15 «, t00=0x002d, t01=0x00c2}
0x4714…4722 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x00d4}
0x4722…4734 Head {h00=0x000e, h01=0x0050, text=»IND16 FRMT«, t00=0x002d, t01=0x00e2}
0x4734…4746 Head {h00=0x000e, h01=0x0050, text=» FCTL W16 «, t00=0x002d, t01=0x00f4}
0x4746…4754 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x0106}
0x4754…4762 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0114}
0x4762…4774 Head {h00=0x000e, h01=0x0050, text=»IND17 FRMT«, t00=0x002d, t01=0x0122}
0x4774…4786 Head {h00=0x000e, h01=0x0050, text=» FCTL W17 «, t00=0x002d, t01=0x0134}
0x4786…4794 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x0146}
0x4794…47a6 Head {h00=0x000e, h01=0x0050, text=»IND18 FRMT«, t00=0x002d, t01=0x0154}
0x47a6…47b8 Head {h00=0x000e, h01=0x0050, text=» FCTL W18 «, t00=0x002d, t01=0x0166}
0x47b8…47c6 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x0178}
0x47c6…47d8 Head {h00=0x000e, h01=0x0050, text=»IND19 FRMT«, t00=0x002d, t01=0x0186}
0x47d8…47ea Head {h00=0x000e, h01=0x0050, text=» FCTL W19 «, t00=0x002e, t01=0x0008}
0x47ea…47f8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x001a}
0x47f8…480a Head {h00=0x000e, h01=0x0050, text=»IND20 FRMT«, t00=0x002e, t01=0x0028}
0x480a…481c Head {h00=0x000e, h01=0x0050, text=» FCTL W20 «, t00=0x002e, t01=0x003a}
0x481c…482a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x004c}
0x482a…483c Head {h00=0x000e, h01=0x0050, text=»IND21 FRMT«, t00=0x002e, t01=0x005a}
0x483c…484e Head {h00=0x000e, h01=0x0050, text=» FCTL W21 «, t00=0x002e, t01=0x006c}
0x484e…485c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x007e}
0x485c…486e Head {h00=0x000e, h01=0x0050, text=»IND22 FRMT«, t00=0x002e, t01=0x008c}
0x486e…4880 Head {h00=0x000e, h01=0x0050, text=» FCTL W22 «, t00=0x002e, t01=0x009e}
0x4880…488e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x00b0}
0x488e…48a0 Head {h00=0x000e, h01=0x0050, text=»IND23 FRMT«, t00=0x002e, t01=0x00be}
0x48a0…48b2 Head {h00=0x000e, h01=0x0050, text=» FCTL W23 «, t00=0x002e, t01=0x00d0}
0x48b2…48c0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x00e2}
0x48c0…48d2 Head {h00=0x000e, h01=0x0050, text=»IND24 FRMT«, t00=0x002e, t01=0x00f0}
0x48d2…48e4 Head {h00=0x000e, h01=0x0050, text=» FCTL W24 «, t00=0x002e, t01=0x0102}
0x48e4…48f2 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x0114}
0x48f2…4904 Head {h00=0x000e, h01=0x0050, text=»IND25 FRMT«, t00=0x002e, t01=0x0122}
0x4904…4916 Head {h00=0x000e, h01=0x0050, text=» FCTL W25 «, t00=0x002e, t01=0x0134}
0x4916…4924 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x0146}
0x4924…4936 Head {h00=0x000e, h01=0x0050, text=»IND26 FRMT«, t00=0x002e, t01=0x0154}
0x4936…4948 Head {h00=0x000e, h01=0x0050, text=» FCTL W26 «, t00=0x002e, t01=0x0166}
0x4948…4956 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002e, t01=0x0178}
0x4956…4968 Head {h00=0x000e, h01=0x0050, text=»IND27 FRMT«, t00=0x002e, t01=0x0186}
0x4968…497a Head {h00=0x000e, h01=0x0050, text=» FCTL W27 «, t00=0x002f, t01=0x0008}
0x497a…4988 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002f, t01=0x001a}
0x4988…499a Head {h00=0x000e, h01=0x0050, text=»IND28 FRMT«, t00=0x002f, t01=0x0028}
0x499a…49ac Head {h00=0x000e, h01=0x0050, text=» FCTL W28 «, t00=0x002f, t01=0x003a}
0x49ac…49ba Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002f, t01=0x004c}
0x49ba…49cc Head {h00=0x000e, h01=0x0050, text=»IND29 FRMT«, t00=0x002f, t01=0x005a}
0x49cc…49de Head {h00=0x000e, h01=0x0050, text=» FCTL W29 «, t00=0x002f, t01=0x006c}
0x49de…49ec Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002f, t01=0x007e}
0x49ec…49f8 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002f, t01=0x008c}
0x49f8…4a04 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x002f, t01=0x0098}
0x4a04…4a08 Head {h00=0x4004, h01=0x0000}
0x4a08…4a0c 00 2f 00 a4 ┆ / ┆
0x4a0c…4a14 (48, 1, 8) 20 04 00 00 00 30 00 04 ┆ 0 ┆
0x4a14…4a64 (49, 0, 400) 54 06 4d 0e e5 2d 57 04 e5 2c 45 0e 85 41 0d 6e 90 41 0b 72 83 3e 85 3e f0 3e 4d 0e 85 41 0d 6e 5f 0c 85 41 0d 7a 85 3e f7 a1 03 d4 81 20 00 00 84 20 00 00 85 20 00 00 86 20 00 00 80 a0 00 00 82 20 00 00 83 08 3b 49 83 43 00 02 83 58 00 02 ┆T M -W ,E A n A r > > >M A n_ A z > ;I C X ┆
0x4a64…4ab4 f0 22 41 8e 5f 40 81 41 0d 66 84 41 0d 6a 85 41 0d 6e 86 41 0d 72 80 c1 0d 76 8f 20 22 52 f0 a1 0c c6 23 01 58 26 f0 a1 0d 06 54 a6 81 58 00 10 54 0a f0 a1 0d 0a 3a 45 56 98 57 9e 81 58 00 12 54 90 04 08 ac 59 00 02 04 05 f0 a1 0d 12 3a 44 ┆ "A _@ A f A j A n A r v "R # X& T X T :EV W X T Y :D┆
0x4ab4…4b04 56 16 82 58 00 10 1a 08 51 78 f0 a1 0d 0a 3a 45 56 70 85 20 ff ff 57 18 1c 01 5c 22 04 04 f0 a1 0c de 87 20 18 0f a2 1d 50 06 1c 01 59 10 57 44 e4 58 00 11 9c 14 1c 01 24 ff ec 20 00 0a 51 42 1c 01 52 06 f0 a1 0c de 5f 0a 04 03 87 20 08 0f ┆V X Qx :EVp W " P Y WD X $ QB R _ ┆
0x4b04…4b54 a2 1d 50 0e 1c 01 55 1c f0 a1 0d 12 f0 a1 0c de 5f 16 3a c3 56 06 23 10 50 0a 57 1e 15 01 ed 59 00 11 50 16 87 58 00 02 27 08 50 06 b7 59 00 02 5f 8a 02 02 aa 59 00 12 f0 22 02 00 f0 22 0e 66 80 00 00 00 00 00 0a 68 00 00 00 00 00 00 00 00 ┆ P U _ : V # P W Y P X ' P Y _ Y " " f h ┆
0x4b54…4ba4 00 00 00 00 00 00 ff fe 0e 8c 00 00 00 00 ff fe 0e 9a 00 00 84 1c 1c 02 54 1a 82 38 54 74 87 39 57 62 83 42 00 0a a3 20 07 ff 84 1c 1c 37 50 10 1c 01 50 04 8c 20 22 4a 01 41 24 00 00 0a aa 88 20 02 02 00 80 00 10 05 00 00 01 10 08 80 00 1d ┆ T 8Tt 9Wb B 7P P "J A$ ┆
0x4ba4…4bf4 (50, 0, 400) fb 0c a3 41 21 12 57 04 ab 41 21 12 81 40 21 12 41 2e 57 3c f7 a1 03 d4 80 41 05 96 49 2e 39 a8 12 01 86 20 0f 5a 84 58 00 02 52 12 80 d8 00 04 82 43 00 0a a0 43 00 06 01 00 f7 a1 1f 22 86 20 0f 36 84 58 00 02 52 12 80 d8 00 04 82 43 00 0a ┆ A! W A! @! A.W< A I.9 Z X R C C " 6 X R C ┆
0x4bf4…4c44 a0 43 00 06 01 00 f7 a1 1f 22 8f 20 22 52 f7 a1 03 d4 41 ee 81 40 21 12 41 2e 02 00 86 20 0f 5a 84 58 00 02 56 02 82 39 86 20 0f 36 84 58 00 02 56 02 82 39 5f 64 00 00 80 00 00 00 00 00 0e 80 00 00 00 00 00 00 00 40 80 00 00 00 00 00 0e 88 ┆ C " "R A @! A. Z X V 9 6 X V 9_d @ ┆
0x4c44…4c94 00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 00 00 00 0e 80 00 00 00 00 00 00 00 14 00 78 00 06 0f 74 00 00 03 00 82 42 00 04 88 20 11 66 82 1c 55 0a 1a 04 50 06 52 08 1a 02 55 a6 8f 20 22 4a 02 21 f5 21 11 a2 57 04 f5 21 11 be 1f 01 51 1c ┆ x t B f U P R U "J ! ! W ! Q ┆
0x4c94…4ce4 f5 21 11 e4 eb 42 00 04 5a 12 87 1c 50 06 01 08 a9 43 00 08 f5 21 11 a8 8f 20 11 66 81 42 00 0a 50 1e e4 24 24 ff 91 10 11 01 1c 01 52 12 19 01 ea 25 5c 0a 94 10 84 43 00 0a f5 21 11 e4 5f 2c ea 59 00 26 58 0c ea 59 00 24 50 2e ea 59 00 25 ┆ ! B Z P C ! f B P $$ R % C ! _, Y &X Y $P. Y %┆
0x4ce4…4d34 50 28 84 08 24 ff 81 1c 19 01 50 0a 1c 30 52 0e 1c 09 51 0a 57 14 1c 20 52 04 1c 3f 55 0c 01 04 a9 43 00 08 f5 21 11 e4 5f 66 ea 59 00 24 50 0a ea 59 00 25 5c 86 03 00 25 14 20 02 80 0a 91 04 01 01 00 40 82 01 24 40 14 00 02 00 00 00 10 02 ┆P( $ P 0R Q W R ?U C ! _f Y $P Y % % @ $@ ┆
0x4d34…4d84 (51, 0, 400) 5f 92 1b 01 5e 96 13 01 5f 9a 20 bf 04 00 02 00 f5 21 11 a2 ef 20 00 05 50 3a 83 42 00 02 e3 4c 00 01 23 ff 1b 2b 50 20 84 59 00 28 04 02 02 0d f5 21 11 ae 1c 01 55 04 02 0a 5f 0c 1b 05 58 08 1b 01 54 04 02 0c 5f 18 03 02 57 08 f5 21 11 ae ┆_ ^ _ ! P: B L # +P Y ( ! U _ X T _ W ! ┆
0x4d84…4dd4 90 59 00 02 f5 21 12 08 81 04 58 d0 ef 20 00 05 58 16 81 08 21 ff 19 07 58 1e 19 0a 50 18 19 0f 52 08 19 3f 5d 2a 19 20 55 08 01 04 a9 43 00 08 5f 2e 1a 20 5f 3a f5 21 12 08 84 08 f5 21 12 08 22 0f 24 0f 50 06 12 0a 1c 01 5c 06 9a 58 00 28 ┆ Y ! X X ! X P R ?]* U C _. _: ! ! " $ P X (┆
0x4dd4…4e24 e4 58 00 03 9a 10 5d 54 84 08 02 20 f5 21 11 ae 90 59 00 02 1c 01 5c 0e 83 0c 5c 68 e4 59 00 03 03 02 5f 70 f7 a1 03 d4 86 20 12 24 81 58 00 02 52 d8 83 58 00 12 87 58 00 06 27 ff 80 d8 00 04 85 20 00 1e 95 18 1f 04 8a 20 0f 90 1f 01 50 14 ┆ X ]T ! Y h Y _p $ X R X X ' P ┆
0x4e24…4e74 20 bf 02 00 f5 21 11 a2 02 0d 03 00 84 58 00 28 14 01 5f 58 01 02 8f 20 22 4e 80 41 05 96 f7 a1 03 d4 86 20 12 24 83 58 00 02 52 4a 82 38 aa 20 4a c0 f0 09 50 14 87 58 00 06 27 ff 1f 04 51 0a 82 38 aa 20 4a 00 f0 09 22 7f 01 00 57 8a 83 43 ┆ ! X ( _X "N A $ X RJ 8 J P X ' Q 8 J " W C┆
0x4e74…4ec4 00 06 1f 04 55 0e e3 58 00 03 93 59 00 28 03 00 e3 59 00 03 81 42 00 0a 11 02 39 61 81 43 00 0a 01 00 8f 20 22 4e 82 38 aa 20 4a c0 f0 09 50 3a 82 38 aa 20 42 80 f0 09 00 40 00 40 01 10 00 00 09 00 01 00 14 00 04 10 0a a0 00 00 00 00 20 0d ┆ U X Y ( Y B 9a C "N 8 J P: 8 B @ @ ┆
0x4ec4…4f14 (52, 0, 400) 57 30 81 20 42 c0 57 0a 81 20 42 80 57 04 81 20 42 00 87 40 02 d2 54 06 a9 38 f0 05 54 18 81 20 01 00 a9 59 00 02 83 59 00 12 84 59 00 14 85 59 00 16 8f 20 22 52 82 59 00 2a f5 21 11 a8 82 58 00 2a 5f 42 84 42 00 02 94 0c e2 31 13 01 f0 34 ┆W0 B W B W B @ T 8 T Y Y Y Y "R Y * ! X *_B B 1 4┆
0x4f14…4f64 83 58 00 12 84 58 00 14 85 58 00 16 87 58 00 06 27 ff 80 d8 00 04 f0 34 81 42 00 04 99 0c 55 0e 81 42 00 02 91 0c e2 24 22 ff 13 01 f0 34 83 43 00 06 f0 34 00 10 80 00 00 00 00 00 0f 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0e 88 ┆ X X X X ' 4 B U B $" 4 C 4 p ┆
0x4f64…4fb4 00 00 00 00 00 01 00 00 5f 5e 0d 00 00 00 00 00 00 00 00 0a 12 8a 00 00 00 00 00 14 00 78 00 06 00 00 00 00 03 00 82 42 00 04 88 20 00 00 82 1c 55 00 1a 04 50 00 52 00 1a 02 55 00 8f 20 00 00 02 21 f5 21 00 00 57 00 f5 21 a0 59 00 1e a0 59 ┆ _^ x B U P R U ! ! W ! Y Y┆
0x4fb4…5004 00 38 01 00 e1 58 00 06 19 01 51 5e 05 52 95 18 f7 a1 21 5c 17 00 54 38 a9 43 00 08 82 20 02 00 a2 59 00 06 02 01 82 59 00 36 f5 21 15 f8 11 00 54 12 82 58 00 20 82 59 00 06 80 d8 00 04 f7 a1 21 24 01 00 82 20 ff ff 82 59 00 36 8f 20 15 f0 ┆ 8 X Q^ R ! T8 C Y Y 6 ! T X Y !$ Y 6 ┆
0x5004…5054 11 00 8c 20 15 f0 1f 01 50 7e 1f 04 50 7a 1f 0c 50 76 1f 04 50 72 1f 0a 50 0c 8f 20 22 4a 81 20 80 08 8f 20 15 de 07 cc 81 42 00 0a 21 01 54 02 17 cc 83 20 12 58 83 39 00 20 00 22 00 00 00 00 02 01 00 20 00 00 00 00 40 02 00 81 20 02 20 22 ┆ P~ Pz Pv Pr P "J B ! T X 9 " @ "┆