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

⟦dbe420089⟧

    Length: 4556 (0x11cc)
    Notes: pts_type(SC)
    Names: »ADM5.SC«

Derivation

└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
    └─⟦this⟧ »OD-KOM/ADM5.SC« 
└─⟦d2cdd233a⟧ Bits:30009674 Philips computer tape "600204"
    └─⟦this⟧ »OD-KOM/ADM5.SC« 

PTS(SC)

 IDENT ADM5 831005 EV 
 DDUM KMD08 
 PDIV 
 ENTRY A5KONV 
 EXT A5RET1 
 EXT LAMPON 
 EXT LAMPOF 
 EXT ASGVOL 
 EXT RAREAD 
 EXT STRTID 
 EXT WRITID 
 EXT SQWRIT 
 EXT SPCLRA 
 EXT SLUTID 
 EXT SPLIN8 
	EXT	SOPRD
* 
 INCLUDE EQUATE 
* 
* 
A5KONV
	CLEAR	ENDINP 
	PERF	LAMPOF,=W'2047' 
 PERF ASGVOL,CBIN2
 BNOK A5RET1
 PERF LAMPON,=W'64' LAMP 5 ON 
	MOVE	CRECNR,CBIN1
	B	ADM0540
ADM0530 
* 
*   LOAD THE IBM FLOPPY 
* 
	DSC0	FD01,UNLOD
 PERF LAMPON,=W'1024' LAMP 1
ADM0542 
	PERF	SOPRD 
 CMP GSWBIN2,CBIN1 SOP 10 
 BE ADM0575 
	CBNE	GSWBIN2,CBIN10,ADM0542
 PERF LAMPOF,=W'1026' OFF LAMP 1, 10
ADM0540 
 DSC1 FD01,LOAD,CBIN7 LOAD IBM
 BBEOD ADM0543
 BOK ADM0543
 PERF LAMPON,=W'2' LAMP 10, ERROR 
 B ADM0530 REPEAT 
ADM0543 
 MOVE GSWBIN6,CBIN1 
 MOVE GSWBIN1,=W'128' READ HEADER 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 
 BOK ADM0536
 PERF STRTID,CVOLNO SET UP STRTID 
 PERF WRITID,CPCKBUF,CBIN3,CBIN1
 B ADM0535
ADM0536 
 PERF WRITID,CPCKBUF,CBIN3,CBIN1 PRINT HEADER 
	MOVE	GSWBIN6,CBIN0 
 MOVE GSWBIN1,=W'40' DELETE AND WRITE HEADER
 MOVE GSWSTR20,=' ' 
 COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 
ADM0535 
 DSC0 FD01,RWIND
	MOVE	GSWBIN6,CBIN0 
 PERF SQWRIT,FD01,=D'1',CPCKBUF 
 BNOK ADM0568 
 CLEAR CERRORFL 
ADM0550			START LOOP
 MOVE GTWBCD2,CRECNR
  PERF SPLIN8,CBIN10,CBIN3
 ADD CRECNR,CBIN1 
	ADD	GSWBIN6,CBIN1
 MOVE GSWBIN1,=W'128' 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR
 BNOK ADM0560 NOT OK
 TBT CERRORFL,ADM0560 
 CBE GTWBCD1,=D'4',ADM0564 END OF DATA
 MOVE GSWSTR20,=C'SLUTD'
 MOVE GSWBIN5,CBIN0 
 MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 
 BE ADM0564 SLUTD: END OF CONVERT 
 PERF SQWRIT,FD01,=D'1',CPCKBUF 
	BNOK	ADM0568 
***** !!!!!! CHANGE 8 TO 1700  !!!!!!!
	CBL	GSWBIN6,=W'1700',ADM0550 
	MOVE	GSWBIN2,CBIN0 
	MOVE	GSWSTR1,=X'7F'
	MATCH	CPCKBUF,GSWBIN2,GSWBIN1,GSWSTR1,CBIN0,CBIN1
	BNE	ADM0550
	B	ADM0565
