|
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: 4426 (0x114a)
Notes: pts_type(UF)
Names: »KM539.UF«
└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
└─⟦this⟧ »NJREMIT/KM539.UF«
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
└─⟦this⟧ »REMIT2/KM539.UF«
PRT KM539 PRT C539 MES TINGLEV KOMMUNE MES INCL REMITTERING MES INCL BUDGET SCR LED KMD08 !!CH $$'26'$$'22'$$ !!CH $$(26)$$(22)$$ !!CH $$-4$$4$$ TRANS 40 !!RE 41,$$56$$100$$SCREEN SIZE BUDGET$$ !!DL 61,62 FD03,FD04 !!DL 67,108 R]KONV !!DL 224,231 MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV ADR MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR GTP/LP MF1CU STRG X'E7C7' CU ADDRESS CNFHC STRGI (16),'GA','LA','LA','LA','LA' !!DL 235,236 FROMKX STRGI (12),'TD','TE','TF','TG','TH',' ' !!RE 240,$$FALSE$$TRUE$$ CBKOFLAG !!RE 241,$$FALSE$$TRUE$$ CKTFLAG !!RE 242,$$FALSE$$TRUE$$ CCLKTFLAG !!RE 247,$$TRUE$$FALSE$$ CKTAUTO !!RE 248,$$FALSE$$TRUE$$ DC !!RE 251,$$FALSE$$TRUE$$ 5M DISK !!RE 252,$$TRUE$$FALSE$$ CKASFLAG !!RE 253,$$TRUE$$TRUE$$ CSLDFLG !!RE 279,$$FALSE$$TRUE$$ CREMITFLG !!RE 287,$$FALSE$$TRUE$$ !!RE 288,$$FALSE$$TRUE$$ CREMITFLAG !!RE 289,$$FALSE$$TRUE$$ STRAKS !!RE 290,$$FALSE$$TRUE$$ BUNDT !!DL 331 CFLAG BINI (12,2),X'0051',X'0000',X'0068',X'0000',X'0064',X'0000', C X'0064',X'0000',X'0064',X'0000',X'0064',X'0000' !!RE 361,$$FALSE$$TRUE$$ BUDGET$$ !!RE 416,$$01014610$$%VER%REL%MOD$$ !!RE 476,$$FALSE$$TRUE$$ GENERATE LEVNR !!RE 477,$$FALSE$$TRUE$$ TINGLEVFLAG !!RE 478,$$TRUE$$FALSE$$ NO VSL CHECK !!RE 484,$$1400$$10000$$ DISKSIZE !!RE 490,$$128$$80$$ CRECLGD !!RE 492,$$OD-KOM$$TINGL.$$ !!RE 494,$$20$$200$$ INDEXFILE !!RE 495,$$5$$1$$ CKTTOP !!DL 496,497 FROMTX STRGI (12),' ','KA','KB','KC','KD','KE' ' !!DL 817,1091 RK !!DL 1103,1105 RK !!DL 1107 RK !!DL 1153,1172 RK !!DL 1200 MOVE TCT01,=W'2' PRINTERNR !!DL 1250,1262 RK !!DL 1265 RK !!EN NOD C TRA /S,NL INC DIV539 NOD R LED SCREEN !!CH $$KEY461$$KEY539$$ !!CH $$SL461$$SLCOP$$ !!EN TRA /S,NL INC RGSUB4 INC RGSTRT NOD D INC RGMAIN INC RGSUBS INC RGSUB1 INC RGSUB2 INC RGSUB3 NOD D INC RGKLAR INC KTPLN INC KTOPR NOD D INC RGADM INC REMSUB NOD R INC ADM5 INC SUBAPL INC REMPRT NOD R INC KMDIO INC DKSUBS INC REMTXT INC RAADUM NOD R INC RGFRMT INC REMFMT NOD D INC REMLEV INC ADM6 NOD D INC REMTR LED REMBDT !!DL 177,250 B821PR PROC RET PEND !!EN TRA /S,NL NOD D INC BUDGET TLK U,4K ASM PRTX,NL LED VDUPRX !!DL 70 RBUFNR EQU 1 SINGLE BUFFERING !!DL 72 TBUFNR EQU 1 SINGLE BUFFERING !!EN ASM /S,NL ASM STARTX,NL INC TB3270 $INCGEN LKE M KPF /L,RGL539 SCR MES $PDISC M=M:267,MU=M:POOL92,A=RGL539,C=C539 $ASG2
0x0000…0012 (0, 0, 400) Head {h00=0x000e, h01=0x0009, text=»PRT KM539 «, t00=0x0000, t01=0x0004}
0x0012…0022 Head {h00=0x000c, h01=0x0008, text=»PRT C539«, t00=0x0000, t01=0x0016}
0x0022…003e Head {h00=0x0018, h01=0x0013, text=»MES TINGLEV KOMMUNE «, t00=0x0000, t01=0x0026}
0x003e…005a Head {h00=0x0018, h01=0x0014, text=»MES INCL REMITTERING«, t00=0x0000, t01=0x0042}
0x005a…0072 Head {h00=0x0014, h01=0x000f, text=»MES INCL BUDGET «, t00=0x0000, t01=0x005e}
0x0072…007e Head {h00=0x0008, h01=0x0003, text=»SCR «, t00=0x0000, t01=0x0076}
0x007e…0090 Head {h00=0x000e, h01=0x0009, text=»LED KMD08 «, t00=0x0000, t01=0x0082}
0x0090…00ac Head {h00=0x0018, h01=0x0013, text=»!!CH $$'26'$$'22'$$ «, t00=0x0000, t01=0x0094}
0x00ac…00c8 Head {h00=0x0018, h01=0x0050, text=»!!CH $$(26)$$(22)$$ «, t00=0x0000, t01=0x00b0}
0x00c8…00e8 Head {h00=0x001c, h01=0x0017, text=»!!CH $$-4$$4$$ TRANS 40 «, t00=0x0000, t01=0x00cc}
0x00e8…0118 Head {h00=0x002c, h01=0x0027, text=»!!RE 41,$$56$$100$$SCREEN SIZE BUDGET$$ «, t00=0x0000, t01=0x00ec}
0x0118…0134 Head {h00=0x0018, h01=0x0014, text=»!!DL 61,62 FD03,FD04«, t00=0x0000, t01=0x011c}
0x0134…014e Head {h00=0x0016, h01=0x0012, text=»!!DL 67,108 R]KONV«, t00=0x0000, t01=0x0138}
0x014e…0162 Head {h00=0x0010, h01=0x000c, text=»!!DL 224,231«, t00=0x0000, t01=0x0152}
0x0162…0194 Head {h00=0x002e, h01=0x0050, text=»MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV ADR «, t00=0x0000, t01=0x0166}
0x0194…01cc Head {h00=0x0034, h01=0x0050, text=»MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR GTP/LP «, t00=0x0001, t01=0x0008}
0x01cc…01f2 Head {h00=0x0022, h01=0x0050, text=»MF1CU STRG X'E7C7' CU ADDRESS «, t00=0x0001, t01=0x0040}
0x01f2…0224 Head {h00=0x002e, h01=0x0050, text=»CNFHC STRGI (16),'GA','LA','LA','LA','LA' «, t00=0x0001, t01=0x0066}
0x0224…0238 Head {h00=0x0010, h01=0x0050, text=»!!DL 235,236«, t00=0x0001, t01=0x0098}
0x0238…0270 Head {h00=0x0034, h01=0x0050, text=»FROMKX STRGI (12),'TD','TE','TF','TG','TH',' ' «, t00=0x0001, t01=0x00ac}
0x0270…029a Head {h00=0x0026, h01=0x0050, text=»!!RE 240,$$FALSE$$TRUE$$ CBKOFLAG «, t00=0x0001, t01=0x00e4}
0x029a…02c2 Head {h00=0x0024, h01=0x0050, text=»!!RE 241,$$FALSE$$TRUE$$ CKTFLAG«, t00=0x0001, t01=0x010e}
0x02c2…02ec Head {h00=0x0026, h01=0x0050, text=»!!RE 242,$$FALSE$$TRUE$$ CCLKTFLAG«, t00=0x0001, t01=0x0136}
0x02ec…0314 Head {h00=0x0024, h01=0x0050, text=»!!RE 247,$$TRUE$$FALSE$$ CKTAUTO«, t00=0x0001, t01=0x0160}
0x0314…0338 Head {h00=0x0020, h01=0x0050, text=»!!RE 248,$$FALSE$$TRUE$$ DC «, t00=0x0001, t01=0x0188}
0x0338…0360 Head {h00=0x0024, h01=0x0050, text=»!!RE 251,$$FALSE$$TRUE$$ 5M DISK«, t00=0x0002, t01=0x001c}
0x0360…038a Head {h00=0x0026, h01=0x0050, text=»!!RE 252,$$TRUE$$FALSE$$ CKASFLAG «, t00=0x0002, t01=0x0044}
0x038a…03b2 Head {h00=0x0024, h01=0x0050, text=»!!RE 253,$$TRUE$$TRUE$$ CSLDFLG «, t00=0x0002, t01=0x006e}
0x03b2…03dc Head {h00=0x0026, h01=0x0050, text=»!!RE 279,$$FALSE$$TRUE$$ CREMITFLG«, t00=0x0002, t01=0x0096}
0x03dc…03fc Head {h00=0x001c, h01=0x0050, text=»!!RE 287,$$FALSE$$TRUE$$«, t00=0x0002, t01=0x00c0}
0x03fc…0428 Head {h00=0x0028, h01=0x0050, text=»!!RE 288,$$FALSE$$TRUE$$ CREMITFLAG «, t00=0x0002, t01=0x00e0}
0x0428…0450 Head {h00=0x0024, h01=0x0050, text=»!!RE 289,$$FALSE$$TRUE$$ STRAKS «, t00=0x0002, t01=0x010c}
0x0450…0476 Head {h00=0x0022, h01=0x0050, text=»!!RE 290,$$FALSE$$TRUE$$ BUNDT«, t00=0x0002, t01=0x0134}
0x0476…0486 Head {h00=0x000c, h01=0x0050, text=»!!DL 331«, t00=0x0002, t01=0x015a}
0x0486…04d4 Head {h00=0x004a, h01=0x0050, text=»CFLAG BINI (12,2),X'0051',X'0000',X'0068',X'0000',X'0064',X'0000', C «, t00=0x0002, t01=0x016a}
0x04d4…050e Head {h00=0x0036, h01=0x0050, text=» X'0064',X'0000',X'0064',X'0000',X'0064',X'0000' «, t00=0x0003, t01=0x0028}
0x050e…0538 Head {h00=0x0026, h01=0x0050, text=»!!RE 361,$$FALSE$$TRUE$$ BUDGET$$ «, t00=0x0003, t01=0x0062}
0x0538…0564 Head {h00=0x0028, h01=0x0050, text=»!!RE 416,$$01014610$$%VER%REL%MOD$$ «, t00=0x0003, t01=0x008c}
0x0564…0594 Head {h00=0x002c, h01=0x0050, text=»!!RE 476,$$FALSE$$TRUE$$ GENERATE LEVNR «, t00=0x0003, t01=0x00b8}
0x0594…05c0 Head {h00=0x0028, h01=0x0050, text=»!!RE 477,$$FALSE$$TRUE$$ TINGLEVFLAG«, t00=0x0003, t01=0x00e8}
0x05c0…05ee Head {h00=0x002a, h01=0x0050, text=»!!RE 478,$$TRUE$$FALSE$$ NO VSL CHECK «, t00=0x0003, t01=0x0114}
0x05ee…0618 Head {h00=0x0026, h01=0x0050, text=»!!RE 484,$$1400$$10000$$ DISKSIZE «, t00=0x0003, t01=0x0142}
0x0618…063c Head {h00=0x0020, h01=0x0050, text=»!!RE 490,$$128$$80$$ CRECLGD«, t00=0x0003, t01=0x016c}
0x063c…0660 Head {h00=0x0020, h01=0x0050, text=»!!RE 492,$$OD-KOM$$TINGL.$$ «, t00=0x0003, t01=0x0190}
0x0660…0686 Head {h00=0x0022, h01=0x0050, text=»!!RE 494,$$20$$200$$ INDEXFILE«, t00=0x0004, t01=0x0024}
0x0686…06a6 Head {h00=0x001c, h01=0x0050, text=»!!RE 495,$$5$$1$$ CKTTOP«, t00=0x0004, t01=0x004a}
0x06a6…06ba Head {h00=0x0010, h01=0x0050, text=»!!DL 496,497«, t00=0x0004, t01=0x006a}
0x06ba…06f4 Head {h00=0x0036, h01=0x0050, text=»FROMTX STRGI (12),' ','KA','KB','KC','KD','KE' '«, t00=0x0004, t01=0x007e}
0x06f4…070c Head {h00=0x0014, h01=0x0050, text=»!!DL 817,1091 RK«, t00=0x0004, t01=0x00b8}
0x070c…0726 Head {h00=0x0016, h01=0x0050, text=»!!DL 1103,1105 RK «, t00=0x0004, t01=0x00d0}
0x0726…073a Head {h00=0x0010, h01=0x0050, text=»!!DL 1107 RK«, t00=0x0004, t01=0x00ea}
0x073a…0754 Head {h00=0x0016, h01=0x0050, text=»!!DL 1153,1172 RK «, t00=0x0004, t01=0x00fe}
0x0754…0766 Head {h00=0x000e, h01=0x0050, text=»!!DL 1200 «, t00=0x0004, t01=0x0118}
0x0766…078a Head {h00=0x0020, h01=0x0050, text=» MOVE TCT01,=W'2' PRINTERNR «, t00=0x0004, t01=0x012a}
0x078a…07a4 Head {h00=0x0016, h01=0x0050, text=»!!DL 1250,1262 RK «, t00=0x0004, t01=0x014e}
0x07a4…07b8 Head {h00=0x0010, h01=0x0050, text=»!!DL 1265 RK«, t00=0x0004, t01=0x0168}
0x07b8…07c4 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0004, t01=0x017c}
0x07c4…07d2 Head {h00=0x000a, h01=0x0050, text=»NOD C «, t00=0x0004, t01=0x0188}
0x07d2…07e4 Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0005, t01=0x0008}
0x07e4…07f6 Head {h00=0x000e, h01=0x0050, text=»INC DIV539«, t00=0x0005, t01=0x001a}
0x07f6…0804 Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0005, t01=0x002c}
0x0804…0816 Head {h00=0x000e, h01=0x0050, text=»LED SCREEN«, t00=0x0005, t01=0x003a}
0x0816…0836 Head {h00=0x001c, h01=0x0050, text=»!!CH $$KEY461$$KEY539$$ «, t00=0x0005, t01=0x004c}
0x0836…0854 Head {h00=0x001a, h01=0x0050, text=»!!CH $$SL461$$SLCOP$$ «, t00=0x0005, t01=0x006c}
0x0854…0860 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0005, t01=0x008a}
0x0860…0872 Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0005, t01=0x0096}
0x0872…0884 Head {h00=0x000e, h01=0x0050, text=»INC RGSUB4«, t00=0x0005, t01=0x00a8}
0x0884…0896 Head {h00=0x000e, h01=0x0050, text=»INC RGSTRT«, t00=0x0005, t01=0x00ba}
0x0896…08a4 Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0005, t01=0x00cc}
0x08a4…08b6 Head {h00=0x000e, h01=0x0050, text=»INC RGMAIN«, t00=0x0005, t01=0x00da}
0x08b6…08c8 Head {h00=0x000e, h01=0x0050, text=»INC RGSUBS«, t00=0x0005, t01=0x00ec}
0x08c8…08da Head {h00=0x000e, h01=0x0050, text=»INC RGSUB1«, t00=0x0005, t01=0x00fe}
0x08da…08ec Head {h00=0x000e, h01=0x0050, text=»INC RGSUB2«, t00=0x0005, t01=0x0110}
0x08ec…08fe Head {h00=0x000e, h01=0x0050, text=»INC RGSUB3«, t00=0x0005, t01=0x0122}
0x08fe…090c Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0005, t01=0x0134}
0x090c…091e Head {h00=0x000e, h01=0x0050, text=»INC RGKLAR«, t00=0x0005, t01=0x0142}
0x091e…0930 Head {h00=0x000e, h01=0x0050, text=»INC KTPLN «, t00=0x0005, t01=0x0154}
0x0930…0942 Head {h00=0x000e, h01=0x0050, text=»INC KTOPR «, t00=0x0005, t01=0x0166}
0x0942…0950 Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0005, t01=0x0178}
0x0950…0962 Head {h00=0x000e, h01=0x0050, text=»INC RGADM «, t00=0x0005, t01=0x0186}
0x0962…0974 Head {h00=0x000e, h01=0x0050, text=»INC REMSUB«, t00=0x0006, t01=0x0008}
0x0974…0982 Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x001a}
0x0982…0992 Head {h00=0x000c, h01=0x0050, text=»INC ADM5«, t00=0x0006, t01=0x0028}
0x0992…09a4 Head {h00=0x000e, h01=0x0050, text=»INC SUBAPL«, t00=0x0006, t01=0x0038}
0x09a4…09b6 Head {h00=0x000e, h01=0x0050, text=»INC REMPRT«, t00=0x0006, t01=0x004a}
0x09b6…09c4 Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x005c}
0x09c4…09d6 Head {h00=0x000e, h01=0x0050, text=»INC KMDIO «, t00=0x0006, t01=0x006a}
0x09d6…09e8 Head {h00=0x000e, h01=0x0050, text=»INC DKSUBS«, t00=0x0006, t01=0x007c}
0x09e8…09fa Head {h00=0x000e, h01=0x0050, text=»INC REMTXT«, t00=0x0006, t01=0x008e}
0x09fa…0a0c Head {h00=0x000e, h01=0x0050, text=»INC RAADUM«, t00=0x0006, t01=0x00a0}
0x0a0c…0a1a Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x00b2}
0x0a1a…0a2c Head {h00=0x000e, h01=0x0050, text=»INC RGFRMT«, t00=0x0006, t01=0x00c0}
0x0a2c…0a3e Head {h00=0x000e, h01=0x0050, text=»INC REMFMT«, t00=0x0006, t01=0x00d2}
0x0a3e…0a4c Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x00e4}
0x0a4c…0a5e Head {h00=0x000e, h01=0x0050, text=»INC REMLEV«, t00=0x0006, t01=0x00f2}
0x0a5e…0a6e Head {h00=0x000c, h01=0x0050, text=»INC ADM6«, t00=0x0006, t01=0x0104}
0x0a6e…0a7c Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x0114}
0x0a7c…0a8e Head {h00=0x000e, h01=0x0050, text=»INC REMTR «, t00=0x0006, t01=0x0122}
0x0a8e…0aa0 Head {h00=0x000e, h01=0x0050, text=»LED REMBDT«, t00=0x0006, t01=0x0134}
0x0aa0…0ab4 Head {h00=0x0010, h01=0x0050, text=»!!DL 177,250«, t00=0x0006, t01=0x0146}
0x0ab4…0ac8 Head {h00=0x0010, h01=0x0050, text=»B821PR PROC «, t00=0x0006, t01=0x015a}
0x0ac8…0ad4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x016e}
0x0ad4…0ae2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x017a}
0x0ae2…0aee Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0006, t01=0x0188}
0x0aee…0b00 (7, 0, 400) Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0007, t01=0x0004}
0x0b00…0b0e Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0007, t01=0x0016}
0x0b0e…0b20 Head {h00=0x000e, h01=0x0050, text=»INC BUDGET«, t00=0x0007, t01=0x0024}
0x0b20…0b30 Head {h00=0x000c, h01=0x0050, text=»TLK U,4K«, t00=0x0007, t01=0x0036}
0x0b30…0b44 Head {h00=0x0010, h01=0x0050, text=»ASM PRTX,NL «, t00=0x0007, t01=0x0046}
0x0b44…0b56 Head {h00=0x000e, h01=0x0050, text=»LED VDUPRX«, t00=0x0007, t01=0x005a}
0x0b56…0b66 Head {h00=0x000c, h01=0x0050, text=»!!DL 70 «, t00=0x0007, t01=0x006c}
0x0b66…0b8e Head {h00=0x0024, h01=0x0050, text=»RBUFNR EQU 1 SINGLE BUFFERING«, t00=0x0007, t01=0x007c}
0x0b8e…0b9e Head {h00=0x000c, h01=0x0050, text=»!!DL 72 «, t00=0x0007, t01=0x00a4}
0x0b9e…0bc8 Head {h00=0x0026, h01=0x0050, text=»TBUFNR EQU 1 SINGLE BUFFERING «, t00=0x0007, t01=0x00b4}
0x0bc8…0bd4 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0007, t01=0x00de}
0x0bd4…0be6 Head {h00=0x000e, h01=0x0050, text=»ASM /S,NL «, t00=0x0007, t01=0x00ea}
0x0be6…0bfc Head {h00=0x0012, h01=0x0050, text=»ASM STARTX,NL «, t00=0x0007, t01=0x00fc}
0x0bfc…0c0e Head {h00=0x000e, h01=0x000a, text=»INC TB3270«, t00=0x0007, t01=0x0112}
0x0c0e…0c1e Head {h00=0x000c, h01=0x0007, text=»$INCGEN «, t00=0x0007, t01=0x0124}
0x0c1e…0c2c Head {h00=0x000a, h01=0x0005, text=»LKE M «, t00=0x0007, t01=0x0134}
0x0c2c…0c42 Head {h00=0x0012, h01=0x0050, text=»KPF /L,RGL539 «, t00=0x0007, t01=0x0142}
0x0c42…0c4e Head {h00=0x0008, h01=0x0003, text=»SCR «, t00=0x0007, t01=0x0158}
0x0c4e…0c84 Head {h00=0x0032, h01=0x0050, text=»MES $PDISC M=M:267,MU=M:POOL92,A=RGL539,C=C539«, t00=0x0007, t01=0x0164}
0x0c84…0c92 Head {h00=0x000a, h01=0x0005, text=»$ASG2 «, t00=0x0008, t01=0x000a}
0x0c92…0c96 (9, 1, 8) Head {h00=0x2004, h01=0x0000}
0x0c96…0c9a 00 09 00 04 ┆ ┆
0x0c9a…0cea (10, 0, 400) 4b 39 30 20 00 09 01 8a 00 06 00 50 2a 20 00 0a 00 0c 00 0a 00 50 42 43 48 4b 34 30 00 0a 00 16 00 1e 00 50 20 41 44 44 20 47 54 42 53 55 4d 31 2c 47 54 44 55 50 46 28 43 42 49 4e 34 29 00 0a 00 24 00 1e 00 50 20 50 45 52 46 20 54 58 54 45 ┆K90 P* PBCHK40 P ADD GTBSUM1,GTDUPF(CBIN4) $ P PERF TXTE┆
0x0cea…0d3a 44 49 54 2c 43 42 49 4e 31 2c 43 42 49 4e 33 20 00 0a 00 46 00 0e 00 50 20 42 20 42 43 48 4b 36 30 20 00 0a 00 68 00 06 00 50 2a 20 00 0a 00 7a 00 0a 00 50 42 43 48 4b 35 30 00 0a 00 84 00 30 00 50 20 43 42 45 20 47 53 57 42 43 44 35 2c 3d ┆DIT,CBIN1,CBIN3 F P B BCHK60 h P* z PBCHK50 0 P CBE GSWBCD5,=┆
0x0d3a…0d8a 44 27 31 27 2c 42 43 48 4b 39 30 20 4e 4f 54 48 49 4e 47 20 54 4f 20 50 52 49 4e 54 20 3f 00 0a 00 92 00 0a 00 50 42 43 48 4b 36 30 00 0a 00 c6 00 1a 00 50 20 45 44 49 54 20 53 50 49 4e 50 55 54 2c 46 52 45 4d 54 4f 54 31 00 0a 00 d4 00 1c ┆D'1',BCHK90 NOTHING TO PRINT ? PBCHK60 P EDIT SPINPUT,FREMTOT1 ┆
0x0d8a…0dda 00 50 20 50 45 52 46 20 46 4d 4f 44 2c 43 42 49 4e 31 2c 53 50 49 4e 50 55 54 00 0a 00 f2 00 1a 00 50 20 45 44 49 54 20 53 50 49 4e 50 55 54 2c 46 52 45 4d 54 4f 54 53 00 0a 01 12 00 1e 00 50 20 50 45 52 46 20 46 4d 4f 44 2c 43 42 49 4e 31 ┆ P PERF FMOD,CBIN1,SPINPUT P EDIT SPINPUT,FREMTOTS P PERF FMOD,CBIN1┆
0x0dda…0e2a 37 2c 53 50 49 4e 50 55 54 20 00 0a 01 30 00 30 00 50 20 4d 4f 56 45 20 47 53 57 53 54 52 32 30 2c 3d 58 27 34 33 34 38 34 35 34 33 34 42 34 32 34 35 34 43 35 43 34 32 32 41 32 30 27 20 00 0a 01 52 00 2c 00 50 20 50 45 52 46 20 46 4d 4f 44 ┆7,SPINPUT 0 0 P MOVE GSWSTR20,=X'434845434B42454C5C422A20' R , P PERF FMOD┆
0x0e2a…0e7a (11, 0, 400) 2c 43 42 49 4e 31 36 2c 47 53 57 53 54 52 32 30 20 27 43 48 45 43 4b 42 45 4c 4f 42 27 20 00 0a 01 86 00 10 00 50 20 50 45 52 46 20 46 53 4f 4c 56 45 00 0b 00 26 00 0a 00 50 42 43 48 4b 36 35 00 0b 00 3a 00 18 00 50 20 4d 4f 56 45 20 47 54 ┆,CBIN16,GSWSTR20 'CHECKBELOB' P PERF FSOLVE & PBCHK65 : P MOVE GT┆
0x0e7a…0eca 42 53 55 4d 31 2c 3d 44 27 30 27 20 00 0b 00 48 00 20 00 50 20 50 45 52 46 20 47 45 4e 57 52 53 2c 47 54 48 43 44 45 56 2c 45 44 49 54 42 55 46 00 0b 00 64 00 16 00 50 20 50 45 52 46 20 4e 45 57 4c 49 4e 2c 43 42 49 4e 37 00 0b 00 88 00 18 ┆BSUM1,=D'0' H P PERF GENWRS,GTHCDEV,EDITBUF d P PERF NEWLIN,CBIN7 ┆
0x0eca…0f1a 00 50 20 54 42 46 20 47 54 43 48 4b 50 52 2c 42 43 48 4b 37 30 20 00 0b 00 a2 00 28 00 50 20 50 45 52 46 20 4e 45 57 4c 49 4e 2c 43 42 49 4e 31 20 45 58 54 52 41 20 4c 49 4e 45 46 45 45 44 20 3f 20 00 0b 00 be 00 12 00 50 20 43 4c 45 41 52 ┆ P TBF GTCHKPR,BCHK70 ( P PERF NEWLIN,CBIN1 EXTRA LINEFEED ? P CLEAR┆
0x0f1a…0f6a 20 47 54 43 48 4b 50 52 00 0b 00 ea 00 0e 00 50 20 42 20 42 43 48 4b 39 30 20 00 0b 01 00 00 0a 00 50 42 43 48 4b 37 30 00 0b 01 12 00 10 00 50 20 53 45 54 20 47 54 43 48 4b 50 52 00 0b 01 20 00 0a 00 50 42 43 48 4b 39 30 00 0b 01 34 00 14 ┆ GTCHKPR P B BCHK90 PBCHK70 P SET GTCHKPR PBCHK90 4 ┆
0x0f6a…0fba 00 50 20 43 4d 50 20 43 42 49 4e 30 2c 43 42 49 4e 30 00 0b 01 42 00 08 00 50 20 52 45 54 00 0b 01 5a 00 0a 00 50 20 50 45 4e 44 20 00 0b 01 66 00 10 00 50 42 38 32 31 50 52 20 50 52 4f 43 20 00 0b 01 74 00 08 00 50 20 52 45 54 00 0b 01 88 ┆ P CMP CBIN0,CBIN0 B P RET Z P PEND f PB821PR PROC t P RET ┆
0x0fba…100a (12, 0, 400) 00 0a 00 50 20 50 45 4e 44 20 00 0c 00 04 00 0a 00 50 20 45 4a 45 43 54 00 0c 00 12 00 12 00 50 42 47 49 52 50 52 20 50 52 4f 43 20 50 20 00 0c 00 20 00 20 00 50 2a 20 42 47 49 52 50 52 31 30 20 2d 20 41 44 4a 55 53 54 20 50 52 49 4e 54 45 ┆ P PEND P EJECT PBGIRPR PROC P P* BGIRPR10 - ADJUST PRINTE┆
0x100a…105a 52 20 00 0c 00 36 00 20 00 50 2a 20 42 47 49 52 50 52 32 30 20 2d 20 4c 45 56 20 31 20 2b 20 54 52 41 4e 53 20 31 00 0c 00 5a 00 16 00 50 2a 20 42 47 49 52 33 30 20 2d 20 54 52 41 4e 53 20 32 00 0c 00 7e 00 14 00 50 2a 20 42 47 49 52 34 30 ┆R 6 P* BGIRPR20 - LEV 1 + TRANS 1 Z P* BGIR30 - TRANS 2 ~ P* BGIR40┆
0x105a…10aa 20 54 52 41 4e 53 20 33 00 0c 00 98 00 1e 00 50 2a 20 42 47 49 52 35 30 20 2d 20 4c 45 56 20 32 20 2b 20 54 52 41 4e 53 20 31 00 0c 00 b0 00 16 00 50 2a 20 42 47 49 52 36 30 20 2d 20 54 52 41 4e 53 20 32 00 0c 00 d2 00 1e 00 50 2a 20 42 47 ┆ TRANS 3 P* BGIR50 - LEV 2 + TRANS 1 P* BGIR60 - TRANS 2 P* BG┆
0x10aa…10fa 49 52 37 30 20 2d 20 54 52 41 4e 53 20 33 20 2b 20 57 52 49 54 45 00 0c 00 ec 00 14 00 50 2a 20 42 47 49 52 38 30 20 2d 20 57 52 49 54 45 00 0c 01 0e 00 14 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 38 2c 50 20 00 0c 01 26 00 16 00 50 20 41 ┆IR70 - TRANS 3 + WRITE P* BGIR80 - WRITE P MOVE GSWBIN8,P & P A┆
0x10fa…114a 44 44 20 47 53 57 42 49 4e 38 2c 43 42 49 4e 31 00 0c 01 3e 00 30 00 50 20 49 42 20 47 53 57 42 49 4e 38 2c 42 47 49 52 31 30 2c 42 47 49 52 32 30 2c 42 47 49 52 33 30 2c 42 47 49 52 34 30 2c 5c 5c 43 20 00 0c 01 58 00 22 00 50 5c 5c 42 47 ┆DD GSWBIN8,CBIN1 > 0 P IB GSWBIN8,BGIR10,BGIR20,BGIR30,BGIR40, C X " P BG┆