|
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: 16864 (0x41e0)
Notes: Mikados_0
Names: »MIKM«
└─⟦1fe484179⟧ Bits:30004601 COMAL Opstart
└─⟦this⟧ »MIKM«
0x0000…0020 (0,) 4f 41 44 31 54 20 20 20 52 30 4c 20 50 31 50 31 57 38 6a 2d e8 3b 12 00 2d 38 fd 37 2d 38 50 31 ┆OAD1T R0L P1P1W8j- ; -8 7-8P1┆
0x0020…0040 00 00 00 00 ff 0f 20 20 20 02 33 01 08 0d 00 00 76 76 76 13 76 76 76 76 76 76 76 76 76 76 76 76 ┆ 3 vvv vvvvvvvvvvvv┆
0x0040…0060 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 ┆vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv┆
0x0060…0080 76 76 76 76 76 76 76 76 76 76 42 4c 4f 41 44 31 54 20 30 41 00 42 00 00 00 00 00 00 00 8d 01 1e ┆vvvvvvvvvvBLOAD1T 0A B ┆
0x0080…00a0 01 02 03 8d 01 1e 01 00 20 00 ea 0f e0 00 5d 00 5d 00 01 bd 8d 01 1e 76 76 76 42 4c 4f 41 44 31 ┆ Å Å vvvBLOAD1┆
0x00a0…00c0 54 20 30 41 00 42 00 00 00 00 00 00 00 8f 01 00 2a 39 38 01 00 4c 4f 41 44 31 4f 41 44 31 54 20 ┆T 0A B *98 LOAD1OAD1T ┆
0x00c0…00e0 20 20 52 30 4c 20 50 31 50 31 57 38 6a 2d e8 3b 12 00 2d 38 fd 37 2d 38 50 31 00 00 00 00 ff 0f ┆ R0L P1P1W8j- ; -8 7-8P1 ┆
0x00e0…0100 f3 31 5c 03 c3 40 00 20 20 20 20 20 20 20 49 4e 52 20 20 20 20 20 4d 10 01 3b 01 16 20 20 20 20 ┆ 1Ø @ INR M ; ┆
0x0100…0120 20 20 20 4c c3 08 f0 20 20 20 20 48 2c 42 46 4c 47 44 16 10 20 20 20 20 20 20 20 44 41 44 20 20 ┆ L H,BFLGD DAD ┆
0x0120…0140 cd e4 02 21 63 03 22 10 00 3e 80 d3 fd 3e 00 d3 fc 21 00 40 3e aa 77 be 3e 01 c2 77 00 21 00 80 ┆ !c " > > ! @> w > w ! ┆
0x0140…0160 3e aa 77 be 3e 02 c2 77 00 21 00 c0 3e aa 77 be 3e 03 c2 77 00 3e 04 32 62 03 cd 8e 00 cd 11 01 ┆> w > w ! > w > w > 2b ┆
0x0160…0180 cd ef 01 3a 5f 03 fe 00 c2 88 00 c3 10 05 11 63 03 3e 00 d3 fd 3e 01 32 5e 03 d3 fc 13 3a 62 03 ┆ :_ c > > 2^ :b ┆
0x0180…01a0 fe 02 ca bc 00 fe 03 ca e5 00 fe 04 ca e9 00 21 00 40 3e aa 77 be c2 bc 00 3e 2e 12 13 21 00 80 ┆ ! @> w >. ! ┆
0x01a0…01c0 3e aa 77 be c2 ca 00 3e 2e 12 13 21 00 c0 3e aa 77 be c2 d8 00 3e 2e 12 13 3a 5e 03 fe 80 ca ef ┆> w >. ! > w >. :^ ┆
0x01c0…01e0 00 07 c3 97 00 13 c3 ca 00 11 83 03 c3 ef 00 3e 53 12 13 3a 62 03 fe 01 c8 3e 2e 12 13 3a 62 03 ┆ >S :b >. :b ┆
0x01e0…0200 fe 02 c8 3e 2e 12 13 3a 62 03 fe 03 c8 3e 2e 12 c9 11 63 03 3e 01 32 5e 03 d3 fc 0e 03 1a fe 2e ┆ >. :b >. c > 2^ .┆
0x0200…0220 c2 26 01 cd 48 01 13 0d f2 1d 01 3a 5e 03 fe 80 ca 37 01 07 c3 16 01 0e 03 1a fe 2e c2 42 01 cd ┆ & H :^ 7 . B ┆
0x0220…0240 48 01 13 0d f2 39 01 c9 e5 d5 c5 3e 03 21 00 00 11 00 40 b9 ca 5c 01 3d 19 c3 53 01 22 60 03 3e ┆H 9 > ! @ Ø = S "` >┆
0x0240…0260 00 cd ab 01 3e 00 cd c3 01 da 80 01 3e ff cd ab 01 3e ff cd c3 01 da 80 01 c1 d1 e1 3e 2a 12 c9 ┆ > > > >* ┆
0x0260…0280 ae 47 3e 01 0e 00 57 a0 c2 97 01 7a fe 80 ca 9d 01 07 57 0c c3 87 01 3e 30 81 c3 9f 01 3e 46 c1 ┆ G> W z W >0 >F ┆
0x0280…02a0 d1 e1 12 3a 5f 03 3c 32 5f 03 c9 2a 60 03 11 00 10 47 2f 4f 70 23 71 23 70 23 71 23 1b 7a b3 c2 ┆ :_ <2_ *` G/Op#q#p#q# z ┆
0x02a0…02c0 b4 01 c9 2a 60 03 11 00 10 47 2f 4f 78 be c2 ed 01 23 79 be c2 ed 01 23 78 be c2 ed 01 23 79 be ┆ *` G/Ox #y #x #y ┆
0x02c0…02e0 c2 ed 01 23 1b 7a b3 c2 cc 01 37 3f c9 37 c9 21 49 02 cd c7 02 21 af 02 cd c7 02 21 bb 02 cd c7 ┆ # z 7? 7 !I ! ! ┆
0x02e0…0300 02 11 63 03 06 00 21 8b 03 3e 30 80 fe 38 c2 13 02 3e 53 77 23 36 3a 23 0e 04 36 20 23 1a 77 13 ┆ c ! >0 8 >Sw#6:# 6 # w ┆
0x0300…0320 23 0d c2 1a 02 36 0a 23 36 0d 21 8b 03 cd c7 02 04 78 fe 09 c2 06 02 3a 5f 03 fe 00 21 7a 02 c2 ┆# 6 #6 ! x :_ !z ┆
0x0320…0340 45 02 21 59 02 cd c7 02 c9 55 53 45 52 20 42 41 4e 4b 20 54 45 53 54 0a 0d 4e 4f 20 45 52 52 4f ┆E !Y USER BANK TEST NO ERRO┆
0x0340…0360 52 53 20 46 4f 55 4e 44 20 49 4e 20 55 53 45 52 20 42 41 4e 4b 28 53 29 0a 0d 45 52 52 4f 52 20 ┆RS FOUND IN USER BANK(S) ERROR ┆
0x0360…0380 49 4e 20 4f 4e 45 20 4f 52 20 4d 4f 52 45 20 55 53 45 52 20 42 41 4e 4b 28 53 29 20 2d 20 4c 4f ┆IN ONE OR MORE USER BANK(S) - LO┆
0x0380…03a0 41 44 49 4e 47 20 53 54 4f 50 50 45 44 0a 0d 20 20 20 30 20 31 20 33 20 34 0a 0d 20 20 20 30 20 ┆ADING STOPPED 0 1 3 4 0 ┆
0x03a0…03c0 36 20 32 20 38 0a 0d 7e 23 cd d2 02 fe 0d c2 c7 02 c9 d3 e2 d3 60 f5 c5 01 40 06 0b 78 b1 c2 db ┆6 2 8 ü# ` @ x ┆
0x03c0…03e0 02 c1 f1 c9 21 63 03 06 24 36 20 23 05 c2 e9 02 3e 03 d3 e3 d3 61 3e 53 d3 e3 d3 61 3e 7a d3 e3 ┆ !c $6 # > a>S a>z ┆
0x03e0…0400 d3 61 3e 25 d3 e3 d3 61 3e 00 32 5f 03 21 14 03 cd c7 02 c9 53 50 43 2f 31 20 53 45 4c 46 54 45 ┆ a>% a> 2_ ! SPC/1 SELFTE┆
0x0400…0420 53 54 20 52 55 4e 4e 49 4e 47 0a 0d 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 ┆ST RUNNING vvvvvvvvvvvvvvvvvvvv┆
0x0420…0440 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 ┆vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv┆
[…0xd…]
0x05e0…0600 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 3e 0a 32 e7 03 3e 01 d3 fc 31 10 05 21 30 41 22 ┆vvvvvvvvvvvvvvvv> 2 > 1 !0A"┆
0x0600…0620 e5 03 11 b6 06 06 08 21 dd 03 1a 77 13 23 05 c2 2a 05 d5 21 e5 03 36 30 23 36 41 3e 10 32 e8 04 ┆ ! w # * ! 60#6A> 2 ┆
0x0620…0640 3e 59 2f d3 f4 cd 95 06 db f0 e6 80 ca 5e 05 3e 58 2f d3 f4 cd 95 06 db f0 e6 80 c2 40 05 3e 0d ┆>Y/ ^ >X/ @ > ┆
0x0640…0660 d3 f0 cd 9c 06 db f0 e6 04 ca b1 06 3e 00 32 ef 04 21 00 00 22 ed 04 21 e8 03 22 ea 04 cd 3f 06 ┆ > 2 ! " ! " ? ┆
0x0660…0680 3a e8 04 3d ca a7 06 32 e8 04 3a ef 04 2a ed 04 3c fe 09 da 99 05 23 d6 09 32 ef 04 22 ed 04 21 ┆: = 2 : * < # 2 " !┆
0x0680…06a0 e8 03 22 ea 04 cd 3f 06 21 e8 03 0e 13 11 dd 03 06 0a e5 1a be c2 c1 05 05 ca cd 05 23 13 c3 b3 ┆ " ? ! # ┆
0x06a0…06c0 05 e1 0d ca 80 05 11 0d 00 19 c3 ad 05 d1 23 5e 23 56 23 7e eb 22 ed 04 32 ef 04 21 e8 03 22 ea ┆ #^#V#ü " 2 ! " ┆
0x06c0…06e0 04 cd 3f 06 21 e8 03 11 40 00 19 5e 23 56 23 eb 22 f0 04 eb 5e 23 56 23 7e 93 4f 23 7e 9a 47 04 ┆ ? ! @ ^#V# " ^#V#ü O#ü G ┆
0x06e0…0700 eb 22 ea 04 3a ef 04 3c fe 09 da 1f 06 2a ed 04 23 3e 00 32 ef 04 22 ed 04 cd 3f 06 c3 25 06 32 ┆ " : < * #> 2 " ? % 2┆
0x0700…0720 ef 04 cd 5a 06 05 c2 01 06 21 24 00 36 c3 23 36 00 23 36 f0 d1 1a fe ff c2 25 05 2a f0 04 e9 db ┆ Z !$ 6 #6 #6 % * ┆
0x0720…0740 f0 e6 80 c2 b1 06 2a ed 04 7d d3 f3 3e 1d d3 f0 cd 9c 06 db f0 e6 10 c2 ac 06 3a ef 04 3c 2a ea ┆ * å > : <* ┆
0x0740…0760 04 d3 f2 f3 3e 80 d3 f0 cd 95 06 16 00 db f0 e6 03 fe 01 ca 6d 06 fe 03 c2 ac 06 db f3 77 23 15 ┆ > m w# ┆
0x0760…0780 c2 6d 06 cd 9c 06 db f0 e6 3c c8 3a e7 03 3d ca ac 06 c3 10 05 3e 20 3d c2 97 06 c9 cd 95 06 db ┆ m < : = > = ┆
0x0780…07a0 f0 e6 01 c2 9c 06 c9 3e 01 cd 08 f0 3e 02 cd 08 f0 3e 03 cd 08 f0 42 4c 4f 41 44 32 20 20 ff 20 ┆ > > > BLOAD2 ┆
0x07a0…07c0 20 20 48 10 13 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 44 4b 42 32 13 10 20 20 20 20 20 20 ┆ H LHLD DKB2 ┆
0x07c0…07e0 20 50 55 53 48 20 20 20 20 48 10 14 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 57 52 49 54 45 ┆ PUSH H CALL WRITE┆
0x07e0…0800 14 10 20 20 20 20 20 20 20 41 4e 41 20 20 20 20 20 41 10 0a 20 20 20 20 20 20 20 52 4e 5a 0a 01 ┆ ANA A RNZ ┆
0x0800…0820 3b 01 2c 3b 55 44 53 4b 52 49 56 20 4e 55 20 45 4e 48 45 44 45 52 4e 45 20 49 20 52 5b 4b 4b 45 ┆; ,;UDSKRIV NU ENHEDERNE I RÆKKE┆
0x0820…0840 46 5c 4c 47 45 20 55 44 45 4e 20 50 49 4c 2e 2c 01 3b 01 14 20 20 20 20 20 20 20 4c 48 4c 44 20 ┆FØLGE UDEN PIL., ; LHLD ┆
0x0840…0860 20 20 20 41 4e 54 53 4f 14 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 48 10 13 20 20 20 20 ┆ ANTSO DCX H ┆
0x0860…0880 20 20 20 53 48 4c 44 20 20 20 20 49 47 45 4e 13 01 3b 01 12 20 20 20 20 20 20 20 4c 48 4c 44 20 ┆ SHLD IGEN ; LHLD ┆
0x0880…08a0 20 20 20 4e 52 31 12 0b 20 20 20 20 20 20 20 58 43 48 47 0b 01 3b 01 10 45 53 4b 4f 4d 3a 20 50 ┆ NR1 XCHG ; ESKOM: P┆
0x08a0…08c0 55 53 48 20 20 20 20 44 10 39 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 50 50 52 53 4f 20 20 ┆USH D 9 LHLD PPRSO ┆
0x08c0…08e0 20 3b 41 4e 54 41 4c 20 50 4f 53 54 45 52 20 50 52 2e 20 53 4f 52 54 45 52 49 4e 47 53 45 4e 48 ┆ ;ANTAL POSTER PR. SORTERINGSENH┆
0x08e0…0900 45 44 2e 39 01 3b 01 10 45 53 4b 4f 31 3a 20 50 55 53 48 20 20 20 20 48 10 10 20 20 20 20 20 20 ┆ED.9 ; ESKO1: PUSH H ┆
0x0900…0920 20 50 55 53 48 20 20 20 20 44 10 01 3b 01 22 20 20 20 20 20 20 20 50 55 53 48 20 20 20 20 44 20 ┆ PUSH D ; " PUSH D ┆
0x0920…0940 20 20 20 20 20 20 3b 54 49 4c 20 57 52 49 54 45 2e 22 13 20 20 20 20 20 20 20 4c 48 4c 44 20 20 ┆ ;TIL WRITE." LHLD ┆
0x0940…0960 20 20 44 4b 42 32 13 10 20 20 20 20 20 20 20 50 55 53 48 20 20 20 20 48 10 14 20 20 20 20 20 20 ┆ DKB2 PUSH H ┆
0x0960…0980 20 43 41 4c 4c 20 20 20 20 57 52 49 54 45 14 10 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 44 ┆ CALL WRITE POP D┆
0x0980…09a0 10 10 20 20 20 20 20 20 20 41 4e 41 20 20 20 20 20 41 10 14 20 20 20 20 20 20 20 4a 4e 5a 20 20 ┆ ANA A JNZ ┆
0x09a0…09c0 20 20 20 45 53 4b 46 32 14 01 3b 01 30 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 4c 50 4f 53 ┆ ESKF2 ; 0 LHLD LPOS┆
0x09c0…09e0 54 20 20 20 3b 54 5b 4c 20 46 52 45 4d 20 54 49 4c 20 4e 5b 53 54 45 20 50 4f 53 54 2e 30 10 20 ┆T ;TÆL FREM TIL NÆSTE POST.0 ┆
0x09e0…0a00 20 20 20 20 20 20 44 41 44 20 20 20 20 20 44 10 0b 20 20 20 20 20 20 20 58 43 48 47 0b 01 3b 01 ┆ DAD D XCHG ; ┆
0x0a00…0a20 10 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 48 10 10 20 20 20 20 20 20 20 44 43 58 20 20 20 ┆ POP H DCX ┆
0x0a20…0a40 20 20 48 10 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c 48 12 10 20 20 20 20 20 20 20 ┆ H MOV A,H ┆
0x0a40…0a60 4f 52 41 20 20 20 20 20 4c 10 14 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 20 45 53 4b 4f 31 14 ┆ORA L JNZ ESKO1 ┆
0x0a60…0a80 01 3b 01 39 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 44 20 20 20 20 20 20 20 3b 28 44 45 29 ┆ ; 9 POP D ;(DE)┆
0x0a80…0aa0 20 3a 2d 20 53 54 41 52 54 20 50 5d 20 53 4f 52 54 45 52 49 4e 47 53 45 4e 48 45 44 2e 39 01 3b ┆ :- START PÅ SORTERINGSENHED.9 ;┆
0x0aa0…0ac0 01 13 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 49 47 45 4e 13 12 20 20 20 20 20 20 20 4d 4f ┆ LHLD IGEN MO┆
0x0ac0…0ae0 56 20 20 20 20 20 41 2c 48 12 10 20 20 20 20 20 20 20 4f 52 41 20 20 20 20 20 4c 10 14 20 20 20 ┆V A,H ORA L ┆
0x0ae0…0b00 20 20 20 20 4a 5a 20 20 20 20 20 20 45 53 4b 55 44 14 01 3b 01 10 20 20 20 20 20 20 20 44 43 58 ┆ JZ ESKUD ; DCX┆
0x0b00…0b20 20 20 20 20 20 48 10 13 20 20 20 20 20 20 20 53 48 4c 44 20 20 20 20 49 47 45 4e 13 01 3b 01 14 ┆ H SHLD IGEN ; ┆
0x0b20…0b40 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 4e 5b 53 54 45 14 0b 20 20 20 20 20 20 20 58 43 48 ┆ CALL NÆSTE XCH┆
0x0b40…0b60 47 0b 14 20 20 20 20 20 20 20 4a 4d 50 20 20 20 20 20 45 53 4b 4f 4d 14 01 3b 01 42 3b 28 44 45 ┆G JMP ESKOM ; B;(DE┆
0x0b60…0b80 29 20 3a 2d 20 53 49 44 53 54 45 20 44 56 53 2e 20 53 54 5c 52 53 54 45 20 45 4e 48 45 44 2e 20 ┆) :- SIDSTE DVS. STØRSTE ENHED. ┆
0x0b80…0ba0 53 45 2c 20 4f 4d 20 44 45 4e 20 53 4b 41 4c 20 54 49 4c 42 41 47 45 48 4f 4c 44 45 53 2e 42 01 ┆SE, OM DEN SKAL TILBAGEHOLDES.B ┆
0x0ba0…0bc0 3b 01 12 45 53 4b 55 44 3a 20 4c 44 41 20 20 20 20 20 42 59 54 12 10 20 20 20 20 20 20 20 41 4e ┆; ESKUD: LDA BYT AN┆
0x0bc0…0be0 41 20 20 20 20 20 41 10 25 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 20 45 4a 54 4c 42 20 20 20 ┆A A % JNZ EJTLB ┆
0x0be0…0c00 3b 48 4f 50 2c 20 48 56 49 53 20 45 4a 2e 25 01 3b 01 23 3b 28 44 45 29 20 54 49 4c 42 41 47 45 ┆;HOP, HVIS EJ.% ; #;(DE) TILBAGE┆
0x0c00…0c20 48 4f 4c 44 45 53 20 53 49 44 53 54 20 49 20 42 55 46 46 45 52 2e 23 01 3b 01 14 20 20 20 20 20 ┆HOLDES SIDST I BUFFER.# ; ┆
0x0c20…0c40 20 20 4c 48 4c 44 20 20 20 20 45 4e 45 4e 48 14 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 ┆ LHLD ENENH DCX ┆
0x0c40…0c60 48 10 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 48 10 3e 20 20 20 20 20 20 20 50 55 53 48 ┆H DCX H > PUSH┆
0x0c60…0c80 20 20 20 20 48 20 20 20 20 20 20 20 3b 47 45 4d 20 45 4e 45 4e 48 2d 32 20 3d 20 41 4e 54 41 4c ┆ H ;GEM ENENH-2 = ANTAL┆
0x0c80…0ca0 2c 20 44 45 52 20 53 4b 41 4c 20 46 4c 59 54 54 45 53 2e 3e 10 20 20 20 20 20 20 20 44 43 58 20 ┆, DER SKAL FLYTTES.> DCX ┆
0x0ca0…0cc0 20 20 20 20 48 10 10 20 20 20 20 20 20 20 44 41 44 20 20 20 20 20 44 10 3a 20 20 20 20 20 20 20 ┆ H DAD D : ┆
0x0cc0…0ce0 50 55 53 48 20 20 20 20 48 20 20 20 20 20 20 20 3b 47 45 4d 20 50 49 4c 20 54 49 4c 20 45 4e 48 ┆PUSH H ;GEM PIL TIL ENH┆
0x0ce0…0d00 45 44 45 4e 53 20 53 49 44 53 54 45 20 4f 4b 54 45 54 2e 3a 01 3b 01 14 20 20 20 20 20 20 20 4c ┆EDENS SIDSTE OKTET.: ; L┆
0x0d00…0d20 48 4c 44 20 20 20 20 42 55 46 45 52 14 0b 20 20 20 20 20 20 20 58 43 48 47 0b 13 20 20 20 20 20 ┆HLD BUFER XCHG ┆
0x0d20…0d40 20 20 4c 48 4c 44 20 20 20 20 4c 42 55 46 13 2b 20 20 20 20 20 20 20 44 41 44 20 20 20 20 20 44 ┆ LHLD LBUF + DAD D┆
0x0d40…0d60 20 20 20 20 20 20 20 3b 28 48 4c 29 20 3a 2d 20 45 46 54 45 52 20 42 55 46 45 52 2b 10 20 20 20 ┆ ;(HL) :- EFTER BUFER+ ┆
0x0d60…0d80 20 20 20 20 44 43 58 20 20 20 20 20 48 10 10 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 44 10 ┆ DCX H POP D ┆
0x0d80…0da0 30 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 41 4e 54 41 4c 2c 20 ┆0 POP B ;ANTAL, ┆
0x0da0…0dc0 44 45 52 20 53 4b 41 4c 20 46 4c 59 54 54 45 53 2e 30 01 3b 01 23 20 20 20 20 20 20 20 49 4e 58 ┆DER SKAL FLYTTES.0 ; # INX┆
0x0dc0…0de0 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 4d 4f 44 56 49 52 4b 20 44 43 58 23 10 45 53 46 4c 59 ┆ B ;MODVIRK DCX# ESFLY┆
0x0de0…0e00 3a 20 44 43 58 20 20 20 20 20 42 10 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c 42 12 ┆: DCX B MOV A,B ┆
0x0e00…0e20 10 20 20 20 20 20 20 20 4f 52 41 20 20 20 20 20 43 10 14 20 20 20 20 20 20 20 4a 5a 20 20 20 20 ┆ ORA C JZ ┆
0x0e20…0e40 20 20 45 53 4c 55 54 14 01 3b 01 10 20 20 20 20 20 20 20 4c 44 41 58 20 20 20 20 44 10 12 20 20 ┆ ESLUT ; LDAX D ┆
0x0e40…0e60 20 20 20 20 20 4d 4f 56 20 20 20 20 20 4d 2c 41 12 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 ┆ MOV M,A DCX ┆
0x0e60…0e80 20 44 10 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 48 10 14 20 20 20 20 20 20 20 4a 4d 50 ┆ D DCX H JMP┆
0x0e80…0ea0 20 20 20 20 20 45 53 46 4c 59 14 01 3b 01 10 45 53 4c 55 54 3a 20 49 4e 58 20 20 20 20 20 48 10 ┆ ESFLY ; ESLUT: INX H ┆
0x0ea0…0ec0 14 20 20 20 20 20 20 20 53 48 4c 44 20 20 20 20 54 49 4c 42 41 14 01 3b 01 14 20 20 20 20 20 20 ┆ SHLD TILBA ; ┆
0x0ec0…0ee0 20 4c 48 4c 44 20 20 20 20 4b 5b 44 45 52 14 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 ┆ LHLD KÆDER MOV A┆
0x0ee0…0f00 2c 48 12 10 20 20 20 20 20 20 20 4f 52 41 20 20 20 20 20 4c 10 14 20 20 20 20 20 20 20 4a 4e 5a ┆,H ORA L JNZ┆
0x0f00…0f20 20 20 20 20 20 45 4a 54 4c 42 14 01 3b 01 14 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 41 4e ┆ EJTLB ; LHLD AN┆
0x0f20…0f40 54 53 4f 14 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 48 10 14 20 20 20 20 20 20 20 53 48 ┆TSO DCX H SH┆
0x0f40…0f60 4c 44 20 20 20 20 41 4e 54 53 4f 14 01 3b 01 14 45 4a 54 4c 42 3a 20 43 41 4c 4c 20 20 20 20 42 ┆LD ANTSO ; EJTLB: CALL B┆
0x0f60…0f80 55 46 55 44 14 0a 20 20 20 20 20 20 20 52 45 54 0a 01 3b 01 22 45 53 4b 46 32 3a 20 50 4f 50 20 ┆UFUD RET ; "ESKF2: POP ┆
0x0f80…0fa0 20 20 20 20 48 20 20 20 20 20 20 20 3b 46 45 4a 4c 55 44 48 4f 50 2e 22 10 20 20 20 20 20 20 20 ┆ H ;FEJLUDHOP." ┆
0x0fa0…0fc0 50 4f 50 20 20 20 20 20 44 10 0a 20 20 20 20 20 20 20 52 45 54 0a 01 3b 01 01 3b 01 46 3b 2a 2a ┆POP D RET ; ; F;**┆
0x0fc0…0fe0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
[…0x1…]
0x1000…1020 2a 2a 2a 46 24 3b 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 ┆***F$; ┆
0x1020…1040 20 20 20 20 46 49 46 5b 4c 24 3d 3b 46 5b 4c 4c 45 53 20 46 4f 52 20 46 49 4e 44 31 20 4f 47 20 ┆ FIFÆL$=;FÆLLES FOR FIND1 OG ┆
0x1040…1060 46 49 4e 44 4e 2e 20 4c 5c 4b 4b 45 20 54 49 4c 20 41 54 20 46 49 4e 44 45 20 4e 5b 53 54 45 20 ┆FINDN. LØKKE TIL AT FINDE NÆSTE ┆
0x1060…1080 45 4c 45 4d 45 4e 54 2e 3d 46 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ELEMENT.=F;*********************┆
0x1080…10a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x10a0…10c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 46 01 3b 01 10 46 49 46 5b 4c 3a 20 50 55 53 48 ┆****************F ; FIFÆL: PUSH┆
0x10c0…10e0 20 20 20 20 48 10 26 20 20 20 20 20 20 20 44 41 44 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 28 ┆ H & DAD B ;(┆
0x10e0…1100 42 43 29 20 3d 20 45 4e 45 4e 48 2d 32 26 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c ┆BC) = ENENH-2& MOV A,┆
0x1100…1120 4d 12 10 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 10 10 20 20 20 20 20 20 20 41 4e 41 20 ┆M INX H ANA ┆
0x1120…1140 20 20 20 20 4d 10 01 3b 01 10 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 10 10 20 20 20 20 ┆ M ; INX H ┆
0x1140…1160 20 20 20 49 4e 58 20 20 20 20 20 48 10 2c 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 20 20 ┆ INX H , INX H ┆
0x1160…1180 20 20 20 20 20 3b 28 48 4c 29 20 3a 2d 20 4e 5b 53 54 45 20 45 4e 48 45 44 2e 2c 10 20 20 20 20 ┆ ;(HL) :- NÆSTE ENHED., ┆
0x1180…11a0 20 20 20 50 4f 50 20 20 20 20 20 44 10 01 3b 01 40 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 ┆ POP D ; @ CPI ┆
0x11a0…11c0 30 46 46 20 20 20 20 20 3b 4b 5b 44 45 4e 20 45 52 20 54 4f 4d 2c 20 48 56 49 53 20 41 4e 54 41 ┆0FF ;KÆDEN ER TOM, HVIS ANTA┆
0x11c0…11e0 4c 20 54 49 4c 42 41 47 45 20 45 52 20 46 46 46 46 40 14 20 20 20 20 20 20 20 4a 5a 20 20 20 20 ┆L TILBAGE ER FFFF@ JZ ┆
0x11e0…1200 20 20 46 49 46 5b 4c 14 01 3b 01 0a 20 20 20 20 20 20 20 52 45 54 0a 01 3b 01 01 3b 01 46 3b 2a ┆ FIFÆL ; RET ; ; F;*┆
0x1200…1220 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
[…0x1…]
0x1240…1260 2a 2a 2a 2a 46 24 3b 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 ┆****F$; ┆
0x1260…1280 20 20 20 20 20 46 49 4e 44 31 24 2f 3b 46 49 4e 44 20 46 5c 52 53 54 45 20 4b 5b 44 45 20 4d 45 ┆ FIND1$/;FIND FØRSTE KÆDE ME┆
0x1280…12a0 44 20 4e 4f 47 45 54 20 49 20 55 4e 44 45 52 20 46 4c 45 54 4e 49 4e 47 45 4e 2e 2f 46 3b 2a 2a ┆D NOGET I UNDER FLETNINGEN./F;**┆
0x12a0…12c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
[…0x1…]
0x12e0…1300 2a 2a 2a 46 01 3b 01 14 46 49 4e 44 31 3a 20 4c 48 4c 44 20 20 20 20 45 4e 45 4e 48 14 12 20 20 ┆***F ; FIND1: LHLD ENENH ┆
0x1300…1320 20 20 20 20 20 4d 4f 56 20 20 20 20 20 42 2c 48 12 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 ┆ MOV B,H MOV ┆
0x1320…1340 20 43 2c 4c 12 10 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 42 10 44 20 20 20 20 20 20 20 44 ┆ C,L DCX B D D┆
0x1340…1360 43 58 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 28 42 43 29 20 3d 20 52 45 4c 2e 20 41 44 52 45 ┆CX B ;(BC) = REL. ADRE┆
0x1360…1380 53 53 45 20 50 5d 20 41 4e 54 41 4c 20 54 49 4c 42 41 47 45 20 49 20 4b 5b 44 45 2e 44 01 3b 01 ┆SSE PÅ ANTAL TILBAGE I KÆDE.D ; ┆
0x1380…13a0 2a 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 4c 5b 53 53 54 20 20 20 3b 28 48 4c 29 20 3a 2d ┆* LHLD LÆSST ;(HL) :-┆
0x13a0…13c0 20 31 2e 20 4d 55 4c 49 47 45 2e 2a 01 3b 01 14 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 46 ┆ 1. MULIGE.* ; CALL F┆
0x13c0…13e0 49 46 5b 4c 14 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 28 44 ┆IFÆL ' ;(D┆
0x13e0…1400 45 29 20 3a 2d 20 46 5c 52 53 54 45 2e 27 0a 20 20 20 20 20 20 20 52 45 54 0a 01 3b 01 01 3b 01 ┆E) :- FØRSTE.' RET ; ; ┆
0x1400…1420 46 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆F;******************************┆
0x1420…1440 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x1440…1460 2a 2a 2a 2a 2a 2a 2a 46 24 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*******F$; ┆
0x1460…1480 20 20 20 20 20 20 20 20 46 49 4e 44 4e 24 1b 3b 46 49 4e 44 20 4e 5b 53 54 45 20 45 4c 45 4d 45 ┆ FINDN$ ;FIND NÆSTE ELEME┆
0x1480…14a0 4e 54 20 49 20 4b 5b 44 45 2e 1b 01 3b 01 17 3b 46 5c 52 3a 20 20 20 28 44 45 29 20 3a 2d 20 45 ┆NT I KÆDE. ; ;FØR: (DE) :- E┆
0x14a0…14c0 4c 45 4d 45 4e 54 17 15 3b 45 46 54 45 52 3a 20 28 44 45 29 20 55 5b 4e 44 52 45 54 2e 15 16 3b ┆LEMENT ;EFTER: (DE) UÆNDRET. ;┆
0x14c0…14e0 20 20 20 20 20 20 20 28 48 4c 29 20 3a 2d 20 4e 5b 53 54 45 2e 16 46 3b 2a 2a 2a 2a 2a 2a 2a 2a ┆ (HL) :- NÆSTE. F;********┆
0x14e0…1500 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x1500…1520 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 46 01 3b ┆*****************************F ;┆
0x1520…1540 01 10 46 49 4e 44 4e 3a 20 50 55 53 48 20 20 20 20 44 10 01 3b 01 14 20 20 20 20 20 20 20 4c 48 ┆ FINDN: PUSH D ; LH┆
0x1540…1560 4c 44 20 20 20 20 45 4e 45 4e 48 14 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 42 2c 48 12 ┆LD ENENH MOV B,H ┆
0x1560…1580 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 43 2c 4c 12 10 20 20 20 20 20 20 20 44 43 58 20 ┆ MOV C,L DCX ┆
0x1580…15a0 20 20 20 20 42 10 45 20 20 20 20 20 20 20 44 43 58 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 28 ┆ B E DCX B ;(┆
0x15a0…15c0 42 43 29 20 3d 20 52 45 4c 2e 20 41 44 52 45 53 53 45 20 50 5b 20 41 4e 54 41 4c 20 54 49 4c 42 ┆BC) = REL. ADRESSE PÆ ANTAL TILB┆
0x15c0…15e0 41 47 45 20 49 20 4b 5b 44 45 4e 2e 45 01 3b 01 10 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 ┆AGE I KÆDEN.E ; INX ┆
0x15e0…1600 48 10 10 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 10 32 20 20 20 20 20 20 20 44 41 44 20 ┆H INX H 2 DAD ┆
0x1600…1620 20 20 20 20 44 20 20 20 20 20 20 20 3b 28 48 4c 29 20 3a 2d 20 4e 5b 53 54 45 20 4b 5b 44 45 45 ┆ D ;(HL) :- NÆSTE KÆDEE┆
0x1620…1640 4c 45 4d 45 4e 54 2e 32 01 3b 01 27 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 46 49 46 5b 4c ┆LEMENT.2 ; ' CALL FIFÆL┆
0x1640…1660 20 20 20 3b 46 49 4e 44 20 44 45 54 20 4e 5b 53 54 45 2e 27 0b 20 20 20 20 20 20 20 58 43 48 47 ┆ ;FIND DET NÆSTE.' XCHG┆
0x1660…1680 0b 01 3b 01 10 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 44 10 0a 20 20 20 20 20 20 20 52 45 ┆ ; POP D RE┆
0x1680…16a0 54 0a 01 3b 01 01 3b 01 46 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆T ; ; F;**********************┆
0x16a0…16c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x16c0…16e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 46 23 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆***************F#; ┆
0x16e0…1700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 41 4e 47 23 45 3b 28 48 4c 29 20 3a 3d 20 28 ┆ GANG#E;(HL) := (┆
0x1700…1720 44 45 29 20 2a 20 28 48 4c 29 2e 20 28 44 45 29 20 5b 4e 44 52 45 53 20 45 4a 2e 20 46 52 45 4d ┆DE) * (HL). (DE) ÆNDRES EJ. FREM┆
0x1720…1740 47 41 4e 47 53 4d 5d 44 45 4e 20 45 52 20 53 41 4d 4d 45 4e 4c 5b 47 4e 49 4e 47 45 18 3b 56 45 ┆GANGSMÅDEN ER SAMMENLÆGNINGE ;VE┆
0x1740…1760 44 20 4e 45 44 54 5b 4c 4c 49 4e 47 20 41 46 20 28 48 4c 29 2e 18 23 3b 56 45 44 20 4f 56 45 52 ┆D NEDTÆLLING AF (HL). #;VED OVER┆
0x1760…1780 4c 5c 42 20 52 45 54 55 52 4e 45 52 45 53 20 4d 45 44 20 43 59 20 3d 20 31 2e 23 46 3b 2a 2a 2a ┆LØB RETURNERES MED CY = 1.#F;***┆
0x1780…17a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
[…0x1…]
0x17c0…17e0 2a 2a 46 01 3b 01 12 47 41 4e 47 3a 20 20 4d 4f 56 20 20 20 20 20 42 2c 48 12 12 20 20 20 20 20 ┆**F ; GANG: MOV B,H ┆
0x17e0…1800 20 20 4d 4f 56 20 20 20 20 20 43 2c 4c 12 01 3b 01 23 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 ┆ MOV C,L ; # INX ┆
0x1800…1820 20 42 20 20 20 20 20 20 20 3b 4d 4f 44 56 49 52 4b 20 44 43 58 23 01 3b 01 12 20 20 20 20 20 20 ┆ B ;MODVIRK DCX# ; ┆
0x1820…1840 20 4c 58 49 20 20 20 20 20 48 2c 30 12 01 3b 01 10 47 41 4e 47 31 3a 20 44 43 58 20 20 20 20 20 ┆ LXI H,0 ; GANG1: DCX ┆
0x1840…1860 42 10 12 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c 42 12 10 20 20 20 20 20 20 20 4f 52 ┆B MOV A,B OR┆
0x1860…1880 41 20 20 20 20 20 43 10 09 20 20 20 20 20 20 20 52 5a 09 01 3b 01 10 20 20 20 20 20 20 20 44 41 ┆A C RZ ; DA┆
0x1880…18a0 44 20 20 20 20 20 44 10 2c 20 20 20 20 20 20 20 52 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆D D , RC ┆
0x18a0…18c0 3b 52 45 54 55 52 4e 45 52 20 56 45 44 20 4f 56 45 52 4c 5c 42 2c 01 3b 01 14 20 20 20 20 20 20 ┆;RETURNER VED OVERLØB, ; ┆
0x18c0…18e0 20 4a 4d 50 20 20 20 20 20 47 41 4e 47 31 14 01 3b 01 01 3b 01 46 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ JMP GANG1 ; ; F;*********┆
0x18e0…1900 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x1900…1920 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 46 23 3b 20 ┆****************************F#; ┆
0x1920…1940 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 20 20 49 4e 44 ┆ IND┆
0x1940…1960 31 23 43 3b 49 4e 44 4c 5b 53 45 52 20 50 4f 53 54 20 28 42 4c 5b 53 45 29 20 54 49 4c 20 4c 5b ┆1#C;INDLÆSER POST (BLÆSE) TIL LÆ┆
0x1960…1980 53 42 46 2e 20 54 5b 4c 4c 45 52 20 41 4e 54 41 4c 20 54 49 4c 42 41 47 45 20 4e 45 44 2c 20 53 ┆SBF. TÆLLER ANTAL TILBAGE NED, S┆
0x1980…19a0 4b 52 49 56 45 52 43 35 3b 50 4f 53 54 4e 52 20 50 5d 20 4e 5b 53 54 45 20 50 4f 53 54 2c 20 52 ┆KRIVERC5;POSTNR PÅ NÆSTE POST, R┆
0x19a0…19c0 45 54 55 52 20 4d 45 44 20 46 4c 41 47 20 45 46 54 45 52 20 46 45 4a 4c 4b 4f 44 45 2e 35 01 3b ┆ETUR MED FLAG EFTER FEJLKODE.5 ;┆
0x19c0…19e0 01 13 3b 46 5c 52 3a 20 20 20 28 48 4c 29 20 3a 2d 20 44 4b 42 13 46 3b 2a 2a 2a 2a 2a 2a 2a 2a ┆ ;FØR: (HL) :- DKB F;********┆
0x19e0…1a00 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x1a00…1a20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 46 01 3b ┆*****************************F ;┆
0x1a20…1a40 01 1f 49 4e 44 31 3a 20 20 50 55 53 48 20 20 20 20 48 20 20 20 20 20 20 20 3b 47 45 4d 20 44 4b ┆ IND1: PUSH H ;GEM DK┆
0x1a40…1a60 42 1f 0b 20 20 20 20 20 20 20 58 43 48 47 0b 14 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 4c ┆B XCHG LHLD L┆
0x1a60…1a80 5b 53 42 46 14 0b 20 20 20 20 20 20 20 58 43 48 47 0b 14 20 20 20 20 20 20 20 43 41 4c 4c 20 20 ┆ÆSBF XCHG CALL ┆
0x1a80…1aa0 20 20 42 4c 5b 53 45 14 1b 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 48 20 20 20 20 20 20 20 ┆ BLÆSE POP H ┆
[…truncated at 200 lines…]