ADM0568 
	SUB	CRECNR,GSWBIN6 
	PERF	LAMPON,=W'2'
	B	ADM0530
ADM0570 
 CBNE CRECNR,CBIN2,ADM0572
 PERF LAMPON,=W'514' LAMP 2+10
 ATTFMT KONV5FMT
 PERF SPCLRA
 PERF LAMPOF,=W'514' LAMP 2+10
 CBNE SPBINW2,CBIN3,ADM0572 
 CLEAR ENDINP 
 B ADM0550
ADM0572 
 PERF SQWRIT,FD01,=D'1',CPCKBUF WRITE SLUTD 
 BNOK ADM0568 
 PERF WRITID,CPCKBUF,CBIN3,CBIN2
	TBT	ENDINP,ADM0575 
	B	ADM0530
ADM0575 
 DSC0 FD01,UNLOD UNLOCK IBM-FD
 B A5RET1 LAMPS ON
ADM0560			NOT OK
 PERF LAMPON,=W'514' LAMP 2+10
 PERF WRITID,CPCKBUF,CBIN4,CBIN2 PRINT FIRST PART OF
			LAST CORRECT RECORD
 SET SPPROMPT 
 ATTFMT KONV4FMT
 PERF SPCLRA CONTINUE ? 
 PERF LAMPOF,=W'514' LAMP 2+10
 IB SPBINW2,A0561,A0561,A0562,A0563,A0561,		C 
		A0561,A0561,A0561,A0564 
 B ADM0560
A0561			MAK 
 B ADM0560
A0562			SLUT, CONTINUE
			READ AGAIN 
 SUB CRECNR,CBIN1 
	SUB	GSWBIN6,CBIN1
 CLEAR CERRORFL 
 B ADM0550
A0563			KRE, TRY NEXT 
 SET CERRORFL 
 B ADM0550
A0564			KVIT
 CLEAR CERRORFL 
ADM0564 
	SET	ENDINP 
ADM0565			END OF DATA 
 MOVE GSWBCD3,GSWBIN6 
	TBF	ENDINP,ADM0566 
	SUB	GSWBCD3,=D'1'
ADM0566 
 PERF SLUTID,CPCKBUF,GSWBCD3
 B ADM0570
 EJECT
* 
* 
************************************************* 
* 
*         FORMATS 
* 
************************************************* 
* 
* 
KONV4FMT FRMT 
 FSL
 FCOPY ='KORREKT' 
 FILLR '?',1
 FKI 1
 FMEL 'B',TSWBCD2 
 FMEND
* 
KONV5FMT FRMT 
 FSL
 FTEXT 'SLUTMARKERING FUNDET I 1. RECORD' 
 FNL
 FTEXT 'HVIS "SLUT" SMIDES DEN V[K' 
 FNL
 FKI 1
 FMEL 'B',TSWBCD2 
 FMEND
* 
 END

HexDump

