|
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 - downloadIndex: ┃ 5 C F I K M O P R ┃
Length: 327680 (0x50000) Description: Bits:30005248 COMAL B verson 1.19 (MIKADOS) Types: 5¼" Floppy Disk, ImdContainer
f04 | f09 | basis | postl | type | name | artifact |
---|---|---|---|---|---|---|
85 | 1 | 1 | CBMAL | ⟦73708403f⟧ Mikados_1 | ||
35 | 1 | 0 | CFCOPY | ⟦2639098bc⟧ Mikados_0 | ||
A | 2 | 254 | K | COMPR | ⟦ce9c9b5a1⟧ Mikados TextFile, Mikados_K | |
15 | 1 | 0 | CPCOP | ⟦b37dae329⟧ Mikados_0 | ||
A | 4 | 254 | K | FCOPY | ⟦067fadbc3⟧ Mikados TextFile, Mikados_K | |
4 | 254 | K | INITLIZE | ⟦04014dd49⟧ Mikados TextFile, Mikados_K | ||
15 | 1 | 0 | KOMPNM | ⟦ebce6a26a⟧ Mikados_0 | ||
15 | 1 | 0 | OMDØB | ⟦a78256a0d⟧ Mikados_0 | ||
3 | 254 | K | PCOPY | ⟦2bb962a38⟧ Mikados TextFile, Mikados_K | ||
15 | 1 | 0 | PERGE | ⟦5bd1e36fe⟧ Mikados_0 | ||
16 | 1 | 0 | PLINC | ⟦181dc9ee4⟧ Mikados_0 | ||
4 | 254 | K | PURGE | ⟦d428c737c⟧ Mikados TextFile, Mikados_K | ||
4 | 254 | K | RENAME | ⟦e02e93add⟧ Mikados TextFile, Mikados_K |
0x00000…00030 (0, 0, 1) DiskLabel {plidn=»PLADELAGER«, ledig={DA 0014,0f (0x014f00)}, plart=»MIK «, pldto=»11.04.1983«, plbtg=»SYSPROG «, pluda=» «} 0x00030…00040 1f 00 02 10 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00040…00060 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 ┆ ┆ […0x5…] 0x00100…00200 (0, 0, 2) DirSect { 0x00100…00200 dent = [ // @0x0 0x00100…00200 [0x00]: DirEnt {name=»PURGE «, typ=»K«, seg=»A«, seg0={DA 0012,05 (0x012500)}} 0x00100…00200 ] 0x00100…00200 } 0x00200…00300 (0, 0, 3) EmptyDirSect […0x2…] 0x00500…00600 (0, 0, 6) DirSect { 0x00500…00600 dent = [ // @0x0 0x00500…00600 [0x00]: DirEnt {name=»KOMPNM «, typ=»0«, seg=»A«, seg0={DA 000e,07 (0x00e700)}} 0x00500…00600 ] 0x00500…00600 } 0x00600…00700 (0, 0, 7) EmptyDirSect […0x2…] 0x00900…00a00 (0, 0, 10) DirSect { 0x00900…00a00 dent = [ // @0x0 0x00900…00a00 [0x00]: DirEnt {name=»PERGE «, typ=»0«, seg=»A«, seg0={DA 000d,08 (0x00d800)}} 0x00900…00a00 ] 0x00900…00a00 } 0x00a00…00b00 (0, 0, 11) EmptyDirSect […0x6…] 0x01100…01200 (0, 1, 2) DirSect { 0x01100…01200 dent = [ // @0x0 0x01100…01200 [0x00]: DirEnt {name=»CPCOP «, typ=»0«, seg=»A«, seg0={DA 000f,06 (0x00f600)}} 0x01100…01200 [0x01]: DirEnt {name=»FCOPY «, typ=»K«, seg=»A«, seg0={DA 0013,09 (0x013900)}} 0x01100…01200 ] 0x01100…01200 } 0x01200…01300 (0, 1, 3) EmptyDirSect […0x8…] 0x01b00…01c00 (0, 1, 12) DirSect { 0x01b00…01c00 dent = [ // @0x0 0x01b00…01c00 [0x00]: DirEnt {name=»OMDØB «, typ=»0«, seg=»A«, seg0={DA 000c,09 (0x00c900)}} 0x01b00…01c00 ] 0x01b00…01c00 } 0x01c00…01d00 (0, 1, 13) EmptyDirSect […0x4…] 0x02100…02200 (1, 0, 2) DirSect { 0x02100…02200 dent = [ // @0x0 0x02100…02200 [0x00]: DirEnt {name=»CFCOPY «, typ=»0«, seg=»A«, seg0={DA 0009,06 (0x009600)}} 0x02100…02200 [0x01]: DirEnt {name=»COMPR «, typ=»K«, seg=»A«, seg0={DA 0013,05 (0x013500)}} 0x02100…02200 ] 0x02100…02200 } 0x02200…02300 (1, 0, 3) EmptyDirSect 0x02300…02400 (1, 0, 4) DirSect { 0x02300…02400 dent = [ // @0x0 0x02300…02400 [0x00]: DirEnt {name=»CBMAL «, typ=»1«, seg=»A«, seg0={DA 0004,01 (0x004100)}} 0x02300…02400 ] 0x02300…02400 } 0x02400…02500 (1, 0, 5) EmptyDirSect 0x02500…02600 (1, 0, 6) DirSect { 0x02500…02600 dent = [ // @0x0 0x02500…02600 [0x00]: DirEnt {name=»PCOPY «, typ=»K«, seg=»A«, seg0={DA 0014,09 (0x014900)}} 0x02500…02600 ] 0x02500…02600 } 0x02600…02700 (1, 0, 7) EmptyDirSect […0x6…] 0x02d00…02e00 (1, 0, 14) DirSect { 0x02d00…02e00 dent = [ // @0x0 0x02d00…02e00 [0x00]: DirEnt {name=»RENAME «, typ=»K«, seg=»A«, seg0={DA 0011,05 (0x011500)}} 0x02d00…02e00 ] 0x02d00…02e00 } 0x02e00…02f00 (1, 0, 15) EmptyDirSect […0x8…] 0x03700…03800 (1, 1, 8) DirSect { 0x03700…03800 dent = [ // @0x0 0x03700…03800 [0x00]: DirEnt {name=»PLINC «, typ=»0«, seg=»A«, seg0={DA 000b,09 (0x00b900)}} 0x03700…03800 ] 0x03700…03800 } 0x03800…03900 (1, 1, 9) EmptyDirSect 0x03900…03a00 (1, 1, 10) DirSect { 0x03900…03a00 dent = [ // @0x0 0x03900…03a00 [0x00]: DirEnt {name=»INITLIZE«, typ=»K«, seg=»A«, seg0={DA 0010,05 (0x010500)}} 0x03900…03a00 ] 0x03900…03a00 } 0x03a00…03b00 (1, 1, 11) EmptyDirSect […0x6…] 0x04100…04120 (2, 0, 2) ExtentHdr {name=»CBMAL «, typ=»1«, seg=»A«, next=0x00, basis=0x0055, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0009,06 (0x009600)}, f04=» «, postl=0x0001, f99=» «} 0x04120…09600 Extent[0x54e0] 0x09600…09620 (4, 1, 7) ExtentHdr {name=»CFCOPY «, typ=»0«, seg=»A«, next=0x00, basis=0x0023, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 000b,09 (0x00b900)}, f04=» «, postl=0x0001, f99=» «} 0x09620…0b900 Extent[0x22e0] 0x0b900…0b920 (5, 1, 10) ExtentHdr {name=»PLINC «, typ=»0«, seg=»A«, next=0x00, basis=0x0010, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 000c,09 (0x00c900)}, f04=» «, postl=0x0001, f99=» «} 0x0b920…0c900 Extent[0xfe0] 0x0c900…0c920 (6, 0, 10) ExtentHdr {name=»OMDØB «, typ=»0«, seg=»A«, next=0x00, basis=0x000f, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 000d,08 (0x00d800)}, f04=» «, postl=0x0001, f99=» «} 0x0c920…0d800 Extent[0xee0] 0x0d800…0d820 (6, 1, 9) ExtentHdr {name=»PERGE «, typ=»0«, seg=»A«, next=0x00, basis=0x000f, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 000e,07 (0x00e700)}, f04=» «, postl=0x0001, f99=» «} 0x0d820…0e700 Extent[0xee0] 0x0e700…0e720 (7, 0, 8) ExtentHdr {name=»KOMPNM «, typ=»0«, seg=»A«, next=0x00, basis=0x000f, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 000f,06 (0x00f600)}, f04=» «, postl=0x0001, f99=» «} 0x0e720…0f600 Extent[0xee0] 0x0f600…0f620 (7, 1, 7) ExtentHdr {name=»CPCOP «, typ=»0«, seg=»A«, next=0x00, basis=0x000f, nextext={DA 0000,00 (0x000000)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0010,05 (0x010500)}, f04=» «, postl=0x0001, f99=» «} 0x0f620…10500 Extent[0xee0] 0x10500…10520 (8, 0, 6) ExtentHdr {name=»INITLIZE«, typ=»K«, seg=»A«, next=0x03, basis=0x0004, nextext={DA 0010,09 (0x010900)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0010,09 (0x010900)}, f04=» «, postl=0x00fe, f99=» «} 0x10520…10900 Extent[0x3e0] 0x10900…10920 (8, 0, 10) ExtentHdr {name=»INITLIZE«, typ=»K«, seg=»B«, next=0x01, basis=0x0004, nextext={DA 0010,0d (0x010d00)}, prevext={DA 0010,05 (0x010500)}, nextfile={DA 0010,0d (0x010d00)}, f04=» «, postl=0x0020, f99=» «} 0x10920…10d00 Extent[0x3e0] 0x10d00…10d20 (8, 0, 14) ExtentHdr {name=»INITLIZE«, typ=»K«, seg=»C«, next=0x02, basis=0x0004, nextext={DA 0011,01 (0x011100)}, prevext={DA 0010,09 (0x010900)}, nextfile={DA 0011,01 (0x011100)}, f04=» «, postl=0x0020, f99=» «} 0x10d20…11100 Extent[0x3e0] 0x11100…11120 (8, 1, 2) ExtentHdr {name=»INITLIZE«, typ=»K«, seg=»D«, next=0x03, basis=0x0004, nextext={DA 0000,00 (0x000000)}, prevext={DA 0010,0d (0x010d00)}, nextfile={DA 0011,05 (0x011500)}, f04=» «, postl=0x0020, f99=» «} 0x11120…11500 Extent[0x3e0] 0x11500…11520 (8, 1, 6) ExtentHdr {name=»RENAME «, typ=»K«, seg=»A«, next=0x03, basis=0x0004, nextext={DA 0011,09 (0x011900)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0011,09 (0x011900)}, f04=» «, postl=0x00fe, f99=» «} 0x11520…11900 Extent[0x3e0] 0x11900…11920 (8, 1, 10) ExtentHdr {name=»RENAME «, typ=»K«, seg=»B«, next=0x01, basis=0x0004, nextext={DA 0011,0d (0x011d00)}, prevext={DA 0011,05 (0x011500)}, nextfile={DA 0011,0d (0x011d00)}, f04=» «, postl=0x0020, f99=» «} 0x11920…11d00 Extent[0x3e0] 0x11d00…11d20 (8, 1, 14) ExtentHdr {name=»RENAME «, typ=»K«, seg=»C«, next=0x02, basis=0x0004, nextext={DA 0012,01 (0x012100)}, prevext={DA 0011,09 (0x011900)}, nextfile={DA 0012,01 (0x012100)}, f04=» «, postl=0x0020, f99=» «} 0x11d20…12100 Extent[0x3e0] 0x12100…12120 (9, 0, 2) ExtentHdr {name=»RENAME «, typ=»K«, seg=»D«, next=0x03, basis=0x0004, nextext={DA 0000,00 (0x000000)}, prevext={DA 0011,0d (0x011d00)}, nextfile={DA 0012,05 (0x012500)}, f04=» «, postl=0x0020, f99=» «} 0x12120…12500 Extent[0x3e0] 0x12500…12520 (9, 0, 6) ExtentHdr {name=»PURGE «, typ=»K«, seg=»A«, next=0x03, basis=0x0004, nextext={DA 0012,09 (0x012900)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0012,09 (0x012900)}, f04=» «, postl=0x00fe, f99=» «} 0x12520…12900 Extent[0x3e0] 0x12900…12920 (9, 0, 10) ExtentHdr {name=»PURGE «, typ=»K«, seg=»B«, next=0x01, basis=0x0004, nextext={DA 0012,0d (0x012d00)}, prevext={DA 0012,05 (0x012500)}, nextfile={DA 0012,0d (0x012d00)}, f04=» «, postl=0x0020, f99=» «} 0x12920…12d00 Extent[0x3e0] 0x12d00…12d20 (9, 0, 14) ExtentHdr {name=»PURGE «, typ=»K«, seg=»C«, next=0x02, basis=0x0004, nextext={DA 0013,01 (0x013100)}, prevext={DA 0012,09 (0x012900)}, nextfile={DA 0013,01 (0x013100)}, f04=» «, postl=0x0020, f99=» «} 0x12d20…13100 Extent[0x3e0] 0x13100…13120 (9, 1, 2) ExtentHdr {name=»PURGE «, typ=»K«, seg=»D«, next=0x03, basis=0x0004, nextext={DA 0000,00 (0x000000)}, prevext={DA 0012,0d (0x012d00)}, nextfile={DA 0013,05 (0x013500)}, f04=» «, postl=0x0020, f99=» «} 0x13120…13500 Extent[0x3e0] 0x13500…13520 (9, 1, 6) ExtentHdr {name=»COMPR «, typ=»K«, seg=»A«, next=0x01, basis=0x0002, nextext={DA 0013,07 (0x013700)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0013,07 (0x013700)}, f04=»A «, postl=0x00fe, f99=» «} 0x13520…13700 Extent[0x1e0] 0x13700…13720 (9, 1, 8) ExtentHdr {name=»COMPR «, typ=»K«, seg=»B«, next=0x01, basis=0x0002, nextext={DA 0000,00 (0x000000)}, prevext={DA 0013,05 (0x013500)}, nextfile={DA 0013,09 (0x013900)}, f04=»A «, postl=0x0020, f99=» «} 0x13720…13900 Extent[0x1e0] 0x13900…13920 (9, 1, 10) ExtentHdr {name=»FCOPY «, typ=»K«, seg=»A«, next=0x03, basis=0x0004, nextext={DA 0013,0d (0x013d00)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0013,0d (0x013d00)}, f04=»A «, postl=0x00fe, f99=» «} 0x13920…13d00 Extent[0x3e0] 0x13d00…13d20 (9, 1, 14) ExtentHdr {name=»FCOPY «, typ=»K«, seg=»B«, next=0x01, basis=0x0004, nextext={DA 0014,01 (0x014100)}, prevext={DA 0013,09 (0x013900)}, nextfile={DA 0014,01 (0x014100)}, f04=»A «, postl=0x0020, f99=» «} 0x13d20…14100 Extent[0x3e0] 0x14100…14120 (10, 0, 2) ExtentHdr {name=»FCOPY «, typ=»K«, seg=»C«, next=0x02, basis=0x0004, nextext={DA 0014,05 (0x014500)}, prevext={DA 0013,0d (0x013d00)}, nextfile={DA 0014,05 (0x014500)}, f04=»A «, postl=0x0020, f99=» «} 0x14120…14500 Extent[0x3e0] 0x14500…14520 (10, 0, 6) ExtentHdr {name=»FCOPY «, typ=»K«, seg=»D«, next=0x03, basis=0x0004, nextext={DA 0000,00 (0x000000)}, prevext={DA 0014,01 (0x014100)}, nextfile={DA 0014,09 (0x014900)}, f04=»A «, postl=0x0020, f99=» «} 0x14520…14900 Extent[0x3e0] 0x14900…14920 (10, 0, 10) ExtentHdr {name=»PCOPY «, typ=»K«, seg=»A«, next=0x01, basis=0x0003, nextext={DA 0014,0c (0x014c00)}, prevext={DA 0000,00 (0x000000)}, nextfile={DA 0014,0c (0x014c00)}, f04=» «, postl=0x00fe, f99=» «} 0x14920…14c00 Extent[0x2e0] 0x14c00…14c20 (10, 0, 13) ExtentHdr {name=»PCOPY «, typ=»K«, seg=»B«, next=0x01, basis=0x0003, nextext={DA 0000,00 (0x000000)}, prevext={DA 0014,09 (0x014900)}, nextfile={DA 0014,0f (0x014f00)}, f04=» «, postl=0x0020, f99=» «} 0x14c20…14f00 Extent[0x2e0] 0x14f00…14f20 (10, 0, 16) 00 43 4f 50 59 20 20 20 4b 42 01 03 00 00 00 00 14 00 09 00 00 00 00 00 00 20 00 00 00 00 00 00 ┆ COPY KB ┆ 0x14f20…14f40 25 30 31 30 30 20 52 45 4d 20 30 35 30 39 38 30 2c 20 44 49 20 30 36 30 31 38 32 2c 20 44 49 20 ┆%0100 REM 050980, DI 060182, DI ┆ 0x14f40…14f60 32 31 30 31 38 32 25 12 30 31 31 30 20 44 49 4d 20 44 52 45 56 4e 24 28 32 29 12 0b 30 31 32 30 ┆210182% 0110 DIM DREVN$(2) 0120┆ 0x14f60…14f80 20 50 52 49 4e 54 20 0b 2b 30 31 33 30 20 50 52 49 4e 54 20 22 50 43 4f 50 59 20 2d 20 4b 6f 70 ┆ PRINT +0130 PRINT "PCOPY - Kop┆ 0x14f80…14fa0 69 65 72 69 6e 67 20 61 66 20 64 69 73 6b 65 74 74 65 72 22 2b 35 30 31 34 30 20 50 52 49 4e 54 ┆iering af disketter"+50140 PRINT┆ 0x14fa0…14fc0 20 22 50 72 6f 67 72 61 6d 6d 65 74 20 73 74 6f 70 70 65 73 20 76 65 64 20 61 74 20 74 72 79 6b ┆ "Programmet stoppes ved at tryk┆ 0x14fc0…14fe0 6b 65 20 70 61 61 20 45 53 43 22 35 0c 30 31 35 30 20 52 45 50 45 41 54 20 0c 13 30 31 36 30 20 ┆ke paa ESC"5 0150 REPEAT 0160 ┆ 0x14fe0…15000 46 4c 41 47 2c 46 4f 52 45 56 45 52 3d 30 13 0b 30 31 37 30 20 50 52 49 4e 54 20 0b 0c 30 31 38 ┆FLAG,FOREVER=0 0170 PRINT 018┆ 0x15000…15020 (10, 1, 1) 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 ┆cccccccccccccccccccccccccccccccc┆ […0x1d7f…]