|
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: 177632 (0x2b5e0)
Notes: Mikados_I
Names: »REGLIREK.I«
└─⟦6b1c9961a⟧ Bits:30008989 INDPERM P1
└─⟦this⟧ »REGLIREK.I«
0x00000…00020 14 00 68 01 e8 17 12 00 32 01 11 00 05 00 33 00 b4 00 a2 00 dd 00 0d 00 07 00 01 00 01 00 13 00 ┆ h 2 3 ┆
0x00020…00040 01 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 05 00 01 00 01 00 06 00 02 00 01 00 08 00 01 00 ┆ ┆
0x00040…00060 01 00 09 00 01 00 01 00 0a 00 02 00 01 00 95 a4 01 db a3 12 9a d5 83 46 d8 a2 82 30 14 01 95 a4 ┆ F 0 ┆
0x00060…00080 01 db a3 13 9a d5 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 ┆ ┆
0x00080…000a0 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 ┆ ┆
[…0x9…]
0x001c0…001e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 50 45 ef ff 4e 41 56 4e 46 52 41 ef ff 4e 41 56 ┆ PE NAVNFRA NAV┆
0x001e0…00200 4e 54 49 4c ef ff 00 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 22 2c e3 eb ┆NTIL vvvvvvvvvvvvvvvvvvvvv", ┆
0x00200…00220 22 30 e3 21 08 00 19 56 23 22 2e e3 c3 3e e0 22 2c e3 22 2e e3 eb 22 30 e3 21 08 00 19 56 32 32 ┆"0 ! V#". > ", ". "0 ! V22┆
0x00220…00240 e3 97 32 28 e3 21 0a 00 e5 c5 21 00 00 e5 e5 d5 2a 2c e3 e5 21 33 e3 e5 cd b5 00 32 2b e3 fe ff ┆ 2( ! ! *, !3 2+ ┆
0x00240…00260 ca 73 e0 a7 c2 f9 e1 2a 55 e3 44 4d 2a 3e e3 eb c3 7e e0 2a 46 e3 44 4d 11 00 00 c3 a9 e0 3a 32 ┆ s *U DM*> ü *F DM :2┆
0x00260…00280 e3 e6 40 c2 93 e0 3a 3b e3 fe 30 da a9 e0 fe 3a d2 a9 e0 3e 01 32 28 e3 3a 3d e3 62 6b 3d fa a5 ┆ @ :; 0 : > 2( := bk= ┆
0x00280…002a0 e0 19 c3 9d e0 22 29 e3 eb 21 0a 00 e5 2a 30 e3 e5 d5 c5 3a 3b e3 67 e5 2a 2e e3 e5 21 63 ed e5 ┆ ") ! *0 :; g *. !c ┆
0x002a0…002c0 cd f2 f7 a7 ca 35 e1 fe 02 c2 f9 e1 3a 2b e3 3c ca 2b e1 21 0a 00 e5 2a 30 e3 e5 21 01 00 e5 21 ┆ 5 :+ < + ! *0 ! !┆
0x002c0…002e0 00 00 e5 3a 3b e3 67 e5 2a 2e e3 e5 21 63 ed e5 cd b5 00 a7 c2 f9 e1 3a 28 e3 fe 01 c2 3a e1 3a ┆ :; g *. !c :( : :┆
0x002e0…00300 6d ed a7 c2 16 e1 2a 6e ed eb 2a 29 e3 cd 6d 00 19 7c a7 f2 3a e1 21 63 ed e5 cd c1 00 cd 0a e2 ┆m *n *) m ø : !c ┆
0x00300…00320 a7 c2 f9 e1 2a 29 e3 eb c3 a9 e0 cd 0a e2 a7 c2 f9 e1 c3 73 e0 3a 2b e3 3c c8 2a 55 e3 22 ac ed ┆ *) s :+ < *U " ┆
0x00320…00340 3a 32 e3 e6 80 ca 5a e1 3a 3b e3 fe 4b ca c3 e1 fe 52 ca c3 e1 fe 42 ca c3 e1 21 1f 00 22 55 e3 ┆:2 Z :; K R B ! "U ┆
0x00340…00360 22 85 ed 21 24 e2 e5 21 33 e3 e5 cd be 00 a7 c2 f9 e1 21 24 e2 e5 21 63 ed e5 cd bb 00 a7 c2 f9 ┆" !$ !3 !$ !c ┆
0x00360…00380 e1 21 20 00 22 55 e3 22 85 ed 21 24 e2 e5 21 33 e3 e5 cd be 00 fe 0c ca f8 e1 a7 c2 f9 e1 21 24 ┆ ! "U " !$ !3 !$┆
0x00380…003a0 e2 e5 21 63 ed e5 cd bb 00 fe 0c ca b5 e1 a7 c2 f9 e1 c3 8a e1 21 63 ed e5 cd 21 fb a7 c2 f9 e1 ┆ !c !c ! ┆
0x003a0…003c0 c3 9e e1 21 24 e2 e5 21 33 e3 e5 cd 7d fd fe 0c ca d8 e1 fe 13 c2 dd e1 06 00 c3 e1 e1 a7 c2 f9 ┆ !$ !3 å ┆
0x003c0…003e0 e1 21 23 e2 e5 70 21 63 ed e5 cd d0 fd a7 c2 f9 e1 3a 23 e2 a7 c2 c3 e1 97 f5 21 33 e3 e5 cd c1 ┆ !# p!c :# !3 ┆
0x003e0…00400 00 21 63 ed e5 cd c1 00 f1 c9 21 0a 00 e5 2a 30 e3 e5 3a 3b e3 67 e5 2a 2e e3 e5 21 63 ed e5 cd ┆ !c ! *0 :; g *. !c ┆
0x00400…00420 02 fe c9 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 ┆ vvvvvvvvvvvvvvvvvvvvvvvvvvvvv┆
0x00420…00440 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┆
[…0xa9…]
0x01960…01980 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 22 af f7 c9 22 ad f7 d5 16 00 2a af f7 ┆vvvvvvvvvvvvvvvvvvv" " * ┆
0x01980…019a0 5f 19 19 5e 23 56 e1 eb e5 2a ad f7 c9 76 76 76 76 e5 d5 21 c5 f7 cd 43 ff c2 c1 f7 21 c9 f7 4e ┆_ ^#V * vvvv ! C ! N┆
0x019a0…019c0 97 b7 d1 e1 c9 76 76 76 76 76 21 ea f7 5f 16 00 3e 00 cd 97 f7 21 ea f7 11 e5 f7 3e 03 cd 97 f7 ┆ vvvvv! _ > ! > ┆
0x019c0…019e0 e1 c8 cd 08 f0 46 4c 41 47 ff 76 76 76 76 76 76 76 76 e1 e3 e5 36 ee 01 02 00 cd 15 fb 1a fe 21 ┆ FLAG vvvvvvvv 6 !┆
0x019e0…01a00 da 08 f8 fe 7f da 0d f8 3e 09 c3 fb f9 06 08 cd 73 00 01 03 00 cd 15 fb 7a fe 30 da 23 f8 fe 5d ┆ > s z 0 # Å┆
0x01a00…01a20 da 28 f8 3e 11 c3 fb f9 77 23 36 41 fe 4e c2 33 f8 36 2a 01 05 00 cd 15 fb 01 0b 00 e1 e5 cd d6 ┆ ( > w#6A N 3 6* ┆
0x01a20…01a40 00 eb 01 04 00 cd 15 fb 7c a7 f2 52 f8 3e 10 c3 fb f9 b5 c2 67 f8 e1 e5 01 08 00 09 7e fe 4e ca ┆ ø R > g ü N ┆
0x01a40…01a60 74 f8 3e 11 c3 fb f9 eb cd 85 00 da 73 f8 3e 04 c3 fb f9 eb 01 22 00 e1 e5 cd d6 00 01 06 00 cd ┆t > s > " ┆
0x01a60…01a80 15 fb e1 e5 cd ca 00 c2 fb f9 01 07 00 cd 15 fb 7a a7 c2 9e f8 b3 ca 9e f8 fe 15 da a3 f8 3e 0f ┆ z > ┆
0x01a80…01aa0 c3 fb f9 e1 e5 01 17 00 09 77 d1 d5 21 16 00 19 36 00 21 0a 00 19 36 00 21 08 00 19 7e fe 4e c2 ┆ w ! 6 ! 6 ! ü N ┆
0x01aa0…01ac0 d1 f8 21 0b 00 19 7e 23 b6 ca d1 f8 3e 10 c3 fb f9 cd 00 fb e1 e5 0e 03 cd d9 00 c2 ea f9 3e 01 ┆ ! ü# > > ┆
0x01ac0…01ae0 e1 e5 cd c4 00 a7 ca fb f8 f2 f1 f8 3e 0e c3 ea f9 fe 01 c2 ea f9 3e 02 c3 ea f9 97 e1 e5 cd c4 ┆ > > ┆
0x01ae0…01b00 00 a7 c2 ea f9 e1 e5 7a 11 0d 00 19 cd ee 00 d1 d5 cd 0d fb ca 78 f9 eb cd f1 00 a7 c2 ea f9 d1 ┆ z x ┆
0x01b00…01b20 d5 21 20 00 19 4e 23 66 69 eb cd f4 00 c2 ea f9 e1 e5 d5 11 0a 00 19 d1 73 7a e1 e5 11 24 00 19 ┆ ! N#fi sz $ ┆
0x01b20…01b40 cd ee 00 e1 e5 0e 01 cd e2 00 a7 c2 ea f9 e1 e5 11 24 00 19 cd eb 00 e1 e5 cd f7 00 c2 f1 f9 7b ┆ $ æ┆
0x01b40…01b60 eb e1 e5 01 19 00 09 73 23 72 23 77 2b 2b eb e1 e5 01 2a 00 09 cd e8 00 e1 e5 cd 02 fa c2 f1 f9 ┆ s#r#w++ * ┆
0x01b60…01b80 d1 d5 cd 0d fb ca e9 f9 21 0a 00 19 7e a7 ca 9b f9 21 24 00 19 97 77 23 77 23 77 21 24 00 19 cd ┆ ! ü !$ w#w#w!$ ┆
0x01b80…01ba0 eb 00 e1 e5 cd 4f fa e1 e5 01 19 00 09 cd eb 00 e1 e5 cd fd 00 c2 f1 f9 d1 d5 21 0a 00 19 7e a7 ┆ O ! ü ┆
0x01ba0…01bc0 c2 d9 f9 eb cd fa 00 e1 e5 11 24 00 19 cd eb 00 e1 e5 cd fd 00 a7 c2 f1 f9 e1 e5 cd 9e fa e1 e5 ┆ $ ┆
0x01bc0…01be0 3e 01 cd d0 00 a7 c2 f1 f9 97 e1 f5 cd dc 00 f1 c9 e1 e5 f5 cd df 00 f1 c3 ea f9 e1 f5 cd 00 fb ┆> ┆
0x01be0…01c00 f1 c9 e5 eb 21 0d 00 19 eb 01 13 00 09 cd e8 00 23 3e 01 77 e1 e5 cd d0 00 d1 c0 d5 21 30 00 19 ┆ ! #> w !0 ┆
0x01c00…01c20 eb 97 cd c7 00 d1 d5 06 0a cd 73 00 d1 d5 e5 cd 0d fb e1 eb c2 40 fa 01 22 00 cd e5 00 c3 48 fa ┆ s @ " H ┆
0x01c20…01c40 01 19 00 09 eb cd e8 00 e1 3e 02 cd d0 00 c9 d5 c5 e5 eb 21 30 00 19 e5 06 0a cd 73 00 d1 21 0a ┆ > !0 s ! ┆
0x01c40…01c60 00 19 36 00 c1 c5 d5 21 0b 00 19 eb 21 0b 00 cd e5 00 e1 e5 01 0d 00 09 97 0e 06 77 0d 23 c2 7b ┆ 6 ! ! w # æ┆
0x01c60…01c80 fa e1 d1 01 13 00 09 c1 71 23 70 23 c1 70 21 22 00 19 eb 01 49 00 09 1a 77 13 23 1a 77 c9 e5 01 ┆ q#p# p!" I w # w ┆
0x01c80…01ca0 0d 00 09 97 1e 06 77 23 1d c2 a6 fa d1 d5 21 17 00 19 46 21 0c 00 19 7e a7 c2 c2 fa 2b 7e b8 da ┆ w# ! F! ü +ü ┆
0x01ca0…01cc0 c3 fa 78 21 16 00 19 77 21 19 00 19 eb 01 13 00 09 cd e8 00 d1 21 18 00 19 36 81 21 1c 00 19 36 ┆ x! w! ! 6 ! 6┆
0x01cc0…01ce0 01 23 36 00 21 1e 00 19 36 20 23 36 00 21 29 00 19 eb 7e 2f 12 01 08 00 09 7e fe 4e c0 eb 34 c9 ┆ #6 ! 6 #6 !) ü/ ü N 4 ┆
0x01ce0…01d00 c1 e1 d1 f1 f1 f1 f1 f1 f1 d5 e5 c5 c9 21 08 00 19 7e fe 4e c9 e5 21 04 00 09 09 39 5e 23 56 e1 ┆ ! ü N ! 9^#V ┆
0x01d00…01d20 c9 e1 c1 e5 c5 0a 2f 21 29 00 09 be ca 34 fb 3e 06 c3 59 fd 21 0a 00 09 3e 3c be c2 43 fb 3e 08 ┆ /!) 4 > Y ! >< C > ┆
0x01d20…01d40 c3 59 fd 21 18 00 09 7e e6 01 c2 52 fb 3e 06 c3 59 fd e1 54 5d 01 13 00 09 4e 23 46 c5 23 4e 23 ┆ Y ! ü R > Y TÅ N#F #N#┆
0x01d40…01d60 46 c5 eb e5 0e 03 cd d9 00 c1 c0 c5 21 18 00 09 3e 02 a6 ca 82 fb 35 35 e1 e5 3e 02 cd d0 00 c2 ┆F ! > 55 > ┆
0x01d60…01d80 28 fd e1 e5 cd f1 00 c1 c5 21 20 00 09 5e 23 56 60 69 cd f4 00 c2 28 fd e1 d5 e5 cd f7 00 ca a6 ┆( ! ^#V`i ( ┆
0x01d80…01da0 fb e1 e3 c3 28 fd e3 d5 c5 5a d5 97 f5 e5 01 0d 00 09 5e 7b 23 56 b2 23 46 b0 ca e9 fb 78 c1 c5 ┆ ( Z ^æ#V #F x ┆
0x01da0…01dc0 21 13 00 09 73 23 72 23 77 21 16 00 09 3e 01 77 60 69 cd d0 00 ca dd fb e1 e3 c3 21 fd e1 f1 3c ┆! s#r#w! > w`i ! <┆
0x01dc0…01de0 f5 e5 01 30 00 09 c3 ae fb e1 f1 e5 a7 c2 09 fc 01 0d 00 09 0e 05 cd 5b fd e1 97 f5 e5 11 19 00 ┆ 0 Æ ┆
0x01de0…01e00 19 5e 23 56 23 46 c3 bd fb 01 30 00 09 01 0d 00 09 0e 05 cd 5b fd c1 c5 21 13 00 09 eb 21 24 00 ┆ ^#V#F 0 Æ ! !$ ┆
0x01e00…01e20 09 cd e8 00 e1 e5 01 30 00 09 01 10 00 09 7e 23 b6 23 b6 ca 5d fc e1 e5 3e 02 cd d0 00 c2 21 fd ┆ 0 ü# # Å > ! ┆
0x01e20…01e40 c1 c5 21 2a 00 09 eb 21 13 00 09 cd e8 00 21 16 00 09 3e 01 77 e1 e5 cd d0 00 c2 21 fd e1 e5 01 ┆ !* ! ! > w ! ┆
0x01e40…01e60 30 00 09 01 0a 00 09 34 e1 e5 3e 02 cd d0 00 c2 21 fd e1 e5 54 5d 01 30 00 09 e5 01 09 00 cd 73 ┆0 4 > ! TÅ 0 s┆
0x01e60…01e80 00 d1 e1 e5 d5 01 0a 00 09 7e c6 42 eb 01 09 00 09 77 01 0b 00 e1 d1 d5 e5 09 eb 09 7e 12 21 0d ┆ ü B w ü ! ┆
0x01e80…01ea0 00 c1 09 97 77 23 77 23 77 23 eb e1 e5 c5 01 24 00 09 c1 eb cd e8 00 21 06 00 2b 29 39 7e 21 13 ┆ w#w#w# $ ! +)9ü! ┆
0x01ea0…01ec0 00 09 a7 ca cf fc 97 77 23 77 23 77 c3 dc fc 0e 03 cd 5b fd e1 e5 01 30 00 09 44 4d 21 19 00 09 ┆ w#w#w Æ 0 DM! ┆
0x01ec0…01ee0 eb c1 c5 21 22 00 09 7e 12 d1 d5 21 05 00 cd 6e fd c2 21 fd 21 06 00 2b 29 39 7e a7 c2 0f fd e1 ┆ !" ü ! n ! ! +)9ü ┆
0x01ee0…01f00 e5 cd fa 00 d1 d5 21 03 00 cd 6e fd c2 21 fd e1 e5 01 0a 00 09 34 e1 e5 01 18 00 09 7e e6 bf 77 ┆ ! n ! 4 ü w┆
0x01f00…01f20 97 e1 c1 c1 c1 c1 c1 e5 e1 c1 d1 e5 c5 01 13 00 09 73 23 72 23 c1 71 23 70 e1 f5 e5 3e 01 cd d0 ┆ s#r# q#p > ┆
0x01f20…01f40 00 a7 ca 49 fd e1 c1 f5 e5 e1 e5 01 18 00 09 7e e6 41 77 e1 cd dc 00 f1 c9 e1 c9 eb 69 26 00 29 ┆ I ü Aw i& )┆
0x01f40…01f60 39 7e 12 13 23 7e 12 13 2b 2b 2b 7e 12 c9 29 39 4e 23 46 2b 2b 2b 7e eb 57 cd fd 00 c9 d1 e1 c1 ┆9ü #ü +++ü )9N#F+++ü W ┆
0x01f60…01f80 d5 c5 e5 11 1e 00 19 5e 23 56 e1 e5 19 11 30 00 19 7e a7 e1 c2 9a fd 47 e1 c9 e5 c5 e5 11 22 00 ┆ ^#V 0 ü G " ┆
0x01f80…01fa0 19 36 01 23 72 cd be 00 d1 c1 a7 c0 0a fe 89 d2 cd fd f5 c5 c5 d5 3c 21 22 00 19 77 cd be 00 d1 ┆ 6 #r <!" w ┆
0x01fa0…01fc0 c1 a7 c0 68 67 19 7e b8 c2 cd fd 97 c9 3e 13 c9 c1 d1 e1 c5 e5 d5 e5 d5 4e 06 00 09 23 71 21 22 ┆ hg ü > N #q!"┆
0x01fc0…01fe0 00 19 03 03 71 23 70 cd bb 00 d1 e1 a7 c8 fe 0c c0 e5 d5 e5 d5 d5 cd 21 fb a7 ca e7 fd e1 e1 d1 ┆ q#p ! ┆
0x01fe0…02000 e1 c9 cd a7 fe e1 c0 0e 03 e5 cd d9 00 a7 ca 13 fe e1 c9 e1 e5 0e 01 cd e2 00 a7 ca 23 fe e1 f5 ┆ # ┆
0x02000…02020 c3 a1 fe e1 e5 3e 01 cd c4 00 47 05 ca 37 fe f2 9a fe 3e 01 c3 9a fe 77 01 09 00 09 7e 23 cd eb ┆ > G 7 > w ü# ┆
0x02020…02040 00 e1 c5 d5 e5 f5 3e 02 cd d0 00 ca 54 fe c1 e1 c1 c3 99 fe f1 e1 d1 c1 fe 2a ca 98 fe e5 7a 11 ┆ > T * z ┆
0x02040…02060 13 00 19 cd ee 00 23 3e 01 77 e1 e5 cd d0 00 c2 9a fe e1 e5 01 30 00 09 36 00 3e 02 e1 e5 cd d0 ┆ #> w 0 6 > ┆
0x02060…02080 00 c2 9a fe e1 e5 01 30 00 09 01 0d 00 09 cd eb 00 e1 78 b1 b2 c2 5d fe 97 e5 e1 f5 e5 cd df 00 ┆ 0 x Å ┆
0x02080…020a0 e1 cd dc 00 f1 a7 c9 97 32 42 ff e1 22 3c ff e1 22 3e ff e1 22 40 ff 7e 2f 01 29 00 09 be c2 cd ┆ 2B "< "> "@ ü/ ) ┆
0x020a0…020c0 fe 3e 07 32 42 ff e1 e1 e1 e1 c3 2b ff 36 ee 2a 40 ff d1 1a fe 21 da de fe fe 7f da e3 fe 3e 09 ┆ > 2B + 6 *@ ! > ┆
0x020c0…020e0 32 42 ff 06 08 cd 73 00 f1 fe 30 da f3 fe fe 5e da f8 fe 3e 11 32 42 ff 77 2a 40 ff d1 cd ca 00 ┆2B s 0 ^ > 2B w*@ ┆
0x020e0…02100 ca 06 ff 32 42 ff d1 7a a7 c2 15 ff b3 ca 15 ff fe 15 da 1a ff 3e 0f 32 42 ff 2a 40 ff 01 17 00 ┆ 2B z > 2B *@ ┆
0x02100…02120 09 73 2a 40 ff 01 16 00 09 36 00 2a 3e ff e5 2a 40 ff e5 2a 3c ff e5 3a 42 ff a7 c9 76 76 76 76 ┆ s*@ 6 *> *@ *< :B vvvv┆
0x02120…02140 76 76 76 22 8a ff 21 33 e3 cd ca 00 a7 c0 21 46 e3 97 77 23 77 23 77 23 3c 77 21 33 e3 cd d0 00 ┆vvv" !3 !F w#w#w#<w!3 ┆
0x02140…02160 a7 c0 11 70 e3 2a 8a ff 06 05 cd 73 00 97 c9 e5 21 8c ff cd 43 ff d1 a7 c0 21 70 e3 06 05 cd 73 ┆ p * s ! C !p s┆
0x02160…02180 00 21 33 e3 3e 02 cd d0 00 c9 76 76 76 76 76 76 76 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 ┆ !3 > vvvvvvvccccccccccccccc┆
0x02180…021a0 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┆
[…0x9…]
0x022c0…022e0 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 3c ┆ccccccccccccccccccccccccccccccc<┆
0x022e0…02300 00 46 43 4f 50 59 20 20 30 41 00 23 00 00 00 00 00 00 00 00 00 00 41 62 00 01 00 00 00 00 00 00 ┆ FCOPY 0A # Ab ┆
0x02300…02320 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 ┆ ┆
[…0x6…]
0x023e0…02400 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┆
[…0x1e…]
0x027c0…027e0 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 20 ┆ccccccccccccccccccccccccccccccc ┆
0x027e0…02800 42 55 44 53 59 53 56 44 4b 41 01 0a 00 63 00 1d 00 00 00 63 00 1d 41 61 00 fe 00 55 44 53 59 53 ┆BUDSYSVDKA c c Aa UDSYS┆
0x02800…02820 18 30 31 30 30 20 50 52 4f 43 20 43 48 45 43 4b 28 4e 52 31 2c 4f 4b 31 29 18 0a 30 31 31 30 20 ┆ 0100 PROC CHECK(NR1,OK1) 0110 ┆
0x02820…02840 4f 4b 31 3d 30 0a 0d 30 31 31 35 20 52 45 53 55 4c 54 3d 30 0d 19 30 31 32 30 20 49 46 20 4c 45 ┆OK1=0 0115 RESULT=0 0120 IF LE┆
0x02840…02860 4e 28 4e 52 31 24 29 3e 30 20 54 48 45 4e 20 19 19 30 31 33 30 20 49 46 20 4e 52 31 24 28 31 29 ┆N(NR1$)>0 THEN 0130 IF NR1$(1)┆
0x02860…02880 3d 22 2d 22 20 54 48 45 4e 20 19 0f 30 31 34 30 20 46 4f 52 54 45 47 4e 3d 2d 31 0f 0a 30 31 35 ┆="-" THEN 0140 FORTEGN=-1 015┆
0x02880…028a0 30 20 4f 4b 31 3d 31 0a 0a 30 31 36 30 20 45 4c 53 45 20 0a 0e 30 31 37 30 20 46 4f 52 54 45 47 ┆0 OK1=1 0160 ELSE 0170 FORTEG┆
0x028a0…028c0 4e 3d 31 0e 0b 30 31 38 30 20 45 4e 44 49 46 20 0b 18 30 31 39 30 20 57 48 49 4c 45 20 4c 45 4e ┆N=1 0180 ENDIF 0190 WHILE LEN┆
0x028c0…028e0 28 4e 52 31 24 29 3e 4f 4b 31 18 0e 30 32 30 30 20 4f 4b 31 3d 4f 4b 31 2b 31 0e 2c 30 32 31 30 ┆(NR1$)>OK1 0200 OK1=OK1+1 ,0210┆
0x028e0…02900 20 49 46 20 4e 52 31 24 28 4f 4b 31 29 3c 22 30 22 20 4f 52 20 4e 52 31 24 28 4f 4b 31 29 3e 22 ┆ IF NR1$(OK1)<"0" OR NR1$(OK1)>"┆
0x02900…02920 39 22 20 54 48 45 4e 20 2c 0e 30 32 32 30 20 46 4f 52 54 45 47 4e 3d 30 0e 12 30 32 33 30 20 4f ┆9" THEN , 0220 FORTEGN=0 0230 O┆
0x02920…02940 4b 31 3d 4c 45 4e 28 4e 52 31 24 29 12 0b 30 32 34 30 20 45 4e 44 49 46 20 0b 27 30 32 34 35 20 ┆K1=LEN(NR1$) 0240 ENDIF '0245 ┆
0x02940…02960 52 45 53 55 4c 54 3d 52 45 53 55 4c 54 2a 31 30 2b 4f 52 44 28 4e 52 31 24 28 4f 4b 31 29 29 2d ┆RESULT=RESULT*10+ORD(NR1$(OK1))-┆
0x02960…02980 34 38 27 0e 30 32 35 30 20 45 4e 44 57 48 49 4c 45 20 0e 14 30 32 36 30 20 4f 4b 31 3d 4f 4b 31 ┆48' 0250 ENDWHILE 0260 OK1=OK1┆
0x02980…029a0 2a 46 4f 52 54 45 47 4e 14 1c 30 32 37 30 20 49 46 20 4f 4b 31 3c 30 20 54 48 45 4e 20 4f 4b 31 ┆*FORTEGN 0270 IF OK1<0 THEN OK1┆
0x029a0…029c0 3d 4f 4b 31 2b 31 1c 0b 30 32 38 30 20 45 4e 44 49 46 20 0b 0d 30 32 39 30 20 45 4e 44 50 52 4f ┆=OK1+1 0280 ENDIF 0290 ENDPRO┆
0x029c0…029e0 43 20 0d 14 30 33 30 30 20 50 52 4f 43 20 49 4e 4f 50 4c 28 4f 50 4c 29 14 23 30 33 30 35 20 49 ┆C 0300 PROC INOPL(OPL) #0305 I┆
0x029e0…02a00 46 20 4f 50 4c 3c 36 20 54 48 45 4e 20 45 58 45 43 20 49 4e 4c 49 4e 45 28 4f 50 4c 29 23 11 30 ┆F OPL<6 THEN EXEC INLINE(OPL)# 0┆
0x02a00…02a20 33 31 30 20 43 41 53 45 20 4f 50 4c 20 4f 46 20 11 0b 30 33 31 35 20 57 48 45 4e 20 31 0b 16 30 ┆310 CASE OPL OF 0315 WHEN 1 0┆
0x02a20…02a40 33 32 30 20 50 4f 53 54 31 24 28 31 2c 37 29 3d 4c 49 4e 45 24 16 0b 30 33 32 35 20 57 48 45 4e ┆320 POST1$(1,7)=LINE$ 0325 WHEN┆
0x02a40…02a60 20 32 0b 17 30 33 33 30 20 50 4f 53 54 31 24 28 38 2c 33 37 29 3d 4c 49 4e 45 24 17 0b 30 33 33 ┆ 2 0330 POST1$(8,37)=LINE$ 033┆
0x02a60…02a80 35 20 57 48 45 4e 20 33 0b 21 30 33 34 30 20 57 48 49 4c 45 20 52 45 53 55 4c 54 3c 30 20 4f 52 ┆5 WHEN 3 !0340 WHILE RESULT<0 OR┆
0x02a80…02aa0 20 52 45 53 55 4c 54 3e 33 30 30 21 15 30 33 34 31 20 45 58 45 43 20 49 4e 4c 49 4e 45 28 4f 50 ┆ RESULT>300! 0341 EXEC INLINE(OP┆
0x02aa0…02ac0 4c 29 15 0e 30 33 34 32 20 45 4e 44 57 48 49 4c 45 20 0e 12 30 33 34 33 20 41 52 55 54 45 52 3d ┆L) 0342 ENDWHILE 0343 ARUTER=┆
0x02ac0…02ae0 52 45 53 55 4c 54 12 0b 30 33 34 35 20 57 48 45 4e 20 34 0b 21 30 33 35 30 20 57 48 49 4c 45 20 ┆RESULT 0345 WHEN 4 !0350 WHILE ┆
0x02ae0…02b00 52 45 53 55 4c 54 3c 30 20 4f 52 20 52 45 53 55 4c 54 3e 36 30 30 21 15 30 33 35 31 20 45 58 45 ┆RESULT<0 OR RESULT>600! 0351 EXE┆
0x02b00…02b20 43 20 49 4e 4c 49 4e 45 28 4f 50 4c 29 15 0e 30 33 35 32 20 45 4e 44 57 48 49 4c 45 20 0e 11 30 ┆C INLINE(OPL) 0352 ENDWHILE 0┆
0x02b20…02b40 33 35 33 20 41 42 55 44 45 3d 52 45 53 55 4c 54 11 0b 30 33 35 35 20 57 48 45 4e 20 35 0b 20 30 ┆353 ABUDE=RESULT 0355 WHEN 5 0┆
0x02b40…02b60 33 36 30 20 57 48 49 4c 45 20 52 45 53 55 4c 54 3c 30 20 4f 52 20 52 45 53 55 4c 54 3e 33 30 20 ┆360 WHILE RESULT<0 OR RESULT>30 ┆
0x02b60…02b80 15 30 33 36 31 20 45 58 45 43 20 49 4e 4c 49 4e 45 28 4f 50 4c 29 15 0e 30 33 36 32 20 45 4e 44 ┆ 0361 EXEC INLINE(OPL) 0362 END┆
0x02b80…02ba0 57 48 49 4c 45 20 0e 12 30 33 36 33 20 41 54 52 41 4e 53 3d 52 45 53 55 4c 54 12 0b 30 33 36 35 ┆WHILE 0363 ATRANS=RESULT 0365┆
0x02ba0…02bc0 20 57 48 45 4e 20 36 0b 19 30 33 37 30 20 43 55 52 53 4f 52 20 58 28 4f 50 4c 29 2c 59 28 4f 50 ┆ WHEN 6 0370 CURSOR X(OPL),Y(OP┆
0x02bc0…02be0 4c 29 19 33 30 33 37 35 20 45 44 49 54 20 22 20 20 36 20 41 6e 74 61 6c 20 66 65 72 69 65 64 61 ┆L) 30375 EDIT " 6 Antal ferieda┆
0x02be0…02c00 67 65 20 70 72 2e 20 6b 76 61 72 74 61 6c 20 22 2c 41 46 44 41 47 45 33 0d 30 33 38 35 20 45 4e ┆ge pr. kvartal ",AFDAGE3 0385 EN┆
0x02c00…02c20 44 43 41 53 45 20 0d 0d 30 33 39 30 20 45 4e 44 50 52 4f 43 20 0d 12 30 33 39 35 20 50 52 4f 43 ┆DCASE 0390 ENDPROC 0395 PROC┆
0x02c20…02c40 20 53 4b 52 49 56 4f 50 4c 12 1a 30 34 30 30 20 49 46 20 4f 55 54 50 3d 30 20 54 48 45 4e 20 43 ┆ SKRIVOPL 0400 IF OUTP=0 THEN C┆
0x02c40…02c60 4c 45 41 52 20 1a 11 30 34 30 35 20 46 4f 52 20 4a 3d 31 20 54 4f 20 41 11 0f 30 34 31 30 20 43 ┆LEAR 0405 FOR J=1 TO A 0410 C┆
0x02c60…02c80 41 53 45 20 4a 20 4f 46 20 0f 0b 30 34 31 35 20 57 48 45 4e 20 31 0b 16 30 34 32 30 20 4c 49 4e ┆ASE J OF 0415 WHEN 1 0420 LIN┆
0x02c80…02ca0 45 24 3d 50 4f 53 54 31 24 28 31 2c 37 29 16 0b 30 34 32 35 20 57 48 45 4e 20 32 0b 17 30 34 33 ┆E$=POST1$(1,7) 0425 WHEN 2 043┆
0x02ca0…02cc0 30 20 4c 49 4e 45 24 3d 50 4f 53 54 31 24 28 38 2c 33 37 29 17 0b 30 34 33 35 20 57 48 45 4e 20 ┆0 LINE$=POST1$(8,37) 0435 WHEN ┆
0x02cc0…02ce0 33 0b 1e 30 34 34 30 20 45 58 45 43 20 43 4f 4e 56 28 4c 49 4e 45 24 2c 41 52 55 54 45 52 2c 30 ┆3 0440 EXEC CONV(LINE$,ARUTER,0┆
0x02ce0…02d00 29 1e 0b 30 34 34 35 20 57 48 45 4e 20 34 0b 1d 30 34 35 30 20 45 58 45 43 20 43 4f 4e 56 28 4c ┆) 0445 WHEN 4 0450 EXEC CONV(L┆
0x02d00…02d20 49 4e 45 24 2c 41 42 55 44 45 2c 30 29 1d 0b 30 34 35 35 20 57 48 45 4e 20 35 0b 1e 30 34 36 30 ┆INE$,ABUDE,0) 0455 WHEN 5 0460┆
0x02d20…02d40 20 45 58 45 43 20 43 4f 4e 56 28 4c 49 4e 45 24 2c 41 54 52 41 4e 53 2c 30 29 1e 0b 30 34 36 35 ┆ EXEC CONV(LINE$,ATRANS,0) 0465┆
0x02d40…02d60 20 57 48 45 4e 20 36 0b 21 30 34 37 30 20 45 58 45 43 20 43 4f 4e 56 28 4c 49 4e 45 24 2c 31 30 ┆ WHEN 6 !0470 EXEC CONV(LINE$,10┆
0x02d60…02d80 2a 41 46 44 41 47 45 2c 30 29 21 42 30 34 37 31 20 4c 49 4e 45 24 28 4c 45 4e 28 4c 49 4e 45 24 ┆*AFDAGE,0)!B0471 LINE$(LEN(LINE$┆
0x02d80…02da0 29 2b 31 29 3d 4c 49 4e 45 24 28 4c 45 4e 28 4c 49 4e 45 24 29 29 3b 4c 49 4e 45 24 28 4c 45 4e ┆)+1)=LINE$(LEN(LINE$));LINE$(LEN┆
0x02da0…02dc0 28 4c 49 4e 45 24 29 2d 31 29 3d 22 2e 22 42 0d 30 34 38 35 20 45 4e 44 43 41 53 45 20 0d 14 30 ┆(LINE$)-1)="."B 0485 ENDCASE 0┆
0x02dc0…02de0 34 38 37 20 49 46 20 4f 55 54 50 3d 30 20 54 48 45 4e 20 14 14 30 34 39 30 20 45 58 45 43 20 4f ┆487 IF OUTP=0 THEN 0490 EXEC O┆
0x02de0…02e00 55 54 4c 49 4e 45 28 4a 29 14 0a 30 34 39 31 20 45 4c 53 45 20 0a 15 30 34 39 32 20 45 58 45 43 ┆UTLINE(J) 0491 ELSE 0492 EXEC┆
0x02e00…02e20 20 4f 55 54 50 4c 49 4e 45 28 4a 29 15 0b 30 34 39 33 20 45 4e 44 49 46 20 0b 0b 30 34 39 35 20 ┆ OUTPLINE(J) 0493 ENDIF 0495 ┆
0x02e20…02e40 4e 45 58 54 20 4a 0b 0d 30 35 30 30 20 45 4e 44 50 52 4f 43 20 0d 14 30 35 30 35 20 50 52 4f 43 ┆NEXT J 0500 ENDPROC 0505 PROC┆
0x02e40…02e60 20 4f 55 54 4c 49 4e 45 28 4e 29 14 15 30 35 31 30 20 43 55 52 53 4f 52 20 58 28 4e 29 2c 59 28 ┆ OUTLINE(N) 0510 CURSOR X(N),Y(┆
0x02e60…02e80 4e 29 15 1a 30 35 31 35 20 50 52 49 4e 54 20 55 53 49 4e 47 20 22 23 23 23 20 22 3a 4e 3b 1a 14 ┆N) 0515 PRINT USING "### ":N; ┆
0x02e80…02ea0 30 35 32 30 20 50 52 49 4e 54 20 50 49 43 54 24 28 4e 29 3b 14 18 30 35 32 35 20 43 55 52 53 4f ┆0520 PRINT PICT$(N); 0525 CURSO┆
0x02ea0…02ec0 52 20 58 28 4e 29 2b 32 35 2c 59 28 4e 29 18 10 30 35 33 30 20 50 52 49 4e 54 20 4c 49 4e 45 24 ┆R X(N)+25,Y(N) 0530 PRINT LINE$┆
0x02ec0…02ee0 10 0d 30 35 33 35 20 45 4e 44 50 52 4f 43 20 0d 10 30 35 34 30 20 50 52 4f 43 20 49 4e 44 53 59 ┆ 0535 ENDPROC 0540 PROC INDSY┆
0x02ee0…02f00 53 10 10 30 35 34 35 20 4f 50 45 4e 20 46 49 4c 24 2c 57 10 18 30 35 35 30 20 45 58 45 43 20 46 ┆S 0545 OPEN FIL$,W 0550 EXEC F┆
0x02f00…02f20 45 4a 4c 28 30 2c 30 2c 46 49 4c 24 29 18 42 30 35 35 35 20 47 45 54 20 46 49 4c 24 2c 33 3a 50 ┆EJL(0,0,FIL$) B0555 GET FIL$,3:P┆
0x02f20…02f40 28 32 31 29 2c 50 28 32 32 29 2c 50 28 32 33 29 2c 50 28 32 34 29 2c 41 46 44 41 47 45 2c 41 52 ┆(21),P(22),P(23),P(24),AFDAGE,AR┆
0x02f40…02f60 55 54 45 52 2c 41 42 55 44 45 2c 41 54 52 41 4e 53 42 16 30 35 36 30 20 47 45 54 20 46 49 4c 24 ┆UTER,ABUDE,ATRANSB 0560 GET FIL$┆
0x02f60…02f80 2c 34 3a 50 4f 53 54 31 24 16 0d 30 35 36 35 20 45 4e 44 50 52 4f 43 20 0d 0f 30 35 37 30 20 50 ┆,4:POST1$ 0565 ENDPROC 0570 P┆
0x02f80…02fa0 52 4f 43 20 55 44 53 59 53 0f 42 30 35 37 35 20 50 55 54 20 46 49 4c 24 2c 33 3a 50 28 32 31 29 ┆ROC UDSYS B0575 PUT FIL$,3:P(21)┆
0x02fa0…02fc0 2c 50 28 32 32 29 2c 50 28 32 33 29 2c 50 28 32 34 29 2c 41 46 44 41 47 45 2c 41 52 55 54 45 52 ┆,P(22),P(23),P(24),AFDAGE,ARUTER┆
0x02fc0…02fe0 2c 41 42 55 44 45 2c 41 54 52 41 4e 53 42 16 30 35 38 30 20 50 55 54 20 46 49 4c 24 2c 34 3a 50 ┆,ABUDE,ATRANSB 0580 PUT FIL$,4:P┆
0x02fe0…03000 4f 53 54 31 24 16 0f 30 35 38 35 20 43 4c 4f 53 45 20 46 49 4c 24 0f 18 30 35 39 30 20 45 58 45 ┆OST1$ 0585 CLOSE FIL$ 0590 EXE┆
0x03000…03020 43 20 46 45 4a 4c 28 31 2c 30 2c 46 49 4c 24 29 18 0d 30 35 39 35 20 45 4e 44 50 52 4f 43 20 0d ┆C FEJL(1,0,FIL$) 0595 ENDPROC ┆
0x03020…03040 18 30 36 30 30 20 50 52 4f 43 20 46 45 4a 4c 28 50 31 2c 50 32 2c 50 33 29 18 1c 30 36 30 35 20 ┆ 0600 PROC FEJL(P1,P2,P3) 0605 ┆
0x03040…03060 49 46 20 53 54 41 54 55 53 28 50 33 24 29 3c 3e 30 20 54 48 45 4e 20 1c 0d 30 36 31 30 20 4f 55 ┆IF STATUS(P3$)<>0 THEN 0610 OU┆
0x03060…03080 54 50 55 54 20 54 0d 2c 30 36 31 35 20 50 52 49 4e 54 20 22 46 49 4c 2d 46 45 4a 4c 20 22 3b 50 ┆TPUT T ,0615 PRINT "FIL-FEJL ";P┆
0x03080…030a0 33 24 3b 53 54 41 54 55 53 28 50 33 24 29 2c 50 31 3b 50 32 2c 0a 30 36 32 30 20 53 54 4f 50 20 ┆3$;STATUS(P3$),P1;P2, 0620 STOP ┆
0x030a0…030c0 0a 0b 30 36 32 35 20 45 4e 44 49 46 20 0b 0d 30 36 33 30 20 45 4e 44 50 52 4f 43 20 0d 13 30 36 ┆ 0625 ENDIF 0630 ENDPROC 06┆
0x030c0…030e0 38 30 20 50 52 4f 43 20 49 4e 4c 49 4e 45 28 4e 29 13 0c 30 36 39 30 20 52 45 50 45 41 54 20 0c ┆80 PROC INLINE(N) 0690 REPEAT ┆
0x030e0…03100 15 30 37 30 30 20 43 55 52 53 4f 52 20 58 28 4e 29 2c 59 28 4e 29 15 19 30 37 30 35 20 50 52 49 ┆ 0700 CURSOR X(N),Y(N) 0705 PRI┆
0x03100…03120 4e 54 20 55 53 49 4e 47 20 22 23 23 23 22 3a 4e 3b 19 19 30 37 31 30 20 50 52 49 4e 54 20 42 4c ┆NT USING "###":N; 0710 PRINT BL┆
0x03120…03140 24 28 58 28 4e 29 2b 33 2c 37 39 29 19 17 30 37 32 30 20 43 55 52 53 4f 52 20 58 28 4e 29 2b 34 ┆$(X(N)+3,79) 0720 CURSOR X(N)+4┆
0x03140…03160 2c 59 28 4e 29 17 13 30 37 33 30 20 50 52 49 4e 54 20 50 49 43 54 24 28 4e 29 13 18 30 37 34 30 ┆,Y(N) 0730 PRINT PICT$(N) 0740┆
0x03160…03180 20 43 55 52 53 4f 52 20 58 28 4e 29 2b 32 35 2c 59 28 4e 29 18 13 30 37 35 30 20 49 4e 50 55 54 ┆ CURSOR X(N)+25,Y(N) 0750 INPUT┆
0x03180…031a0 20 22 22 2c 4c 49 4e 45 24 13 17 30 37 36 30 20 49 46 20 54 59 50 45 28 4e 29 3c 30 20 54 48 45 ┆ "",LINE$ 0760 IF TYPE(N)<0 THE┆
0x031a0…031c0 4e 20 17 26 30 37 37 30 20 49 46 20 4c 45 4e 28 4c 49 4e 45 24 29 3c 3d 41 42 53 28 54 59 50 45 ┆N &0770 IF LEN(LINE$)<=ABS(TYPE┆
0x031c0…031e0 28 4e 29 29 20 54 48 45 4e 20 26 09 30 37 38 30 20 4f 4b 3d 31 09 27 30 37 39 30 20 46 4f 52 20 ┆(N)) THEN & 0780 OK=1 '0790 FOR ┆
0x031e0…03200 42 55 44 53 59 53 56 44 4b 42 01 0a 00 00 00 00 63 00 13 64 00 07 41 61 00 20 00 55 44 53 59 53 ┆BUDSYSVDKB c d Aa UDSYS┆
0x03200…03220 49 3d 4c 45 4e 28 4c 49 4e 45 24 29 2b 31 20 54 4f 20 41 42 53 28 54 59 50 45 28 4e 29 29 27 11 ┆I=LEN(LINE$)+1 TO ABS(TYPE(N))' ┆
0x03220…03240 30 38 30 30 20 4c 49 4e 45 24 28 49 29 3d 22 20 22 11 0b 30 38 31 30 20 4e 45 58 54 20 49 0b 0a ┆0800 LINE$(I)=" " 0810 NEXT I ┆
0x03240…03260 30 38 32 30 20 45 4c 53 45 20 0a 09 30 38 33 30 20 4f 4b 3d 30 09 0b 30 38 34 30 20 45 4e 44 49 ┆0820 ELSE 0830 OK=0 0840 ENDI┆
0x03260…03280 46 20 0b 0a 30 38 35 30 20 45 4c 53 45 20 0a 19 30 38 36 30 20 45 58 45 43 20 43 48 45 43 4b 28 ┆F 0850 ELSE 0860 EXEC CHECK(┆
0x03280…032a0 4c 49 4e 45 24 2c 4f 4b 29 19 2b 30 38 37 30 20 49 46 20 54 59 50 45 28 4e 29 3e 30 20 41 4e 44 ┆LINE$,OK) +0870 IF TYPE(N)>0 AND┆
0x032a0…032c0 20 54 59 50 45 28 4e 29 3c 3e 4f 4b 20 54 48 45 4e 20 4f 4b 3d 30 2b 0b 30 38 38 30 20 45 4e 44 ┆ TYPE(N)<>OK THEN OK=0+ 0880 END┆
0x032c0…032e0 49 46 20 0b 10 30 38 39 30 20 55 4e 54 49 4c 20 4f 4b 3c 3e 30 10 0d 30 39 30 30 20 45 4e 44 50 ┆IF 0890 UNTIL OK<>0 0900 ENDP┆
0x032e0…03300 52 4f 43 20 0d 13 30 39 31 30 20 50 52 4f 43 20 53 4b 52 49 56 50 49 43 54 13 0b 30 39 32 30 20 ┆ROC 0910 PROC SKRIVPICT 0920 ┆
0x03300…03320 43 4c 45 41 52 20 0b 11 30 39 33 30 20 46 4f 52 20 49 3d 31 20 54 4f 20 41 11 15 30 39 34 30 20 ┆CLEAR 0930 FOR I=1 TO A 0940 ┆
0x03320…03340 43 55 52 53 4f 52 20 58 28 49 29 2c 59 28 49 29 15 1a 30 39 34 35 20 50 52 49 4e 54 20 55 53 49 ┆CURSOR X(I),Y(I) 0945 PRINT USI┆
0x03340…03360 4e 47 20 22 23 23 23 20 22 3a 49 3b 1a 13 30 39 35 30 20 50 52 49 4e 54 20 50 49 43 54 24 28 49 ┆NG "### ":I; 0950 PRINT PICT$(I┆
0x03360…03380 29 13 0b 30 39 36 30 20 4e 45 58 54 20 49 0b 0d 30 39 37 30 20 45 4e 44 50 52 4f 43 20 0d 15 30 ┆) 0960 NEXT I 0970 ENDPROC 0┆
0x03380…033a0 39 37 35 20 50 52 4f 43 20 4f 55 54 50 4c 49 4e 45 28 4e 29 15 15 30 39 37 37 20 50 52 49 4e 54 ┆975 PROC OUTPLINE(N) 0977 PRINT┆
0x033a0…033c0 20 54 41 42 28 58 28 4e 29 29 3b 15 1a 30 39 37 39 20 50 52 49 4e 54 20 55 53 49 4e 47 20 22 23 ┆ TAB(X(N)); 0979 PRINT USING "#┆
0x033c0…033e0 23 23 20 22 3a 4e 3b 1a 26 30 39 38 31 20 50 52 49 4e 54 20 50 49 43 54 24 28 4e 29 3b 54 41 42 ┆## ":N; &0981 PRINT PICT$(N);TAB┆
0x033e0…03400 28 58 28 4e 29 2b 32 35 29 3b 4c 49 4e 45 24 26 0d 30 39 38 33 20 45 4e 44 50 52 4f 43 20 0d 1c ┆(X(N)+25);LINE$& 0983 ENDPROC ┆
0x03400…03420 31 30 30 30 20 50 52 4f 43 20 43 4f 4e 56 28 4e 52 32 2c 4f 4b 32 32 2c 43 49 46 29 1c 0d 31 30 ┆1000 PROC CONV(NR2,OK22,CIF) 10┆
0x03420…03440 31 35 20 4f 4b 32 3d 4f 4b 32 32 0d 0c 31 30 33 30 20 4e 52 32 24 3d 22 22 0c 0c 31 30 34 35 20 ┆15 OK2=OK22 1030 NR2$="" 1045 ┆
0x03440…03460 52 45 50 45 41 54 20 0c 23 31 30 36 30 20 4e 52 32 24 3d 43 48 52 28 28 4f 4b 32 20 4d 4f 44 20 ┆REPEAT #1060 NR2$=CHR((OK2 MOD ┆
[…truncated at 200 lines…]