0x0000…001e (0, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» IDENT ADM5 831005 EV «, t00=0x0000, t01=0x0004}
0x001e…0032              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0022}
0x0032…0040              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0036}
0x0040…0056              Head {h00=0x0012, h01=0x0050, text=» ENTRY A5KONV «, t00=0x0000, t01=0x0044}
0x0056…006a              Head {h00=0x0010, h01=0x0050, text=» EXT A5RET1 «, t00=0x0000, t01=0x005a}
0x006a…007e              Head {h00=0x0010, h01=0x0050, text=» EXT LAMPON «, t00=0x0000, t01=0x006e}
0x007e…0092              Head {h00=0x0010, h01=0x0050, text=» EXT LAMPOF «, t00=0x0000, t01=0x0082}
0x0092…00a6              Head {h00=0x0010, h01=0x0050, text=» EXT ASGVOL «, t00=0x0000, t01=0x0096}
0x00a6…00ba              Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0000, t01=0x00aa}
0x00ba…00ce              Head {h00=0x0010, h01=0x0050, text=» EXT STRTID «, t00=0x0000, t01=0x00be}
0x00ce…00e2              Head {h00=0x0010, h01=0x0050, text=» EXT WRITID «, t00=0x0000, t01=0x00d2}
0x00e2…00f6              Head {h00=0x0010, h01=0x0050, text=» EXT SQWRIT «, t00=0x0000, t01=0x00e6}
0x00f6…010a              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0000, t01=0x00fa}
0x010a…011e              Head {h00=0x0010, h01=0x0050, text=» EXT SLUTID «, t00=0x0000, t01=0x010e}
0x011e…0132              Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0000, t01=0x0122}
0x0132…0144              Head {h00=0x000e, h01=0x0050, text=» EXT SOPRD«, t00=0x0000, t01=0x0136}
0x0144…014e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0148}
0x014e…0166              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0000, t01=0x0152}
0x0166…0170              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016a}
0x0170…017a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0174}
0x017a…0188              Head {h00=0x000a, h01=0x0050, text=»A5KONV«, t00=0x0000, t01=0x017e}
0x0188…019e              Head {h00=0x0012, h01=0x0050, text=» CLEAR ENDINP «, t00=0x0000, t01=0x018c}
0x019e…01bc              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0001, t01=0x0012}
0x01bc…01d6              Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x0001, t01=0x0030}
0x01d6…01ea              Head {h00=0x0010, h01=0x0050, text=» BNOK A5RET1«, t00=0x0001, t01=0x004a}
0x01ea…0210              Head {h00=0x0022, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5 ON «, t00=0x0001, t01=0x005e}
0x0210…022a              Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0001, t01=0x0084}
0x022a…023c              Head {h00=0x000e, h01=0x0050, text=» B ADM0540«, t00=0x0001, t01=0x009e}
0x023c…024c              Head {h00=0x000c, h01=0x0050, text=»ADM0530 «, t00=0x0001, t01=0x00b0}
0x024c…0256              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c0}
0x0256…0276              Head {h00=0x001c, h01=0x0050, text=»*   LOAD THE IBM FLOPPY «, t00=0x0001, t01=0x00ca}
0x0276…0280              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ea}
0x0280…0298              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,UNLOD«, t00=0x0001, t01=0x00f4}
0x0298…02bc              Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0001, t01=0x010c}
0x02bc…02cc              Head {h00=0x000c, h01=0x0050, text=»ADM0542 «, t00=0x0001, t01=0x0130}
0x02cc…02e0              Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x0001, t01=0x0140}
0x02e0…0302              Head {h00=0x001e, h01=0x0050, text=» CMP GSWBIN2,CBIN1 SOP 10 «, t00=0x0001, t01=0x0154}
0x0302…0316              Head {h00=0x0010, h01=0x0050, text=» BE ADM0575 «, t00=0x0001, t01=0x0176}
0x0316…033a              Head {h00=0x0020, h01=0x0050, text=» CBNE GSWBIN2,CBIN10,ADM0542«, t00=0x0001, t01=0x018a}
0x033a…0366              Head {h00=0x0028, h01=0x0050, text=» PERF LAMPOF,=W'1026' OFF LAMP 1, 10«, t00=0x0002, t01=0x001e}
0x0366…0376              Head {h00=0x000c, h01=0x0050, text=»ADM0540 «, t00=0x0002, t01=0x004a}
0x0376…039c              Head {h00=0x0022, h01=0x0050, text=» DSC1 FD01,LOAD,CBIN7 LOAD IBM«, t00=0x0002, t01=0x005a}
0x039c…03b2              Head {h00=0x0012, h01=0x0050, text=» BBEOD ADM0543«, t00=0x0002, t01=0x0080}
0x03b2…03c6              Head {h00=0x0010, h01=0x0050, text=» BOK ADM0543«, t00=0x0002, t01=0x0096}
0x03c6…03f0              Head {h00=0x0026, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10, ERROR «, t00=0x0002, t01=0x00aa}
0x03f0…040a              Head {h00=0x0016, h01=0x0050, text=» B ADM0530 REPEAT «, t00=0x0002, t01=0x00d4}
0x040a…041a              Head {h00=0x000c, h01=0x0050, text=»ADM0543 «, t00=0x0002, t01=0x00ee}
0x041a…0436              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x0002, t01=0x00fe}
0x0436…0460              Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,=W'128' READ HEADER «, t00=0x0002, t01=0x011a}
0x0460…0498              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 «, t00=0x0002, t01=0x0144}
0x0498…04ac              Head {h00=0x0010, h01=0x0050, text=» BOK ADM0536«, t00=0x0002, t01=0x017c}
0x04ac…04d6              Head {h00=0x0026, h01=0x0050, text=» PERF STRTID,CVOLNO SET UP STRTID «, t00=0x0002, t01=0x0190}
0x04d6…04fe              Head {h00=0x0024, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN3,CBIN1«, t00=0x0003, t01=0x002a}
0x04fe…0510              Head {h00=0x000e, h01=0x0050, text=» B ADM0535«, t00=0x0003, t01=0x0052}
0x0510…0520              Head {h00=0x000c, h01=0x0050, text=»ADM0536 «, t00=0x0003, t01=0x0064}
0x0520…0556              Head {h00=0x0032, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN3,CBIN1 PRINT HEADER «, t00=0x0003, t01=0x0074}
0x0556…0572              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 «, t00=0x0003, t01=0x00aa}
0x0572…05a6              Head {h00=0x0030, h01=0x0050, text=» MOVE GSWBIN1,=W'40' DELETE AND WRITE HEADER«, t00=0x0003, t01=0x00c6}
0x05a6…05c2              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR20,=' ' «, t00=0x0003, t01=0x00fa}
0x05c2…05f8              Head {h00=0x0032, h01=0x0050, text=» COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 «, t00=0x0003, t01=0x0116}
0x05f8…0608              Head {h00=0x000c, h01=0x0050, text=»ADM0535 «, t00=0x0003, t01=0x014c}
0x0608…0620              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,RWIND«, t00=0x0003, t01=0x015c}
0x0620…063c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 «, t00=0x0003, t01=0x0174}
0x063c…0664              Head {h00=0x0024, h01=0x0050, text=» PERF SQWRIT,FD01,=D'1',CPCKBUF «, t00=0x0003, t01=0x0190}
0x0664…067a              Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0568 «, t00=0x0004, t01=0x0028}
0x067a…0692              Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0004, t01=0x003e}
0x0692…06ae              Head {h00=0x0018, h01=0x0050, text=»ADM0550   START LOOP«, t00=0x0004, t01=0x0056}
0x06ae…06ca              Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD2,CRECNR«, t00=0x0004, t01=0x0072}
0x06ca…06ec              Head {h00=0x001e, h01=0x0050, text=»  PERF SPLIN8,CBIN10,CBIN3«, t00=0x0004, t01=0x008e}
0x06ec…0706              Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0004, t01=0x00b0}
0x0706…0720              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN6,CBIN1«, t00=0x0004, t01=0x00ca}
0x0720…073e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0004, t01=0x00e4}
0x073e…0774              Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR«, t00=0x0004, t01=0x0102}
0x0774…0790              Head {h00=0x0018, h01=0x0050, text=» BNOK ADM0560 NOT OK«, t00=0x0004, t01=0x0138}
0x0790…07ae              Head {h00=0x001a, h01=0x0050, text=» TBT CERRORFL,ADM0560 «, t00=0x0004, t01=0x0154}
0x07ae…07dc              Head {h00=0x002a, h01=0x0050, text=» CBE GTWBCD1,=D'4',ADM0564 END OF DATA«, t00=0x0004, t01=0x0172}
0x07dc…07fc              Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x0005, t01=0x0010}
0x07fc…0818              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0005, t01=0x0030}
0x0818…0852              Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x0005, t01=0x004c}
0x0852…087c              Head {h00=0x0026, h01=0x0050, text=» BE ADM0564 SLUTD: END OF CONVERT «, t00=0x0005, t01=0x0086}
0x087c…08a4              Head {h00=0x0024, h01=0x0050, text=» PERF SQWRIT,FD01,=D'1',CPCKBUF «, t00=0x0005, t01=0x00b0}
0x08a4…08ba              Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0568 «, t00=0x0005, t01=0x00d8}
0x08ba…08e8              Head {h00=0x002a, h01=0x0050, text=»***** !!!!!! CHANGE 8 TO 1700  !!!!!!!«, t00=0x0005, t01=0x00ee}
0x08e8…090e              Head {h00=0x0022, h01=0x0050, text=» CBL GSWBIN6,=W'1700',ADM0550 «, t00=0x0005, t01=0x011c}
0x090e…092a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN0 «, t00=0x0005, t01=0x0142}
0x092a…0946              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR1,=X'7F'«, t00=0x0005, t01=0x015e}
0x0946…0980              Head {h00=0x0036, h01=0x0050, text=» MATCH CPCKBUF,GSWBIN2,GSWBIN1,GSWSTR1,CBIN0,CBIN1«, t00=0x0005, t01=0x017a}
0x0980…0994              Head {h00=0x0010, h01=0x0050, text=» BNE ADM0550«, t00=0x0006, t01=0x0024}
0x0994…09a6              Head {h00=0x000e, h01=0x0050, text=» B ADM0565«, t00=0x0006, t01=0x0038}
0x09a6…09b6              Head {h00=0x000c, h01=0x0050, text=»ADM0568 «, t00=0x0006, t01=0x004a}
0x09b6…09d2              Head {h00=0x0018, h01=0x0050, text=» SUB CRECNR,GSWBIN6 «, t00=0x0006, t01=0x005a}
0x09d2…09ec              Head {h00=0x0016, h01=0x0050, text=» PERF LAMPON,=W'2'«, t00=0x0006, t01=0x0076}
0x09ec…09fe              Head {h00=0x000e, h01=0x0050, text=» B ADM0530«, t00=0x0006, t01=0x0090}
0x09fe…0a0e              Head {h00=0x000c, h01=0x0050, text=»ADM0570 «, t00=0x0006, t01=0x00a2}
0x0a0e…0a30              Head {h00=0x001e, h01=0x0050, text=» CBNE CRECNR,CBIN2,ADM0572«, t00=0x0006, t01=0x00b2}
0x0a30…0a56              Head {h00=0x0022, h01=0x0050, text=» PERF LAMPON,=W'514' LAMP 2+10«, t00=0x0006, t01=0x00d4}
0x0a56…0a6e              Head {h00=0x0014, h01=0x0050, text=» ATTFMT KONV5FMT«, t00=0x0006, t01=0x00fa}
0x0a6e…0a82              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0006, t01=0x0112}
0x0a82…0aa8              Head {h00=0x0022, h01=0x0050, text=» PERF LAMPOF,=W'514' LAMP 2+10«, t00=0x0006, t01=0x0126}
0x0aa8…0acc              Head {h00=0x0020, h01=0x0050, text=» CBNE SPBINW2,CBIN3,ADM0572 «, t00=0x0006, t01=0x014c}
0x0acc…0ae2              Head {h00=0x0012, h01=0x0050, text=» CLEAR ENDINP «, t00=0x0006, t01=0x0170}
0x0ae2…0af4              Head {h00=0x000e, h01=0x0050, text=» B ADM0550«, t00=0x0006, t01=0x0186}
0x0af4…0b04              Head {h00=0x000c, h01=0x0050, text=»ADM0572 «, t00=0x0007, t01=0x0008}
0x0b04…0b38              Head {h00=0x0030, h01=0x0050, text=» PERF SQWRIT,FD01,=D'1',CPCKBUF WRITE SLUTD «, t00=0x0007, t01=0x0018}
0x0b38…0b4e              Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0568 «, t00=0x0007, t01=0x004c}
0x0b4e…0b76              Head {h00=0x0024, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN3,CBIN2«, t00=0x0007, t01=0x0062}
0x0b76…0b92              Head {h00=0x0018, h01=0x0050, text=» TBT ENDINP,ADM0575 «, t00=0x0007, t01=0x008a}
0x0b92…0ba4              Head {h00=0x000e, h01=0x0050, text=» B ADM0530«, t00=0x0007, t01=0x00a6}
0x0ba4…0bb4              Head {h00=0x000c, h01=0x0050, text=»ADM0575 «, t00=0x0007, t01=0x00b8}
0x0bb4…0bda              Head {h00=0x0022, h01=0x0050, text=» DSC0 FD01,UNLOD UNLOCK IBM-FD«, t00=0x0007, t01=0x00c8}
0x0bda…0bf4              Head {h00=0x0016, h01=0x0050, text=» B A5RET1 LAMPS ON«, t00=0x0007, t01=0x00ee}
0x0bf4…0c0c              Head {h00=0x0014, h01=0x0050, text=»ADM0560   NOT OK«, t00=0x0007, t01=0x0108}
0x0c0c…0c32              Head {h00=0x0022, h01=0x0050, text=» PERF LAMPON,=W'514' LAMP 2+10«, t00=0x0007, t01=0x0120}
0x0c32…0c6e              Head {h00=0x0038, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN4,CBIN2 PRINT FIRST PART OF«, t00=0x0007, t01=0x0146}
0x0c6e…0c8c              Head {h00=0x001a, h01=0x0050, text=»   LAST CORRECT RECORD«, t00=0x0007, t01=0x0182}
0x0c8c…0ca2              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0008, t01=0x0010}
0x0ca2…0cba              Head {h00=0x0014, h01=0x0050, text=» ATTFMT KONV4FMT«, t00=0x0008, t01=0x0026}
0x0cba…0cda              Head {h00=0x001c, h01=0x0050, text=» PERF SPCLRA CONTINUE ? «, t00=0x0008, t01=0x003e}
0x0cda…0d00              Head {h00=0x0022, h01=0x0050, text=» PERF LAMPOF,=W'514' LAMP 2+10«, t00=0x0008, t01=0x005e}
0x0d00…0d36              Head {h00=0x0032, h01=0x0050, text=» IB SPBINW2,A0561,A0561,A0562,A0563,A0561,  C «, t00=0x0008, t01=0x0084}
0x0d36…0d58              Head {h00=0x001e, h01=0x0050, text=»  A0561,A0561,A0561,A0564 «, t00=0x0008, t01=0x00ba}
0x0d58…0d6a              Head {h00=0x000e, h01=0x0050, text=» B ADM0560«, t00=0x0008, t01=0x00dc}
0x0d6a…0d7e              Head {h00=0x0010, h01=0x0050, text=»A0561   MAK «, t00=0x0008, t01=0x00ee}
0x0d7e…0d90              Head {h00=0x000e, h01=0x0050, text=» B ADM0560«, t00=0x0008, t01=0x0102}
0x0d90…0dae              Head {h00=0x001a, h01=0x0050, text=»A0562   SLUT, CONTINUE«, t00=0x0008, t01=0x0114}
0x0dae…0dc4              Head {h00=0x0012, h01=0x0050, text=»   READ AGAIN «, t00=0x0008, t01=0x0132}
0x0dc4…0dde              Head {h00=0x0016, h01=0x0050, text=» SUB CRECNR,CBIN1 «, t00=0x0008, t01=0x0148}
0x0dde…0df8              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN6,CBIN1«, t00=0x0008, t01=0x0162}
0x0df8…0e10              Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0008, t01=0x017c}
0x0e10…0e22 (9, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» B ADM0550«, t00=0x0009, t01=0x0004}
0x0e22…0e40              Head {h00=0x001a, h01=0x0050, text=»A0563   KRE, TRY NEXT «, t00=0x0009, t01=0x0016}
0x0e40…0e56              Head {h00=0x0012, h01=0x0050, text=» SET CERRORFL «, t00=0x0009, t01=0x0034}
0x0e56…0e68              Head {h00=0x000e, h01=0x0050, text=» B ADM0550«, t00=0x0009, t01=0x004a}
0x0e68…0e7c              Head {h00=0x0010, h01=0x0050, text=»A0564   KVIT«, t00=0x0009, t01=0x005c}
0x0e7c…0e94              Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0009, t01=0x0070}
0x0e94…0ea4              Head {h00=0x000c, h01=0x0050, text=»ADM0564 «, t00=0x0009, t01=0x0088}
0x0ea4…0eb8              Head {h00=0x0010, h01=0x0050, text=» SET ENDINP «, t00=0x0009, t01=0x0098}
0x0eb8…0ed6              Head {h00=0x001a, h01=0x0050, text=»ADM0565   END OF DATA «, t00=0x0009, t01=0x00ac}
0x0ed6…0ef4              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,GSWBIN6 «, t00=0x0009, t01=0x00ca}
0x0ef4…0f10              Head {h00=0x0018, h01=0x0050, text=» TBF ENDINP,ADM0566 «, t00=0x0009, t01=0x00e8}
0x0f10…0f2a              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBCD3,=D'1'«, t00=0x0009, t01=0x0104}
0x0f2a…0f3a              Head {h00=0x000c, h01=0x0050, text=»ADM0566 «, t00=0x0009, t01=0x011e}
0x0f3a…0f5e              Head {h00=0x0020, h01=0x0050, text=» PERF SLUTID,CPCKBUF,GSWBCD3«, t00=0x0009, t01=0x012e}
0x0f5e…0f70              Head {h00=0x000e, h01=0x0050, text=» B ADM0570«, t00=0x0009, t01=0x0152}
0x0f70…0f7e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0164}
0x0f7e…0f88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0172}
0x0f88…0f92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x017c}
0x0f92…0fcc              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0009, t01=0x0186}
0x0fcc…0fd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0030}
0x0fd6…0ff0              Head {h00=0x0016, h01=0x0050, text=»*         FORMATS «, t00=0x000a, t01=0x003a}
0x0ff0…0ffa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0054}
0x0ffa…1034              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x000a, t01=0x005e}
0x1034…103e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0098}
0x103e…1048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a2}
0x1048…105e              Head {h00=0x0012, h01=0x0050, text=»KONV4FMT FRMT «, t00=0x000a, t01=0x00ac}
0x105e…106a              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000a, t01=0x00c2}
0x106a…1084              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KORREKT' «, t00=0x000a, t01=0x00ce}
0x1084…1098              Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x000a, t01=0x00e8}
0x1098…10a6              Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x000a, t01=0x00fc}
0x10a6…10c0              Head {h00=0x0016, h01=0x0050, text=» FMEL 'B',TSWBCD2 «, t00=0x000a, t01=0x010a}
0x10c0…10ce              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000a, t01=0x0124}
0x10ce…10d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0132}
0x10d8…10ee              Head {h00=0x0012, h01=0x0050, text=»KONV5FMT FRMT «, t00=0x000a, t01=0x013c}
0x10ee…10fa              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000a, t01=0x0152}
0x10fa…112c              Head {h00=0x002e, h01=0x0050, text=» FTEXT 'SLUTMARKERING FUNDET I 1. RECORD' «, t00=0x000a, t01=0x015e}
0x112c…1138              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000a, t01=0x0190}
0x1138…1164              Head {h00=0x0028, h01=0x0050, text=» FTEXT 'HVIS "SLUT" SMIDES DEN V[K' «, t00=0x000b, t01=0x000c}
0x1164…1170              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000b, t01=0x0038}
0x1170…117e              Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x000b, t01=0x0044}
0x117e…1198              Head {h00=0x0016, h01=0x0050, text=» FMEL 'B',TSWBCD2 «, t00=0x000b, t01=0x0052}
0x1198…11a6              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000b, t01=0x006c}
0x11a6…11b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x007a}
0x11b0…11bc              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000b, t01=0x0084}
0x11bc…11c0              Head {h00=0x4004, h01=0x0000}
0x11c0…11c4              00 0b 00 90                                                                                                                                                                                                                                       ┆    ┆
0x11c4…11cc (12, 1, 8)   20 04 00 00 00 0c 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view