DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦6042d2229⟧

    Length: 4412 (0x113c)
    Notes: pts_type(UF)
    Names: »KM821.UF«

Derivation

└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
    └─⟦this⟧ »NJREMIT/KM821.UF« 
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/KM821.UF« 

PTS(SC)

PRT KM821 
PRT C821
MES HJ	RRING KOMMUNE, REMITTERING 
MES BUDGET
SCR 
LED KMD08 
!!CH $$EJECT$$ $$ 
!!CH $$'26'$$'22'$$ 
!!CH $$(26)$$(22)$$ 
!!CH $$-4$$4$$
!!CH $$FC=40$$FC=50$$ 
!!RE 41,$$56$$100$$ 
!!DL 61,62 FD03,FD04
!!DL 67,108 RK
!!DL 224,231
MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. 
MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP
MF1CU STRG X'6F4F' CU ADDRESS 
CNFHC STRGI (16),'LA','  ' HC PRINTER 
!!DL 235,236
FROMKX STRGI (12)2C'TF','TE','  ' 
!!RE 240,$$FALSE$$TRUE$$ CBKOFLG
!!RE 241,$$FALSE$$TRUE$$ CKTFLAG
!!RE 242,$$FALSE$$FALSE$$ CCLKTFLG
!!RE 243,$$FALSE$$FALSE$$ CTESTFLG
!!RE 244,$$FALSE$$FALSE$$ CTRVALG 
!!RE 245,$$FALSE$$FALSE$$ CFLT46
!!RE 246,$$FALSE$$FALSE$$ CFLT48
!!RE 247,$$TRUE$$FALSE$$ CKTAUTO
!!RE 248,$$FALSE$$TRUE$$ CDCFLAG
!!RE 249,$$FALSE$$FALSE$$ CCYWRTF 
!!RE 250,$$FALSE$$FALSE$$ CADM22F 
!!RE 251,$$FALSE$$TRUE$$ C5MDISK
!!RE 252,$$TRUE$$FALSE$$ CKASFLG
!!RE 253,$$TRUE$$TRUE$$ CSLDFLG 
!!RE 254,$$FALSE$$FALSE$$CGLREGFL 
!!RE 255,$$FALSE$$FALSE$$ CCONVERT
!!RE 279,$$FALSE$$TRUE$$ CREMITFL 
!!RE 287,$$FALSE$$TRUE$$
!!RE 288,$$FALSE$$TRUE$$ CTEXTFLG 
!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG 
!!RE 290,$$FALSE$$TRUE$$CBUDTFLG
!!DL 331
CFLAG BINI (12,2),X'00D1',X'0000',X'0090',X'0000',X'0090',X'0000',		C 
		X'00E4',X'0000' 
!!RE 361,$$FALSE$$TRUE$$ BUDGET 
!!RE 366,$$FALSE$$TRUE$$ HJORRING CHECKS
!!RE 416,$$01014610$$%VER%REL%MOD$$ VERSION 
!!RE 476,$$FALSE$$TRUE$$ CLEV8FLG 
!!RE 484,$$1400$$10000$$DISK SIZE 
!!RE 490,$$128$$80$$ CRECLGD
!!RE 492,$$6'OD-KOM'$$12X'484A5C52522E'$$ 
!!RE 494,$$20$$200$$ INDEX FILE 
!!RE 495,$$5$$1$$ CKTTOP
!!DL 496,497
FROMTX STRGI (12)2C'  ','  ','  ','KA','  ' 
!!DL 817,1091 RK
!!DL 1103,1105 RK 
!!DL 1107 RK
!!DL 1153,1172 RK 
!!DL 1200 
 MOVE TCT01,=W'1' PRINTER NR
