|
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 - metrics - download
Length: 2528 (0x9e0)
Notes: Mikados_R
Names: »KOPIP«
└─⟦6980b4520⟧ Bits:30003618 MIKADOS start diskette med DDE COMAL-80 version 1.5
└─⟦this⟧ »KOPIP«
0x000…020 (0,) 13 02 4b 4f 50 49 50 20 20 20 02 f9 01 01 00 00 00 76 76 76 13 0d 04 4b 4f 50 49 50 20 20 20 02 ┆ KOPIP vvv KOPIP ┆ 0x020…040 00 00 08 0d 0d 05 52 45 53 52 56 20 20 20 01 00 00 08 0d 0d 05 52 45 53 44 49 20 20 20 02 00 00 ┆ RESRV RESDI ┆ 0x040…060 08 0d 0d 05 52 45 4c 44 49 20 20 20 03 00 00 08 0d 0d 05 52 55 4e 4e 20 20 20 20 04 00 00 08 0d ┆ RELDI RUNN ┆ 0x060…080 0d 04 42 4d 54 4f 4e 20 20 20 02 63 01 08 0d 0d 05 44 4b 42 49 55 20 20 20 05 00 01 08 0d 0d 05 ┆ BMTON c DKBIU ┆ 0x080…0a0 4c 41 42 45 4c 20 20 20 06 00 01 08 0d 0d 05 42 49 44 45 43 20 20 20 07 00 01 08 0d 0d 05 56 53 ┆LABEL BIDEC VS┆ 0x0a0…0c0 45 4e 44 20 20 20 08 00 01 08 0d 0d 05 49 4e 56 48 20 20 20 20 09 00 01 08 0d 0d 05 50 46 49 4e ┆END INVH PFIN┆ 0x0c0…0e0 44 20 20 20 0a 00 01 08 0d 0d 05 42 55 46 4c 4e 20 20 20 0b 00 01 08 0d 0d 05 44 49 56 20 20 20 ┆D BUFLN DIV ┆ 0x0e0…100 20 20 0c 00 01 08 0d 0d 05 55 44 49 4e 44 20 20 20 0d 00 01 08 0d 0d 05 43 31 4d 45 53 20 20 20 ┆ UDIND C1MES ┆ 0x100…120 0e 00 01 08 0d 0d 05 43 32 4d 45 53 20 20 20 0f 00 01 08 0d 0d 05 43 33 4d 45 53 20 20 20 10 00 ┆ C2MES C3MES ┆ 0x120…140 01 08 0d 0d 05 43 34 4d 45 53 20 20 20 11 00 01 08 0d 0d 05 43 35 4d 45 53 20 20 20 12 00 01 08 ┆ C4MES C5MES ┆ 0x140…160 0d 0d 05 43 36 4d 45 53 20 20 20 13 00 01 08 0d 0d 05 43 37 4d 45 53 20 20 20 14 00 01 08 0d 0d ┆ C6MES C7MES ┆ 0x160…180 05 43 38 4d 45 53 20 20 20 15 00 01 08 0d 02 08 22 02 04 0a 02 e2 01 04 03 08 eb 22 03 04 0a 02 ┆ C8MES " " ┆ 0x180…1a0 e4 01 04 07 08 01 02 00 c5 e5 21 07 04 0a 02 f1 01 04 03 08 e5 cd 03 05 0b 01 00 00 00 05 03 08 ┆ ! ┆ 0x1a0…1c0 a7 ca 03 04 0a 02 1a 00 04 05 08 3e 1e c9 2a 05 04 0a 02 e2 01 04 02 08 cd 02 05 0b 02 00 00 00 ┆ > * ┆ 0x1c0…1e0 05 03 08 a7 ca 03 04 0a 02 2d 00 04 03 08 f5 2a 03 04 0a 02 e4 01 04 02 08 cd 02 05 0b 03 00 00 ┆ - * ┆ 0x1e0…200 00 05 04 08 f1 c9 2a 04 05 0b 04 00 00 00 05 07 08 11 15 00 19 7e cd 07 04 0a 02 63 01 04 05 08 ┆ * ü c ┆ 0x200…220 4f 06 00 21 05 04 0a 02 8c 01 04 08 08 09 09 7e 23 66 6f 22 08 04 0a 02 8a 01 04 02 08 2a 02 04 ┆O ! ü#fo" * ┆ 0x220…240 0a 02 e4 01 04 03 08 eb 2a 03 04 0a 02 e2 01 04 02 08 22 02 04 0a 02 e6 01 04 02 08 21 02 05 0b ┆ * " ! ┆ 0x240…260 05 00 00 00 05 02 08 cd 02 05 0b 06 00 00 00 05 03 08 a7 c2 03 04 0a 02 ec 00 04 02 08 2a 02 05 ┆ * ┆ 0x260…280 0b 05 00 3a 00 05 03 08 eb 21 03 04 0a 02 d1 01 04 02 08 cd 02 05 0b 07 00 00 00 05 02 08 01 02 ┆ : ! ┆ 0x280…2a0 04 0a 02 ac 01 04 07 08 11 2a 00 3e 02 2a 07 04 0a 02 8a 01 04 02 08 cd 02 05 0b 08 00 00 00 05 ┆ * > * ┆ 0x2a0…2c0 02 08 2a 02 05 0b 05 00 20 00 05 02 08 22 02 04 0a 02 e8 01 04 09 08 11 02 00 19 5e 23 56 2a 09 ┆ * " ^#V* ┆ 0x2c0…2e0 05 0b 05 00 3a 00 05 04 08 7c ba c2 04 04 0a 02 8e 00 04 04 08 7d bb c2 04 04 0a 02 8e 00 04 03 ┆ : ø å ┆ 0x2e0…300 08 2b cd 03 05 0b 09 00 00 00 05 02 08 22 02 04 0a 02 ea 01 04 02 08 2a 02 04 0a 02 e6 01 04 03 ┆ + " * ┆ 0x300…320 08 eb 21 03 05 0b 05 00 00 00 05 02 08 cd 02 05 0b 0a 00 00 00 05 03 08 a7 c2 03 04 0a 02 ec 00 ┆ ! ┆ 0x320…340 04 02 08 2a 02 05 0b 05 00 20 00 05 02 08 22 02 04 0a 02 e6 01 04 05 08 21 00 00 22 05 04 0a 02 ┆ * " ! " ┆ 0x340…360 ec 01 04 03 08 eb 2a 03 04 0a 02 e6 01 04 03 08 eb cd 03 04 0a 02 fb 00 04 03 08 a7 c2 03 04 0a ┆ * ┆ 0x360…380 02 ec 00 04 02 08 2a 02 04 0a 02 ec 01 04 03 08 eb 2a 03 04 0a 02 ea 01 04 05 08 19 7c b5 ca 05 ┆ * * ø ┆ 0x380…3a0 04 0a 02 ec 00 04 02 08 2a 02 04 0a 02 ec 01 04 03 08 23 22 03 04 0a 02 ec 01 04 02 08 2a 02 04 ┆ * #" * ┆ 0x3a0…3c0 0a 02 ec 01 04 03 08 eb 21 03 04 0a 02 dd 01 04 02 08 cd 02 05 0b 07 00 00 00 05 02 08 01 02 04 ┆ ! ┆ 0x3c0…3e0 0a 02 d6 01 04 07 08 11 0c 00 3e 02 2a 07 04 0a 02 8a 01 04 02 08 cd 02 05 0b 08 00 00 00 05 02 ┆ > * ┆ 0x3e0…400 08 2a 02 04 0a 02 ec 01 04 02 08 c3 02 04 0a 02 ae 00 04 03 08 f5 2a 03 04 0a 02 e4 01 04 02 08 ┆ * * ┆ 0x400…420 cd 02 05 0b 03 00 00 00 05 02 08 2a 02 04 0a 02 e2 01 04 02 08 cd 02 05 0b 03 00 00 00 05 04 08 ┆ * ┆ 0x420…440 f1 c9 22 04 05 0b 05 00 13 00 05 03 08 97 32 03 05 0b 05 00 15 00 05 02 08 2a 02 04 0a 02 e8 01 ┆ " 2 * ┆ 0x440…460 04 09 08 11 07 00 19 5e 16 00 3a 09 05 0b 0b 00 00 00 05 02 08 32 02 05 0b 05 00 16 00 05 05 08 ┆ ^ : 2 ┆ 0x460…480 6f 26 00 cd 05 05 0b 0c 00 00 00 05 02 08 22 02 04 0a 02 ee 01 04 04 08 7b 3c 32 04 04 0a 02 f0 ┆o& " æ<2 ┆ 0x480…4a0 01 04 02 08 21 02 04 0a 02 f0 01 04 03 08 35 ca 03 04 0a 02 38 01 04 02 08 cd 02 04 0a 02 44 01 ┆ ! 5 8 D ┆ 0x4a0…4c0 04 04 08 a7 c0 21 04 05 0b 05 00 16 00 05 03 08 7e 21 03 05 0b 05 00 15 00 05 04 08 86 77 c3 04 ┆ ! ü! w ┆ 0x4c0…4e0 04 0a 02 20 01 04 02 08 3a 02 04 0a 02 ee 01 04 04 08 a7 c8 32 04 05 0b 05 00 16 00 05 02 08 cd ┆ : 2 ┆ 0x4e0…500 02 04 0a 02 44 01 04 03 08 c9 2a 03 04 0a 02 e8 01 04 02 08 22 02 05 0b 05 00 20 00 05 02 08 21 ┆ D * " !┆ 0x500…520 02 05 0b 05 00 00 00 05 04 08 3e 01 cd 04 05 0b 0d 00 00 00 05 04 08 a7 c0 2a 04 04 0a 02 e6 01 ┆ > * ┆ 0x520…540 04 02 08 22 02 05 0b 05 00 20 00 05 02 08 21 02 05 0b 05 00 00 00 05 04 08 3e 02 cd 04 05 0b 0d ┆ " ! > ┆ 0x540…560 00 00 00 05 07 08 c9 e5 d5 c5 b7 ca 07 04 0a 02 84 01 04 04 08 06 00 f2 04 04 0a 02 71 01 04 09 ┆ q ┆ 0x560…580 08 06 08 0e ff e6 7f b7 ca 09 04 0a 02 7e 01 04 04 08 0c 0f d2 04 04 0a 02 79 01 04 0d 08 79 80 ┆ ü y y ┆ 0x580…5a0 c1 d1 e1 c9 3e 0e c1 d1 e1 c9 0d 03 09 02 00 03 05 0b 0e 00 00 00 05 05 0b 0f 00 00 00 05 05 0b ┆ > ┆ 0x5a0…5c0 10 00 00 00 05 05 0b 11 00 00 00 05 05 0b 12 00 00 00 05 05 0b 13 00 00 00 05 05 0b 14 00 00 00 ┆ ┆ 0x5c0…5e0 05 05 0b 15 00 00 00 05 05 0b 0e 00 00 00 05 05 0b 0e 00 00 00 05 05 0b 0e 00 00 00 05 05 0b 0e ┆ ┆ 0x5e0…600 00 00 00 05 05 0b 0e 00 00 00 05 05 0b 0e 00 00 00 05 05 0b 0e 00 00 00 05 05 0b 0e 00 00 00 05 ┆ ┆ 0x600…620 37 08 3c 53 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆7 <S> ┆ 0x620…640 20 20 20 20 20 20 20 30 30 30 30 0d 3c 53 3e 20 20 20 20 30 30 30 30 0d 37 03 09 0f 00 03 09 08 ┆ 0000 <S> 0000 7 ┆ 0x640…660 24 42 41 53 49 53 2d 2d 09 02 0f 00 02 20 20 41 2c 4d 20 20 20 20 20 3b 20 48 45 4e 54 20 45 54 ┆$BASIS-- A,M ; HENT ET┆ 0x660…680 20 54 45 47 4e 25 22 20 20 20 20 20 20 20 4f 52 41 20 20 20 20 20 41 20 20 20 20 20 20 20 3b 20 ┆ TEGN%" ORA A ; ┆ 0x680…6a0 48 41 52 20 56 49 20 45 54 22 27 20 20 20 20 20 20 20 50 55 53 48 20 20 20 20 48 20 20 20 20 20 ┆HAR VI ET"' PUSH H ┆ 0x6a0…6c0 20 20 3b 20 47 45 4d 20 53 59 4e 54 41 4b 53 50 49 4c 27 32 20 20 20 20 20 20 20 4a 5a 20 20 20 ┆ ; GEM SYNTAKSPIL'2 JZ ┆ 0x6c0…6e0 42 43 53 32 30 20 20 20 4b 43 02 0a 00 6d 01 2a 54 01 0d 6d 01 2a 00 00 00 34 00 00 00 00 00 00 ┆BCS20 KC m *T m * 4 ┆ 0x6e0…700 20 20 20 4b 54 52 55 31 20 20 20 3b 20 46 4f 52 53 41 54 20 53 4f 4d 20 52 55 4e 20 48 56 49 53 ┆ KTRU1 ; FORSAT SOM RUN HVIS┆ 0x700…720 20 49 4e 54 45 54 32 20 20 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 41 2c 32 20 20 20 20 20 3b ┆ INTET2 MVI A,2 ;┆ 0x720…740 20 53 5b 54 20 52 55 4e 20 20 20 20 20 20 20 20 20 53 54 41 20 20 20 20 20 55 53 54 41 20 20 20 ┆ SÆT RUN STA USTA ┆ 0x740…760 20 3b 20 46 4c 41 47 20 4f 50 20 3a 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 4d 4f 56 45 54 ┆ ; FLAG OP : CALL MOVET┆ 0x760…780 20 20 20 3b 20 43 48 45 43 4b 20 53 59 4e 54 41 4b 53 20 45 54 49 4b 4b 45 54 45 20 4f 47 20 46 ┆ ; CHECK SYNTAKS ETIKKETE OG F┆ 0x780…7a0 49 4c 4e 41 56 4e 3a 25 20 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 41 2c 30 20 20 20 20 20 3b ┆ILNAVN:% MVI A,0 ;┆ 0x7a0…7c0 20 53 5b 54 20 52 55 4e 20 46 4c 41 47 25 20 20 20 20 20 20 20 20 53 54 41 20 20 20 20 20 55 53 ┆ SÆT RUN FLAG% STA US┆ 0x7c0…7e0 54 41 20 20 20 20 3b 20 54 49 4c 42 41 47 45 20 3e 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 20 ┆TA ; TILBAGE > JNZ ┆ 0x7e0…800 4b 54 52 55 31 20 20 20 3b 20 48 4f 50 20 48 56 49 53 20 49 4b 4b 45 20 4c 4f 56 4c 49 47 54 20 ┆KTRU1 ; HOP HVIS IKKE LOVLIGT ┆ 0x800…820 45 54 49 4b 54 54 45 2f 46 49 4c 4e 41 56 4e 3e 35 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 ┆ETIKTTE/FILNAVN>5 CALL ┆ 0x820…840 4b 54 4c 4f 20 20 20 20 3b 20 49 4e 44 4c 5b 53 20 50 52 4f 47 52 41 4d 4d 45 54 20 4d 45 44 20 ┆KTLO ; INDLÆS PROGRAMMET MED ┆ 0x840…860 22 4c 4f 41 44 22 35 1f 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 44 20 20 20 20 20 20 20 3b ┆"LOAD"5 POP D ;┆ 0x860…880 20 41 46 53 54 41 4b 1f 33 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 43 48 53 54 20 20 20 20 ┆ AFSTAK 3 LHLD CHST ┆ 0x880…8a0 3b 20 48 4c 20 50 45 47 45 52 20 50 5d 20 46 5c 52 53 54 45 20 53 5b 54 4e 49 4e 47 33 27 20 20 ┆; HL PEGER PÅ FØRSTE SÆTNING3' ┆ 0x8a0…8c0 20 20 20 20 20 53 48 4c 44 20 20 20 20 53 51 52 45 20 20 20 20 3b 20 53 5b 54 20 44 45 4e 20 50 ┆ SHLD SQRE ; SÆT DEN P┆ 0x8c0…8e0 49 4c 20 4f 50 27 20 20 20 20 20 20 20 20 4a 4d 50 20 20 20 20 20 4b 54 52 55 32 20 20 20 3b 20 ┆IL OP' JMP KTRU2 ; ┆ 0x8e0…900 46 4f 52 54 53 5b 54 20 06 4b 54 52 55 31 3a 06 26 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 ┆FORTSÆT KTRU1: & POP ┆ 0x900…920 48 20 20 20 20 20 20 20 3b 20 48 45 4e 54 20 53 43 41 4e 20 50 49 4c 26 2a 20 20 20 20 20 20 20 ┆H ; HENT SCAN PIL&* ┆ 0x920…940 43 41 4c 4c 20 20 20 20 4b 54 50 41 4f 50 20 20 3b 20 4d 41 53 53 41 47 45 20 50 41 52 41 4d 45 ┆CALL KTPAOP ; MASSAGE PARAME┆ 0x940…960 54 52 45 2a 06 4b 54 52 55 32 3a 06 39 20 20 20 20 20 20 4d 56 49 20 20 41 2c 32 20 20 20 20 20 ┆TRE* KTRU2: 9 MVI A,2 ┆ 0x960…980 20 20 20 20 3b 20 50 52 4f 47 52 41 4d 53 54 41 54 55 53 2c 20 4b 5c 52 45 4e 44 45 20 45 46 54 ┆ ; PROGRAMSTATUS, KØRENDE EFT┆ 0x980…9a0 45 52 20 52 55 4e 39 33 20 20 20 20 20 20 43 41 4c 4c 20 4b 54 53 45 54 20 20 20 20 20 20 20 3b ┆ER RUN93 CALL KTSET ;┆ 0x9a0…9c0 20 53 5b 54 20 53 54 41 54 55 53 20 4f 50 2c 20 53 4b 49 46 54 20 4c 49 4e 49 45 33 2f 20 20 63 ┆ SÆT STATUS OP, SKIFT LINIE3/ c┆ 0x9c0…9e0 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┆