|
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: 32152 (0x7d98)
Notes: pts_type(SC)
Names: »READIN.SC«
└─⟦f45ea3bc3⟧ Bits:30009713 Philips computer tape "WSM"
└─⟦this⟧ »WSM:CREA/READIN.SC«
IDENT READIN REL=2.3,831116,870155940230 ************************************************************ * * LATEST UPDATE 831116 MADE BY CJ * * HISTORY= * * 831116/CJ ERASE POS REA993 TYPECHANGE FROM 5 TO 3 * 830923/CJ STPBLK,STABLK IMPL. * 830505/CJ MESSAGE ON SYS-LINE DURING "HARDCOPY" * ************************************************************* * * A STANDARD MODULE, HANDLING * ONE FIELD OF THE CURRENT FORMAT * * OUTPUT LBIN2 = 0 OK GO ON * = 1 END OF FORMAT FOUND OR ENTER KEY * = 2 ERROR FOUND CONFIRMED WITH CANCEL * = 3 ERROR FOUND CONFIRMED WITH RETUR * = 4 POWER OFF OCCURED * LBOOL1 = FALSE TAB-FORWARD * = TRUE TAB-BACKWARD * CR /= 2 => ENTER KEY * ************************************************************* DDUM WSMDDV PDIV * ENTRY READIN ENTRY STPBLK ENTRY STABLK EXPROC WSMAPP ***APPLIC. ROUTINE (CONTROLS) EXPROC WSMERR,PKTAB,PLIT ***(ERROR-)MESSAGEROUTINE EXPROC ATTPRT ***ATTACH PRINTER EXPROC DETPRT ***DETACH PRINTER EXT EMPTYT ---ASSRUT: CHECK IF EMPTY ITEM EXT TYPET ---ASSRUT:CHECK TYPE OF ITEM EXT ICLEAR ---ASSRUT:CLEAR ITEM * STOPBLK EQU X'BE' STARTBLK EQU X'BD' EJECT INCLUDE WSMKEY,LIST INCLUDE KEYT4,LIST EJECT READIN PROC KEYT1,KEYT2,KEYT3,MSGCOL PKTAB KEYT1 PKTAB KEYT2 PKTAB KEYT3 PLIT MSGCOL * * READ TO CURRENT FIELD ON DISPLAY * GETCTL 0,LBIN2 GET APPL-VALUE CBNE LBIN2,W18,REA100 JUMP IF NOT 18 XCOPY LSTR81,W1,W3,LSTR4A,W1 COPY REST OF OLD CONT. MOVE LBIN1,W2 GO TO B REA775 EDFLD READING REA100 PERF STPBLK CLEAR LBOOL1 FALSE= TAB FORWARD DYKI LSTR81,KEYT1,KEYT2,LBIN1, C LBIN2,LBIN4 BL REA970 ERROR PERF STABLK CBG LBIN2,W0,REA120 JUMP IF POWER OFF OR B REA994 KEY SWITCHES REA120 CBNE LBIN2,W8,REA150 IF KEY = TBWD & ... CMP LBIN1,W0 ... POSITION > 0, ... BNE REA770 ... START EDIT REA150 IB LBIN2,REA500,REA650, CLR,CLR C REA200,REA993,REA993, EOI,CAN,RET C REA200,REA200,REA200, PLS,MIN,BTB C REA200,REA200,REA760, HOM,PRT,DUP C REA775 CFW 5 CBW ENT EJECT * * HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST * REA200 CBE LBIN1,W0,REA500 JUMP IF LENGTH = 0 * * CONDITIONAL DISPLAYING * CALL TYPET,LBIN3,:FMTITEM CHECK TYPE OF ITEM CBNE LBIN3,W2,REA210 JMP IF NOT BCD CBNE LBIN2,W7,REA210 JMP IF NOT MINUS-KEY TBF LBOOL6,REA210 JUMP IF NO SIGN MOVE LSTR1,=X'2D' LOAD MINUS = X'2D' INSRT LSTR81,W0,W1,LSTR1,W0 INSERT MINUS REA210 GETCTL 0,LBIN3 GET APPL-VALUE CBE LBIN3,W0,REA600 JUMP IF NO APPL-VALUE * * APPL-VALUE DIFFERENT FROM ZERO * PERF WSMAPP ***APPLICATION CONTROLS IB LBIN3,REA460,REA730, UNC DISPL,NO DISPL C REA980,REA775 ERR-MESS,ERR-EDIT B REA600 * * OK AFTER APPL CONTROL * UNCONDITIONAL DISPLAYING * REA460 UPDATE CURRENT INPUT... UPDFLD 1,LSTR81 ... FIELD & DISPLAY IT EJECT * * JUMP ON FUNCTION KEY INDEX * REA500 IB LBIN2,REA100,REA999, CLR,CLR C REA700,REA993,REA993, EOI,CAN,RET C REA705,REA705,REA710, PLS,MIN,BTB C REA980,REA755,REA999, NOK,PRT,DUP C REA999,REA790 CFW & CBW,ENT SUB LBIN2,W9 ADJUST EOI-KEY INDEX B REA999 EXIT * REA600 UPDFLD 0,LSTR81 REA200 FIELD DISPL. COND. B REA500 * REA650 GETABX LBIN4 GET CURRENT TAB INDEX DISPLAY 1,LBIN4,LBIN4 DISPLAY FIELD B REA730 EJECT REA700 COMMON END-OF-ITEM KEY REA705 TAB. FORWARD 1 STEP TFWD BE REA990 TAB OK BG REA990 CTAB BL REA991 E-O-F FOUND B REA730 REA710 TABULATION 1 STEP BACKW. SET LBOOL1 TRUE=BACKTAB TBWD BE REA990 OK BG REA990 CTAB REA730 SETCUR B REA100 EJECT REA755 HARD COPY PERF ATTPRT CHECK PRINTER-DEVICE BNOK REA980 TBF LBOOLE,REA980 CBNE LBIN2,W0,REA757 JMP IF CANCEL/RETURN MOVE LBIN3,=X'1801' ROW:=24 COL:=01 TBF VD82,REA756 JMP IF NOT VD82 MOVE LBIN3,=X'0101' ROW:=01,COL:=01 REA756 CALL ICLEAR,LSTR81 ---INITIAL CLEAR MOVE LSTR81,=C'++NOW PRINTING ' MOVE LSTR1,=X'1B' MOVE TB7BIN1,=W'15' XCOPY LSTR81,TB7BIN1,W1,LSTR1,W0 LOAD CONTROL-CODE ADD TB7BIN1,W1 ADJUST DSC SYSL,6,LBIN3 SET CURSOR ON LAST LINE DSC SYSL,2,TB7BIN1 ERASE LAST LINE DSC SYSL,6,LBIN3 SET CURSOR ON LAST LINE WRITE SYSL,LSTR81,TB7BIN1 WRITE QUESTION ON LAST LINE CALL ICLEAR,LSTR81 ---CLEAR LSTR81 EDWRT PRNT,FORMF FORM FEED/NEW PAGE BNOK REA758 MOVE LBIN3,W1 PRINT PRNT,LBIN3,W0 BNOK REA759 EJECT REA757 PERF DETPRT DETACH PRINTER MOVE LBIN3,=X'1801' ROW:=24 COL:=01 TBF VD82,REA758 JMP IF NOT VD82 MOVE LBIN3,=X'0101' ROW:=01,COL:=01 REA758 DSC SYSL,6,LBIN3 SET CURSOR ON LAST LINE DSC SYSL,2,TB7BIN1 ERASE LAST LINE B REA730 SET CURSOR AND READ * REA759 PERF DETPRT DETACH PRINTER MOVE LBIN4,=W'34' B REA980 * REA760 DUPLICATION MOVE LBIN2,W3 INDICATE COMMON EOI-KEY DUPL LSTR81 DUPLICATION BNZ REA762 DUPL ALLOWED UPDFLD 1,LSTR81 UPDATE FIELD AND DISPLAY B REA210 CHECK APPL-VALUE REA762 MOVE LBIN4,W0 INDICATE ILLEGAL EOI-KEY B REA980 DUPL NOT ALLOWED EJECT * * EDIT FIELD * REA765 EDIT AFTER ERROR CBE LBIN1,W0,REA775 REA770 EDIT AFTER TBWD MOVE LBIN1,W1 REA775 NORMAL EDIT GETCTL 1,LBIN3 GET MAXL CBNE LBIN3,W0,REA780 EDWRT SCRN,BELL ACOUSTIC ALARM B REA730 REA780 PERF STPBLK EDFLD LSTR81,KEYT3,LBIN1, C LBIN2,LBIN4 BL REA970 ERROR CBNG LBIN2,W0,REA994 POWER OFF OR KEY SWITCH B REA120 CONTINUE AS FOR DYKI EJECT * * ENTER KEY * REA790 MOVE LBIN4,W5 INDICATE COMP.FIELD FOUND MOVE LBIN1,W0 INDICATE NO CLEARING MOVE LBIN2,W0 SET INDEX TO LAST FIELD IN FORMAT GETFLD 0,LBIN2,LBIN3 SEARCH FOR EMPTY COMP. FIELDS BOFL REA796 EMPTY COMP. FIELD FOUND TSTCTL 2 LAST FIELD COMPULSORY? BZ REA991 NO! END OF FORMAT CALL EMPTYT,:FMTITEM EMPTY? BOK REA991 NO! =>EOF * * EMPTY COMPULSORY FIELD FOUND * REA796 GETFLD 0,LBIN3,LBIN2 GET THE COMPULSORY FIELD B REA980 EJECT REA970 CBE LBIN2,W12,REA775 JUMP IF EDIT CBE LBIN2,W8,REA770 JUMP IF TBWD PERF STABLK * * ERROR HANDLING * REA980 PERF WSMERR,KEYT4,MSGCOL ***(ERROR-)MESSAGE ROUTINE IB LBIN2,REA730,REA999, CLR,CAN C REA999,REA775 RET,CFW B REA994 POWER OFF EJECT * * NORMAL END OF ITEM * REA990 MOVE LBIN2,W0 OK B REA999 * * END OF FORMAT FOUND * REA991 MOVE LBIN2,W1 EOF B REA999 * * CANCEL RETUR * REA993 GETABX LBIN4 GET CURRENT INDEX CALL EMPTYT,:FMTITEM EMPTY ? BNOK REA993A NO ERASE 3,LBIN4,LBIN4 ERASE ON SCREEN B REA993B REA993A MOVE :FMTITEM,LSTR81 ERASE 13,LBIN4,LBIN4 ERASE SCREEN AND DATA ITEM REA993B SUB LBIN2,W2 ADJUST KEYINDEX B REA999 * * POWER OFF * REA994 MOVE LBIN2,W4 B REA999 * * EXIT * REA999 RET PEND EJECT * * STPBLK => PUT'S CURSOR ON AND STOP'S BLOCKING * STPBLK PROC MOVE VD82CW,=X'0080' CURSOR ON DSC SCRN,X'11',VD82CW DSC SCRN,STOPBLK STOP BLOCKING RET PEND * * STABLK => START'S BLOCKING AND TURNS CURSOR OFF * STABLK PROC DSC SCRN,STARTBLK START BLOCKING MOVE VD82CW,=X'01C0' DISCONNECT CURSOR DSC SCRN,X'11',VD82CW MOVE VD82CW,=X'0180' INVISIBLE CURSOR DSC SCRN,X'11',VD82CW RET PEND EJECT BELL FRMT FSL FILLR X'07',1 FMEND * * FORM-FEED FORMAT * FORMF FRMT FTEXT ' 1' FMEND END
0x0000…0032 (0, 0, 400) Head {h00=0x002e, h01=0x0050, text=» IDENT READIN REL=2.3,831116,870155940230 «, t00=0x0000, t01=0x0004}
0x0032…003a Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0036}
0x003a…007e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0000, t01=0x003e}
0x007e…0088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0082}
0x0088…00b4 Head {h00=0x0028, h01=0x0050, text=»* LATEST UPDATE 831116 MADE BY CJ «, t00=0x0000, t01=0x008c}
0x00b4…00be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x00be…00d2 Head {h00=0x0010, h01=0x0050, text=»* HISTORY=«, t00=0x0000, t01=0x00c2}
0x00d2…00dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d6}
0x00dc…0122 Head {h00=0x0042, h01=0x0050, text=»* 831116/CJ ERASE POS REA993 TYPECHANGE FROM 5 TO 3«, t00=0x0000, t01=0x00e0}
0x0122…0154 Head {h00=0x002e, h01=0x0050, text=»* 830923/CJ STPBLK,STABLK IMPL.«, t00=0x0000, t01=0x0126}
0x0154…0198 Head {h00=0x0040, h01=0x0050, text=»* 830505/CJ MESSAGE ON SYS-LINE DURING "HARDCOPY"«, t00=0x0000, t01=0x0158}
0x0198…01a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x01a2…01e8 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0001, t01=0x0016}
0x01e8…01f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x005c}
0x01f2…021a Head {h00=0x0024, h01=0x0050, text=»* A STANDARD MODULE, HANDLING«, t00=0x0001, t01=0x0066}
0x021a…0246 Head {h00=0x0028, h01=0x0050, text=»* ONE FIELD OF THE CURRENT FORMAT«, t00=0x0001, t01=0x008e}
0x0246…0250 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ba}
0x0250…027e Head {h00=0x002a, h01=0x0050, text=»* OUTPUT LBIN2 = 0 OK GO ON«, t00=0x0001, t01=0x00c4}
0x027e…02c4 Head {h00=0x0042, h01=0x0050, text=»* = 1 END OF FORMAT FOUND OR ENTER KEY«, t00=0x0001, t01=0x00f2}
0x02c4…030c Head {h00=0x0044, h01=0x0050, text=»* = 2 ERROR FOUND CONFIRMED WITH CANCEL «, t00=0x0001, t01=0x0138}
0x030c…0352 Head {h00=0x0042, h01=0x0050, text=»* = 3 ERROR FOUND CONFIRMED WITH RETUR«, t00=0x0001, t01=0x0180}
0x0352…038a Head {h00=0x0034, h01=0x0050, text=»* = 4 POWER OFF OCCURED «, t00=0x0002, t01=0x0036}
0x038a…03c0 Head {h00=0x0032, h01=0x0050, text=»* LBOOL1 = FALSE TAB-FORWARD «, t00=0x0002, t01=0x006e}
0x03c0…03f6 Head {h00=0x0032, h01=0x0050, text=»* = TRUE TAB-BACKWARD«, t00=0x0002, t01=0x00a4}
0x03f6…0428 Head {h00=0x002e, h01=0x0050, text=»* CR /= 2 => ENTER KEY«, t00=0x0002, t01=0x00da}
0x0428…0432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010c}
0x0432…0478 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0002, t01=0x0116}
0x0478…048c Head {h00=0x0010, h01=0x0050, text=» DDUM WSMDDV«, t00=0x0002, t01=0x015c}
0x048c…049a Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0002, t01=0x0170}
0x049a…04a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017e}
0x04a4…04ba Head {h00=0x0012, h01=0x0050, text=» ENTRY READIN «, t00=0x0002, t01=0x0188}
0x04ba…04d0 Head {h00=0x0012, h01=0x0050, text=» ENTRY STPBLK «, t00=0x0003, t01=0x000e}
0x04d0…04e6 Head {h00=0x0012, h01=0x0050, text=» ENTRY STABLK «, t00=0x0003, t01=0x0024}
0x04e6…051a Head {h00=0x0030, h01=0x0050, text=» EXPROC WSMAPP ***APPLIC. ROUTINE (CONTROLS)«, t00=0x0003, t01=0x003a}
0x051a…0556 Head {h00=0x0038, h01=0x0050, text=» EXPROC WSMERR,PKTAB,PLIT ***(ERROR-)MESSAGEROUTINE «, t00=0x0003, t01=0x006e}
0x0556…057e Head {h00=0x0024, h01=0x0050, text=» EXPROC ATTPRT ***ATTACH PRINTER«, t00=0x0003, t01=0x00aa}
0x057e…05a6 Head {h00=0x0024, h01=0x0050, text=» EXPROC DETPRT ***DETACH PRINTER«, t00=0x0003, t01=0x00d2}
0x05a6…05d8 Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ---ASSRUT: CHECK IF EMPTY ITEM«, t00=0x0003, t01=0x00fa}
0x05d8…0608 Head {h00=0x002c, h01=0x0050, text=» EXT TYPET ---ASSRUT:CHECK TYPE OF ITEM «, t00=0x0003, t01=0x012c}
0x0608…0630 Head {h00=0x0024, h01=0x0050, text=» EXT ICLEAR ---ASSRUT:CLEAR ITEM«, t00=0x0003, t01=0x015c}
0x0630…063a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0184}
0x063a…0654 Head {h00=0x0016, h01=0x0050, text=»STOPBLK EQU X'BE' «, t00=0x0003, t01=0x018e}
0x0654…066e Head {h00=0x0016, h01=0x0050, text=»STARTBLK EQU X'BD'«, t00=0x0004, t01=0x0018}
0x066e…067c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0032}
0x067c…0698 Head {h00=0x0018, h01=0x0050, text=» INCLUDE WSMKEY,LIST«, t00=0x0004, t01=0x0040}
0x0698…06b4 Head {h00=0x0018, h01=0x0050, text=» INCLUDE KEYT4,LIST «, t00=0x0004, t01=0x005c}
0x06b4…06c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0078}
0x06c2…06ee Head {h00=0x0028, h01=0x0050, text=»READIN PROC KEYT1,KEYT2,KEYT3,MSGCOL«, t00=0x0004, t01=0x0086}
0x06ee…0702 Head {h00=0x0010, h01=0x0050, text=» PKTAB KEYT1«, t00=0x0004, t01=0x00b2}
0x0702…0716 Head {h00=0x0010, h01=0x0050, text=» PKTAB KEYT2«, t00=0x0004, t01=0x00c6}
0x0716…072a Head {h00=0x0010, h01=0x0050, text=» PKTAB KEYT3«, t00=0x0004, t01=0x00da}
0x072a…073e Head {h00=0x0010, h01=0x0050, text=» PLIT MSGCOL«, t00=0x0004, t01=0x00ee}
0x073e…0748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0102}
0x0748…0776 Head {h00=0x002a, h01=0x0050, text=»* READ TO CURRENT FIELD ON DISPLAY «, t00=0x0004, t01=0x010c}
0x0776…0780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x013a}
0x0780…07a6 Head {h00=0x0022, h01=0x0050, text=» GETCTL 0,LBIN2 GET APPL-VALUE«, t00=0x0004, t01=0x0144}
0x07a6…07d4 Head {h00=0x002a, h01=0x0050, text=» CBNE LBIN2,W18,REA100 JUMP IF NOT 18 «, t00=0x0004, t01=0x016a}
0x07d4…0810 Head {h00=0x0038, h01=0x0050, text=» XCOPY LSTR81,W1,W3,LSTR4A,W1 COPY REST OF OLD CONT.«, t00=0x0005, t01=0x0008}
0x0810…082c Head {h00=0x0018, h01=0x0050, text=» MOVE LBIN1,W2 GO TO«, t00=0x0005, t01=0x0044}
0x082c…084c Head {h00=0x001c, h01=0x0050, text=» B REA775 EDFLD READING «, t00=0x0005, t01=0x0060}
0x084c…085a Head {h00=0x000a, h01=0x0050, text=»REA100«, t00=0x0005, t01=0x0080}
0x085a…086e Head {h00=0x0010, h01=0x0050, text=» PERF STPBLK«, t00=0x0005, t01=0x008e}
0x086e…0896 Head {h00=0x0024, h01=0x0050, text=» CLEAR LBOOL1 FALSE= TAB FORWARD«, t00=0x0005, t01=0x00a2}
0x0896…08c0 Head {h00=0x0026, h01=0x0050, text=» DYKI LSTR81,KEYT1,KEYT2,LBIN1, C«, t00=0x0005, t01=0x00ca}
0x08c0…08d6 Head {h00=0x0012, h01=0x0050, text=» LBIN2,LBIN4 «, t00=0x0005, t01=0x00f4}
0x08d6…08ee Head {h00=0x0014, h01=0x0050, text=» BL REA970 ERROR«, t00=0x0005, t01=0x010a}
0x08ee…0902 Head {h00=0x0010, h01=0x0050, text=» PERF STABLK«, t00=0x0005, t01=0x0122}
0x0902…0934 Head {h00=0x002e, h01=0x0050, text=» CBG LBIN2,W0,REA120 JUMP IF POWER OFF OR «, t00=0x0005, t01=0x0136}
0x0934…0952 Head {h00=0x001a, h01=0x0050, text=» B REA994 KEY SWITCHES«, t00=0x0005, t01=0x0168}
0x0952…0960 Head {h00=0x000a, h01=0x0050, text=»REA120«, t00=0x0005, t01=0x0186}
0x0960…0992 (6, 0, 400) Head {h00=0x002e, h01=0x0050, text=» CBNE LBIN2,W8,REA150 IF KEY = TBWD & ... «, t00=0x0006, t01=0x0004}
0x0992…09be Head {h00=0x0028, h01=0x0050, text=» CMP LBIN1,W0 ... POSITION > 0, ... «, t00=0x0006, t01=0x0036}
0x09be…09e0 Head {h00=0x001e, h01=0x0050, text=» BNE REA770 ... START EDIT«, t00=0x0006, t01=0x0062}
0x09e0…09ee Head {h00=0x000a, h01=0x0050, text=»REA150«, t00=0x0006, t01=0x0084}
0x09ee…0a18 Head {h00=0x0026, h01=0x0050, text=» IB LBIN2,REA500,REA650, CLR,CLR C«, t00=0x0006, t01=0x0092}
0x0a18…0a46 Head {h00=0x002a, h01=0x0050, text=» REA200,REA993,REA993, EOI,CAN,RET C «, t00=0x0006, t01=0x00bc}
0x0a46…0a74 Head {h00=0x002a, h01=0x0050, text=» REA200,REA200,REA200, PLS,MIN,BTB C «, t00=0x0006, t01=0x00ea}
0x0a74…0aa2 Head {h00=0x002a, h01=0x0050, text=» REA200,REA200,REA760, HOM,PRT,DUP C «, t00=0x0006, t01=0x0118}
0x0aa2…0abc Head {h00=0x0016, h01=0x0050, text=» REA775 CFW 5 CBW«, t00=0x0006, t01=0x0146}
0x0abc…0aca Head {h00=0x000a, h01=0x0050, text=» ENT«, t00=0x0006, t01=0x0160}
0x0aca…0ad8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x016e}
0x0ad8…0ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017c}
0x0ae2…0b1a Head {h00=0x0034, h01=0x0050, text=»* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST «, t00=0x0006, t01=0x0186}
0x0b1a…0b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002e}
0x0b24…0b32 Head {h00=0x000a, h01=0x0050, text=»REA200«, t00=0x0007, t01=0x0038}
0x0b32…0b62 Head {h00=0x002c, h01=0x0050, text=» CBE LBIN1,W0,REA500 JUMP IF LENGTH = 0 «, t00=0x0007, t01=0x0046}
0x0b62…0b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0076}
0x0b6c…0b90 Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL DISPLAYING «, t00=0x0007, t01=0x0080}
0x0b90…0b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a4}
0x0b9a…0bd0 Head {h00=0x0032, h01=0x0050, text=» CALL TYPET,LBIN3,:FMTITEM CHECK TYPE OF ITEM «, t00=0x0007, t01=0x00ae}
0x0bd0…0bfc Head {h00=0x0028, h01=0x0050, text=» CBNE LBIN3,W2,REA210 JMP IF NOT BCD«, t00=0x0007, t01=0x00e4}
0x0bfc…0c2e Head {h00=0x002e, h01=0x0050, text=» CBNE LBIN2,W7,REA210 JMP IF NOT MINUS-KEY«, t00=0x0007, t01=0x0110}
0x0c2e…0c58 Head {h00=0x0026, h01=0x0050, text=» TBF LBOOL6,REA210 JUMP IF NO SIGN«, t00=0x0007, t01=0x0142}
0x0c58…0c86 Head {h00=0x002a, h01=0x0050, text=» MOVE LSTR1,=X'2D' LOAD MINUS = X'2D' «, t00=0x0007, t01=0x016c}
0x0c86…0cb8 Head {h00=0x002e, h01=0x0050, text=» INSRT LSTR81,W0,W1,LSTR1,W0 INSERT MINUS «, t00=0x0008, t01=0x000a}
0x0cb8…0cc6 Head {h00=0x000a, h01=0x0050, text=»REA210«, t00=0x0008, t01=0x003c}
0x0cc6…0cec Head {h00=0x0022, h01=0x0050, text=» GETCTL 0,LBIN3 GET APPL-VALUE«, t00=0x0008, t01=0x004a}
0x0cec…0d1e Head {h00=0x002e, h01=0x0050, text=» CBE LBIN3,W0,REA600 JUMP IF NO APPL-VALUE«, t00=0x0008, t01=0x0070}
0x0d1e…0d28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00a2}
0x0d28…0d54 Head {h00=0x0028, h01=0x0050, text=»* APPL-VALUE DIFFERENT FROM ZERO «, t00=0x0008, t01=0x00ac}
0x0d54…0d5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d8}
0x0d5e…0d8a Head {h00=0x0028, h01=0x0050, text=» PERF WSMAPP ***APPLICATION CONTROLS«, t00=0x0008, t01=0x00e2}
0x0d8a…0dc0 Head {h00=0x0032, h01=0x0050, text=» IB LBIN3,REA460,REA730, UNC DISPL,NO DISPL C «, t00=0x0008, t01=0x010e}
0x0dc0…0dea Head {h00=0x0026, h01=0x0050, text=» REA980,REA775 ERR-MESS,ERR-EDIT «, t00=0x0008, t01=0x0144}
0x0dea…0dfc Head {h00=0x000e, h01=0x0050, text=» B REA600 «, t00=0x0008, t01=0x016e}
0x0dfc…0e06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0180}
0x0e06…0e28 Head {h00=0x001e, h01=0x0050, text=»* OK AFTER APPL CONTROL«, t00=0x0008, t01=0x018a}
0x0e28…0e4e Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0009, t01=0x001c}
0x0e4e…0e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0042}
0x0e58…0e80 Head {h00=0x0024, h01=0x0050, text=»REA460 UPDATE CURRENT INPUT...«, t00=0x0009, t01=0x004c}
0x0e80…0eb0 Head {h00=0x002c, h01=0x0050, text=» UPDFLD 1,LSTR81 ... FIELD & DISPLAY IT «, t00=0x0009, t01=0x0074}
0x0eb0…0ebe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00a4}
0x0ebe…0ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b2}
0x0ec8…0ef0 Head {h00=0x0024, h01=0x0050, text=»* JUMP ON FUNCTION KEY INDEX «, t00=0x0009, t01=0x00bc}
0x0ef0…0efa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e4}
0x0efa…0f08 Head {h00=0x000a, h01=0x0050, text=»REA500«, t00=0x0009, t01=0x00ee}
0x0f08…0f32 Head {h00=0x0026, h01=0x0050, text=» IB LBIN2,REA100,REA999, CLR,CLR C«, t00=0x0009, t01=0x00fc}
0x0f32…0f60 Head {h00=0x002a, h01=0x0050, text=» REA700,REA993,REA993, EOI,CAN,RET C «, t00=0x0009, t01=0x0126}
0x0f60…0f8e Head {h00=0x002a, h01=0x0050, text=» REA705,REA705,REA710, PLS,MIN,BTB C «, t00=0x0009, t01=0x0154}
0x0f8e…0fbc Head {h00=0x002a, h01=0x0050, text=» REA980,REA755,REA999, NOK,PRT,DUP C «, t00=0x0009, t01=0x0182}
0x0fbc…0fe2 Head {h00=0x0022, h01=0x0050, text=» REA999,REA790 CFW & CBW,ENT «, t00=0x000a, t01=0x0020}
0x0fe2…100c Head {h00=0x0026, h01=0x0050, text=» SUB LBIN2,W9 ADJUST EOI-KEY INDEX«, t00=0x000a, t01=0x0046}
0x100c…1022 Head {h00=0x0012, h01=0x0050, text=» B REA999 EXIT«, t00=0x000a, t01=0x0070}
0x1022…102c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0086}
0x102c…103a Head {h00=0x000a, h01=0x0050, text=»REA600«, t00=0x000a, t01=0x0090}
0x103a…106c Head {h00=0x002e, h01=0x0050, text=» UPDFLD 0,LSTR81 REA200 FIELD DISPL. COND.«, t00=0x000a, t01=0x009e}
0x106c…107e Head {h00=0x000e, h01=0x0050, text=» B REA500 «, t00=0x000a, t01=0x00d0}
0x107e…1088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00e2}
0x1088…1096 Head {h00=0x000a, h01=0x0050, text=»REA650«, t00=0x000a, t01=0x00ec}
0x1096…10c2 Head {h00=0x0028, h01=0x0050, text=» GETABX LBIN4 GET CURRENT TAB INDEX «, t00=0x000a, t01=0x00fa}
0x10c2…10ee Head {h00=0x0028, h01=0x0050, text=» DISPLAY 1,LBIN4,LBIN4 DISPLAY FIELD«, t00=0x000a, t01=0x0126}
0x10ee…1100 Head {h00=0x000e, h01=0x0050, text=» B REA730 «, t00=0x000a, t01=0x0152}
0x1100…110e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0164}
0x110e…1136 Head {h00=0x0024, h01=0x0050, text=»REA700 COMMON END-OF-ITEM KEY «, t00=0x000a, t01=0x0172}
0x1136…115a Head {h00=0x0020, h01=0x0050, text=»REA705 TAB. FORWARD 1 STEP«, t00=0x000b, t01=0x000a}
0x115a…1168 Head {h00=0x000a, h01=0x0050, text=» TFWD «, t00=0x000b, t01=0x002e}
0x1168…1182 Head {h00=0x0016, h01=0x0050, text=» BE REA990 TAB OK «, t00=0x000b, t01=0x003c}
0x1182…119a Head {h00=0x0014, h01=0x0050, text=» BG REA990 CTAB «, t00=0x000b, t01=0x0056}
0x119a…11b8 Head {h00=0x001a, h01=0x0050, text=» BL REA991 E-O-F FOUND«, t00=0x000b, t01=0x006e}
0x11b8…11ca Head {h00=0x000e, h01=0x0050, text=» B REA730 «, t00=0x000b, t01=0x008c}
0x11ca…11f4 Head {h00=0x0026, h01=0x0050, text=»REA710 TABULATION 1 STEP BACKW. «, t00=0x000b, t01=0x009e}
0x11f4…1214 Head {h00=0x001c, h01=0x0050, text=» SET LBOOL1 TRUE=BACKTAB«, t00=0x000b, t01=0x00c8}
0x1214…1222 Head {h00=0x000a, h01=0x0050, text=» TBWD «, t00=0x000b, t01=0x00e8}
0x1222…1238 Head {h00=0x0012, h01=0x0050, text=» BE REA990 OK «, t00=0x000b, t01=0x00f6}
0x1238…1250 Head {h00=0x0014, h01=0x0050, text=» BG REA990 CTAB «, t00=0x000b, t01=0x010c}
0x1250…125e Head {h00=0x000a, h01=0x0050, text=»REA730«, t00=0x000b, t01=0x0124}
0x125e…126e Head {h00=0x000c, h01=0x0050, text=» SETCUR «, t00=0x000b, t01=0x0132}
0x126e…1280 Head {h00=0x000e, h01=0x0050, text=» B REA100 «, t00=0x000b, t01=0x0142}
0x1280…128e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0154}
0x128e…12a8 Head {h00=0x0016, h01=0x0050, text=»REA755 HARD COPY«, t00=0x000b, t01=0x0162}
0x12a8…12d2 Head {h00=0x0026, h01=0x0050, text=» PERF ATTPRT CHECK PRINTER-DEVICE «, t00=0x000b, t01=0x017c}
0x12d2…12e6 Head {h00=0x0010, h01=0x0050, text=» BNOK REA980«, t00=0x000c, t01=0x0016}
0x12e6…1300 Head {h00=0x0016, h01=0x0050, text=» TBF LBOOLE,REA980«, t00=0x000c, t01=0x002a}
0x1300…1332 Head {h00=0x002e, h01=0x0050, text=» CBNE LBIN2,W0,REA757 JMP IF CANCEL/RETURN«, t00=0x000c, t01=0x0044}
0x1332…135e Head {h00=0x0028, h01=0x0050, text=» MOVE LBIN3,=X'1801' ROW:=24 COL:=01«, t00=0x000c, t01=0x0076}
0x135e…1386 Head {h00=0x0024, h01=0x0050, text=» TBF VD82,REA756 JMP IF NOT VD82«, t00=0x000c, t01=0x00a2}
0x1386…13b2 Head {h00=0x0028, h01=0x0050, text=» MOVE LBIN3,=X'0101' ROW:=01,COL:=01«, t00=0x000c, t01=0x00ca}
0x13b2…13c0 Head {h00=0x000a, h01=0x0050, text=»REA756«, t00=0x000c, t01=0x00f6}
0x13c0…13ec Head {h00=0x0028, h01=0x0050, text=» CALL ICLEAR,LSTR81 ---INITIAL CLEAR«, t00=0x000c, t01=0x0104}
0x13ec…1414 Head {h00=0x0024, h01=0x0050, text=» MOVE LSTR81,=C'++NOW PRINTING '«, t00=0x000c, t01=0x0130}
0x1414…142e Head {h00=0x0016, h01=0x0050, text=» MOVE LSTR1,=X'1B'«, t00=0x000c, t01=0x0158}
0x142e…144a Head {h00=0x0018, h01=0x0050, text=» MOVE TB7BIN1,=W'15'«, t00=0x000c, t01=0x0172}
0x144a…1486 Head {h00=0x0038, h01=0x0050, text=» XCOPY LSTR81,TB7BIN1,W1,LSTR1,W0 LOAD CONTROL-CODE «, t00=0x000c, t01=0x018e}
0x1486…14a4 Head {h00=0x001a, h01=0x0050, text=» ADD TB7BIN1,W1 ADJUST«, t00=0x000d, t01=0x003a}
0x14a4…14d6 Head {h00=0x002e, h01=0x0050, text=» DSC SYSL,6,LBIN3 SET CURSOR ON LAST LINE «, t00=0x000d, t01=0x0058}
0x14d6…1502 Head {h00=0x0028, h01=0x0050, text=» DSC SYSL,2,TB7BIN1 ERASE LAST LINE «, t00=0x000d, t01=0x008a}
0x1502…1534 Head {h00=0x002e, h01=0x0050, text=» DSC SYSL,6,LBIN3 SET CURSOR ON LAST LINE «, t00=0x000d, t01=0x00b6}
0x1534…1572 Head {h00=0x003a, h01=0x0050, text=» WRITE SYSL,LSTR81,TB7BIN1 WRITE QUESTION ON LAST LINE«, t00=0x000d, t01=0x00e8}
0x1572…159e Head {h00=0x0028, h01=0x0050, text=» CALL ICLEAR,LSTR81 ---CLEAR LSTR81 «, t00=0x000d, t01=0x0126}
0x159e…15ca Head {h00=0x0028, h01=0x0050, text=» EDWRT PRNT,FORMF FORM FEED/NEW PAGE«, t00=0x000d, t01=0x0152}
0x15ca…15de Head {h00=0x0010, h01=0x0050, text=» BNOK REA758«, t00=0x000d, t01=0x017e}
0x15de…15f4 (14, 0, 400) Head {h00=0x0012, h01=0x0050, text=» MOVE LBIN3,W1«, t00=0x000e, t01=0x0004}
0x15f4…1610 Head {h00=0x0018, h01=0x0050, text=» PRINT PRNT,LBIN3,W0«, t00=0x000e, t01=0x001a}
0x1610…1624 Head {h00=0x0010, h01=0x0050, text=» BNOK REA759«, t00=0x000e, t01=0x0036}
0x1624…1632 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x004a}
0x1632…1640 Head {h00=0x000a, h01=0x0050, text=»REA757«, t00=0x000e, t01=0x0058}
0x1640…1664 Head {h00=0x0020, h01=0x0050, text=» PERF DETPRT DETACH PRINTER «, t00=0x000e, t01=0x0066}
0x1664…1690 Head {h00=0x0028, h01=0x0050, text=» MOVE LBIN3,=X'1801' ROW:=24 COL:=01«, t00=0x000e, t01=0x008a}
0x1690…16b8 Head {h00=0x0024, h01=0x0050, text=» TBF VD82,REA758 JMP IF NOT VD82«, t00=0x000e, t01=0x00b6}
0x16b8…16e4 Head {h00=0x0028, h01=0x0050, text=» MOVE LBIN3,=X'0101' ROW:=01,COL:=01«, t00=0x000e, t01=0x00de}
0x16e4…16f2 Head {h00=0x000a, h01=0x0050, text=»REA758«, t00=0x000e, t01=0x010a}
0x16f2…1724 Head {h00=0x002e, h01=0x0050, text=» DSC SYSL,6,LBIN3 SET CURSOR ON LAST LINE «, t00=0x000e, t01=0x0118}
0x1724…1750 Head {h00=0x0028, h01=0x0050, text=» DSC SYSL,2,TB7BIN1 ERASE LAST LINE «, t00=0x000e, t01=0x014a}
0x1750…1776 Head {h00=0x0022, h01=0x0050, text=» B REA730 SET CURSOR AND READ «, t00=0x000e, t01=0x0176}
0x1776…1780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x000c}
0x1780…178e Head {h00=0x000a, h01=0x0050, text=»REA759«, t00=0x000f, t01=0x0016}
0x178e…17b2 Head {h00=0x0020, h01=0x0050, text=» PERF DETPRT DETACH PRINTER «, t00=0x000f, t01=0x0024}
0x17b2…17cc Head {h00=0x0016, h01=0x0050, text=» MOVE LBIN4,=W'34'«, t00=0x000f, t01=0x0048}
0x17cc…17de Head {h00=0x000e, h01=0x0050, text=» B REA980 «, t00=0x000f, t01=0x0062}
0x17de…17e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0074}
0x17e8…1804 Head {h00=0x0018, h01=0x0050, text=»REA760 DUPLICATION«, t00=0x000f, t01=0x007e}
0x1804…1832 Head {h00=0x002a, h01=0x0050, text=» MOVE LBIN2,W3 INDICATE COMMON EOI-KEY«, t00=0x000f, t01=0x009a}
0x1832…1852 Head {h00=0x001c, h01=0x0050, text=» DUPL LSTR81 DUPLICATION«, t00=0x000f, t01=0x00c8}
0x1852…1872 Head {h00=0x001c, h01=0x0050, text=» BNZ REA762 DUPL ALLOWED«, t00=0x000f, t01=0x00e8}
0x1872…18a4 Head {h00=0x002e, h01=0x0050, text=» UPDFLD 1,LSTR81 UPDATE FIELD AND DISPLAY «, t00=0x000f, t01=0x0108}
0x18a4…18c6 Head {h00=0x001e, h01=0x0050, text=» B REA210 CHECK APPL-VALUE«, t00=0x000f, t01=0x013a}
0x18c6…18d4 Head {h00=0x000a, h01=0x0050, text=»REA762«, t00=0x000f, t01=0x015c}
0x18d4…1904 Head {h00=0x002c, h01=0x0050, text=» MOVE LBIN4,W0 INDICATE ILLEGAL EOI-KEY «, t00=0x000f, t01=0x016a}
0x1904…1926 Head {h00=0x001e, h01=0x0050, text=» B REA980 DUPL NOT ALLOWED«, t00=0x0010, t01=0x000a}
0x1926…1934 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x002c}
0x1934…193e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003a}
0x193e…1956 Head {h00=0x0014, h01=0x0050, text=»* EDIT FIELD «, t00=0x0010, t01=0x0044}
0x1956…1960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x005c}
0x1960…1982 Head {h00=0x001e, h01=0x0050, text=»REA765 EDIT AFTER ERROR «, t00=0x0010, t01=0x0066}
0x1982…199e Head {h00=0x0018, h01=0x0050, text=» CBE LBIN1,W0,REA775«, t00=0x0010, t01=0x0088}
0x199e…19be Head {h00=0x001c, h01=0x0050, text=»REA770 EDIT AFTER TBWD«, t00=0x0010, t01=0x00a4}
0x19be…19d4 Head {h00=0x0012, h01=0x0050, text=» MOVE LBIN1,W1«, t00=0x0010, t01=0x00c4}
0x19d4…19f0 Head {h00=0x0018, h01=0x0050, text=»REA775 NORMAL EDIT«, t00=0x0010, t01=0x00da}
0x19f0…1a10 Head {h00=0x001c, h01=0x0050, text=» GETCTL 1,LBIN3 GET MAXL«, t00=0x0010, t01=0x00f6}
0x1a10…1a2e Head {h00=0x001a, h01=0x0050, text=» CBNE LBIN3,W0,REA780 «, t00=0x0010, t01=0x0116}
0x1a2e…1a56 Head {h00=0x0024, h01=0x0050, text=» EDWRT SCRN,BELL ACOUSTIC ALARM «, t00=0x0010, t01=0x0134}
0x1a56…1a68 Head {h00=0x000e, h01=0x0050, text=» B REA730 «, t00=0x0010, t01=0x015c}
0x1a68…1a76 Head {h00=0x000a, h01=0x0050, text=»REA780«, t00=0x0010, t01=0x016e}
0x1a76…1a8a Head {h00=0x0010, h01=0x0050, text=» PERF STPBLK«, t00=0x0010, t01=0x017c}
0x1a8a…1ab0 Head {h00=0x0022, h01=0x0050, text=» EDFLD LSTR81,KEYT3,LBIN1, C «, t00=0x0010, t01=0x0190}
0x1ab0…1ac6 Head {h00=0x0012, h01=0x0050, text=» LBIN2,LBIN4 «, t00=0x0011, t01=0x0026}
0x1ac6…1ade Head {h00=0x0014, h01=0x0050, text=» BL REA970 ERROR«, t00=0x0011, t01=0x003c}
0x1ade…1b14 Head {h00=0x0032, h01=0x0050, text=» CBNG LBIN2,W0,REA994 POWER OFF OR KEY SWITCH «, t00=0x0011, t01=0x0054}
0x1b14…1b3a Head {h00=0x0022, h01=0x0050, text=» B REA120 CONTINUE AS FOR DYKI«, t00=0x0011, t01=0x008a}
0x1b3a…1b48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00b0}
0x1b48…1b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00be}
0x1b52…1b68 Head {h00=0x0012, h01=0x0050, text=»* ENTER KEY«, t00=0x0011, t01=0x00c8}
0x1b68…1b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00de}
0x1b72…1b80 Head {h00=0x000a, h01=0x0050, text=»REA790«, t00=0x0011, t01=0x00e8}
0x1b80…1bb0 Head {h00=0x002c, h01=0x0050, text=» MOVE LBIN4,W5 INDICATE COMP.FIELD FOUND«, t00=0x0011, t01=0x00f6}
0x1bb0…1bdc Head {h00=0x0028, h01=0x0050, text=» MOVE LBIN1,W0 INDICATE NO CLEARING «, t00=0x0011, t01=0x0126}
0x1bdc…1c0a Head {h00=0x002a, h01=0x0050, text=» MOVE LBIN2,W0 SET INDEX TO LAST FIELD«, t00=0x0011, t01=0x0152}
0x1c0a…1c1e Head {h00=0x0010, h01=0x0050, text=» IN FORMAT«, t00=0x0011, t01=0x0180}
0x1c1e…1c5a (18, 0, 400) Head {h00=0x0038, h01=0x0050, text=» GETFLD 0,LBIN2,LBIN3 SEARCH FOR EMPTY COMP. FIELDS «, t00=0x0012, t01=0x0004}
0x1c5a…1c86 Head {h00=0x0028, h01=0x0050, text=» BOFL REA796 EMPTY COMP. FIELD FOUND«, t00=0x0012, t01=0x0040}
0x1c86…1cae Head {h00=0x0024, h01=0x0050, text=» TSTCTL 2 LAST FIELD COMPULSORY?«, t00=0x0012, t01=0x006c}
0x1cae…1cd2 Head {h00=0x0020, h01=0x0050, text=» BZ REA991 NO! END OF FORMAT«, t00=0x0012, t01=0x0094}
0x1cd2…1cf6 Head {h00=0x0020, h01=0x0050, text=» CALL EMPTYT,:FMTITEM EMPTY?«, t00=0x0012, t01=0x00b8}
0x1cf6…1d14 Head {h00=0x001a, h01=0x0050, text=» BOK REA991 NO! =>EOF «, t00=0x0012, t01=0x00dc}
0x1d14…1d1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fa}
0x1d1e…1d48 Head {h00=0x0026, h01=0x0050, text=»* EMPTY COMPULSORY FIELD FOUND «, t00=0x0012, t01=0x0104}
0x1d48…1d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x012e}
0x1d52…1d60 Head {h00=0x000a, h01=0x0050, text=»REA796«, t00=0x0012, t01=0x0138}
0x1d60…1d96 Head {h00=0x0032, h01=0x0050, text=» GETFLD 0,LBIN3,LBIN2 GET THE COMPULSORY FIELD«, t00=0x0012, t01=0x0146}
0x1d96…1da8 Head {h00=0x000e, h01=0x0050, text=» B REA980 «, t00=0x0012, t01=0x017c}
0x1da8…1db6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x018e}
0x1db6…1dc4 Head {h00=0x000a, h01=0x0050, text=»REA970«, t00=0x0013, t01=0x000c}
0x1dc4…1dee Head {h00=0x0026, h01=0x0050, text=» CBE LBIN2,W12,REA775 JUMP IF EDIT«, t00=0x0013, t01=0x001a}
0x1dee…1e18 Head {h00=0x0026, h01=0x0050, text=» CBE LBIN2,W8,REA770 JUMP IF TBWD «, t00=0x0013, t01=0x0044}
0x1e18…1e2c Head {h00=0x0010, h01=0x0050, text=» PERF STABLK«, t00=0x0013, t01=0x006e}
0x1e2c…1e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0082}
0x1e36…1e52 Head {h00=0x0018, h01=0x0050, text=»* ERROR HANDLING «, t00=0x0013, t01=0x008c}
0x1e52…1e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a8}
0x1e5c…1e6a Head {h00=0x000a, h01=0x0050, text=»REA980«, t00=0x0013, t01=0x00b2}
0x1e6a…1ea6 Head {h00=0x0038, h01=0x0050, text=» PERF WSMERR,KEYT4,MSGCOL ***(ERROR-)MESSAGE ROUTINE«, t00=0x0013, t01=0x00c0}
0x1ea6…1ed0 Head {h00=0x0026, h01=0x0050, text=» IB LBIN2,REA730,REA999, CLR,CAN C«, t00=0x0013, t01=0x00fc}
0x1ed0…1ef0 Head {h00=0x001c, h01=0x0050, text=» REA999,REA775 RET,CFW «, t00=0x0013, t01=0x0126}
0x1ef0…1f0c Head {h00=0x0018, h01=0x0050, text=» B REA994 POWER OFF «, t00=0x0013, t01=0x0146}
0x1f0c…1f1a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0162}
0x1f1a…1f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0170}
0x1f24…1f44 Head {h00=0x001c, h01=0x0050, text=»* NORMAL END OF ITEM «, t00=0x0013, t01=0x017a}
0x1f44…1f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x000a}
0x1f4e…1f5c Head {h00=0x000a, h01=0x0050, text=»REA990«, t00=0x0014, t01=0x0014}
0x1f5c…1f76 Head {h00=0x0016, h01=0x0050, text=» MOVE LBIN2,W0 OK «, t00=0x0014, t01=0x0022}
0x1f76…1f88 Head {h00=0x000e, h01=0x0050, text=» B REA999 «, t00=0x0014, t01=0x003c}
0x1f88…1f92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x004e}
0x1f92…1fb2 Head {h00=0x001c, h01=0x0050, text=»* END OF FORMAT FOUND«, t00=0x0014, t01=0x0058}
0x1fb2…1fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0078}
0x1fbc…1fca Head {h00=0x000a, h01=0x0050, text=»REA991«, t00=0x0014, t01=0x0082}
0x1fca…1fe4 Head {h00=0x0016, h01=0x0050, text=» MOVE LBIN2,W1 EOF«, t00=0x0014, t01=0x0090}
0x1fe4…1ff6 Head {h00=0x000e, h01=0x0050, text=» B REA999 «, t00=0x0014, t01=0x00aa}
0x1ff6…2000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00bc}
0x2000…201a Head {h00=0x0016, h01=0x0050, text=»* CANCEL RETUR «, t00=0x0014, t01=0x00c6}
0x201a…2024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e0}
0x2024…2032 Head {h00=0x000a, h01=0x0050, text=»REA993«, t00=0x0014, t01=0x00ea}
0x2032…205a Head {h00=0x0024, h01=0x0050, text=» GETABX LBIN4 GET CURRENT INDEX «, t00=0x0014, t01=0x00f8}
0x205a…2080 Head {h00=0x0022, h01=0x0050, text=» CALL EMPTYT,:FMTITEM EMPTY ? «, t00=0x0014, t01=0x0120}
0x2080…2098 Head {h00=0x0014, h01=0x0050, text=» BNOK REA993A NO«, t00=0x0014, t01=0x0146}
0x2098…20c4 Head {h00=0x0028, h01=0x0050, text=» ERASE 3,LBIN4,LBIN4 ERASE ON SCREEN«, t00=0x0014, t01=0x015e}
0x20c4…20d6 Head {h00=0x000e, h01=0x0050, text=» B REA993B«, t00=0x0014, t01=0x018a}
0x20d6…20fa Head {h00=0x0020, h01=0x0050, text=»REA993A MOVE :FMTITEM,LSTR81«, t00=0x0015, t01=0x000c}
0x20fa…2132 Head {h00=0x0034, h01=0x0050, text=» ERASE 13,LBIN4,LBIN4 ERASE SCREEN AND DATA ITEM«, t00=0x0015, t01=0x0030}
0x2132…2142 Head {h00=0x000c, h01=0x0050, text=»REA993B «, t00=0x0015, t01=0x0068}
0x2142…2168 Head {h00=0x0022, h01=0x0050, text=» SUB LBIN2,W2 ADJUST KEYINDEX «, t00=0x0015, t01=0x0078}
0x2168…217a Head {h00=0x000e, h01=0x0050, text=» B REA999 «, t00=0x0015, t01=0x009e}
0x217a…2184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b0}
0x2184…219a Head {h00=0x0012, h01=0x0050, text=»* POWER OFF«, t00=0x0015, t01=0x00ba}
0x219a…21a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d0}
0x21a4…21b2 Head {h00=0x000a, h01=0x0050, text=»REA994«, t00=0x0015, t01=0x00da}
0x21b2…21c8 Head {h00=0x0012, h01=0x0050, text=» MOVE LBIN2,W4«, t00=0x0015, t01=0x00e8}
0x21c8…21da Head {h00=0x000e, h01=0x0050, text=» B REA999 «, t00=0x0015, t01=0x00fe}
0x21da…21e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0110}
0x21e4…21f6 Head {h00=0x000e, h01=0x0050, text=»* EXIT «, t00=0x0015, t01=0x011a}
0x21f6…2200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x012c}
0x2200…220e Head {h00=0x000a, h01=0x0050, text=»REA999«, t00=0x0015, t01=0x0136}
0x220e…221a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0144}
0x221a…2228 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x0150}
0x2228…2236 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x015e}
0x2236…2240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x016c}
0x2240…2278 Head {h00=0x0034, h01=0x0050, text=»* STPBLK => PUT'S CURSOR ON AND STOP'S BLOCKING«, t00=0x0015, t01=0x0176}
0x2278…2282 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x001e}
0x2282…2296 Head {h00=0x0010, h01=0x0050, text=»STPBLK PROC «, t00=0x0016, t01=0x0028}
0x2296…22be Head {h00=0x0024, h01=0x0050, text=» MOVE VD82CW,=X'0080' CURSOR ON «, t00=0x0016, t01=0x003c}
0x22be…22dc Head {h00=0x001a, h01=0x0050, text=» DSC SCRN,X'11',VD82CW«, t00=0x0016, t01=0x0064}
0x22dc…2304 Head {h00=0x0024, h01=0x0050, text=» DSC SCRN,STOPBLK STOP BLOCKING «, t00=0x0016, t01=0x0082}
0x2304…2310 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00aa}
0x2310…231e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x00b6}
0x231e…2328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00c4}
0x2328…2364 Head {h00=0x0038, h01=0x0050, text=»* STABLK => START'S BLOCKING AND TURNS CURSOR OFF «, t00=0x0016, t01=0x00ce}
0x2364…236e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x010a}
0x236e…2382 Head {h00=0x0010, h01=0x0050, text=»STABLK PROC «, t00=0x0016, t01=0x0114}
0x2382…23ac Head {h00=0x0026, h01=0x0050, text=» DSC SCRN,STARTBLK START BLOCKING «, t00=0x0016, t01=0x0128}
0x23ac…23dc Head {h00=0x002c, h01=0x0050, text=» MOVE VD82CW,=X'01C0' DISCONNECT CURSOR «, t00=0x0016, t01=0x0152}
0x23dc…23fa Head {h00=0x001a, h01=0x0050, text=» DSC SCRN,X'11',VD82CW«, t00=0x0016, t01=0x0182}
0x23fa…2428 Head {h00=0x002a, h01=0x0050, text=» MOVE VD82CW,=X'0180' INVISIBLE CURSOR«, t00=0x0017, t01=0x0010}
0x2428…2446 Head {h00=0x001a, h01=0x0050, text=» DSC SCRN,X'11',VD82CW«, t00=0x0017, t01=0x003e}
0x2446…2452 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x005c}
0x2452…2460 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x0068}
0x2460…246e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0076}
0x246e…2480 Head {h00=0x000e, h01=0x0050, text=»BELL FRMT «, t00=0x0017, t01=0x0084}
0x2480…248c Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0017, t01=0x0096}
0x248c…24a2 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0017, t01=0x00a2}
0x24a2…24b0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0017, t01=0x00b8}
0x24b0…24ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c6}
0x24ba…24d8 Head {h00=0x001a, h01=0x0050, text=»* FORM-FEED FORMAT«, t00=0x0017, t01=0x00d0}
0x24d8…24e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ee}
0x24e2…24f4 Head {h00=0x000e, h01=0x0050, text=»FORMF FRMT«, t00=0x0017, t01=0x00f8}
0x24f4…2508 Head {h00=0x0010, h01=0x0050, text=» FTEXT ' 1' «, t00=0x0017, t01=0x010a}
0x2508…2516 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0017, t01=0x011e}
0x2516…2522 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0017, t01=0x012c}
0x2522…2526 Head {h00=0x4004, h01=0x0000}
0x2526…252a 00 17 01 38 ┆ 8┆
0x252a…2532 (24, 1, 8) 20 04 00 00 00 18 00 04 ┆ ┆
0x2532…2580 (25, 2, 7260) 5c 31 3a 53 54 20 26 20 4c 41 53 54 2b 31 20 4c 49 4e 45 20 53 48 4f 57 4e 0d 45 0d 46 46 45 52 20 4c 41 59 4f 55 54 0d 43 45 20 4e 55 4d 42 45 52 0d 41 4d 45 54 45 52 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ 1:ST & LAST+1 LINE SHOWN E FFER LAYOUT CE NUMBER AMETERS ┆
0x2580…25d0 53 53 3a 43 46 58 5c 45 51 55 5c 53 53 3a 4c 49 4e 2b 34 5c 43 55 52 52 45 4e 54 20 44 59 4e 41 4d 49 43 20 46 49 45 4c 44 20 49 4e 44 45 58 0d 0d 4e 54 53 0d 41 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆SS:CFX EQU SS:LIN+4 CURRENT DYNAMIC FIELD INDEX NTS A ┆
0x25d0…2620 53 53 3a 53 45 43 5c 45 51 55 5c 53 53 3a 43 46 58 2b 32 5c 53 45 43 54 49 4f 4e 20 4e 41 4d 45 0d 4f 43 4b 20 42 55 46 46 45 52 0d 2c 20 3d 31 20 49 46 20 4e 4f 0d 4e 45 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆SS:SEC EQU SS:CFX+2 SECTION NAME OCK BUFFER , =1 IF NO NE ┆
0x2620…2670 53 53 3a 4c 45 4e 5c 45 51 55 5c 53 53 3a 53 45 43 2b 36 5c 4c 45 4e 47 54 48 20 4f 46 20 53 53 54 20 45 4c 45 4d 45 4e 54 0d 55 45 4e 43 45 20 4e 4f 2e 0d 4e 54 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆SS:LEN EQU SS:SEC+6 LENGTH OF SST ELEMENT UENCE NO. NTS ┆
0x2670…26c0 0d 53 3a 4c 49 4e 5c 45 51 55 5c 53 53 3a 53 53 2b 32 5c 28 53 55 42 2d 29 53 43 52 45 45 4e 20 53 54 41 52 54 20 4c 49 4e 45 20 26 20 4e 4f 2e 20 4f 46 20 4c 49 4e 45 53 0d 53 0d 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ S:LIN EQU SS:SS+2 (SUB-)SCREEN START LINE & NO. OF LINES S ┆
0x26c0…2710 00 00 00 00 00 00 00 00 00 36 0d 5c 5c 31 3a 53 54 20 26 20 4c 41 53 54 2b 31 20 4c 49 4e 45 20 53 48 4f 57 4e 0d 45 0d 46 46 45 52 20 4c 41 59 4f 55 54 0d 43 45 20 4e 55 4d 42 45 52 0d 41 4d 45 54 45 52 53 0d 00 00 00 00 00 00 00 00 00 00 ┆ 6 1:ST & LAST+1 LINE SHOWN E FFER LAYOUT CE NUMBER AMETERS ┆
0x2710…2760 00 00 00 00 00 00 00 00 00 00 2a 2a 0d 43 46 58 5c 45 51 55 5c 53 53 3a 4c 49 4e 2b 34 5c 43 55 52 52 45 4e 54 20 44 59 4e 41 4d 49 43 20 46 49 45 4c 44 20 49 4e 44 45 58 0d 0d 4e 54 53 0d 41 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ** CFX EQU SS:LIN+4 CURRENT DYNAMIC FIELD INDEX NTS A ┆
0x2760…27b0 00 00 00 00 00 00 00 00 00 00 2a 2a 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 53 20 49 4e 20 57 53 4d 20 57 4f 52 4b 20 49 54 45 4d 53 20 4f 56 45 52 48 45 41 44 0d 2c 20 3d 31 20 49 46 20 4e 4f 0d 4e 45 0d 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ** DISPLACEMENTS IN WSM WORK ITEMS OVERHEAD , =1 IF NO NE ┆
0x27b0…2800 00 00 00 00 00 00 00 00 00 00 2a 2a 0d 4c 45 4e 5c 45 51 55 5c 53 53 3a 53 45 43 2b 36 5c 4c 45 4e 47 54 48 20 4f 46 20 53 53 54 20 45 4c 45 4d 45 4e 54 0d 55 45 4e 43 45 20 4e 4f 2e 0d 4e 54 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ** LEN EQU SS:SEC+6 LENGTH OF SST ELEMENT UENCE NO. NTS ┆
0x2800…2850 00 00 00 00 00 00 00 00 00 00 0d 53 3a 4c 49 4e 5c 45 51 55 5c 53 53 3a 53 53 2b 32 5c 28 53 55 42 2d 29 53 43 52 45 45 4e 20 53 54 41 52 54 20 4c 49 4e 45 20 26 20 4e 4f 2e 20 4f 46 20 4c 49 4e 45 53 0d 53 0d 0d 00 00 00 00 00 00 00 00 00 ┆ S:LIN EQU SS:SS+2 (SUB-)SCREEN START LINE & NO. OF LINES S ┆
0x2850…28a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 36 57 57 49 3a 4e 46 5c 45 51 55 5c 30 5c 4e 4f 20 4f 46 20 46 41 53 54 20 43 48 4f 49 53 45 20 53 45 43 54 49 4f 4e 20 57 57 49 3a 53 0d 4e 55 4d 42 45 52 0d 41 4d 45 54 45 52 53 0d ┆ 6WWI:NF EQU 0 NO OF FAST CHOISE SECTION WWI:S NUMBER AMETERS ┆
0x28a0…28f0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 4c 46 5c 45 51 55 5c 57 57 49 3a 4e 46 2b 31 5c 4c 45 4e 47 54 48 20 4f 46 20 4f 4e 45 20 46 41 53 54 20 43 48 4f 49 53 45 20 53 45 43 54 20 57 57 49 0d 00 00 00 00 00 ┆ WWI:LF EQU WWI:NF+1 LENGTH OF ONE FAST CHOISE SECT WWI ┆
0x28f0…2940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 4e 4e 5c 45 51 55 5c 57 57 49 3a 4c 46 2b 31 5c 4e 4f 20 4f 46 20 4e 55 4d 45 52 49 43 20 57 57 49 3a 53 0d 45 41 44 0d 2c 20 3d 31 20 49 46 20 4e 4f 0d 4e 45 0d 00 00 ┆ WWI:NN EQU WWI:LF+1 NO OF NUMERIC WWI:S EAD , =1 IF NO NE ┆
0x2940…2990 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 4c 4e 5c 45 51 55 5c 57 57 49 3a 4e 4e 2b 31 5c 4c 45 4e 47 54 48 20 4f 46 20 4f 4e 45 20 4e 55 4d 45 52 49 43 20 57 57 49 0d 45 20 4e 4f 2e 0d 4e 54 53 0d 00 00 00 00 ┆ WWI:LN EQU WWI:NN+1 LENGTH OF ONE NUMERIC WWI E NO. NTS ┆
0x2990…29e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 41 4e 5c 45 51 55 5c 57 57 49 3a 4c 4e 2b 31 5c 41 44 44 52 45 53 53 20 54 4f 20 46 49 52 53 54 20 4e 55 4d 45 52 49 43 20 57 57 49 0d 4f 46 20 4c 49 4e 45 53 0d 53 0d ┆ WWI:AN EQU WWI:LN+1 ADDRESS TO FIRST NUMERIC WWI OF LINES S ┆
0x29e0…2a30 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 36 57 57 49 3a 4e 41 5c 45 51 55 5c 57 57 49 3a 41 4e 2b 32 5c 4e 4f 20 4f 46 20 41 4c 50 48 41 4e 55 4d 45 52 49 43 20 57 57 49 3a 53 0d 4e 55 4d 42 45 ┆ 6WWI:NA EQU WWI:AN+2 NO OF ALPHANUMERIC WWI:S NUMBE┆
0x2a30…2a80 52 0d 41 4d 45 54 45 52 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 4c 41 5c 45 51 55 5c 57 57 49 3a 4e 41 2b 31 5c 4c 45 4e 47 54 48 20 4f 46 20 4f 4e 45 20 41 4c 50 48 41 4e 55 4d 45 52 49 43 20 57 57 49 ┆R AMETERS WWI:LA EQU WWI:NA+1 LENGTH OF ONE ALPHANUMERIC WWI┆
0x2a80…2ad0 0d 57 57 49 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 41 41 5c 45 51 55 5c 57 57 49 3a 4c 41 2b 31 5c 41 44 44 52 45 53 53 20 54 4f 20 46 49 52 53 54 20 41 4c 50 48 41 4e 55 4d 45 52 49 43 20 ┆ WWI WWI:AA EQU WWI:LA+1 ADDRESS TO FIRST ALPHANUMERIC ┆
0x2ad0…2b20 57 57 49 0d 0d 4e 45 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 57 49 3a 4c 4f 5c 45 51 55 5c 57 57 49 3a 41 41 2b 32 5c 4c 45 4e 47 54 48 20 4f 46 20 57 57 49 20 4f 56 45 52 48 45 41 44 0d 57 49 0d 45 20 4e 4f ┆WWI NE WWI:LO EQU WWI:AA+2 LENGTH OF WWI OVERHEAD WI E NO┆
0x2b20…2b70 2e 0d 4e 54 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 45 4a 45 43 54 0d 45 51 55 5c 57 57 49 3a 4c 4e 2b 31 5c 41 44 44 52 45 53 53 20 54 4f 20 46 49 52 53 54 20 4e 55 4d 45 52 49 43 20 57 57 49 0d 4f ┆. NTS EJECT EQU WWI:LN+1 ADDRESS TO FIRST NUMERIC WWI O┆
0x2b70…2bc0 46 20 4c 49 4e 45 53 0d 53 0d 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 36 0d 57 49 3a 4e 41 5c 45 51 55 5c 57 57 49 3a 41 4e 2b 32 5c 4e 4f 20 4f 46 20 41 4c 50 48 41 4e 55 4d 45 52 49 43 20 57 ┆F LINES S 6 WI:NA EQU WWI:AN+2 NO OF ALPHANUMERIC W┆
0x2bc0…2c10 57 49 3a 53 0d 4e 55 4d 42 45 52 0d 41 4d 45 54 45 52 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 2a 0d 3a 4c 41 5c 45 51 55 5c 57 57 49 3a 4e 41 2b 31 5c 4c 45 4e 47 54 48 20 4f 46 20 4f 4e 45 20 41 4c 50 48 41 4e ┆WI:S NUMBER AMETERS ** :LA EQU WWI:NA+1 LENGTH OF ONE ALPHAN┆
0x2c10…2c60 55 4d 45 52 49 43 20 57 57 49 0d 57 57 49 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 2a 20 20 46 4f 52 4d 41 54 20 44 45 46 49 4e 49 54 49 4f 4e 20 43 4f 44 45 0d 20 54 4f 20 46 49 52 53 54 20 41 4c 50 ┆UMERIC WWI WWI ** FORMAT DEFINITION CODE TO FIRST ALP┆
0x2c60…2cb0 48 41 4e 55 4d 45 52 49 43 20 57 57 49 0d 0d 4e 45 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 2a 0d 3a 4c 4f 5c 45 51 55 5c 57 57 49 3a 41 41 2b 32 5c 4c 45 4e 47 54 48 20 4f 46 20 57 57 49 20 4f 56 45 52 48 45 ┆HANUMERIC WWI NE ** :LO EQU WWI:AA+2 LENGTH OF WWI OVERHE┆
0x2cb0…2d00 41 44 0d 57 49 0d 45 20 4e 4f 2e 0d 4e 54 53 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0d 45 4a 45 43 54 0d 45 51 55 5c 57 57 49 3a 4c 4e 2b 31 5c 41 44 44 52 45 53 53 20 54 4f 20 46 49 52 53 54 20 4e 55 4d ┆AD WI E NO. NTS EJECT EQU WWI:LN+1 ADDRESS TO FIRST NUM┆
0x2d00…2d50 45 52 49 43 20 57 57 49 0d 4f 46 20 4c 49 4e 45 53 0d 53 0d 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 36 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ERIC WWI OF LINES S 6 ┆
0x2d50…2da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x2e90…2ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 36 00 02 06 d8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ 6 ┆
0x2ee0…2f30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x3020…3070 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 36 01 90 00 06 00 50 2a 20 00 00 ┆ 6 P* ┆
0x3070…30c0 00 04 00 16 00 50 2a 20 20 20 20 57 53 4d 20 4b 45 59 2d 43 4f 44 45 53 00 00 00 0e 00 06 00 50 2a 20 00 00 00 28 00 1c 00 50 42 53 50 5c 45 51 55 5c 58 27 30 38 27 5c 42 41 43 4b 53 50 41 43 45 20 00 00 00 32 00 18 00 50 43 4c 52 5c 45 51 ┆ P* WSM KEY-CODES P* ( PBSP EQU X'08' BACKSPACE 2 PCLR EQ┆
0x30c0…3110 55 5c 58 27 38 46 27 5c 43 4c 45 41 52 20 00 00 00 52 00 24 00 50 53 4b 50 5c 45 51 55 5c 58 27 30 35 27 5c 53 4b 49 50 20 52 45 53 54 20 4f 46 20 46 49 45 4c 44 00 00 00 6e 00 18 00 50 43 41 4e 5c 45 51 55 5c 58 27 39 31 27 5c 43 41 4e 43 ┆U X'8F' CLEAR R $ PSKP EQU X'05' SKIP REST OF FIELD n PCAN EQU X'91' CANC┆
0x3110…3160 45 4c 00 00 00 96 00 18 00 50 52 45 54 5c 45 51 55 5c 58 27 39 39 27 5c 52 45 54 55 52 20 00 00 00 b2 00 2a 00 50 50 4c 53 5c 45 51 55 5c 58 27 38 43 27 5c 50 4c 55 53 20 2b 20 2c 45 2d 4f 2d 49 20 2c 46 4f 52 57 2d 54 41 42 20 00 00 00 ce ┆EL PRET EQU X'99' RETUR * PPLS EQU X'8C' PLUS + ,E-O-I ,FORW-TAB ┆
0x3160…31b0 00 1a 00 50 4d 49 4e 5c 45 51 55 5c 58 27 32 44 27 5c 4d 49 4e 55 53 20 2d 20 00 00 00 fc 00 1a 00 50 42 54 42 5c 45 51 55 5c 58 27 38 42 27 5c 42 41 43 4b 54 41 42 20 00 00 01 1a 00 18 00 50 4e 4f 4b 5c 45 51 55 5c 58 27 45 45 27 5c 4e 4f ┆ PMIN EQU X'2D' MINUS - PBTB EQU X'8B' BACKTAB PNOK EQU X'EE' NO┆
0x31b0…3200 20 4b 45 59 00 00 01 38 00 18 00 50 50 52 54 5c 45 51 55 5c 58 27 39 38 27 5c 50 52 49 4e 54 20 00 00 01 54 00 1c 00 50 44 55 50 5c 45 51 55 5c 58 27 39 30 27 5c 44 55 50 4c 49 43 41 54 45 20 00 00 01 70 00 20 00 50 01 35 01 90 43 46 00 36 ┆ KEY 8 PPRT EQU X'98' PRINT T PDUP EQU X'90' DUPLICATE p P 5 CF 6┆
0x3200…3250 01 90 43 46 57 5c 45 51 55 5c 58 27 31 30 27 5c 43 55 52 53 4f 52 20 46 4f 52 57 41 52 44 00 00 01 90 00 18 00 50 45 4e 54 5c 45 51 55 5c 58 27 38 30 27 5c 45 4e 54 45 52 20 00 01 00 24 00 22 00 50 43 42 57 5c 45 51 55 5c 58 27 30 39 27 5c ┆ CFW EQU X'10' CURSOR FORWARD PENT EQU X'80' ENTER $ " PCBW EQU X'09' ┆
0x3250…32a0 43 55 52 53 4f 52 20 42 41 43 4b 57 41 52 44 20 00 01 00 40 00 18 00 50 49 4e 53 5c 45 51 55 5c 58 27 30 46 27 5c 49 4e 53 45 52 54 00 01 00 66 00 18 00 50 44 45 4c 5c 45 51 55 5c 58 27 30 45 27 5c 44 45 4c 45 54 45 00 01 00 82 00 20 00 50 ┆CURSOR BACKWARD @ PINS EQU X'0F' INSERT f PDEL EQU X'0E' DELETE P┆
0x32a0…32f0 43 55 50 5c 45 51 55 5c 58 27 38 38 27 5c 43 55 52 53 4f 52 20 55 50 57 41 52 44 20 00 01 00 9e 00 22 00 50 43 44 4e 5c 45 51 55 5c 58 27 38 32 27 5c 43 55 52 53 4f 52 20 44 4f 57 4e 57 41 52 44 20 00 01 00 c2 00 16 00 50 4c 49 4e 5c 45 51 ┆CUP EQU X'88' CURSOR UPWARD " PCDN EQU X'82' CURSOR DOWNWARD PLIN EQ┆
0x32f0…3340 55 5c 58 27 38 31 27 5c 4c 49 4e 45 00 01 00 e8 00 16 00 50 41 4c 4c 5c 45 51 55 5c 58 27 30 33 27 5c 41 4c 4c 20 00 01 01 02 00 28 00 50 53 44 53 5c 45 51 55 5c 58 27 39 32 27 5c 53 54 41 54 49 43 2f 44 59 4e 41 4d 49 43 2d 53 57 49 54 43 ┆U X'81' LINE PALL EQU X'03' ALL ( PSDS EQU X'92' STATIC/DYNAMIC-SWITC┆
0x3340…3390 48 20 00 01 01 1c 00 1a 00 50 46 4e 43 5c 45 51 55 5c 58 27 39 33 27 5c 46 55 4e 43 54 49 4f 4e 00 01 01 48 00 16 00 50 43 52 4c 5c 45 51 55 5c 58 27 30 44 27 5c 43 52 4c 46 00 01 01 66 00 20 00 50 48 47 48 5c 45 51 55 5c 58 27 34 38 27 5c ┆H PFNC EQU X'93' FUNCTION H PCRL EQU X'0D' CRLF f PHGH EQU X'48' ┆
0x3390…33e0 48 49 01 35 40 ee 47 48 00 36 40 ee 47 48 20 49 4e 54 45 4e 53 49 54 59 00 01 01 80 00 20 00 50 55 4c 4e 5c 45 51 55 5c 58 27 35 35 27 5c 55 4e 44 45 52 4c 49 4e 45 20 27 55 27 20 00 02 00 14 00 24 00 50 52 56 53 5c 45 51 55 5c 58 27 35 32 ┆HI 5@ GH 6@ GH INTENSITY PULN EQU X'55' UNDERLINE 'U' $ PRVS EQU X'52┆
0x33e0…3430 27 5c 52 45 56 45 52 53 45 44 20 49 4d 41 47 45 20 27 52 27 00 02 00 38 00 1e 00 50 42 4c 4e 5c 45 51 55 5c 58 27 34 32 27 5c 42 4c 49 4e 4b 49 4e 47 20 27 42 27 00 02 00 60 00 16 00 50 48 4c 50 5c 45 51 55 5c 58 27 39 34 27 5c 48 45 4c 50 ┆' REVERSED IMAGE 'R' 8 PBLN EQU X'42' BLINKING 'B' ` PHLP EQU X'94' HELP┆
0x3430…3480 00 02 00 82 00 1e 00 50 53 50 43 5c 45 51 55 5c 58 27 32 30 27 5c 53 50 41 43 45 20 41 53 20 45 4f 49 00 02 00 9c 00 28 00 50 4f 56 45 5c 45 51 55 5c 58 27 38 44 27 5c 3c 4f 56 45 3e 3a 3d 4d 55 4c 54 49 50 4c 45 20 45 4e 54 45 52 20 00 02 ┆ PSPC EQU X'20' SPACE AS EOI ( POVE EQU X'8D' <OVE>:=MULTIPLE ENTER ┆
0x3480…34d0 00 be 40 04 00 00 00 02 00 ea 55 5c 58 27 38 31 27 5c 4c 49 4e 45 00 01 00 e8 00 16 00 50 41 4c 4c 5c 45 51 55 5c 58 27 30 33 27 5c 41 4c 4c 20 00 01 01 02 00 28 00 50 53 44 53 5c 45 51 55 5c 58 27 39 32 27 5c 53 54 41 54 49 43 2f 44 59 4e ┆ @ U X'81' LINE PALL EQU X'03' ALL ( PSDS EQU X'92' STATIC/DYN┆
0x34d0…3520 41 4d 49 43 2d 53 57 49 54 43 48 20 00 01 01 1c 00 1a 00 50 46 4e 43 5c 45 51 55 5c 58 27 39 33 27 5c 46 55 4e 43 54 49 4f 4e 00 01 01 48 00 16 00 50 43 52 4c 5c 45 51 55 5c 58 27 30 44 27 5c 43 52 4c 46 00 01 01 66 00 20 00 50 48 47 48 5c ┆AMIC-SWITCH PFNC EQU X'93' FUNCTION H PCRL EQU X'0D' CRLF f PHGH ┆
0x3520…3526 45 51 55 5c 58 27 ┆EQU X'┆
0x3526…6d98 […elided…]
0x6d98…6db0 2d 54 41 42 20 00 00 00 ce 00 1a 00 50 4d 49 4e 5c 45 51 55 5c 58 27 32 ┆-TAB PMIN EQU X'2┆
0x6db0…6e00 44 27 5c 4d 49 4e 55 53 20 2d 20 00 00 00 fc 00 1a 00 50 42 54 42 5c 45 51 55 5c 58 27 38 42 27 5c 42 41 43 4b 54 41 42 20 00 00 01 1a 00 18 00 50 4e 4f 4b 5c 45 51 55 5c 58 27 45 45 27 5c 4e 4f 20 4b 45 59 00 00 01 38 00 18 00 50 50 52 54 ┆D' MINUS - PBTB EQU X'8B' BACKTAB PNOK EQU X'EE' NO KEY 8 PPRT┆
0x6e00…6e50 5c 45 51 55 5c 58 27 39 38 27 5c 50 52 49 4e 54 20 00 00 01 54 00 1c 00 50 44 55 50 5c 45 51 55 5c 58 27 39 30 27 5c 44 55 50 4c 49 43 41 54 45 20 00 00 01 70 00 20 00 50 01 35 01 90 43 46 00 36 01 90 43 46 57 5c 45 51 55 5c 58 27 31 30 27 ┆ EQU X'98' PRINT T PDUP EQU X'90' DUPLICATE p P 5 CF 6 CFW EQU X'10'┆
0x6e50…6ea0 5c 43 55 52 53 4f 52 20 46 4f 52 57 41 52 44 00 00 01 90 00 18 00 50 45 4e 54 5c 45 51 55 5c 58 27 38 30 27 5c 45 4e 54 45 52 20 00 01 00 24 00 22 00 50 43 42 57 5c 45 51 55 5c 58 27 30 39 27 5c 43 55 52 53 4f 52 20 42 41 43 4b 57 41 52 44 ┆ CURSOR FORWARD PENT EQU X'80' ENTER $ " PCBW EQU X'09' CURSOR BACKWARD┆
0x6ea0…6ef0 20 00 01 00 40 00 18 00 50 49 4e 53 5c 45 51 55 5c 58 27 30 46 27 5c 49 4e 53 45 52 54 00 01 00 66 00 18 00 50 44 45 4c 5c 45 51 55 5c 58 27 30 45 27 5c 44 45 4c 45 54 45 00 01 00 82 00 20 00 50 43 55 50 5c 45 51 55 5c 58 27 38 38 27 5c 43 ┆ @ PINS EQU X'0F' INSERT f PDEL EQU X'0E' DELETE PCUP EQU X'88' C┆
0x6ef0…6f40 55 52 53 4f 52 20 55 50 57 41 52 44 20 00 01 00 9e 00 22 00 50 43 44 4e 5c 45 51 55 5c 58 27 38 32 27 5c 43 55 52 53 4f 52 20 44 4f 57 4e 57 41 52 44 20 00 01 00 c2 00 16 00 50 4c 49 4e 5c 45 51 55 5c 58 27 38 31 27 5c 4c 49 4e 45 00 01 00 ┆URSOR UPWARD " PCDN EQU X'82' CURSOR DOWNWARD PLIN EQU X'81' LINE ┆
0x6f40…6f90 e8 00 16 00 50 41 4c 4c 5c 45 51 55 5c 58 27 30 33 27 5c 41 4c 4c 20 00 01 01 02 00 28 00 50 53 44 53 5c 45 51 55 5c 58 27 39 32 27 5c 53 54 41 54 49 43 2f 44 59 4e 41 4d 49 43 2d 53 57 49 54 43 48 20 00 01 01 1c 00 1a 00 50 46 4e 43 5c 45 ┆ PALL EQU X'03' ALL ( PSDS EQU X'92' STATIC/DYNAMIC-SWITCH PFNC E┆
0x6f90…6fe0 51 55 5c 58 27 39 33 27 5c 46 55 4e 43 54 49 4f 4e 00 01 01 48 00 16 00 50 43 52 4c 5c 45 51 55 5c 58 27 30 44 27 5c 43 52 4c 46 00 01 01 66 00 20 00 50 48 47 48 5c 45 51 55 5c 58 27 34 38 27 5c 48 49 01 35 40 ee 47 48 00 36 40 ee 47 48 20 ┆QU X'93' FUNCTION H PCRL EQU X'0D' CRLF f PHGH EQU X'48' HI 5@ GH 6@ GH ┆
0x6fe0…7030 49 4e 54 45 4e 53 49 54 59 00 01 01 80 00 20 00 50 55 4c 4e 5c 45 51 55 5c 58 27 35 35 27 5c 55 4e 44 45 52 4c 49 4e 45 20 27 55 27 20 00 02 00 14 00 24 00 50 52 56 53 5c 45 51 55 5c 58 27 35 32 27 5c 52 45 56 45 52 53 45 44 20 49 4d 41 47 ┆INTENSITY PULN EQU X'55' UNDERLINE 'U' $ PRVS EQU X'52' REVERSED IMAG┆
0x7030…7080 45 20 27 52 27 00 02 00 38 00 1e 00 50 42 4c 4e 5c 45 51 55 5c 58 27 34 32 27 5c 42 4c 49 4e 4b 49 4e 47 20 27 42 27 00 02 00 60 00 16 00 50 48 4c 50 5c 45 51 55 5c 58 27 39 34 27 5c 48 45 4c 50 00 02 00 82 00 1e 00 50 53 50 43 5c 45 51 55 ┆E 'R' 8 PBLN EQU X'42' BLINKING 'B' ` PHLP EQU X'94' HELP PSPC EQU┆
0x7080…70d0 5c 58 27 32 30 27 5c 53 50 41 43 45 20 41 53 20 45 4f 49 00 02 00 9c 00 28 00 50 4f 56 45 5c 45 51 55 5c 58 27 38 44 27 5c 3c 4f 56 45 3e 3a 3d 4d 55 4c 54 49 50 4c 45 20 45 4e 54 45 52 20 00 02 00 be 40 04 00 00 00 02 00 ea 55 5c 58 27 38 ┆ X'20' SPACE AS EOI ( POVE EQU X'8D' <OVE>:=MULTIPLE ENTER @ U X'8┆
0x70d0…7120 31 27 5c 4c 49 4e 45 00 01 00 e8 00 16 00 50 41 4c 4c 5c 45 51 55 5c 58 27 30 33 27 5c 41 4c 4c 20 00 01 01 02 00 28 00 50 53 44 53 5c 45 51 55 5c 58 27 39 32 27 5c 53 54 41 54 49 43 2f 44 59 4e 41 4d 49 43 2d 53 57 49 54 43 48 20 00 01 01 ┆1' LINE PALL EQU X'03' ALL ( PSDS EQU X'92' STATIC/DYNAMIC-SWITCH ┆
0x7120…7170 1c 00 1a 00 50 46 4e 43 5c 45 51 55 5c 58 27 39 33 27 5c 46 55 4e 43 54 49 4f 4e 00 01 01 48 00 16 00 50 43 52 4c 5c 45 51 55 5c 58 27 30 44 27 5c 43 52 4c 46 00 01 01 66 00 20 00 50 48 47 48 5c 45 51 55 5c 58 27 34 38 27 5c 48 49 01 35 20 ┆ PFNC EQU X'93' FUNCTION H PCRL EQU X'0D' CRLF f PHGH EQU X'48' HI 5 ┆
0x7170…71c0 08 20 04 00 36 20 08 20 04 00 00 00 03 00 04 53 49 54 59 00 01 01 80 00 20 00 50 55 4c 4e 5c 45 51 55 5c 58 27 35 35 27 5c 55 4e 44 45 52 4c 49 4e 45 20 27 55 27 20 00 02 00 14 00 24 00 50 52 56 53 5c 45 51 55 5c 58 27 35 32 27 5c 52 45 56 ┆ 6 SITY PULN EQU X'55' UNDERLINE 'U' $ PRVS EQU X'52' REV┆
0x71c0…7210 45 52 53 45 44 20 49 4d 41 47 45 20 27 52 27 00 02 00 38 00 1e 00 50 42 4c 4e 5c 45 51 55 5c 58 27 34 32 27 5c 42 4c 49 4e 4b 49 4e 47 20 27 42 27 00 02 00 60 00 16 00 50 48 4c 50 5c 45 51 55 5c 58 27 39 34 27 5c 48 45 4c 50 00 02 00 82 00 ┆ERSED IMAGE 'R' 8 PBLN EQU X'42' BLINKING 'B' ` PHLP EQU X'94' HELP ┆
0x7210…7260 1e 00 50 53 50 43 5c 45 51 55 5c 58 27 32 30 27 5c 53 50 41 43 45 20 41 53 20 45 4f 49 00 02 00 9c 00 28 00 50 4f 56 45 5c 45 51 55 5c 58 27 38 44 27 5c 3c 4f 56 45 3e 3a 3d 4d 55 4c 54 49 50 4c 45 20 45 4e 54 45 52 20 00 02 00 be 40 04 00 ┆ PSPC EQU X'20' SPACE AS EOI ( POVE EQU X'8D' <OVE>:=MULTIPLE ENTER @ ┆
0x7260…72b0 00 00 02 00 ea 55 5c 58 27 38 31 27 5c 4c 49 4e 45 00 01 00 e8 00 16 00 50 41 4c 4c 5c 45 51 55 5c 58 27 30 33 27 5c 41 4c 4c 20 00 01 01 02 00 28 00 50 53 44 53 5c 45 51 55 5c 58 27 39 32 27 5c 53 54 41 54 49 43 2f 44 59 4e 41 4d 49 43 2d ┆ U X'81' LINE PALL EQU X'03' ALL ( PSDS EQU X'92' STATIC/DYNAMIC-┆
0x72b0…7300 53 57 49 54 43 48 20 00 01 01 1c 00 1a 00 50 46 4e 43 5c 45 51 55 5c 58 27 39 33 27 5c 46 55 4e 43 54 49 4f 4e 00 01 01 48 00 16 00 50 43 52 4c 5c 45 51 55 5c 58 27 30 44 27 5c 43 52 4c 46 00 01 01 66 00 20 00 50 48 47 48 5c 45 51 55 5c 58 ┆SWITCH PFNC EQU X'93' FUNCTION H PCRL EQU X'0D' CRLF f PHGH EQU X┆
0x7300…7350 27 34 38 27 5c 48 49 01 35 01 90 3a 58 00 36 01 90 3a 58 58 27 20 44 49 44 20 4e 4f 54 20 4f 43 43 55 52 20 57 48 45 4e 20 43 52 45 41 54 49 00 03 01 5e 00 06 00 50 4e 46 00 04 00 26 00 36 00 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'48' HI 5 :X 6 :XX' DID NOT OCCUR WHEN CREATI ^ PNF & 6 P ┆
0x7350…73a0 20 20 20 20 20 20 20 20 20 20 20 53 45 43 54 49 4f 4e 20 44 49 52 45 43 54 20 41 46 54 45 52 20 49 50 4c 00 04 00 30 00 46 00 50 20 20 20 20 20 20 38 32 2d 31 32 2d 30 39 20 20 20 57 53 4d 44 44 56 20 20 44 45 46 41 55 4c 54 20 56 41 4c 55 ┆ SECTION DIRECT AFTER IPL 0 F P 82-12-09 WSMDDV DEFAULT VALU┆
0x73a0…73f0 45 53 20 27 42 50 4f 4f 4c 27 3a 3d 34 38 20 27 56 41 4c 42 55 46 27 3a 3d 32 30 34 38 00 04 00 6a 00 4c 00 50 20 20 20 20 20 20 38 32 2d 31 32 2d 30 39 20 20 20 57 53 4d 41 50 50 20 20 4e 45 57 20 45 52 52 4f 52 20 4d 45 53 53 41 47 45 20 ┆ES 'BPOOL':=48 'VALBUF':=2048 j L P 82-12-09 WSMAPP NEW ERROR MESSAGE ┆
0x73f0…7440 41 54 20 43 4f 4e 54 52 4f 4c 20 4f 46 20 47 55 49 44 49 4e 47 20 4d 45 53 53 41 47 45 00 04 00 b4 00 50 00 50 20 20 20 20 20 20 38 32 2d 31 32 2d 30 31 20 20 20 55 44 46 56 41 4c 20 20 4c 45 41 44 49 4e 47 20 5a 45 52 4f 27 53 20 41 46 54 ┆AT CONTROL OF GUIDING MESSAGE P P 82-12-01 UDFVAL LEADING ZERO'S AFT┆
0x7440…7490 45 52 20 55 4e 50 41 43 4b 20 49 47 4e 4f 52 45 44 20 28 49 46 2e 2e 54 48 45 4e 20 30 33 30 30 20 00 04 01 04 00 30 00 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3d 3e 20 49 46 20 2e 2e 2e 54 48 45 4e 20 ┆ER UNPACK IGNORED (IF..THEN 0300 0 P => IF ...THEN ┆
0x7490…74e0 33 30 30 29 20 00 04 01 58 00 54 00 50 20 20 20 20 01 35 01 90 20 20 00 36 01 90 20 20 38 32 2d 31 31 2d 32 36 20 20 20 57 53 4d 44 44 56 20 20 44 45 46 41 55 4c 54 2d 56 41 4c 55 45 53 20 4f 46 20 42 55 46 46 45 52 50 4f 4f 4c 20 26 20 56 ┆300) X T P 5 6 82-11-26 WSMDDV DEFAULT-VALUES OF BUFFERPOOL & V┆
0x74e0…7530 41 4c 49 44 41 54 49 4f 4e 20 42 55 46 46 45 52 20 45 4e 4c 41 52 47 00 04 01 8c 00 06 00 50 45 44 00 05 00 54 00 54 00 50 20 20 20 20 20 20 38 32 2d 31 31 2d 32 36 20 20 20 46 53 50 41 52 4d 20 20 44 45 46 41 55 4c 54 2d 56 41 4c 55 45 20 ┆ALIDATION BUFFER ENLARG PED T T P 82-11-26 FSPARM DEFAULT-VALUE ┆
0x7530…7580 49 4e 50 55 54 20 43 4f 4e 54 52 4f 4c 4c 45 44 20 4d 49 4e 4c 3a 3d 4e 55 4d 42 45 52 20 4f 46 20 44 45 43 49 4d 41 4c 53 00 05 00 5e 00 54 00 50 20 20 20 20 20 20 38 32 2d 31 31 2d 32 36 20 20 20 46 53 4d 4f 44 4c 20 20 4f 56 45 52 57 52 ┆INPUT CONTROLLED MINL:=NUMBER OF DECIMALS ^ T P 82-11-26 FSMODL OVERWR┆
0x7580…75d0 49 54 45 20 57 49 54 48 20 53 50 41 43 45 20 4f 46 20 46 49 52 53 54 20 43 4f 4c 20 49 4e 20 52 4f 57 20 43 41 55 53 45 44 20 54 52 4f 55 42 4c 45 00 05 00 b6 00 40 00 50 20 20 20 20 20 20 38 32 2d 31 31 2d 32 36 20 20 20 57 53 4d 43 52 54 ┆ITE WITH SPACE OF FIRST COL IN ROW CAUSED TROUBLE @ P 82-11-26 WSMCRT┆
0x75d0…7620 20 20 52 45 4c 45 41 53 45 2d 44 41 54 45 20 49 4e 43 4c 55 44 45 44 20 49 4e 20 53 54 41 52 54 2d 4d 45 4e 55 00 05 01 0e 00 54 00 50 20 20 20 20 20 20 38 32 2d 31 31 2d 32 36 20 20 20 46 53 50 54 4f 53 20 20 46 4f 52 4d 41 54 20 4f 46 20 ┆ RELEASE-DATE INCLUDED IN START-MENU T P 82-11-26 FSPTOS FORMAT OF ┆
0x7620…7670 50 52 49 4e 54 4f 55 54 20 4d 4f 44 55 4c 45 20 27 50 52 4e 54 46 53 27 20 52 45 00 00 ff ff 00 00 00 37 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆PRINTOUT MODULE 'PRNTFS' RE 7 ┆
0x7670…76c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x77b0…7800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 37 00 02 06 e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ 7 ┆
0x7800…7850 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x7940…7990 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 37 41 30 00 06 00 50 2a 20 00 00 00 04 00 2e 00 50 2a 20 20 20 4b 45 59 54 41 ┆ 7A0 P* . P* KEYTA┆
0x7990…79e0 42 4c 45 20 54 4f 20 42 45 20 55 53 45 44 20 49 4e 20 27 52 45 41 44 49 4e 27 20 4d 4f 44 55 4c 45 00 00 00 0e 00 40 00 50 2a 20 20 20 54 48 45 53 45 20 4b 45 59 53 20 41 52 45 20 56 41 4c 49 44 20 49 4e 20 4f 4e 4c 59 20 49 4e 20 54 48 45 ┆BLE TO BE USED IN 'READIN' MODULE @ P* THESE KEYS ARE VALID IN ONLY IN THE┆
0x79e0…7a30 20 56 45 52 59 20 46 49 52 53 54 20 50 4f 53 49 54 49 4f 4e 20 00 00 00 40 00 1a 00 50 2a 20 20 20 4f 46 20 41 20 46 4f 52 4d 41 54 20 46 49 45 4c 44 20 00 00 00 84 00 06 00 50 2a 20 00 00 00 a2 00 2a 00 50 4b 45 59 54 31 5c 4b 54 41 42 5c ┆ VERY FIRST POSITION @ P* OF A FORMAT FIELD P* * PKEYT1 KTAB ┆
0x7a30…7a80 42 53 50 2c 43 4c 52 2c 4e 4f 4b 2c 50 4c 53 2c 43 41 4e 2c 5c 31 2d 35 5c 43 20 00 00 00 ac 00 2a 00 50 5c 5c 52 45 54 2c 50 4c 53 2c 4d 49 4e 2c 42 54 42 2c 4e 4f 4b 2c 5c 36 2d 31 30 20 4e 4f 4b 3d 48 4f 4d 5c 43 20 00 00 00 da 00 20 00 ┆BSP,CLR,NOK,PLS,CAN, 1-5 C * P RET,PLS,MIN,BTB,NOK, 6-10 NOK=HOM C ┆
0x7a80…7ad0 50 5c 5c 50 52 54 2c 44 55 50 2c 43 46 57 2c 45 4e 54 2c 4f 56 45 5c 31 31 2d 31 35 20 00 00 01 08 40 04 00 00 00 00 01 2c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆P PRT,DUP,CFW,ENT,OVE 11-15 @ , ┆
0x7ad0…7b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 35 20 08 20 04 00 37 20 08 20 04 00 00 00 01 00 04 00 04 00 2e 00 ┆ 5 7 . ┆
0x7b20…7b70 50 2a 20 20 20 4b 45 59 54 41 42 4c 45 20 54 4f 20 42 45 20 55 53 45 44 20 49 4e 20 27 52 45 41 44 49 4e 27 20 4d 4f 44 55 4c 45 00 00 00 0e 00 40 00 50 2a 20 20 20 54 48 45 53 45 20 4b 45 59 53 20 41 52 45 20 56 41 4c 49 44 20 49 4e 20 4f ┆P* KEYTABLE TO BE USED IN 'READIN' MODULE @ P* THESE KEYS ARE VALID IN O┆
0x7b70…7bc0 4e 4c 59 20 49 4e 20 54 48 45 20 56 45 52 59 20 46 49 52 53 54 20 50 4f 53 49 54 49 4f 4e 20 00 00 00 40 00 1a 00 50 2a 20 20 20 4f 46 20 41 20 46 4f 52 4d 41 54 20 46 49 45 4c 44 20 00 00 00 84 00 06 00 50 2a 20 00 00 00 a2 00 2a 00 50 4b ┆NLY IN THE VERY FIRST POSITION @ P* OF A FORMAT FIELD P* * PK┆
0x7bc0…7c10 45 59 54 31 5c 4b 54 41 42 5c 42 53 50 2c 43 4c 52 2c 4e 4f 4b 2c 50 4c 53 2c 43 41 4e 2c 5c 31 2d 35 5c 43 20 00 00 00 ac 00 2a 00 50 5c 5c 52 45 54 2c 50 4c 53 2c 4d 49 4e 2c 42 54 42 2c 4e 4f 4b 2c 5c 36 2d 31 30 20 4e 4f 4b 3d 48 4f 4d ┆EYT1 KTAB BSP,CLR,NOK,PLS,CAN, 1-5 C * P RET,PLS,MIN,BTB,NOK, 6-10 NOK=HOM┆
0x7c10…7c60 5c 43 20 00 00 00 da 00 20 00 50 5c 5c 50 52 54 2c 44 55 50 2c 43 46 57 2c 45 4e 54 2c 4f 56 45 5c 31 31 2d 31 35 20 00 00 01 08 40 04 00 00 00 00 01 2c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ C P PRT,DUP,CFW,ENT,OVE 11-15 @ , ┆
0x7c60…7cb0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 35 4d 49 4e 5c 00 37 4d 49 4e 5c 45 ┆ 5MIN 7MIN E┆
0x7cb0…7d00 51 55 5c 58 27 32 44 27 5c 4d 49 4e 55 53 20 2d 0d 55 52 45 20 50 4f 4f 4c 20 48 41 4e 44 4c 49 4e 47 0d 80 18 00 06 00 01 00 18 00 00 00 06 00 fd 00 02 00 13 46 53 4d 53 50 50 20 20 00 00 80 18 00 08 00 01 00 24 00 00 00 07 42 54 42 5c 45 ┆QU X'2D' MINUS - URE POOL HANDLING FSMSPP $ BTB E┆
0x7d00…7d50 51 55 5c 58 27 38 42 27 5c 42 41 43 4b 54 41 42 0d 44 41 54 49 4f 4e 20 49 2f 4f 20 50 52 4f 43 45 44 55 52 45 0d 00 80 18 00 0c 00 01 00 3c 00 00 00 09 01 2f 00 02 00 16 46 53 55 50 44 54 20 20 00 00 80 18 00 10 00 01 00 54 4e 4f 4b 5c 45 ┆QU X'8B' BACKTAB DATION I/O PROCEDURE < / FSUPDT TNOK E┆
0x7d50…7d98 51 55 5c 58 27 45 45 27 5c 4e 4f 20 4b 45 59 0d 2a 2a 56 41 4c 49 44 41 54 49 4f 4e 20 50 41 47 45 20 4c 4f 41 44 0d 20 20 00 00 c0 4a 00 5c 00 00 01 00 00 59 00 d4 01 4e 00 02 ff 1d 47 42 49 4e 31 20 20 20 00 00 c0 ┆QU X'EE' NO KEY **VALIDATION PAGE LOAD J Y N GBIN1 ┆