|
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: 4636 (0x121c)
Notes: pts_type(SC)
Names: »TEST.SC«
└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
└─⟦this⟧ »BARCLAY/TEST.SC«
└─⟦this⟧ »BARCLAY/TEST.SC«
└─⟦e276fd206⟧ Bits:30009696 Philips computer tape "600413"
└─⟦this⟧ »BARCLAY/TEST.SC«
IDENT TEST DDUM NJDDIV PDIV ENTRY TEST ENTRY PRTLN ENTRY DCSEND EXPROC PUSH,PBIN EXPROC PULL,PBIN EXPROC ATTPCK,PSTRG,PBIN EXPROC ATTUNP,PSTRG,PBIN EXPROC BDE EXPROC BDEINP EXPROC ENQ EXPROC UNPPRT,PSTRG EXPROC KBREAD,PBIN,PKTAB,PBIN,PBIN EXPROC EXPAND,PSTRG,PBIN EXPROC POSCUR,PBIN,PBIN EXPROC LEAD,PBIN EXPROC SCWRIT,PSTRG,PBIN EXPROC SCRWR,PSTRG,PBIN EXPROC ERWRIT,PSTRG EXPROC FINDLN,PSTRG,PBIN,PBIN EXPROC UNPCK EXPROC ERASUP EXPROC LOLITE EXPROC CRHOME EXPROC CRNL EXPROC CRUP EXPROC CRDOWN EXPROC CRBTAB EXPROC CRFTAB EXPROC CRNEAR,PBIN EJECT INCLUDE KTABBE,LIST EJECT INCLUDE EQUATE,LIST EJECT PRTLN PROC STR PSTRG STR WRITE DSGP,STR RET PEND DCSEND PROC STRG PSTRG STRG * PERF PUSH,CBIN1 MOVE TSTR2,ESC <ESC>!<ESC> MOVE TBIN1,=W'500' MOVE TBIN2,CBIN0 MATCH TSCRBUF,TBIN2,TBIN1,TSTR2,CBIN0,CBIN2 BNOK DCS010 MOVE TSTR2,ETX <ETX>!<ETX> XCOPY TSCRBUF,TBIN2,CBIN2,TSTR2,CBIN0 DCS010 PERF PULL,CBIN1 CMP CBIN0,CBIN0 RET PEND TEST PROC TEST1 * MOVE TKBBUF,=X'4142133033344413303550' MOVE TP1,=W'30' PERF EXPAND,TKBBUF,TP1 * MOVE TP1,CBIN0 MOVE TKBBUF,=X'4142434403' PERF FINDLN,TKBBUF,TP1,CBIN17 * MOVE TSTR1,=X'FF' PERF ATTUNP,TSTR1,CBIN0 CLEAR TARITJUS PERF ATTPCK,TSTR1,CBIN0 * MOVE TCURPOS,=X'1750' PERF LEAD,CBIN1 NUM+MOD MOVE TCURPOS,=X'0101' PERF LEAD,CBIN2 MOD * PERF POSCUR,CBIN17,CBIN1 RR/CC * MOVE TSCBUF,='*' PERF SCRWR,TSCBUF,CBIN80 * MOVE TSCBUF,='!' PERF SCWRIT,TSCBUF,CBIN128,CBIN12,CBIN1 * PERF ERWRIT,TSCBUF MOVE TSCBUF,='ERRORLINE IS LINE 23 ' PERF ERWRIT,TSCBUF * MOVE TSCRBUF,=X'1B050160201B0A0160201B0F0F60201B' PERF CRHOME * PERF CRNL PERF CRNL PERF CRNL PERF CRNL PERF CRNL * PERF CRDOWN PERF CRHOME PERF CRDOWN PERF CRDOWN PERF CRDOWN PERF CRDOWN * PERF CRUP PERF CRUP PERF CRUP PERF CRUP PERF CRUP * PERF CRFTAB PERF CRFTAB PERF CRFTAB PERF CRFTAB PERF CRFTAB * PERF CRBTAB PERF CRBTAB PERF CRBTAB PERF CRBTAB PERF CRBTAB * MOVE TBIN5,=X'0A01' MOVE TBIN6,=X'0A16' MOVE TBIN1,=X'0A07' PERF CRNEAR,CBIN1 * MOVE TBIN1,=X'0A13' PERF CRNEAR,CBIN1 * MOVE TP1,CBIN1 KI DSKB,TKBBUF,KTABBE,TP1,TP2 MOVE TP1,CBIN1 KI DSKB,TKBBUF,KTABBE,TP1,TP2 * MOVE TSTR2K,ETX MOVE TKBBUF,='0002 01' XCOPY TSTR2K,CBIN0,CBIN12,TKBBUF,CBIN0 MOVE TSTR4,=X'11121111' XCOPY TSTR2K,CBIN12,CBIN4,TSTR4,CBIN0 MOVE TKBBUF,=X'1B2020624142431B242062444546' XCOPY TSTR2K,CBIN16,CBIN14,TKBBUF,CBIN0 MOVE TKBBUF,=X'1B272062471B2721624849' MOVE TBIN1,=W'30' XCOPY TSTR2K,TBIN1,CBIN16,TKBBUF,CBIN0 PERF UNPCK * PERF LOLITE * PERF ERASUP * MOVE TSTR80,=X'3132333412313233343536' XCOPY TSCRBUF,CBIN0,CBIN12,TSTR80,CBIN0 MOVE TSTR80,=X'371212123132333435363738' XCOPY TSCRBUF,CBIN12,CBIN12,TSTR80,CBIN0 MOVE TSTR80,=X'414243441250515253121103' MOVE TBIN1,=W'24' XCOPY TSCRBUF,TBIN1,CBIN12,TSTR80,CBIN0 PERF UNPPRT,TSCRBUF * TEST2 PERF POSCUR,CBIN1,CBIN1 MOVE LENGTH,CBIN12 PERF KBREAD,LENGTH,KTABBE,TP1,CBIN2 MOVE TBCD4,LENGTH EDWRT DSDY,KBFMT B TEST2 * PERF ENQ * PERF BDEINP * PERF BDE * B TEST1 RET PEND KBFMT FRMT FNL FNL FCOPY TKBBUF FILLR ' ',2 FMEL '999',TBCD4 FILLR ' ',40 FILLR '.',1 FMEND END
0x0000…0014 (0, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IDENT TEST «, t00=0x0000, t01=0x0004}
0x0014…0028 Head {h00=0x0010, h01=0x0050, text=» DDUM NJDDIV«, t00=0x0000, t01=0x0018}
0x0028…0036 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x002c}
0x0036…004a Head {h00=0x0010, h01=0x0050, text=» ENTRY TEST «, t00=0x0000, t01=0x003a}
0x004a…005e Head {h00=0x0010, h01=0x0050, text=» ENTRY PRTLN«, t00=0x0000, t01=0x004e}
0x005e…0074 Head {h00=0x0012, h01=0x0050, text=» ENTRY DCSEND «, t00=0x0000, t01=0x0062}
0x0074…008e Head {h00=0x0016, h01=0x0050, text=» EXPROC PUSH,PBIN «, t00=0x0000, t01=0x0078}
0x008e…00a8 Head {h00=0x0016, h01=0x0050, text=» EXPROC PULL,PBIN «, t00=0x0000, t01=0x0092}
0x00a8…00ca Head {h00=0x001e, h01=0x0050, text=» EXPROC ATTPCK,PSTRG,PBIN «, t00=0x0000, t01=0x00ac}
0x00ca…00ec Head {h00=0x001e, h01=0x0050, text=» EXPROC ATTUNP,PSTRG,PBIN «, t00=0x0000, t01=0x00ce}
0x00ec…0100 Head {h00=0x0010, h01=0x0050, text=» EXPROC BDE «, t00=0x0000, t01=0x00f0}
0x0100…0116 Head {h00=0x0012, h01=0x0050, text=» EXPROC BDEINP«, t00=0x0000, t01=0x0104}
0x0116…012a Head {h00=0x0010, h01=0x0050, text=» EXPROC ENQ «, t00=0x0000, t01=0x011a}
0x012a…0146 Head {h00=0x0018, h01=0x0050, text=» EXPROC UNPPRT,PSTRG«, t00=0x0000, t01=0x012e}
0x0146…0172 Head {h00=0x0028, h01=0x0050, text=» EXPROC KBREAD,PBIN,PKTAB,PBIN,PBIN «, t00=0x0000, t01=0x014a}
0x0172…0194 Head {h00=0x001e, h01=0x0050, text=» EXPROC EXPAND,PSTRG,PBIN «, t00=0x0000, t01=0x0176}
0x0194…01b4 Head {h00=0x001c, h01=0x0050, text=» EXPROC POSCUR,PBIN,PBIN«, t00=0x0001, t01=0x0008}
0x01b4…01ce Head {h00=0x0016, h01=0x0050, text=» EXPROC LEAD,PBIN «, t00=0x0001, t01=0x0028}
0x01ce…01f0 Head {h00=0x001e, h01=0x0050, text=» EXPROC SCWRIT,PSTRG,PBIN «, t00=0x0001, t01=0x0042}
0x01f0…0210 Head {h00=0x001c, h01=0x0050, text=» EXPROC SCRWR,PSTRG,PBIN«, t00=0x0001, t01=0x0064}
0x0210…022c Head {h00=0x0018, h01=0x0050, text=» EXPROC ERWRIT,PSTRG«, t00=0x0001, t01=0x0084}
0x022c…0252 Head {h00=0x0022, h01=0x0050, text=» EXPROC FINDLN,PSTRG,PBIN,PBIN«, t00=0x0001, t01=0x00a0}
0x0252…0268 Head {h00=0x0012, h01=0x0050, text=» EXPROC UNPCK «, t00=0x0001, t01=0x00c6}
0x0268…027e Head {h00=0x0012, h01=0x0050, text=» EXPROC ERASUP«, t00=0x0001, t01=0x00dc}
0x027e…0294 Head {h00=0x0012, h01=0x0050, text=» EXPROC LOLITE«, t00=0x0001, t01=0x00f2}
0x0294…02aa Head {h00=0x0012, h01=0x0050, text=» EXPROC CRHOME«, t00=0x0001, t01=0x0108}
0x02aa…02be Head {h00=0x0010, h01=0x0050, text=» EXPROC CRNL«, t00=0x0001, t01=0x011e}
0x02be…02d2 Head {h00=0x0010, h01=0x0050, text=» EXPROC CRUP«, t00=0x0001, t01=0x0132}
0x02d2…02e8 Head {h00=0x0012, h01=0x0050, text=» EXPROC CRDOWN«, t00=0x0001, t01=0x0146}
0x02e8…02fe Head {h00=0x0012, h01=0x0050, text=» EXPROC CRBTAB«, t00=0x0001, t01=0x015c}
0x02fe…0314 Head {h00=0x0012, h01=0x0050, text=» EXPROC CRFTAB«, t00=0x0001, t01=0x0172}
0x0314…0330 Head {h00=0x0018, h01=0x0050, text=» EXPROC CRNEAR,PBIN «, t00=0x0001, t01=0x0188}
0x0330…033e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0014}
0x033e…035a Head {h00=0x0018, h01=0x0050, text=» INCLUDE KTABBE,LIST«, t00=0x0002, t01=0x0022}
0x035a…0368 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x003e}
0x0368…0384 Head {h00=0x0018, h01=0x0050, text=» INCLUDE EQUATE,LIST«, t00=0x0002, t01=0x004c}
0x0384…0392 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0068}
0x0392…03a8 Head {h00=0x0012, h01=0x0050, text=»PRTLN PROC STR«, t00=0x0002, t01=0x0076}
0x03a8…03ba Head {h00=0x000e, h01=0x0050, text=» PSTRG STR«, t00=0x0002, t01=0x008c}
0x03ba…03d2 Head {h00=0x0014, h01=0x0050, text=» WRITE DSGP,STR «, t00=0x0002, t01=0x009e}
0x03d2…03de Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0002, t01=0x00b6}
0x03de…03ec Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0002, t01=0x00c2}
0x03ec…03f4 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00d0}
0x03f4…03fc Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00d8}
0x03fc…0414 Head {h00=0x0014, h01=0x0050, text=»DCSEND PROC STRG«, t00=0x0002, t01=0x00e0}
0x0414…0428 Head {h00=0x0010, h01=0x0050, text=» PSTRG STRG «, t00=0x0002, t01=0x00f8}
0x0428…0432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010c}
0x0432…044a Head {h00=0x0014, h01=0x0050, text=» PERF PUSH,CBIN1«, t00=0x0002, t01=0x0116}
0x044a…046e Head {h00=0x0020, h01=0x0050, text=» MOVE TSTR2,ESC <ESC>!<ESC> «, t00=0x0002, t01=0x012e}
0x046e…048a Head {h00=0x0018, h01=0x0050, text=» MOVE TBIN1,=W'500' «, t00=0x0002, t01=0x0152}
0x048a…04a4 Head {h00=0x0016, h01=0x0050, text=» MOVE TBIN2,CBIN0 «, t00=0x0002, t01=0x016e}
0x04a4…04d8 Head {h00=0x0030, h01=0x0050, text=» MATCH TSCRBUF,TBIN2,TBIN1,TSTR2,CBIN0,CBIN2«, t00=0x0002, t01=0x0188}
0x04d8…04ec Head {h00=0x0010, h01=0x0050, text=» BNOK DCS010«, t00=0x0003, t01=0x002c}
0x04ec…0510 Head {h00=0x0020, h01=0x0050, text=» MOVE TSTR2,ETX <ETX>!<ETX> «, t00=0x0003, t01=0x0040}
0x0510…053e Head {h00=0x002a, h01=0x0050, text=» XCOPY TSCRBUF,TBIN2,CBIN2,TSTR2,CBIN0«, t00=0x0003, t01=0x0064}
0x053e…054c Head {h00=0x000a, h01=0x0050, text=»DCS010«, t00=0x0003, t01=0x0092}
0x054c…0564 Head {h00=0x0014, h01=0x0050, text=» PERF PULL,CBIN1«, t00=0x0003, t01=0x00a0}
0x0564…057c Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0003, t01=0x00b8}
0x057c…0588 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0003, t01=0x00d0}
0x0588…0596 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0003, t01=0x00dc}
0x0596…059e Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x00ea}
0x059e…05a6 Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x00f2}
0x05a6…05b8 Head {h00=0x000e, h01=0x0050, text=»TEST PROC «, t00=0x0003, t01=0x00fa}
0x05b8…05c6 Head {h00=0x000a, h01=0x0050, text=»TEST1 «, t00=0x0003, t01=0x010c}
0x05c6…05d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011a}
0x05d0…0600 Head {h00=0x002c, h01=0x0050, text=» MOVE TKBBUF,=X'4142133033344413303550' «, t00=0x0003, t01=0x0124}
0x0600…0618 Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'30'«, t00=0x0003, t01=0x0154}
0x0618…0638 Head {h00=0x001c, h01=0x0050, text=» PERF EXPAND,TKBBUF,TP1 «, t00=0x0003, t01=0x016c}
0x0638…0642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x018c}
0x0642…065a Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN0 «, t00=0x0004, t01=0x0008}
0x065a…067e Head {h00=0x0020, h01=0x0050, text=» MOVE TKBBUF,=X'4142434403' «, t00=0x0004, t01=0x0020}
0x067e…06a4 Head {h00=0x0022, h01=0x0050, text=» PERF FINDLN,TKBBUF,TP1,CBIN17«, t00=0x0004, t01=0x0044}
0x06a4…06ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006a}
0x06ae…06c8 Head {h00=0x0016, h01=0x0050, text=» MOVE TSTR1,=X'FF'«, t00=0x0004, t01=0x0074}
0x06c8…06e8 Head {h00=0x001c, h01=0x0050, text=» PERF ATTUNP,TSTR1,CBIN0«, t00=0x0004, t01=0x008e}
0x06e8…0700 Head {h00=0x0014, h01=0x0050, text=» CLEAR TARITJUS «, t00=0x0004, t01=0x00ae}
0x0700…0720 Head {h00=0x001c, h01=0x0050, text=» PERF ATTPCK,TSTR1,CBIN0«, t00=0x0004, t01=0x00c6}
0x0720…072a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e6}
0x072a…0748 Head {h00=0x001a, h01=0x0050, text=» MOVE TCURPOS,=X'1750'«, t00=0x0004, t01=0x00f0}
0x0748…0768 Head {h00=0x001c, h01=0x0050, text=» PERF LEAD,CBIN1 NUM+MOD«, t00=0x0004, t01=0x010e}
0x0768…0786 Head {h00=0x001a, h01=0x0050, text=» MOVE TCURPOS,=X'0101'«, t00=0x0004, t01=0x012e}
0x0786…07a2 Head {h00=0x0018, h01=0x0050, text=» PERF LEAD,CBIN2 MOD«, t00=0x0004, t01=0x014c}
0x07a2…07ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0168}
0x07ac…07d4 Head {h00=0x0024, h01=0x0050, text=» PERF POSCUR,CBIN17,CBIN1 RR/CC «, t00=0x0004, t01=0x0172}
0x07d4…07de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000a}
0x07de…07f8 Head {h00=0x0016, h01=0x0050, text=» MOVE TSCBUF,='*' «, t00=0x0005, t01=0x0014}
0x07f8…081a Head {h00=0x001e, h01=0x0050, text=» PERF SCRWR,TSCBUF,CBIN80 «, t00=0x0005, t01=0x002e}
0x081a…0824 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0050}
0x0824…083e Head {h00=0x0016, h01=0x0050, text=» MOVE TSCBUF,='!' «, t00=0x0005, t01=0x005a}
0x083e…086e Head {h00=0x002c, h01=0x0050, text=» PERF SCWRIT,TSCBUF,CBIN128,CBIN12,CBIN1«, t00=0x0005, t01=0x0074}
0x086e…0878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a4}
0x0878…0894 Head {h00=0x0018, h01=0x0050, text=» PERF ERWRIT,TSCBUF «, t00=0x0005, t01=0x00ae}
0x0894…08c2 Head {h00=0x002a, h01=0x0050, text=» MOVE TSCBUF,='ERRORLINE IS LINE 23 ' «, t00=0x0005, t01=0x00ca}
0x08c2…08de Head {h00=0x0018, h01=0x0050, text=» PERF ERWRIT,TSCBUF «, t00=0x0005, t01=0x00f8}
0x08de…08e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0114}
0x08e8…0922 Head {h00=0x0036, h01=0x0050, text=» MOVE TSCRBUF,=X'1B050160201B0A0160201B0F0F60201B'«, t00=0x0005, t01=0x011e}
0x0922…0936 Head {h00=0x0010, h01=0x0050, text=» PERF CRHOME«, t00=0x0005, t01=0x0158}
0x0936…0940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016c}
0x0940…0952 Head {h00=0x000e, h01=0x0050, text=» PERF CRNL«, t00=0x0005, t01=0x0176}
0x0952…0964 Head {h00=0x000e, h01=0x0050, text=» PERF CRNL«, t00=0x0005, t01=0x0188}
0x0964…0976 Head {h00=0x000e, h01=0x0050, text=» PERF CRNL«, t00=0x0006, t01=0x000a}
0x0976…0988 Head {h00=0x000e, h01=0x0050, text=» PERF CRNL«, t00=0x0006, t01=0x001c}
0x0988…099a Head {h00=0x000e, h01=0x0050, text=» PERF CRNL«, t00=0x0006, t01=0x002e}
0x099a…09a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a4…09b8 Head {h00=0x0010, h01=0x0050, text=» PERF CRDOWN«, t00=0x0006, t01=0x004a}
0x09b8…09cc Head {h00=0x0010, h01=0x0050, text=» PERF CRHOME«, t00=0x0006, t01=0x005e}
0x09cc…09e0 Head {h00=0x0010, h01=0x0050, text=» PERF CRDOWN«, t00=0x0006, t01=0x0072}
0x09e0…09f4 Head {h00=0x0010, h01=0x0050, text=» PERF CRDOWN«, t00=0x0006, t01=0x0086}
0x09f4…0a08 Head {h00=0x0010, h01=0x0050, text=» PERF CRDOWN«, t00=0x0006, t01=0x009a}
0x0a08…0a1c Head {h00=0x0010, h01=0x0050, text=» PERF CRDOWN«, t00=0x0006, t01=0x00ae}
0x0a1c…0a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c2}
0x0a26…0a38 Head {h00=0x000e, h01=0x0050, text=» PERF CRUP«, t00=0x0006, t01=0x00cc}
0x0a38…0a4a Head {h00=0x000e, h01=0x0050, text=» PERF CRUP«, t00=0x0006, t01=0x00de}
0x0a4a…0a5c Head {h00=0x000e, h01=0x0050, text=» PERF CRUP«, t00=0x0006, t01=0x00f0}
0x0a5c…0a6e Head {h00=0x000e, h01=0x0050, text=» PERF CRUP«, t00=0x0006, t01=0x0102}
0x0a6e…0a80 Head {h00=0x000e, h01=0x0050, text=» PERF CRUP«, t00=0x0006, t01=0x0114}
0x0a80…0a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0126}
0x0a8a…0a9e Head {h00=0x0010, h01=0x0050, text=» PERF CRFTAB«, t00=0x0006, t01=0x0130}
0x0a9e…0ab2 Head {h00=0x0010, h01=0x0050, text=» PERF CRFTAB«, t00=0x0006, t01=0x0144}
0x0ab2…0ac6 Head {h00=0x0010, h01=0x0050, text=» PERF CRFTAB«, t00=0x0006, t01=0x0158}
0x0ac6…0ada Head {h00=0x0010, h01=0x0050, text=» PERF CRFTAB«, t00=0x0006, t01=0x016c}
0x0ada…0aee Head {h00=0x0010, h01=0x0050, text=» PERF CRFTAB«, t00=0x0006, t01=0x0180}
0x0aee…0af8 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af8…0b0c Head {h00=0x0010, h01=0x0050, text=» PERF CRBTAB«, t00=0x0007, t01=0x000e}
0x0b0c…0b20 Head {h00=0x0010, h01=0x0050, text=» PERF CRBTAB«, t00=0x0007, t01=0x0022}
0x0b20…0b34 Head {h00=0x0010, h01=0x0050, text=» PERF CRBTAB«, t00=0x0007, t01=0x0036}
0x0b34…0b48 Head {h00=0x0010, h01=0x0050, text=» PERF CRBTAB«, t00=0x0007, t01=0x004a}
0x0b48…0b5c Head {h00=0x0010, h01=0x0050, text=» PERF CRBTAB«, t00=0x0007, t01=0x005e}
0x0b5c…0b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0072}
0x0b66…0b82 Head {h00=0x0018, h01=0x0050, text=» MOVE TBIN5,=X'0A01'«, t00=0x0007, t01=0x007c}
0x0b82…0b9e Head {h00=0x0018, h01=0x0050, text=» MOVE TBIN6,=X'0A16'«, t00=0x0007, t01=0x0098}
0x0b9e…0bba Head {h00=0x0018, h01=0x0050, text=» MOVE TBIN1,=X'0A07'«, t00=0x0007, t01=0x00b4}
0x0bba…0bd4 Head {h00=0x0016, h01=0x0050, text=» PERF CRNEAR,CBIN1«, t00=0x0007, t01=0x00d0}
0x0bd4…0bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ea}
0x0bde…0bfa Head {h00=0x0018, h01=0x0050, text=» MOVE TBIN1,=X'0A13'«, t00=0x0007, t01=0x00f4}
0x0bfa…0c14 Head {h00=0x0016, h01=0x0050, text=» PERF CRNEAR,CBIN1«, t00=0x0007, t01=0x0110}
0x0c14…0c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012a}
0x0c1e…0c36 Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN1 «, t00=0x0007, t01=0x0134}
0x0c36…0c5c Head {h00=0x0022, h01=0x0050, text=» KI DSKB,TKBBUF,KTABBE,TP1,TP2«, t00=0x0007, t01=0x014c}
0x0c5c…0c74 Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN1 «, t00=0x0007, t01=0x0172}
0x0c74…0c9a Head {h00=0x0022, h01=0x0050, text=» KI DSKB,TKBBUF,KTABBE,TP1,TP2«, t00=0x0007, t01=0x018a}
0x0c9a…0ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0020}
0x0ca4…0cbc Head {h00=0x0014, h01=0x0050, text=» MOVE TSTR2K,ETX«, t00=0x0008, t01=0x002a}
0x0cbc…0ce0 Head {h00=0x0020, h01=0x0050, text=» MOVE TKBBUF,='0002 01'«, t00=0x0008, t01=0x0042}
0x0ce0…0d10 Head {h00=0x002c, h01=0x0050, text=» XCOPY TSTR2K,CBIN0,CBIN12,TKBBUF,CBIN0 «, t00=0x0008, t01=0x0066}
0x0d10…0d30 Head {h00=0x001c, h01=0x0050, text=» MOVE TSTR4,=X'11121111'«, t00=0x0008, t01=0x0096}
0x0d30…0d5e Head {h00=0x002a, h01=0x0050, text=» XCOPY TSTR2K,CBIN12,CBIN4,TSTR4,CBIN0«, t00=0x0008, t01=0x00b6}
0x0d5e…0d94 Head {h00=0x0032, h01=0x0050, text=» MOVE TKBBUF,=X'1B2020624142431B242062444546' «, t00=0x0008, t01=0x00e4}
0x0d94…0dc4 Head {h00=0x002c, h01=0x0050, text=» XCOPY TSTR2K,CBIN16,CBIN14,TKBBUF,CBIN0«, t00=0x0008, t01=0x011a}
0x0dc4…0df4 Head {h00=0x002c, h01=0x0050, text=» MOVE TKBBUF,=X'1B272062471B2721624849' «, t00=0x0008, t01=0x014a}
0x0df4…0e0e Head {h00=0x0016, h01=0x0050, text=» MOVE TBIN1,=W'30'«, t00=0x0008, t01=0x017a}
0x0e0e…0e3e (9, 0, 400) Head {h00=0x002c, h01=0x0050, text=» XCOPY TSTR2K,TBIN1,CBIN16,TKBBUF,CBIN0 «, t00=0x0009, t01=0x0004}
0x0e3e…0e52 Head {h00=0x0010, h01=0x0050, text=» PERF UNPCK «, t00=0x0009, t01=0x0034}
0x0e52…0e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0048}
0x0e5c…0e70 Head {h00=0x0010, h01=0x0050, text=» PERF LOLITE«, t00=0x0009, t01=0x0052}
0x0e70…0e7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0066}
0x0e7a…0e8e Head {h00=0x0010, h01=0x0050, text=» PERF ERASUP«, t00=0x0009, t01=0x0070}
0x0e8e…0e98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0084}
0x0e98…0ec8 Head {h00=0x002c, h01=0x0050, text=» MOVE TSTR80,=X'3132333412313233343536' «, t00=0x0009, t01=0x008e}
0x0ec8…0ef8 Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,CBIN0,CBIN12,TSTR80,CBIN0«, t00=0x0009, t01=0x00be}
0x0ef8…0f2a Head {h00=0x002e, h01=0x0050, text=» MOVE TSTR80,=X'371212123132333435363738' «, t00=0x0009, t01=0x00ee}
0x0f2a…0f5c Head {h00=0x002e, h01=0x0050, text=» XCOPY TSCRBUF,CBIN12,CBIN12,TSTR80,CBIN0 «, t00=0x0009, t01=0x0120}
0x0f5c…0f8e Head {h00=0x002e, h01=0x0050, text=» MOVE TSTR80,=X'414243441250515253121103' «, t00=0x0009, t01=0x0152}
0x0f8e…0fa8 Head {h00=0x0016, h01=0x0050, text=» MOVE TBIN1,=W'24'«, t00=0x0009, t01=0x0184}
0x0fa8…0fd8 Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,TBIN1,CBIN12,TSTR80,CBIN0«, t00=0x000a, t01=0x000e}
0x0fd8…0ff4 Head {h00=0x0018, h01=0x0050, text=» PERF UNPPRT,TSCRBUF«, t00=0x000a, t01=0x003e}
0x0ff4…0ffe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x005a}
0x0ffe…100c Head {h00=0x000a, h01=0x0050, text=»TEST2 «, t00=0x000a, t01=0x0064}
0x100c…102c Head {h00=0x001c, h01=0x0050, text=» PERF POSCUR,CBIN1,CBIN1«, t00=0x000a, t01=0x0072}
0x102c…1048 Head {h00=0x0018, h01=0x0050, text=» MOVE LENGTH,CBIN12 «, t00=0x000a, t01=0x0092}
0x1048…1074 Head {h00=0x0028, h01=0x0050, text=» PERF KBREAD,LENGTH,KTABBE,TP1,CBIN2«, t00=0x000a, t01=0x00ae}
0x1074…108e Head {h00=0x0016, h01=0x0050, text=» MOVE TBCD4,LENGTH«, t00=0x000a, t01=0x00da}
0x108e…10a8 Head {h00=0x0016, h01=0x0050, text=» EDWRT DSDY,KBFMT «, t00=0x000a, t01=0x00f4}
0x10a8…10b8 Head {h00=0x000c, h01=0x0050, text=» B TEST2«, t00=0x000a, t01=0x010e}
0x10b8…10c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011e}
0x10c2…10d4 Head {h00=0x000e, h01=0x0050, text=» PERF ENQ «, t00=0x000a, t01=0x0128}
0x10d4…10de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x013a}
0x10de…10f2 Head {h00=0x0010, h01=0x0050, text=» PERF BDEINP«, t00=0x000a, t01=0x0144}
0x10f2…10fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0158}
0x10fc…110e Head {h00=0x000e, h01=0x0050, text=» PERF BDE «, t00=0x000a, t01=0x0162}
0x110e…1118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0174}
0x1118…1128 Head {h00=0x000c, h01=0x0050, text=» B TEST1«, t00=0x000a, t01=0x017e}
0x1128…1134 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x018e}
0x1134…1142 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000b, t01=0x000a}
0x1142…114a Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x0018}
0x114a…1152 Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x0020}
0x1152…115a Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x0028}
0x115a…116c Head {h00=0x000e, h01=0x0050, text=»KBFMT FRMT«, t00=0x000b, t01=0x0030}
0x116c…1178 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000b, t01=0x0042}
0x1178…1184 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000b, t01=0x004e}
0x1184…119a Head {h00=0x0012, h01=0x0050, text=» FCOPY TKBBUF «, t00=0x000b, t01=0x005a}
0x119a…11ae Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x000b, t01=0x0070}
0x11ae…11c8 Head {h00=0x0016, h01=0x0050, text=» FMEL '999',TBCD4 «, t00=0x000b, t01=0x0084}
0x11c8…11de Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x000b, t01=0x009e}
0x11de…11f2 Head {h00=0x0010, h01=0x0050, text=» FILLR '.',1«, t00=0x000b, t01=0x00b4}
0x11f2…1200 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000b, t01=0x00c8}
0x1200…120c Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000b, t01=0x00d6}
0x120c…1210 Head {h00=0x4004, h01=0x0000}
0x1210…1214 00 0b 00 e2 ┆ ┆
0x1214…121c (12, 1, 8) 20 04 00 00 00 0c 00 04 ┆ ┆