|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1248 (0x4e0)
Types: TextFile
Notes: Mikados_K
Names: »NBTLUK.K«
└─⟦a3d38fea3⟧ Bits:30008985 PRODUKTION NBT.
└─⟦this⟧ »NBTLUK.K«
PROCEDURE MAINTAIN;
FORWARD;
PROCEDURE LUK;
BEGIN
ICLOSE(OPSZ.H,OPSF);
WRITELN('ICLOSE ',IER)
END;
0x000…015 Line {l1=0x13, l2=»PROCEDURE MAINTAIN;«, l3=0x13}
0x015…01f Line {l1=0x08, l2=»FORWARD;«, l3=0x08}
0x01f…02f Line {l1=0x0e, l2=»PROCEDURE LUK;«, l3=0x0e}
0x02f…032 Line {l1=0x01, l2=» «, l3=0x01}
0x032…039 Line {l1=0x05, l2=»BEGIN«, l3=0x05}
0x039…051 Line {l1=0x16, l2=» ICLOSE(OPSZ.H,OPSF);«, l3=0x16}
0x051…06b Line {l1=0x18, l2=» WRITELN('ICLOSE ',IER)«, l3=0x18}
0x06b…071 Line {l1=0x04, l2=»END;«, l3=0x04}
0x071…080 00 00 47 4c 41 5a 2e 48 2c 47 4c 41 46 29 3b ┆ GLAZ.H,GLAF);┆
0x080…0a0 16 16 20 20 49 43 4c 4f 53 45 28 50 52 4f 5a 2e 48 2c 50 52 4f 46 29 3b 16 16 20 20 49 43 4c 4f ┆ ICLOSE(PROZ.H,PROF); ICLO┆
0x0a0…0c0 53 45 28 54 49 4c 5a 2e 48 2c 54 49 4c 46 29 3b 16 16 20 20 49 43 4c 4f 53 45 28 52 41 4d 5a 2e ┆SE(TILZ.H,TILF); ICLOSE(RAMZ.┆
0x0c0…0e0 48 2c 52 41 4d 46 29 3b 16 16 20 20 49 43 4c 4f 53 45 28 50 4f 53 5a 2e 48 2c 50 4f 53 46 29 3b ┆H,RAMF); ICLOSE(POSZ.H,POSF);┆
0x0e0…100 16 16 20 20 49 43 4c 4f 53 45 28 46 4f 52 5a 2e 48 2c 46 4f 52 46 29 3b 16 16 20 20 49 43 4c 4f ┆ ICLOSE(FORZ.H,FORF); ICLO┆
0x100…120 53 45 28 42 52 45 5a 2e 48 2c 42 52 45 46 29 3b 16 18 20 20 57 52 49 54 45 4c 4e 28 27 49 43 4c ┆SE(BREZ.H,BREF); WRITELN('ICL┆
0x120…140 4f 53 45 20 27 2c 49 45 52 29 18 04 45 4e 44 3b 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆OSE ',IER) END; ┆
0x140…160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x1c…]