!!DL 1250,1262 RK 
!!DL 1265 RK
!!EN
NOD C 
TRA /S,NL 
LED DIV539
!!CH $$999E-999E-99E-99$$999E-99E-999E-99$$ 
!!CH $$ZZZE-ZZZE-ZZE-ZZ$$ZZZE-ZZE-ZZZE-ZZ$$ 
!!EN
TRA /S,NL 
NOD R 
LED SCREEN,/S 
!!CH $$KEY461$$KEY821$$ 
!!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 RAADUM
NOD R 
INC RGFRMT
INC REMFMT
NOD D 
INC REMLEV
INC ADM6
NOD D 
INC REMTR 
LED REMBDT
!!DL 120,172 BCHK00 -> BCHK90 
!!EN
TRA /S,NL 
NOD D 
INC BUDGET
INC REMTXT
ASG 2,LP0F
TLK U,4K
INC PRT 
INC VDUPRT
LED START,/S
!!CH $$KB6272	EQU	0$$KB6272	EQU	1$$ 
!!EN
ASM /S,NL 
LED TB3270,/S 
!!CH $$KB6272	EQU	0$$KB6272	EQU	1$$ 
!!EN
ASM /S,NL 
$INCGEN 
LKE M 
KPF /L,RGL821 
SCR 
MES $PDISC M=M:821,MU=M:POOL92,A=RGL821,C=C821
$ASG2 

HexDump

0x0000…0012 (0, 0, 400)  Head {h00=0x000e, h01=0x0050, text=»PRT KM821 «, t00=0x0000, t01=0x0004}
0x0012…0022              Head {h00=0x000c, h01=0x0050, text=»PRT C821«, t00=0x0000, t01=0x0016}
0x0022…004c              Head {h00=0x0026, h01=0x0050, text=»MES HJ RRING KOMMUNE, REMITTERING «, t00=0x0000, t01=0x0026}
0x004c…005e              Head {h00=0x000e, h01=0x0050, text=»MES BUDGET«, t00=0x0000, t01=0x0050}
0x005e…006a              Head {h00=0x0008, h01=0x0050, text=»SCR «, t00=0x0000, t01=0x0062}
0x006a…007c              Head {h00=0x000e, h01=0x0050, text=»LED KMD08 «, t00=0x0000, t01=0x006e}
0x007c…0096              Head {h00=0x0016, h01=0x0050, text=»!!CH $$EJECT$$ $$ «, t00=0x0000, t01=0x0080}
0x0096…00b2              Head {h00=0x0018, h01=0x0050, text=»!!CH $$'26'$$'22'$$ «, t00=0x0000, t01=0x009a}
0x00b2…00ce              Head {h00=0x0018, h01=0x0050, text=»!!CH $$(26)$$(22)$$ «, t00=0x0000, t01=0x00b6}
0x00ce…00e4              Head {h00=0x0012, h01=0x0050, text=»!!CH $$-4$$4$$«, t00=0x0000, t01=0x00d2}
0x00e4…0102              Head {h00=0x001a, h01=0x0050, text=»!!CH $$FC=40$$FC=50$$ «, t00=0x0000, t01=0x00e8}
0x0102…011e              Head {h00=0x0018, h01=0x0050, text=»!!RE 41,$$56$$100$$ «, t00=0x0000, t01=0x0106}
0x011e…013a              Head {h00=0x0018, h01=0x0050, text=»!!DL 61,62 FD03,FD04«, t00=0x0000, t01=0x0122}
0x013a…0150              Head {h00=0x0012, h01=0x0050, text=»!!DL 67,108 RK«, t00=0x0000, t01=0x013e}
0x0150…0164              Head {h00=0x0010, h01=0x0050, text=»!!DL 224,231«, t00=0x0000, t01=0x0154}
0x0164…0198              Head {h00=0x0030, h01=0x0050, text=»MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. «, t00=0x0000, t01=0x0168}
0x0198…01d0              Head {h00=0x0034, h01=0x0050, text=»MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP«, t00=0x0001, t01=0x000c}
0x01d0…01f6              Head {h00=0x0022, h01=0x0050, text=»MF1CU STRG X'6F4F' CU ADDRESS «, t00=0x0001, t01=0x0044}
0x01f6…0224              Head {h00=0x002a, h01=0x0050, text=»CNFHC STRGI (16),'LA','  ' HC PRINTER «, t00=0x0001, t01=0x006a}
0x0224…0238              Head {h00=0x0010, h01=0x0050, text=»!!DL 235,236«, t00=0x0001, t01=0x0098}
0x0238…0262              Head {h00=0x0026, h01=0x0050, text=»FROMKX STRGI (12)2C'TF','TE','  ' «, t00=0x0001, t01=0x00ac}
0x0262…028a              Head {h00=0x0024, h01=0x0050, text=»!!RE 240,$$FALSE$$TRUE$$ CBKOFLG«, t00=0x0001, t01=0x00d6}
0x028a…02b2              Head {h00=0x0024, h01=0x0050, text=»!!RE 241,$$FALSE$$TRUE$$ CKTFLAG«, t00=0x0001, t01=0x00fe}
0x02b2…02dc              Head {h00=0x0026, h01=0x0050, text=»!!RE 242,$$FALSE$$FALSE$$ CCLKTFLG«, t00=0x0001, t01=0x0126}
0x02dc…0306              Head {h00=0x0026, h01=0x0050, text=»!!RE 243,$$FALSE$$FALSE$$ CTESTFLG«, t00=0x0001, t01=0x0150}
0x0306…0330              Head {h00=0x0026, h01=0x0050, text=»!!RE 244,$$FALSE$$FALSE$$ CTRVALG «, t00=0x0001, t01=0x017a}
0x0330…0358              Head {h00=0x0024, h01=0x0050, text=»!!RE 245,$$FALSE$$FALSE$$ CFLT46«, t00=0x0002, t01=0x0014}
0x0358…0380              Head {h00=0x0024, h01=0x0050, text=»!!RE 246,$$FALSE$$FALSE$$ CFLT48«, t00=0x0002, t01=0x003c}
0x0380…03a8              Head {h00=0x0024, h01=0x0050, text=»!!RE 247,$$TRUE$$FALSE$$ CKTAUTO«, t00=0x0002, t01=0x0064}
0x03a8…03d0              Head {h00=0x0024, h01=0x0050, text=»!!RE 248,$$FALSE$$TRUE$$ CDCFLAG«, t00=0x0002, t01=0x008c}
0x03d0…03fa              Head {h00=0x0026, h01=0x0050, text=»!!RE 249,$$FALSE$$FALSE$$ CCYWRTF «, t00=0x0002, t01=0x00b4}
0x03fa…0424              Head {h00=0x0026, h01=0x0050, text=»!!RE 250,$$FALSE$$FALSE$$ CADM22F «, t00=0x0002, t01=0x00de}
0x0424…044c              Head {h00=0x0024, h01=0x0050, text=»!!RE 251,$$FALSE$$TRUE$$ C5MDISK«, t00=0x0002, t01=0x0108}
0x044c…0474              Head {h00=0x0024, h01=0x0050, text=»!!RE 252,$$TRUE$$FALSE$$ CKASFLG«, t00=0x0002, t01=0x0130}
0x0474…049c              Head {h00=0x0024, h01=0x0050, text=»!!RE 253,$$TRUE$$TRUE$$ CSLDFLG «, t00=0x0002, t01=0x0158}
0x049c…04c6              Head {h00=0x0026, h01=0x0050, text=»!!RE 254,$$FALSE$$FALSE$$CGLREGFL «, t00=0x0002, t01=0x0180}
0x04c6…04f0              Head {h00=0x0026, h01=0x0050, text=»!!RE 255,$$FALSE$$FALSE$$ CCONVERT«, t00=0x0003, t01=0x001a}
0x04f0…051a              Head {h00=0x0026, h01=0x0050, text=»!!RE 279,$$FALSE$$TRUE$$ CREMITFL «, t00=0x0003, t01=0x0044}
0x051a…053a              Head {h00=0x001c, h01=0x0050, text=»!!RE 287,$$FALSE$$TRUE$$«, t00=0x0003, t01=0x006e}
0x053a…0564              Head {h00=0x0026, h01=0x0050, text=»!!RE 288,$$FALSE$$TRUE$$ CTEXTFLG «, t00=0x0003, t01=0x008e}
0x0564…058e              Head {h00=0x0026, h01=0x0050, text=»!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG «, t00=0x0003, t01=0x00b8}
0x058e…05b6              Head {h00=0x0024, h01=0x0050, text=»!!RE 290,$$FALSE$$TRUE$$CBUDTFLG«, t00=0x0003, t01=0x00e2}
0x05b6…05c6              Head {h00=0x000c, h01=0x0050, text=»!!DL 331«, t00=0x0003, t01=0x010a}
0x05c6…0614              Head {h00=0x004a, h01=0x0050, text=»CFLAG BINI (12,2),X'00D1',X'0000',X'0090',X'0000',X'0090',X'0000',  C «, t00=0x0003, t01=0x011a}
0x0614…062e              Head {h00=0x0016, h01=0x0050, text=»  X'00E4',X'0000' «, t00=0x0003, t01=0x0168}
0x062e…0656              Head {h00=0x0024, h01=0x0050, text=»!!RE 361,$$FALSE$$TRUE$$ BUDGET «, t00=0x0003, t01=0x0182}
0x0656…0686              Head {h00=0x002c, h01=0x0050, text=»!!RE 366,$$FALSE$$TRUE$$ HJORRING CHECKS«, t00=0x0004, t01=0x001a}
0x0686…06ba              Head {h00=0x0030, h01=0x0050, text=»!!RE 416,$$01014610$$%VER%REL%MOD$$ VERSION «, t00=0x0004, t01=0x004a}
0x06ba…06e4              Head {h00=0x0026, h01=0x0050, text=»!!RE 476,$$FALSE$$TRUE$$ CLEV8FLG «, t00=0x0004, t01=0x007e}
0x06e4…070e              Head {h00=0x0026, h01=0x0050, text=»!!RE 484,$$1400$$10000$$DISK SIZE «, t00=0x0004, t01=0x00a8}
0x070e…0732              Head {h00=0x0020, h01=0x0050, text=»!!RE 490,$$128$$80$$ CRECLGD«, t00=0x0004, t01=0x00d2}
0x0732…0764              Head {h00=0x002e, h01=0x0050, text=»!!RE 492,$$6'OD-KOM'$$12X'484A5C52522E'$$ «, t00=0x0004, t01=0x00f6}
0x0764…078c              Head {h00=0x0024, h01=0x0050, text=»!!RE 494,$$20$$200$$ INDEX FILE «, t00=0x0004, t01=0x0128}
0x078c…07ac              Head {h00=0x001c, h01=0x0050, text=»!!RE 495,$$5$$1$$ CKTTOP«, t00=0x0004, t01=0x0150}
0x07ac…07c0              Head {h00=0x0010, h01=0x0050, text=»!!DL 496,497«, t00=0x0004, t01=0x0170}
0x07c0…07f4              Head {h00=0x0030, h01=0x0050, text=»FROMTX STRGI (12)2C'  ','  ','  ','KA','  ' «, t00=0x0004, t01=0x0184}
0x07f4…080c              Head {h00=0x0014, h01=0x0050, text=»!!DL 817,1091 RK«, t00=0x0005, t01=0x0028}
0x080c…0826              Head {h00=0x0016, h01=0x0050, text=»!!DL 1103,1105 RK «, t00=0x0005, t01=0x0040}
0x0826…083a              Head {h00=0x0010, h01=0x0050, text=»!!DL 1107 RK«, t00=0x0005, t01=0x005a}
0x083a…0854              Head {h00=0x0016, h01=0x0050, text=»!!DL 1153,1172 RK «, t00=0x0005, t01=0x006e}
0x0854…0866              Head {h00=0x000e, h01=0x0050, text=»!!DL 1200 «, t00=0x0005, t01=0x0088}
0x0866…088a              Head {h00=0x0020, h01=0x0050, text=» MOVE TCT01,=W'1' PRINTER NR«, t00=0x0005, t01=0x009a}
0x088a…08a4              Head {h00=0x0016, h01=0x0050, text=»!!DL 1250,1262 RK «, t00=0x0005, t01=0x00be}
0x08a4…08b8              Head {h00=0x0010, h01=0x0050, text=»!!DL 1265 RK«, t00=0x0005, t01=0x00d8}
0x08b8…08c4              Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0005, t01=0x00ec}
0x08c4…08d2              Head {h00=0x000a, h01=0x0050, text=»NOD C «, t00=0x0005, t01=0x00f8}
0x08d2…08e4              Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0005, t01=0x0106}
0x08e4…08f6              Head {h00=0x000e, h01=0x0050, text=»LED DIV539«, t00=0x0005, t01=0x0118}
0x08f6…092a              Head {h00=0x0030, h01=0x0050, text=»!!CH $$999E-999E-99E-99$$999E-99E-999E-99$$ «, t00=0x0005, t01=0x012a}
0x092a…095e              Head {h00=0x0030, h01=0x0050, text=»!!CH $$ZZZE-ZZZE-ZZE-ZZ$$ZZZE-ZZE-ZZZE-ZZ$$ «, t00=0x0005, t01=0x015e}
0x095e…096a (6, 0, 398)  Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0006, t01=0x0004}
0x096a…097c              Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0006, t01=0x0010}
0x097c…098a              Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x0022}
0x098a…09a0              Head {h00=0x0012, h01=0x0050, text=»LED SCREEN,/S «, t00=0x0006, t01=0x0030}
0x09a0…09c0              Head {h00=0x001c, h01=0x0050, text=»!!CH $$KEY461$$KEY821$$ «, t00=0x0006, t01=0x0046}
0x09c0…09de              Head {h00=0x001a, h01=0x0050, text=»!!CH $$SL461$$SLCOP$$ «, t00=0x0006, t01=0x0066}
0x09de…09ea              Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0006, t01=0x0084}
0x09ea…09fc              Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0006, t01=0x0090}
0x09fc…0a0e              Head {h00=0x000e, h01=0x0050, text=»INC RGSUB4«, t00=0x0006, t01=0x00a2}
0x0a0e…0a20              Head {h00=0x000e, h01=0x0050, text=»INC RGSTRT«, t00=0x0006, t01=0x00b4}
0x0a20…0a2e              Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x00c6}
0x0a2e…0a40              Head {h00=0x000e, h01=0x0050, text=»INC RGMAIN«, t00=0x0006, t01=0x00d4}
0x0a40…0a52              Head {h00=0x000e, h01=0x0050, text=»INC RGSUBS«, t00=0x0006, t01=0x00e6}
0x0a52…0a64              Head {h00=0x000e, h01=0x0050, text=»INC RGSUB1«, t00=0x0006, t01=0x00f8}
0x0a64…0a76              Head {h00=0x000e, h01=0x0050, text=»INC RGSUB2«, t00=0x0006, t01=0x010a}
0x0a76…0a88              Head {h00=0x000e, h01=0x0050, text=»INC RGSUB3«, t00=0x0006, t01=0x011c}
0x0a88…0a96              Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x012e}
0x0a96…0aa8              Head {h00=0x000e, h01=0x0050, text=»INC RGKLAR«, t00=0x0006, t01=0x013c}
0x0aa8…0aba              Head {h00=0x000e, h01=0x0050, text=»INC KTPLN «, t00=0x0006, t01=0x014e}
0x0aba…0acc              Head {h00=0x000e, h01=0x0050, text=»INC KTOPR «, t00=0x0006, t01=0x0160}
0x0acc…0ada              Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x0172}
0x0ada…0aec              Head {h00=0x000e, h01=0x0050, text=»INC RGADM «, t00=0x0006, t01=0x0180}
0x0aec…0afe (7, 0, 400)  Head {h00=0x000e, h01=0x0050, text=»INC REMSUB«, t00=0x0007, t01=0x0004}
0x0afe…0b0c              Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0007, t01=0x0016}
0x0b0c…0b1c              Head {h00=0x000c, h01=0x0050, text=»INC ADM5«, t00=0x0007, t01=0x0024}
0x0b1c…0b2e              Head {h00=0x000e, h01=0x0050, text=»INC SUBAPL«, t00=0x0007, t01=0x0034}
0x0b2e…0b40              Head {h00=0x000e, h01=0x0050, text=»INC REMPRT«, t00=0x0007, t01=0x0046}
0x0b40…0b4e              Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0007, t01=0x0058}
0x0b4e…0b60              Head {h00=0x000e, h01=0x0050, text=»INC KMDIO «, t00=0x0007, t01=0x0066}
0x0b60…0b72              Head {h00=0x000e, h01=0x0050, text=»INC DKSUBS«, t00=0x0007, t01=0x0078}
0x0b72…0b84              Head {h00=0x000e, h01=0x0050, text=»INC RAADUM«, t00=0x0007, t01=0x008a}
0x0b84…0b92              Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0007, t01=0x009c}
0x0b92…0ba4              Head {h00=0x000e, h01=0x0050, text=»INC RGFRMT«, t00=0x0007, t01=0x00aa}
0x0ba4…0bb6              Head {h00=0x000e, h01=0x0050, text=»INC REMFMT«, t00=0x0007, t01=0x00bc}
0x0bb6…0bc4              Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0007, t01=0x00ce}
0x0bc4…0bd6              Head {h00=0x000e, h01=0x0050, text=»INC REMLEV«, t00=0x0007, t01=0x00dc}
0x0bd6…0be6              Head {h00=0x000c, h01=0x0050, text=»INC ADM6«, t00=0x0007, t01=0x00ee}
0x0be6…0bf4              Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0007, t01=0x00fe}
0x0bf4…0c06              Head {h00=0x000e, h01=0x0050, text=»INC REMTR «, t00=0x0007, t01=0x010c}
0x0c06…0c18              Head {h00=0x000e, h01=0x0050, text=»LED REMBDT«, t00=0x0007, t01=0x011e}
0x0c18…0c3e              Head {h00=0x0022, h01=0x0050, text=»!!DL 120,172 BCHK00 -> BCHK90 «, t00=0x0007, t01=0x0130}
0x0c3e…0c4a              Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0007, t01=0x0156}
0x0c4a…0c5c              Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0007, t01=0x0162}
0x0c5c…0c6a              Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0007, t01=0x0174}
0x0c6a…0c7c              Head {h00=0x000e, h01=0x0050, text=»INC BUDGET«, t00=0x0007, t01=0x0182}
0x0c7c…0c8e (8, 0, 400)  Head {h00=0x000e, h01=0x0050, text=»INC REMTXT«, t00=0x0008, t01=0x0004}
0x0c8e…0ca0              Head {h00=0x000e, h01=0x0050, text=»ASG 2,LP0F«, t00=0x0008, t01=0x0016}
0x0ca0…0cb0              Head {h00=0x000c, h01=0x0050, text=»TLK U,4K«, t00=0x0008, t01=0x0028}
0x0cb0…0cc0              Head {h00=0x000c, h01=0x0050, text=»INC PRT «, t00=0x0008, t01=0x0038}
0x0cc0…0cd2              Head {h00=0x000e, h01=0x0050, text=»INC VDUPRT«, t00=0x0008, t01=0x0048}
0x0cd2…0ce6              Head {h00=0x0010, h01=0x0050, text=»LED START,/S«, t00=0x0008, t01=0x005a}
0x0ce6…0d12              Head {h00=0x0028, h01=0x0050, text=»!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ «, t00=0x0008, t01=0x006e}
0x0d12…0d1e              Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0008, t01=0x009a}
0x0d1e…0d30              Head {h00=0x000e, h01=0x0050, text=»ASM /S,NL «, t00=0x0008, t01=0x00a6}
0x0d30…0d46              Head {h00=0x0012, h01=0x0050, text=»LED TB3270,/S «, t00=0x0008, t01=0x00b8}
0x0d46…0d72              Head {h00=0x0028, h01=0x0050, text=»!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ «, t00=0x0008, t01=0x00ce}
0x0d72…0d7e              Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0008, t01=0x00fa}
0x0d7e…0d90              Head {h00=0x000e, h01=0x0050, text=»ASM /S,NL «, t00=0x0008, t01=0x0106}
0x0d90…0da0              Head {h00=0x000c, h01=0x0050, text=»$INCGEN «, t00=0x0008, t01=0x0118}
0x0da0…0dae              Head {h00=0x000a, h01=0x0005, text=»LKE M «, t00=0x0008, t01=0x0128}
0x0dae…0dc4              Head {h00=0x0012, h01=0x0050, text=»KPF /L,RGL821 «, t00=0x0008, t01=0x0136}
0x0dc4…0dd0              Head {h00=0x0008, h01=0x0050, text=»SCR «, t00=0x0008, t01=0x014c}
0x0dd0…0e06              Head {h00=0x0032, h01=0x0050, text=»MES $PDISC M=M:821,MU=M:POOL92,A=RGL821,C=C821«, t00=0x0008, t01=0x0158}
0x0e06…0e14              Head {h00=0x000a, h01=0x0050, text=»$ASG2 «, t00=0x0008, t01=0x018e}
0x0e14…0e18 (10, 1, 8)   Head {h00=0x2004, h01=0x0000}
0x0e18…0e1c              00 0a 00 04                                                                                                                                                                                                                                       ┆    ┆
0x0e1c…0e6c (11, 0, 400) 43 42 49 4e 36 20 00 0a 01 82 00 0a 00 50 42 38 32 31 34 34 00 0b 00 0e 00 2a 00 50 20 50 45 52 46 20 46 4d 4f 44 2c 47 53 57 42 49 4e 35 2c 53 50 49 4e 50 55 54 20 49 4e 49 54 20 57 49 54 48 20 58 00 0b 00 1c 00 16 00 50 20 53 55 42 20 47   ┆CBIN6        PB82144     * P PERF FMOD,GSWBIN5,SPINPUT INIT WITH X       P SUB G┆
0x0e6c…0ebc              53 57 42 49 4e 35 2c 43 42 49 4e 31 00 0b 00 4a 00 1e 00 50 20 43 42 47 20 47 53 57 42 49 4e 35 2c 43 42 49 4e 30 2c 42 38 32 31 34 34 20 00 0b 00 64 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   ┆SWBIN5,CBIN1   J   P CBG GSWBIN5,CBIN0,B82144    d   P PERF GENWRS,GTHCDEV,EDITB┆
0x0ebc…0f0c              55 46 00 0b 00 86 00 18 00 50 20 4d 4f 56 45 20 47 53 57 42 43 44 35 2c 3d 44 27 31 27 20 00 0b 00 aa 00 0e 00 50 20 42 20 42 38 32 31 32 35 20 00 0b 00 c6 00 0a 00 50 42 38 32 31 34 32 00 0b 00 d8 00 1e 00 50 20 41 44 44 20 47 54 42 53 55   ┆UF       P MOVE GSWBCD5,=D'1'        P B B82125        PB82142       P ADD GTBSU┆
0x0f0c…0f5c              4d 31 2c 47 54 44 55 50 46 28 43 42 49 4e 34 29 00 0b 00 e6 00 28 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 37 2c 47 54 44 55 50 46 28 43 42 49 4e 31 35 29 5c 54 45 58 54 4e 52 20 00 0b 01 08 00 18 00 50 20 50 45 52 46 20 54 58 54 52 44 2c   ┆M1,GTDUPF(CBIN4)     ( P MOVE GSWBIN7,GTDUPF(CBIN15) TEXTNR        P PERF TXTRD,┆
0x0f5c…0fac              47 53 57 42 49 4e 37 20 00 0b 01 34 00 10 00 50 20 50 45 52 46 20 53 54 52 45 44 54 00 0b 01 50 00 20 00 50 20 50 45 52 46 20 47 45 4e 57 52 46 2c 47 54 48 43 44 45 56 2c 43 48 4b 46 52 4d 32 00 0b 01 64 00 16 00 50 20 50 45 52 46 20 4e 45   ┆GSWBIN7    4   P PERF STREDT   P   P PERF GENWRF,GTHCDEV,CHKFRM2   d   P PERF NE┆
0x0fac…0ffc (12, 0, 400) 57 4c 49 4e 2c 43 42 49 4e 31 00 0b 01 88 00 0e 00 50 20 42 20 42 38 32 31 39 30 20 00 0c 00 12 00 06 00 50 2a 20 00 0c 00 24 00 0a 00 50 42 38 32 31 35 30 00 0c 00 2e 00 16 00 50 20 54 42 54 20 43 57 4f 52 4b 31 2c 42 38 32 31 34 30 00 0c   ┆WLIN,CBIN1       P B B82190        P*    $   PB82150   .   P TBT CWORK1,B82140  ┆
0x0ffc…104c              00 3c 00 30 00 50 20 43 42 45 20 47 53 57 42 43 44 35 2c 3d 44 27 31 27 2c 42 38 32 31 39 30 20 4e 4f 54 48 49 4e 47 20 54 4f 20 50 52 49 4e 54 20 3f 00 0c 00 56 00 2e 00 50 20 43 42 45 20 47 53 57 42 43 44 35 2c 3d 44 27 32 35 27 2c 42 38   ┆ < 0 P CBE GSWBCD5,=D'1',B82190 NOTHING TO PRINT ?   V . P CBE GSWBCD5,=D'25',B8┆
0x104c…109c              32 31 36 30 20 43 4f 4d 50 55 54 45 20 4e 42 52 20 4f 46 20 00 0c 00 8a 00 2c 00 50 20 53 55 42 20 47 53 57 42 43 44 35 2c 3d 44 27 32 35 27 20 4c 49 4e 45 46 45 45 44 53 20 54 4f 20 50 45 52 46 4f 52 4d 00 0c 00 bc 00 18 00 50 20 4d 55 4c   ┆2160 COMPUTE NBR OF      , P SUB GSWBCD5,=D'25' LINEFEEDS TO PERFORM       P MUL┆
0x109c…10ec              20 47 53 57 42 43 44 35 2c 3d 44 27 2d 31 27 20 00 0c 00 ec 00 1a 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 35 2c 47 53 57 42 43 44 35 20 00 0c 01 08 00 0a 00 50 42 38 32 31 36 30 00 0c 01 26 00 1a 00 50 20 45 44 49 54 20 53 50 49 4e 50 55   ┆ GSWBCD5,=D'-1'        P MOVE GSWBIN5,GSWBCD5        PB82160   &   P EDIT SPINPU┆
0x10ec…113c              54 2c 46 52 45 4d 54 4f 54 31 00 0c 01 34 00 18 00 50 20 50 45 52 46 20 4e 45 57 4c 49 4e 2c 47 53 57 42 49 4e 35 00 0c 01 52 00 1c 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 0c 01 6e 00 0a 00 50 42 38   ┆T,FREMTOT1   4   P PERF NEWLIN,GSWBIN5   R   P PERF FMOD,CBIN1,SPINPUT   n   PB8┆

Reduced view