PETAL1.3
FILE INFORMATION
FILENAME(S): PETAL1.3
FILE TYPE(S): PRG
FILE SIZE: 9.8K
FIRST SEEN: 2025-11-30 21:08:08
APPEARS ON: 1 disk(s)
FILE HASH
6cd8e939dec1492cb6430f3f23a7a4ad0562282fe5f771749c8903f505571cc6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HULP ETC | PETAL1.3 | PRG | DuncanTwain | 2 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 46 08 00 00 89 33 36 3A 28 43 29 31 39 38 |..F....36:(C)198|
00000010: 33 20 47 45 42 48 41 52 44 20 56 2E 42 4C 55 45 |3 GEBHARD V.BLUE|
00000020: 43 48 45 52 2C 50 4F 42 35 30 30 32 30 37 2C 44 |CHER,POB500207,D|
00000030: AB 32 30 30 30 20 48 41 4D 42 55 52 47 20 35 30 |.2000 HAMBURG 50|
00000040: 2C 23 33 32 34 31 00 5E 08 01 00 A1 23 31 2C 58 |,#3241.^....#1,X|
00000050: 24 3A 8B 58 24 B2 22 22 A7 58 B2 30 3A 8E 00 6C |$:.X$."".X.0:..l|
00000060: 08 02 00 58 B2 C6 28 58 24 29 3A 8E 00 82 08 03 |...X..(X$):.....|
00000070: 00 58 28 4D 29 B2 4B AA 31 AB 41 31 3A 4D B2 4D |.X(M).K.1.A1:M.M|
00000080: AA 31 00 A4 08 04 00 8B 41 31 A7 41 31 B2 30 3A |.1......A1.A1.0:|
00000090: 46 24 28 4B 29 B2 46 24 28 4B 29 AA 22 5C 22 AA |F$(K).F$(K)."\".|
000000A0: 53 24 3A 8E 00 B9 08 05 00 4B B2 4B AA 31 3A 46 |S$:......K.K.1:F|
000000B0: 24 28 4B 29 B2 53 24 3A 8E 00 CF 08 06 00 8B 4D |$(K).S$:.......M|
000000C0: A7 4D B2 4D AB 31 3A 58 B2 58 28 4D 29 3A 8E 00 |.M.M.1:X.X(M):..|
000000D0: DC 08 07 00 58 B2 36 3A 89 31 35 31 00 04 09 08 |....X.6:.151....|
000000E0: 00 42 B2 B5 28 58 AD 32 35 36 29 3A 41 B2 58 AB |.B..(X.256):A.X.|
000000F0: 42 AC 32 35 36 3A 58 24 B2 C7 28 41 29 AA C7 28 |B.256:X$..(A)..(|
00000100: 42 29 3A 8E 00 22 09 09 00 41 B2 C8 28 43 24 2C |B):.."...A..(C$,|
00000110: C3 28 44 24 28 41 29 29 29 B3 B1 44 24 28 41 29 |.(D$(A)))..D$(A)|
00000120: 3A 8E 00 3C 09 0A 00 8D 31 3A 41 B2 58 3A 8D 31 |:..<....1:A.X:.1|
00000130: 3A 58 B2 32 35 36 AC 58 AA 41 3A 8E 00 4F 09 0B |:X.256.X.A:..O..|
00000140: 00 8D 38 3A 98 32 2C 58 24 3B 3A 89 31 38 32 00 |..8:.2,X$;:.182.|
00000150: 62 09 0C 00 8B 4B A7 53 24 B2 48 24 AA 43 24 3A |b....K.S$.H$.C$:|
00000160: 89 34 00 6A 09 0D 00 58 B2 46 00 88 09 0E 00 91 |.4.j...X.F......|
00000170: 54 AC B4 28 58 29 AA 31 89 32 38 2C 31 35 3A 51 |T..(X).1.28,15:Q|
00000180: 24 B2 43 24 3A 89 31 39 00 BD 09 0F 00 51 24 B2 |$.C$:.19.....Q$.|
00000190: 22 22 3A 44 B2 AB 31 3A 81 4A B2 31 A4 C3 28 43 |"":D..1:.J.1..(C|
000001A0: 24 29 3A 41 24 B2 CA 28 43 24 2C 4A 2C 31 29 3A |$):A$..(C$,J,1):|
000001B0: 8B 41 24 B1 44 24 28 32 31 29 89 31 38 00 D1 09 |.A$.D$(21).18...|
000001C0: 10 00 8B 41 24 B2 44 24 28 32 31 29 A7 44 B2 A8 |...A$.D$(21).D..|
000001D0: 44 00 E2 09 11 00 8B 41 24 B2 22 20 22 A7 8B 44 |D......A$." "..D|
000001E0: A7 82 00 F1 09 12 00 51 24 B2 51 24 AA 41 24 3A |.......Q$.Q$.A$:|
000001F0: 82 00 13 0A 13 00 8D 38 3A 98 32 2C 44 24 28 32 |.......8:.2,D$(2|
00000200: 36 29 AA 58 24 AA 51 24 AA C7 28 30 29 3B 3A 89 |6).X$.Q$..(0);:.|
00000210: 31 38 32 00 27 0A 14 00 8D 31 30 3A 5A B2 58 3A |182.'....10:Z.X:|
00000220: 8B 5A B2 30 89 32 33 00 38 0A 15 00 8D 31 30 3A |.Z.0.23.8....10:|
00000230: 43 B2 58 3A 53 24 B2 22 00 4F 0A 16 00 8D 31 3A |C.X:S$.".O....1:|
00000240: 8B 58 A7 53 24 B2 53 24 AA 58 24 3A 89 32 32 00 |.X.S$.S$.X$:.22.|
00000250: 6D 0A 17 00 59 B2 55 3A 59 24 B2 C4 28 59 29 3A |m...Y.U:Y$..(Y):|
00000260: 49 24 B2 59 24 3A 55 B2 55 AA 53 3A 8E 00 75 0A |I$.Y$:U.U.S:..u.|
00000270: 18 00 42 B2 31 00 86 0A 19 00 43 24 B2 CA 28 43 |..B.1.....C$..(C|
00000280: 24 2C 42 AA 31 29 00 AC 0A 1A 00 4C 24 B2 C8 28 |$,B.1).....L$..(|
00000290: 43 24 2C 31 29 3A 8B 4C 24 B2 22 20 22 A7 43 24 |C$,1):.L$." ".C$|
000002A0: B2 CA 28 43 24 2C 32 29 3A 89 32 36 00 D6 0A 1B |..(C$,2):.26....|
000002B0: 00 4C B2 C3 28 43 24 29 3A 8B C9 28 43 24 2C 31 |.L..(C$):..(C$,1|
000002C0: 29 B2 22 20 22 A7 43 24 B2 C8 28 43 24 2C 4C AB |)." ".C$..(C$,L.|
000002D0: 31 29 3A 89 32 37 00 DC 0A 1C 00 8E 00 14 0B 1D |1):.27..........|
000002E0: 00 81 4F B2 31 A4 4B 3A 58 B2 C5 28 46 24 28 4F |..O.1.K:X..(F$(O|
000002F0: 29 29 3A 43 24 B2 CA 28 46 24 28 4F 29 2C C3 28 |)):C$..(F$(O),.(|
00000300: C4 28 58 29 29 AA 31 29 3A 8D 31 34 3A 82 3A 4B |.(X)).1):.14:.:K|
00000310: B2 30 3A 8E 00 49 0B 1E 00 4C B2 C3 28 43 24 29 |.0:..I...L..(C$)|
00000320: 3A 4F B2 C3 28 54 24 29 3A 81 42 B2 42 AB 28 42 |:O..(T$):.B.B.(B|
00000330: B2 30 29 A4 4C AA 31 AB 4F 3A 8B CA 28 43 24 2C |.0).L.1.O:..(C$,|
00000340: 42 2C 4F 29 B2 54 24 A7 8E 00 55 0B 1F 00 82 3A |B,O).T$...U....:|
00000350: 42 B2 30 3A 8E 00 6C 0B 20 00 43 24 B2 CA 28 43 |B.0:..l. .C$..(C|
00000360: 24 2C 32 2C 4C AB 32 29 3A 8D 32 36 00 95 0B 21 |$,2,L.2):.26...!|
00000370: 00 8B 4C A7 43 24 B2 44 24 28 31 39 29 AA 22 28 |..L.C$.D$(19)."(|
00000380: 22 AA 43 24 AA 22 29 22 AA 44 24 28 32 35 29 AA |".C$.")".D$(25).|
00000390: 22 30 22 3A 8E 00 A2 0B 22 00 58 B2 37 3A 89 31 |"0":....".X.7:.1|
000003A0: 35 31 00 B4 0B 23 00 46 B2 59 3A 48 24 B2 59 24 |51...#.F.Y:H$.Y$|
000003B0: 3A 89 32 33 00 EF 0B 24 00 86 46 24 28 35 30 29 |:.23...$..F$(50)|
000003C0: 2C 44 28 31 30 29 2C 47 28 36 29 2C 58 28 32 30 |,D(10),G(6),X(20|
000003D0: 29 2C 49 24 28 34 30 29 2C 49 28 34 30 29 3A 87 |),I$(40),I(40):.|
000003E0: 41 3A 86 44 24 28 41 29 3A 81 49 B2 31 A4 41 00 |A:.D$(A):.I.1.A.|
000003F0: 23 0C 25 00 87 43 24 3A 41 B2 C5 28 43 24 29 3A |#.%..C$:A..(C$):|
00000400: 91 B4 28 41 29 AA 31 89 33 39 2C 33 38 3A 44 24 |..(A).1.39,38:D$|
00000410: 28 49 29 B2 44 24 28 49 29 AA C7 28 AB 41 29 3A |(I).D$(I)..(.A):|
00000420: 89 33 37 00 2F 0C 26 00 43 24 B2 C7 28 41 29 00 |.37./.&.C$..(A).|
00000430: 6D 0C 27 00 44 24 28 49 29 B2 44 24 28 49 29 AA |m.'.D$(I).D$(I).|
00000440: 43 24 3A 82 3A 9F 34 2C 33 3A 9F 33 2C 38 2C 31 |C$:.:.4,3:.3,8,1|
00000450: 35 3A 97 35 33 32 37 32 2C 32 33 3A 97 35 33 32 |5:.53272,23:.532|
00000460: 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 B3 0C |80,0:.53281,0...|
00000470: 28 00 99 22 9E 93 11 20 20 20 20 20 20 2A 2A 2A |(.."... ***|
00000480: 20 20 D0 C5 D4 C1 CC 2D D0 52 45 43 4F 4D 50 49 | .....-.RECOMPI|
00000490: 4C 45 52 20 20 2A 2A 2A 22 3A 55 B2 31 30 30 3A |LER ***":U.100:|
000004A0: 53 B2 31 30 3A 57 B2 31 30 30 30 3A 56 B2 55 3A |S.10:W.1000:V.U:|
000004B0: 54 B2 31 00 E8 0C 2A 00 4C 57 B2 31 3A 85 22 11 |T.1...*.LW.1:.".|
000004C0: C1 45 4E 44 45 52 55 4E 47 45 4E 20 20 20 20 20 |.ENDERUNGEN |
000004D0: 20 20 20 4E 9D 9D 9D 22 3B 58 24 3A 8B 58 24 B2 | N...";X$:.X$.|
000004E0: 22 4A 22 A7 8D 32 37 36 00 EE 0C 2B 00 99 00 1B |"J"..276...+....|
000004F0: 0D 2E 00 85 22 20 20 2E 9D 9D 9D 22 3B 43 24 3A |...." ....";C$:|
00000500: 99 22 91 20 22 3A 8B 43 24 B2 22 2E 22 A7 99 22 |.". ":.C$.".".."|
00000510: 91 20 20 20 22 3B 3A 89 31 39 33 00 3F 0D 2F 00 |. ";:.193.?./.|
00000520: 8B C8 28 43 24 2C 32 29 B2 22 23 23 22 A7 4D 48 |..(C$,2)."##".MH|
00000530: B2 C5 28 CA 28 43 24 2C 33 29 29 3A 89 34 36 00 |..(.(C$,3)):.46.|
00000540: 69 0D 30 00 51 28 51 29 B2 30 3A 8D 32 36 3A 8B |i.0.Q(Q).0:.26:.|
00000550: 4C 24 B2 22 23 22 A7 4D 55 B2 4D 55 AA 31 3A 51 |L$."#".MU.MU.1:Q|
00000560: 28 51 29 B2 32 3A 89 35 32 00 9E 0D 31 00 8B 4C |(Q).2:.52...1..L|
00000570: 24 B3 B1 22 2A 22 A7 99 22 91 20 20 20 22 43 24 |$.."*"..". "C$|
00000580: 3A 91 43 89 35 32 3A 43 B2 31 3A 52 B2 28 51 AB |:.C.52:C.1:R.(Q.|
00000590: 4D 55 29 AC 57 3A 51 31 B2 51 3A 89 35 32 00 DF |MU).W:Q1.Q:.52..|
000005A0: 0D 32 00 8D 32 34 3A 91 54 AB 31 89 35 32 3A 4E |.2..24:.T.1.52:N|
000005B0: 49 B2 4E 49 AA 31 3A 49 24 28 4E 49 29 B2 43 24 |I.NI.1:I$(NI).C$|
000005C0: 3A 49 28 4E 49 29 B2 28 51 AB 4D 55 29 AC 57 3A |:I(NI).(Q.MU).W:|
000005D0: 8B 51 AB 4D 55 B2 30 A7 49 28 4E 49 29 B2 55 00 |.Q.MU.0.I(NI).U.|
000005E0: F3 0D 33 00 51 28 51 29 B2 31 3A 41 B2 51 3A 8D |..3.Q(Q).1:A.Q:.|
000005F0: 32 36 31 00 0A 0E 34 00 4E 24 28 51 29 B2 43 24 |261...4.N$(Q).C$|
00000600: 3A 51 B2 51 AA 31 3A 89 34 36 00 23 0E 35 00 99 |:Q.Q.1:.46.#.5..|
00000610: A3 32 36 29 22 DA 45 49 4C 45 20 D0 55 46 46 45 |.26)".EILE .UFFE|
00000620: 52 91 22 00 48 0E 36 00 81 51 B2 30 A4 47 3A 43 |R.".H.6..Q.0.G:C|
00000630: 24 B2 4E 24 28 51 29 3A 8D 32 36 3A 8B 4C 24 B2 |$.N$(Q):.26:.L$.|
00000640: 22 23 22 A7 8D 31 39 38 00 5D 0E 37 00 82 51 3A |"#"..198.].7..Q:|
00000650: 8D 32 35 35 3A 58 B2 30 3A 48 49 B2 58 00 85 0E |.255:X.0:HI.X...|
00000660: 38 00 81 51 B2 58 A4 47 3A 8B C8 28 4E 24 28 51 |8..Q.X.G:..(N$(Q|
00000670: 29 2C 31 29 B2 22 23 22 A7 48 49 B2 48 49 AA 31 |),1)."#".HI.HI.1|
00000680: 3A 89 31 34 31 00 99 0E 39 00 91 4C 57 8D 32 39 |:.141...9..LW.29|
00000690: 31 2C 32 39 33 2C 32 39 37 00 B7 0E 3A 00 8D 31 |1,293,297...:..1|
000006A0: 3A 99 22 20 20 22 3A 55 B2 56 3A 56 B2 57 AC 28 |:." ":U.V:V.W.(|
000006B0: 51 AA 31 AB 48 49 29 00 D3 0E 3B 00 8D 32 30 3A |Q.1.HI)...;..20:|
000006C0: 43 24 B2 53 24 3A 46 B2 59 3A 48 24 B2 59 24 3A |C$.S$:F.Y:H$.Y$:|
000006D0: 52 B2 43 00 F7 0E 3C 00 41 B2 33 33 3A 8D 39 3A |R.C...<.A.33:.9:|
000006E0: 8B A8 41 A7 8B 54 B3 32 A7 58 B2 31 32 3A 8D 31 |..A..T.2.X.12:.1|
000006F0: 35 31 3A 89 31 34 33 00 18 0F 3D 00 8D 32 35 38 |51:.143...=..258|
00000700: 3A 8D 32 30 3A 44 24 B2 53 24 3A 43 32 B2 30 3A |:.20:D$.S$:C2.0:|
00000710: 8B 54 B2 32 89 31 33 33 00 2C 0F 3E 00 8D 32 36 |.T.2.133.,.>..26|
00000720: 3A 8B 4C 24 B2 22 3A 22 A7 8D 32 34 00 4A 0F 3F |:.L$.":"..24.J.?|
00000730: 00 42 B2 31 3A 54 24 B2 44 24 28 31 31 29 3A 8D |.B.1:T$.D$(11):.|
00000740: 33 30 3A 8B 42 B2 30 89 36 37 00 66 0F 40 00 56 |30:.B.0.67.f.@.V|
00000750: 24 B2 22 22 3A 8B 42 B1 31 A7 56 24 B2 C8 28 43 |$."":.B.1.V$..(C|
00000760: 24 2C 42 AB 31 29 00 95 0F 41 00 42 B2 42 AA 4F |$,B.1)...A.B.B.O|
00000770: 3A 54 24 B2 44 24 28 31 32 29 3A 8D 33 30 3A 8B |:T$.D$(12):.30:.|
00000780: 42 A7 43 24 B2 56 24 AA CA 28 43 24 2C 42 AA 4F |B.C$.V$..(C$,B.O|
00000790: 29 3A 89 36 33 00 9F 0F 42 00 43 24 B2 56 24 00 |):.63...B.C$.V$.|
000007A0: A7 0F 43 00 8D 32 36 00 B8 0F 44 00 42 B2 31 3A |..C..26...D.B.1:|
000007B0: 8B 4C B2 30 89 31 33 34 00 CA 0F 45 00 41 B2 32 |.L.0.134...E.A.2|
000007C0: 36 3A 8D 39 3A 8B 41 89 38 32 00 E6 0F 46 00 8B |6:.9:.A.82...F..|
000007D0: 44 28 4E 29 B3 35 B0 44 28 4E 29 B1 36 A7 58 B2 |D(N).5.D(N).6.X.|
000007E0: 31 3A 8D 31 35 31 00 0F 10 47 00 81 42 B2 33 A4 |1:.151...G..B.3.|
000007F0: 4C 3A 8B CA 28 43 24 2C 42 2C 32 29 B3 B1 44 24 |L:..(C$,B,2)..D$|
00000800: 28 32 37 29 A7 82 3A 58 B2 32 3A 8D 31 35 31 00 |(27)..:X.2:.151.|
00000810: 35 10 48 00 4D 24 B2 43 24 3A 43 24 B2 CA 28 43 |5.H.M$.C$:C$..(C|
00000820: 24 2C 33 2C 42 AB 33 29 3A 8D 32 36 3A 8B 4C B2 |$,3,B.3):.26:.L.|
00000830: 30 A7 8D 33 34 00 47 10 49 00 8B 43 24 B3 B1 44 |0..34.G.I..C$..D|
00000840: 24 28 39 29 89 37 37 00 57 10 4A 00 8B 44 28 4E |$(9).77.W.J..D(N|
00000850: 29 B3 B1 36 89 37 36 00 93 10 4B 00 8D 36 3A 48 |)..6.76...K..6:H|
00000860: 24 B2 49 24 3A 46 24 28 58 29 B2 46 24 28 58 29 |$.I$:F$(X).F$(X)|
00000870: AA 48 24 3A 53 24 B2 C4 28 46 29 AA 44 24 28 32 |.H$:S$..(F).D$(2|
00000880: 30 29 3A 46 B2 59 3A 8D 33 3A 45 B2 45 AA 31 3A |0):F.Y:.3:E.E.1:|
00000890: 8D 32 33 00 A2 10 4C 00 44 28 4E 29 B2 37 3A 89 |.23...L.D(N).7:.|
000008A0: 38 31 00 B9 10 4D 00 8B 44 28 4E 29 B2 35 A7 44 |81...M..D(N).5.D|
000008B0: 28 4E 29 B2 36 3A 89 38 30 00 D3 10 4E 00 8D 36 |(N).6:.80...N..6|
000008C0: 3A 46 24 28 58 29 B2 46 24 28 58 29 AA C4 28 46 |:F$(X).F$(X)..(F|
000008D0: AA 53 29 00 F3 10 4F 00 53 24 B2 C4 28 46 29 AA |.S)...O.S$..(F).|
000008E0: 44 24 28 32 30 29 3A 8D 33 3A 45 B2 45 AA 31 3A |D$(20):.3:E.E.1:|
000008F0: 8D 33 35 00 2A 11 50 00 53 24 B2 C4 28 46 29 AA |.35.*.P.S$..(F).|
00000900: 44 24 28 31 39 29 AA 22 28 22 AA 43 24 AA 22 29 |D$(19)."(".C$.")|
00000910: 22 AA 44 24 28 32 35 29 AA 22 30 22 AA 44 24 28 |".D$(25)."0".D$(|
00000920: 32 30 29 3A 8D 33 3A 8D 33 35 00 42 11 51 00 43 |20):.3:.35.B.Q.C|
00000930: 24 B2 4D 24 3A 42 B2 42 AA 31 3A 8D 32 35 3A 89 |$.M$:B.B.1:.25:.|
00000940: 36 38 00 54 11 52 00 41 B2 31 39 3A 8D 39 3A 8B |68.T.R.A.19:.9:.|
00000950: 41 89 38 39 00 7D 11 53 00 8B C9 28 43 24 2C 31 |A.89.}.S...(C$,1|
00000960: 29 B2 44 24 28 32 32 29 A7 4E B2 4E AA 31 3A 44 |).D$(22).N.N.1:D|
00000970: 28 4E 29 B2 38 3A 8D 33 32 3A 89 38 38 00 95 11 |(N).8:.32:.88...|
00000980: 54 00 8B C9 28 43 24 2C 34 29 B3 B1 44 24 28 33 |T...(C$,4)..D$(3|
00000990: 29 89 31 32 36 00 AB 11 55 00 8B 44 28 4E 29 B3 |).126...U..D(N).|
000009A0: B1 33 A7 58 B2 34 3A 8D 31 35 31 00 E1 11 56 00 |.3.X.4:.151...V.|
000009B0: 43 24 B2 C8 28 43 24 2C 4C AB 34 29 3A 8D 32 36 |C$..(C$,L.4):.26|
000009C0: 3A 8B C9 28 43 24 2C 31 29 B2 44 24 28 32 32 29 |:..(C$,1).D$(22)|
000009D0: A7 43 24 B2 C8 28 43 24 2C 4C AB 31 29 3A 8D 32 |.C$..(C$,L.1):.2|
000009E0: 36 00 F5 11 57 00 44 28 4E 29 B2 34 3A 8B 4C B2 |6...W.D(N).4:.L.|
000009F0: 31 A7 8D 33 34 00 0E 12 58 00 53 24 B2 48 24 AA |1..34...X.S$.H$.|
00000A00: 43 24 AA 44 24 28 32 30 29 3A 89 31 33 35 00 21 |C$.D$(20):.135.!|
00000A10: 12 59 00 41 B2 39 3A 8D 32 37 32 3A 8B 41 89 39 |.Y.A.9:.272:.A.9|
00000A20: 32 00 37 12 5A 00 8B 44 28 4E 29 B3 B1 38 A7 58 |2.7.Z..D(N)..8.X|
00000A30: B2 33 3A 8D 31 35 31 00 6C 12 5B 00 8D 36 3A 44 |.3:.151.l.[..6:D|
00000A40: 28 4E 29 B2 39 3A 46 24 28 58 29 B2 46 24 28 58 |(N).9:F$(X).F$(X|
00000A50: 29 AA 49 24 3A 91 58 8D 32 39 3A 53 24 B2 48 24 |).I$:.X.29:S$.H$|
00000A60: AA 44 24 28 32 30 29 3A 89 31 33 35 00 7F 12 5C |.D$(20):.135...\|
00000A70: 00 41 B2 31 30 3A 8D 39 3A 8B 41 89 31 30 30 00 |.A.10:.9:.A.100.|
00000A80: 97 12 5D 00 45 24 B2 43 24 3A 42 B2 32 3A 8D 32 |..].E$.C$:B.2:.2|
00000A90: 35 3A 4E B2 4E AA 31 00 B9 12 5E 00 81 49 B2 31 |5:N.N.1...^..I.1|
00000AA0: A4 33 3A 41 B2 49 3A 8D 39 3A 8B 41 A7 82 3A 4E |.3:A.I:.9:.A..:N|
00000AB0: B2 4E AB 31 3A 89 31 32 30 00 D9 12 5F 00 44 28 |.N.1:.120..._.D(|
00000AC0: 4E 29 B2 49 3A 58 24 B2 48 24 3A 53 24 B2 22 22 |N).I:X$.H$:S$.""|
00000AD0: 3A 91 49 89 39 38 2C 39 39 00 E6 12 60 00 41 B2 |:.I.98,99...`.A.|
00000AE0: 33 3A 8D 32 37 32 00 0E 13 61 00 58 28 4D 29 B2 |3:.272...a.X(M).|
00000AF0: 4B AA 31 AB 41 31 3A 4D B2 4D AA 31 3A 58 28 4D |K.1.A1:M.M.1:X(M|
00000B00: 29 B2 46 3A 4D B2 4D AA 31 3A 89 31 33 34 00 1E |).F:M.M.1:.134..|
00000B10: 13 62 00 58 24 B2 53 24 3A 53 24 B2 48 24 00 58 |.b.X$.S$:S$.H$.X|
00000B20: 13 63 00 42 B2 35 3A 8D 32 35 3A 8D 33 33 3A 53 |.c.B.5:.25:.33:S|
00000B30: 24 B2 53 24 AA 43 24 AA 44 24 28 32 30 29 AA 58 |$.S$.C$.D$(20).X|
00000B40: 24 3A 8D 32 36 39 3A 41 31 B2 49 AB 31 3A 91 49 |$:.269:A1.I.1:.I|
00000B50: 89 31 33 36 2C 31 33 34 00 6B 13 64 00 41 B2 31 |.136,134.k.d.A.1|
00000B60: 36 3A 8D 39 3A 8B 41 89 31 32 31 00 8F 13 65 00 |6:.9:.A.121...e.|
00000B70: 45 24 B2 43 24 3A 43 32 B2 31 3A 8D 32 34 3A 41 |E$.C$:C2.1:.24:A|
00000B80: B2 31 39 3A 8D 32 37 32 3A 8B 41 89 31 30 34 00 |.19:.272:.A.104.|
00000B90: 9F 13 66 00 8B 44 28 4E 29 B3 38 89 31 38 31 00 |..f..D(N).8.181.|
00000BA0: CA 13 67 00 8D 32 36 35 3A 46 24 28 58 29 B2 46 |..g..265:F$(X).F|
00000BB0: 24 28 58 29 AA 48 24 3A 91 58 AA 42 8D 32 39 3A |$(X).H$:.X.B.29:|
00000BC0: 4E B2 4E AB 31 3A 89 31 33 34 00 DE 13 68 00 41 |N.N.1:.134...h.A|
00000BD0: B2 31 3A 8D 32 37 32 3A 8B 41 89 31 30 37 00 EF |.1:.272:.A.107..|
00000BE0: 13 69 00 8B 44 28 4E 29 B3 B1 31 89 31 38 31 00 |.i..D(N)..1.181.|
00000BF0: 29 14 6A 00 8D 32 36 35 3A 46 24 28 58 29 B2 46 |).j..265:F$(X).F|
00000C00: 24 28 58 29 AA 49 24 3A 53 24 B2 48 24 AA 44 24 |$(X).I$:S$.H$.D$|
00000C10: 28 32 30 29 AA C4 28 C5 28 CA 28 43 24 2C 42 AA |(20)..(.(.(C$,B.|
00000C20: 31 29 29 29 3A 89 31 31 34 00 3D 14 6B 00 41 B2 |1))):.114.=.k.A.|
00000C30: 32 3A 8D 32 37 32 3A 8B 41 89 31 31 31 00 4E 14 |2:.272:.A.111.N.|
00000C40: 6C 00 8B 44 28 4E 29 B3 B1 32 89 31 38 31 00 5C |l..D(N)..2.181.\|
00000C50: 14 6D 00 8D 32 36 35 3A 8D 32 36 37 00 6E 14 6E |.m..265:.267.n.n|
00000C60: 00 42 B2 30 3A 43 32 B2 42 3A 89 31 31 34 00 82 |.B.0:C2.B:.114..|
00000C70: 14 6F 00 41 B2 33 3A 8D 32 37 32 3A 8B 41 89 31 |.o.A.3:.272:.A.1|
00000C80: 31 35 00 98 14 70 00 8B 44 28 4E 29 B3 B1 34 A7 |15...p..D(N)..4.|
00000C90: 58 B2 35 3A 8D 31 35 31 00 C8 14 71 00 8D 36 3A |X.5:.151...q..6:|
00000CA0: 46 24 28 58 29 B2 46 24 28 58 29 AA 49 24 3A 8D |F$(X).F$(X).I$:.|
00000CB0: 36 3A 53 24 B2 48 24 AA 44 24 28 32 30 29 AA C4 |6:S$.H$.D$(20)..|
00000CC0: 28 58 29 3A 8D 32 36 35 00 E2 14 72 00 8D 34 3A |(X):.265...r..4:|
00000CD0: 91 58 AA 42 8D 32 39 3A 4E B2 4E AB 31 3A 89 31 |.X.B.29:N.N.1:.1|
00000CE0: 33 36 00 F6 14 73 00 41 B2 35 3A 8D 32 37 32 3A |36...s.A.5:.272:|
00000CF0: 8B 41 89 31 32 30 00 0D 15 74 00 8B 44 28 4E 29 |.A.120...t..D(N)|
00000D00: B3 35 B0 44 28 4E 29 B1 37 89 31 38 31 00 2B 15 |.5.D(N).7.181.+.|
00000D10: 75 00 8B 44 28 4E 29 B2 36 A7 8D 36 3A 46 24 28 |u..D(N).6..6:F$(|
00000D20: 58 29 B2 46 24 28 58 29 AA 48 24 00 51 15 76 00 |X).F$(X).H$.Q.v.|
00000D30: 8B 45 B1 31 A7 81 42 B2 31 A4 45 AB 31 3A 8D 36 |.E.1..B.1.E.1:.6|
00000D40: 3A 46 24 28 58 29 B2 46 24 28 58 29 AA 48 24 3A |:F$(X).F$(X).H$:|
00000D50: 82 00 83 15 77 00 8D 32 36 35 3A 91 58 AA 42 8D |....w..265:.X.B.|
00000D60: 32 39 3A 91 48 AA 31 89 31 33 36 3A 48 B2 48 AB |29:.H.1.136:H.H.|
00000D70: 31 3A 4E B2 4E AB 31 3A 45 B2 47 28 48 29 3A 89 |1:N.N.1:E.G(H):.|
00000D80: 31 33 34 00 92 15 78 00 43 24 B2 45 24 3A 43 32 |134...x.C$.E$:C2|
00000D90: B2 30 00 A5 15 79 00 41 B2 31 35 3A 8D 39 3A 8B |.0...y.A.15:.9:.|
00000DA0: 41 89 31 32 34 00 D3 15 7A 00 42 B2 33 3A 8D 32 |A.124...z.B.3:.2|
00000DB0: 35 3A 8B 4C A7 4E 49 B2 4E 49 AA 31 3A 49 28 4E |5:.L.NI.NI.1:I(N|
00000DC0: 49 29 B2 46 3A 49 24 28 4E 49 29 B2 43 24 3A 89 |I).F:I$(NI).C$:.|
00000DD0: 31 33 34 00 E1 15 7B 00 58 B2 31 30 3A 8D 31 35 |134...{.X.10:.15|
00000DE0: 31 00 F5 15 7C 00 41 B2 35 3A 8D 32 37 32 3A 8B |1...|.A.5:.272:.|
00000DF0: 41 89 31 32 36 00 2E 16 7D 00 4E B2 4E AA 31 3A |A.126...}.N.N.1:|
00000E00: 44 28 4E 29 B2 35 3A 47 28 48 29 B2 45 3A 48 B2 |D(N).5:G(H).E:H.|
00000E10: 48 AA 31 3A 45 B2 31 3A 58 28 4D 29 B2 4B AA 31 |H.1:E.1:X(M).K.1|
00000E20: AB 41 31 3A 4D B2 4D AA 31 3A 89 31 33 34 00 53 |.A1:M.M.1:.134.S|
00000E30: 16 7E 00 4C B2 C3 28 43 24 29 3A 81 42 B2 42 A4 |.~.L..(C$):.B.B.|
00000E40: 4C 3A 58 24 B2 CA 28 43 24 2C 42 2C 31 29 3A 89 |L:X$..(C$,B,1):.|
00000E50: 32 32 35 00 8B 16 7F 00 42 B2 42 AA 31 3A 42 42 |225.....B.B.1:BB|
00000E60: B2 42 3A 54 24 B2 22 3A 22 3A 8D 33 30 3A 42 43 |.B:T$.":":.30:BC|
00000E70: B2 42 3A 54 24 B2 22 2C 22 3A 42 B2 42 42 3A 8B |.B:T$.",":B.BB:.|
00000E80: 42 43 B2 30 A7 42 43 B2 4C AA 31 00 AF 16 80 00 |BC.0.BC.L.1.....|
00000E90: 41 B2 31 3A 42 42 B2 42 3A 8D 33 30 3A 8B 42 B2 |A.1:BB.B:.30:.B.|
00000EA0: 30 B0 42 B1 42 43 A7 42 B2 42 43 3A 41 B2 32 00 |0.B.BC.B.BC:A.2.|
00000EB0: F3 16 81 00 4D 24 B2 43 24 3A 43 24 B2 CA 28 43 |....M$.C$:C$..(C|
00000EC0: 24 2C 42 42 2C 42 AB 42 42 29 3A 8D 32 36 3A 46 |$,BB,B.BB):.26:F|
00000ED0: 24 B2 43 24 3A 43 24 B2 4D 24 3A 8B C5 28 4C 24 |$.C$:C$.M$:..(L$|
00000EE0: 29 B0 4C 24 B2 22 30 22 A7 42 B2 42 AA 31 3A 89 |).L$."0".B.B.1:.|
00000EF0: 31 33 32 00 1F 17 82 00 81 49 4A B2 4E 49 A4 31 |132......IJ.NI.1|
00000F00: A9 AB 31 3A 8B 46 24 B3 B1 49 24 28 49 4A 29 A7 |..1:.F$..I$(IJ).|
00000F10: 82 3A 49 4A B2 30 3A 8D 31 38 38 3A 41 B2 4A 00 |.:IJ.0:.188:A.J.|
00000F20: 60 17 83 00 43 24 B2 C8 28 43 24 2C 42 42 AB 31 |`...C$..(C$,BB.1|
00000F30: 29 AA C4 28 49 28 49 4A 29 29 AA CA 28 43 24 2C |)..(I(IJ))..(C$,|
00000F40: 42 29 3A 58 B2 C3 28 43 24 29 AB C3 28 4D 24 29 |B):X..(C$)..(M$)|
00000F50: 3A 42 B2 42 AA 58 AA 31 3A 42 43 B2 42 43 AA 58 |:B.B.X.1:BC.BC.X|
00000F60: 00 80 17 84 00 91 58 24 B2 44 24 28 32 38 29 AF |......X$.D$(28).|
00000F70: 31 89 31 32 36 3A 91 41 89 31 32 38 2C 31 32 36 |1.126:.A.128,126|
00000F80: 00 8D 17 85 00 8D 31 32 3A 89 31 33 36 00 A6 17 |......12:.136...|
00000F90: 86 00 59 B2 46 3A 59 24 B2 48 24 3A 55 B2 55 AB |..Y.F:Y$.H$:U.U.|
00000FA0: 53 3A 89 31 33 36 00 AD 17 87 00 8D 33 00 CB 17 |S:.136......3...|
00000FB0: 88 00 43 24 B2 44 24 3A 46 B2 59 3A 48 24 B2 59 |..C$.D$:F.Y:H$.Y|
00000FC0: 24 3A 52 B2 43 3A 8B 5A 89 36 31 00 FF 17 89 00 |$:R.C:.Z.61.....|
00000FD0: 8B 48 53 24 B2 22 22 A7 8B 43 32 B0 51 28 51 29 |.HS$.""..C2.Q(Q)|
00000FE0: A7 43 24 B2 44 24 28 51 28 51 29 AA 31 37 29 3A |.C$.D$(Q(Q).17):|
00000FF0: 8B 43 24 B3 B1 44 24 A7 58 B2 46 3A 8D 31 34 00 |.C$..D$.X.F:.14.|
00001000: 12 18 8A 00 A0 31 3A 8B 4E A7 58 B2 38 3A 8D 31 |.....1:.N.X.8:.1|
00001010: 35 31 00 47 18 8B 00 91 54 AA 31 89 31 34 33 3A |51.G....T.1.143:|
00001020: 8B 48 53 24 B1 22 22 A7 4E 24 28 51 29 B2 48 53 |.HS$."".N$(Q).HS|
00001030: 24 3A 48 53 24 B2 22 22 3A 56 B2 31 30 30 3A 8D |$:HS$."":V.100:.|
00001040: 32 35 36 3A 89 35 37 00 5A 18 8C 00 8B 46 B1 B2 |256:.57.Z....F..|
00001050: 56 A7 8B 51 B3 47 89 32 35 30 00 8C 18 8D 00 82 |V..Q.G.250......|
00001060: 51 3A 58 B2 51 3A 91 51 B3 B2 47 AF 31 89 35 36 |Q:X.Q:.Q..G.1.56|
00001070: 3A 8D 31 38 34 3A 97 31 39 38 2C 32 3A 97 36 33 |:.184:.198,2:.63|
00001080: 31 2C 31 33 3A 97 36 33 32 2C 31 33 00 BE 18 8E |1,13:.632,13....|
00001090: 00 99 22 93 11 11 4C CF 22 44 24 28 32 31 29 4E |.."...L."D$(21)N|
000010A0: 24 44 24 28 32 31 29 22 2C 38 22 3A 99 22 11 11 |$D$(21)",8":."..|
000010B0: 11 11 52 55 4E 22 3A 99 22 13 22 3B 3A 80 00 E6 |..RUN":.".";:...|
000010C0: 18 8F 00 99 22 11 11 22 51 24 C4 28 50 29 22 20 |....".."Q$.(P)" |
000010D0: C6 45 48 4C 45 52 20 47 45 46 55 4E 44 45 4E 21 |.EHLER GEFUNDEN!|
000010E0: 22 3A 8D 31 37 35 00 19 19 90 00 85 22 11 C6 45 |":.175......"..E|
000010F0: 48 4C 45 52 2D C1 55 53 44 52 55 43 4B 20 20 4A |HLER-.USDRUCK J|
00001100: 2F 4E 20 20 20 20 4A 9D 9D 9D 22 3B 58 24 3A 8B |/N J...";X$:.|
00001110: 58 24 B3 B1 22 4A 22 A7 80 00 2A 19 91 00 A0 34 |X$.."J"...*....4|
00001120: 3A 9F 34 2C 34 3A 53 42 B2 31 00 6D 19 92 00 98 |:.4,4:SB.1.m....|
00001130: 34 3A 8B 53 54 B2 AB 31 32 38 A7 85 22 C4 52 55 |4:.ST..128..".RU|
00001140: 43 4B 45 52 20 45 49 4E 53 43 48 41 4C 54 45 4E |CKER EINSCHALTEN|
00001150: 21 20 20 20 4A 9D 9D 9D 22 3B 58 24 3A 91 AB 28 |! J...";X$:..(|
00001160: 58 24 B2 22 4A 22 29 89 31 34 36 3A 80 00 9D 19 |X$."J").146:....|
00001170: 93 00 98 34 2C 22 11 D0 52 4F 47 52 41 4D 4D 3A |...4,"..ROGRAMM:|
00001180: 20 22 C8 28 4E 24 2C C3 28 4E 24 29 AB 32 29 51 | ".(N$,.(N$).2)Q|
00001190: 24 50 22 C6 45 48 4C 45 52 22 3A 98 34 00 BE 19 |$P".EHLER":.4...|
000011A0: 94 00 98 34 2C 22 11 DA 45 49 4C 45 3A 20 20 C3 |...4,"..EILE: .|
000011B0: 4F 44 45 3A 20 20 20 C6 45 48 4C 45 52 3A 00 FB |ODE: .EHLER:..|
000011C0: 19 95 00 81 49 B2 30 A4 50 AB 31 3A 58 B2 58 45 |....I.0.P.1:X.XE|
000011D0: 28 49 29 3A 44 28 4E 29 B2 45 28 49 29 3A 52 B2 |(I):D(N).E(I):R.|
000011E0: 48 28 49 29 3A 43 24 B2 43 24 28 49 29 3A 4F B2 |H(I):C$.C$(I):O.|
000011F0: 4F 45 28 49 29 3A 46 24 B2 43 24 00 21 1A 96 00 |OE(I):F$.C$.!...|
00001200: 98 34 2C 22 11 22 3B 3A 8D 31 35 34 3A 82 3A 98 |.4,".";:.154:.:.|
00001210: 34 3A 8D 31 37 35 3A 98 34 3A 98 34 3A A0 34 3A |4:.175:.4:.4:.4:|
00001220: 80 00 5B 1A 97 00 91 54 AA 31 89 31 35 33 3A 54 |..[....T.1.153:T|
00001230: B2 30 3A 99 22 11 DA 45 49 4C 45 3A 20 C3 4F 44 |.0:."..EILE: .OD|
00001240: 45 3A 20 20 20 20 C6 45 48 4C 45 52 3A 22 3A 44 |E: .EHLER:":D|
00001250: B2 58 3A 8D 31 38 34 3A 58 B2 44 00 85 1A 98 00 |.X:.184:X.D.....|
00001260: 50 B2 31 39 3A 86 48 28 50 29 2C 58 45 28 50 29 |P.19:.H(P),XE(P)|
00001270: 2C 45 28 50 29 2C 43 24 28 50 29 2C 4F 45 28 50 |,E(P),C$(P),OE(P|
00001280: 29 3A 50 B2 30 00 C1 1A 99 00 48 28 50 29 B2 52 |):P.0.....H(P).R|
00001290: 3A 58 45 28 50 29 B2 58 3A 45 28 50 29 B2 44 28 |:XE(P).X:E(P).D(|
000012A0: 4E 29 3A 43 24 28 50 29 B2 43 24 3A 4F 45 28 50 |N):C$(P).C$:OE(P|
000012B0: 29 B2 4F 3A 50 B2 50 AA 31 3A 51 24 B2 22 20 20 |).O:P.P.1:Q$." |
000012C0: 22 00 F8 1A 9A 00 98 34 2C 52 22 20 20 22 A6 AB |"......4,R" "..|
000012D0: B4 28 58 B3 31 30 29 29 3B 58 AA 44 28 4E 29 AD |.(X.10));X.D(N).|
000012E0: 31 30 22 20 20 22 3B 3A 8B 44 28 4E 29 B2 30 A7 |10" ";:.D(N).0.|
000012F0: 98 34 2C 22 20 20 22 3B 00 33 1B 9B 00 91 58 8D |.4," ";.3....X.|
00001300: 31 35 37 2C 31 35 39 2C 31 36 30 2C 31 36 32 2C |157,159,160,162,|
00001310: 31 36 34 2C 31 36 35 2C 31 37 30 2C 31 36 37 2C |164,165,170,167,|
00001320: 31 37 32 2C 31 37 31 2C 31 37 37 2C 31 37 39 2C |172,171,177,179,|
00001330: 31 38 30 00 45 1B 9C 00 91 50 B1 31 39 AF 31 89 |180.E....P.19.1.|
00001340: 31 39 32 3A 8E 00 91 1B 9D 00 8B 44 28 4E 29 B2 |192:.......D(N).|
00001350: 37 A7 98 34 2C 22 C1 55 46 20 22 44 24 28 31 33 |7..4,".UF "D$(13|
00001360: 29 44 24 28 33 34 29 44 24 28 31 34 29 22 20 44 |)D$(34)D$(14)" D|
00001370: 41 52 46 20 4B 45 49 4E 20 57 45 49 54 45 52 45 |ARF KEIN WEITERE|
00001380: 52 20 C6 41 4C 4C 20 46 4F 4C 47 45 4E 21 22 3A |R .ALL FOLGEN!":|
00001390: 8E 00 C1 1B 9E 00 98 34 2C 22 C6 41 4C 4C 41 4E |.......4,".ALLAN|
000013A0: 57 45 49 53 55 4E 47 20 41 55 53 53 45 52 48 41 |WEISUNG AUSSERHA|
000013B0: 4C 42 20 43 41 53 45 2D C2 4C 4F 43 4B 21 22 3A |LB CASE-.LOCK!":|
000013C0: 8E 00 F5 1B 9F 00 98 34 2C 22 D3 43 48 4C 49 45 |.......4,".CHLIE|
000013D0: 53 53 45 4E 44 45 20 C6 41 4C 4C 4B 4C 41 4D 4D |SSENDE .ALLKLAMM|
000013E0: 45 52 20 22 44 24 28 31 34 29 22 20 46 45 48 4C |ER "D$(14)" FEHL|
000013F0: 54 21 22 3A 8E 00 20 1C A0 00 8B 44 28 4E 29 B2 |T!":.. ....D(N).|
00001400: 39 A7 98 34 2C 22 45 4C 53 45 20 42 45 52 45 49 |9..4,"ELSE BEREI|
00001410: 54 53 20 56 4F 52 48 41 4E 44 45 4E 21 22 3A 8E |TS VORHANDEN!":.|
00001420: 00 45 1C A1 00 98 34 2C 22 C8 49 45 52 20 4B 45 |.E....4,".IER KE|
00001430: 49 4E 20 45 4C 53 45 20 5A 55 4C 41 45 53 53 49 |IN ELSE ZULAESSI|
00001440: 47 21 22 3A 8E 00 70 1C A2 00 8B 44 28 4E 29 B2 |G!":..p....D(N).|
00001450: 34 A7 98 34 2C 22 45 58 49 54 20 42 45 52 45 49 |4..4,"EXIT BEREI|
00001460: 54 53 20 56 4F 52 48 41 4E 44 45 4E 21 22 3A 8E |TS VORHANDEN!":.|
00001470: 00 95 1C A3 00 98 34 2C 22 C8 49 45 52 20 4B 45 |......4,".IER KE|
00001480: 49 4E 20 45 58 49 54 20 5A 55 4C 41 45 53 53 49 |IN EXIT ZULAESSI|
00001490: 47 21 22 3A 8E 00 AC 1C A4 00 98 34 2C 22 45 58 |G!":.......4,"EX|
000014A0: 49 54 20 46 45 48 4C 54 21 22 3A 8E 00 CD 1C A5 |IT FEHLT!":.....|
000014B0: 00 8B 44 28 4E 29 A7 98 34 2C 44 24 28 44 28 4E |..D(N)..4,D$(D(N|
000014C0: 29 29 22 2D C2 4C 4F 43 4B 21 22 3A 8E 00 EF 1C |))"-.LOCK!":....|
000014D0: A6 00 98 34 2C 22 CB 45 49 4E 20 22 43 24 22 2D |...4,".EIN "C$"-|
000014E0: C2 4C 4F 43 4B 20 4F 46 46 45 4E 21 22 3A 8E 00 |.LOCK OFFEN!":..|
000014F0: 10 1D A7 00 42 24 B2 22 C2 4C 4F 45 43 4B 45 22 |....B$.".LOECKE"|
00001500: 3A 8B 4E B2 31 A7 42 24 B2 22 C2 4C 4F 43 4B 22 |:.N.1.B$.".LOCK"|
00001510: 00 2A 1D A8 00 98 34 2C 22 CE 4F 43 48 22 4E 3B |.*....4,".OCH"N;|
00001520: 42 24 22 20 4F 46 46 45 4E 21 00 5D 1D A9 00 98 |B$" OFFEN!.]....|
00001530: 34 3A 81 4A B2 30 A4 4E AB 31 3A 98 34 2C C5 28 |4:.J.0.N.1:.4,.(|
00001540: 46 24 28 58 28 4A 29 29 29 22 20 3C 20 22 AA 44 |F$(X(J)))" < ".D|
00001550: 24 28 44 28 4A AA 31 29 29 3A 82 3A 8E 00 79 1D |$(D(J.1)):.:..y.|
00001560: AA 00 98 34 2C 22 C2 45 44 49 4E 47 55 4E 47 20 |...4,".EDINGUNG |
00001570: 46 45 48 4C 54 21 22 3A 8E 00 90 1D AB 00 98 34 |FEHLT!":.......4|
00001580: 2C 22 CE 41 4D 45 20 46 45 48 4C 54 21 22 3A 8E |,".AME FEHLT!":.|
00001590: 00 C4 1D AC 00 98 34 2C 22 D3 55 42 52 4F 55 54 |......4,".UBROUT|
000015A0: 49 4E 45 20 22 46 24 22 20 49 53 54 20 4E 49 43 |INE "F$" IST NIC|
000015B0: 48 54 20 44 45 46 49 4E 49 45 52 54 21 22 3A 8B |HT DEFINIERT!":.|
000015C0: 53 42 A7 8E 00 F3 1D AD 00 81 49 49 B2 31 A4 49 |SB........II.1.I|
000015D0: 4E 3A 8B 46 24 B3 B1 49 45 24 28 49 49 29 A7 82 |N:.F$..IE$(II)..|
000015E0: 3A 49 4E B2 49 4E AA 31 3A 49 45 24 28 49 4E 29 |:IN.IN.1:IE$(IN)|
000015F0: B2 46 24 00 08 1E AE 00 43 24 28 50 AB 31 29 B2 |.F$.....C$(P.1).|
00001600: 46 24 3A 42 B2 4F 3A 8E 00 39 1E AF 00 91 49 4E |F$:B.O:..9....IN|
00001610: AA 31 89 32 38 3A 98 34 2C 22 11 CE 49 43 48 54 |.1.28:.4,"..ICHT|
00001620: 20 44 45 46 49 4E 49 45 52 54 45 20 D3 55 42 52 | DEFINIERTE .UBR|
00001630: 4F 55 54 49 4E 45 4E 3A 22 00 59 1E B0 00 81 49 |OUTINEN:".Y....I|
00001640: B2 31 A4 49 4E 3A 98 34 2C 22 11 20 20 20 22 49 |.1.IN:.4,". "I|
00001650: 45 24 28 49 29 3A 82 3A 8E 00 67 1E B1 00 8B 4F |E$(I):.:..g....O|
00001660: B2 39 A7 4F B2 33 34 00 92 1E B2 00 98 34 2C 22 |.9.O.34......4,"|
00001670: C1 55 46 20 22 44 24 28 4F 29 22 20 44 41 52 46 |.UF "D$(O)" DARF|
00001680: 20 4E 49 43 48 54 53 20 46 4F 4C 47 45 4E 21 22 | NICHTS FOLGEN!"|
00001690: 3A 8E 00 B6 1E B3 00 98 34 2C 22 C8 49 45 52 20 |:.......4,".IER |
000016A0: 4B 45 49 4E 20 CD D5 D0 20 5A 55 4C 41 45 53 53 |KEIN ... ZULAESS|
000016B0: 49 47 21 22 3A 8E 00 D0 1E B4 00 98 34 2C 22 C6 |IG!":.......4,".|
000016C0: 45 48 4C 45 52 20 49 4D 20 CD D5 D0 21 22 3A 8E |EHLER IM ...!":.|
000016D0: 00 E2 1E B5 00 58 B2 36 3A 8D 31 35 31 3A 89 31 |.....X.6:.151:.1|
000016E0: 33 36 00 FC 1E B6 00 84 33 2C 41 2C 41 24 2C 42 |36......3,A,A$,B|
000016F0: 24 2C 4C 24 3A 8B 41 B3 32 30 A7 8E 00 30 1F B7 |$,L$:.A.20...0..|
00001700: 00 99 22 11 11 11 11 11 22 41 3B 41 24 22 20 22 |.."....."A;A$" "|
00001710: 42 24 22 20 22 4C 24 3A A0 31 3A 91 41 B2 36 32 |B$" "L$:.1:.A.62|
00001720: AF 31 B0 41 B2 37 34 AF 31 89 32 38 3A 90 3A 8E |.1.A.74.1.28:.:.|
00001730: 00 4C 1F B8 00 58 B2 30 3A 8D 31 31 3A A0 32 3A |.L...X.0:.11:.2:|
00001740: 91 54 AA 31 89 32 38 2C 32 38 3A 8A 00 95 1F B9 |.T.1.28,28:.....|
00001750: 00 83 33 34 2C 57 48 49 4C 45 2C 55 4E 54 49 4C |..34,WHILE,UNTIL|
00001760: 2C 45 58 49 54 2C 45 58 49 54 32 2C 43 41 53 45 |,EXIT,EXIT2,CASE|
00001770: 2C 43 41 53 45 32 2C 43 41 53 45 33 2C 49 46 2C |,CASE2,CASE3,IF,|
00001780: 45 4C 53 45 2C 44 4F 2C 5B 2C 5D 2C 3C 3C 2C 3E |ELSE,DO,[,],<<,>|
00001790: 3E 2C 53 55 42 00 D6 1F BA 00 83 31 32 38 2C 35 |>,SUB......128,5|
000017A0: 38 2C 31 34 32 2C 31 33 39 2C 31 33 37 2C 33 34 |8,142,139,137,34|
000017B0: 2C 31 36 37 2C 31 34 31 2C 31 33 31 2C 31 37 38 |,167,141,131,178|
000017C0: 2C 2D 31 37 39 2C 31 37 39 2C 2D 31 37 37 2C 31 |,-179,179,-177,1|
000017D0: 37 37 2C 31 35 38 00 F8 1F BB 00 83 31 32 39 2C |77,158......129,|
000017E0: 31 35 31 2C 31 35 36 2C 31 36 34 2C 2D 33 35 2C |151,156,164,-35,|
000017F0: 31 35 38 2C 45 4C 53 45 00 3A 20 BC 00 8D 32 33 |158,ELSE.: ...23|
00001800: 34 3A 4E 49 B2 4E 49 AA 31 3A 49 24 28 4E 49 29 |4:NI.NI.1:I$(NI)|
00001810: B2 56 24 3A 8B 58 24 B2 44 24 28 32 38 29 A7 4F |.V$:.X$.D$(28).O|
00001820: B2 42 3A 46 24 B2 46 24 AA 22 20 28 CD D5 D0 29 |.B:F$.F$." (...)|
00001830: 22 3A 58 B2 39 3A 89 31 35 31 00 4E 20 BD 00 91 |":X.9:.151.N ...|
00001840: 4C 57 8D 32 39 39 2C 33 30 31 2C 32 39 39 00 71 |LW.299,301,299.q|
00001850: 20 BE 00 47 B2 47 AA 31 3A 51 28 47 29 B2 31 3A | ..G.G.1:Q(G).1:|
00001860: 4E 24 28 47 29 B2 46 24 3A 41 B2 47 3A 8D 32 36 |N$(G).F$:A.G:.26|
00001870: 31 00 8C 20 BF 00 49 28 4E 49 29 B2 28 47 AB 4D |1.. ..I(NI).(G.M|
00001880: 55 29 AC 57 3A 49 4A B2 4E 49 3A 8E 00 AF 20 C0 |U).W:IJ.NI:... .|
00001890: 00 91 53 42 89 32 38 3A 51 24 B2 22 20 12 CD 45 |..SB.28:Q$." ..E|
000018A0: 48 52 20 41 4C 53 22 3A A0 31 3A 89 31 34 33 00 |HR ALS":.1:.143.|
000018B0: F1 20 C1 00 91 51 AA 31 89 34 36 3A 47 B2 51 AB |. ...Q.1.46:G.Q.|
000018C0: 31 3A 47 31 B2 47 3A 49 28 30 29 B2 52 3A 4D 55 |1:G1.G:I(0).R:MU|
000018D0: B2 AB 4D 55 3A 4E 4A B2 4E 49 AA 31 3A 53 50 24 |..MU:NJ.NI.1:SP$|
000018E0: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
000018F0: 22 00 2E 21 C2 00 4E 24 B2 4E 24 28 51 31 29 AA |"..!..N$.N$(Q1).|
00001900: 22 2F 42 22 3A 81 51 B2 30 A4 47 3A 8B C8 28 4E |"/B":.Q.0.G:..(N|
00001910: 24 28 51 29 2C 31 29 B2 22 23 22 A7 82 3A 4E 24 |$(Q),1)."#"..:N$|
00001920: B2 CA 28 4E 24 2C 32 29 3A 47 B2 47 AA 31 00 42 |..(N$,2):G.G.1.B|
00001930: 21 C3 00 51 32 B2 51 3A 8B 54 B2 32 A7 4E 24 B2 |!..Q2.Q:.T.2.N$.|
00001940: 45 24 00 56 21 C4 00 91 4C 57 8D 33 31 33 2C 33 |E$.V!...LW.313,3|
00001950: 31 35 2C 33 31 37 00 6D 21 C5 00 58 B2 31 30 32 |15,317.m!..X.102|
00001960: 35 3A 8D 31 31 3A 58 B2 30 3A 89 35 33 00 99 21 |5:.11:X.0:.53..!|
00001970: C6 00 8B 4D 55 B3 30 A7 48 53 24 B2 43 24 3A 43 |...MU.0.HS$.C$:C|
00001980: 24 B2 22 4D 44 4C 22 3A 54 B2 32 3A 4E 24 28 51 |$."MDL":T.2:N$(Q|
00001990: 29 B2 43 24 3A 89 32 30 30 00 A1 21 C7 00 8D 32 |).C$:.200..!...2|
000019A0: 34 00 B5 21 C8 00 91 4C 57 8D 33 30 35 2C 33 30 |4..!...LW.305,30|
000019B0: 37 2C 33 31 31 00 DD 21 C9 00 8D 31 3A 99 22 20 |7,311..!...1:." |
000019C0: 20 22 3A 8D 32 30 3A 43 24 B2 53 24 3A 46 B2 59 | ":.20:C$.S$:F.Y|
000019D0: 3A 52 B2 43 3A 8D 32 36 3A 89 32 30 35 00 F3 21 |:R.C:.26:.205..!|
000019E0: CA 00 8D 32 30 3A 43 24 B2 53 24 3A 46 B2 59 3A |...20:C$.S$:F.Y:|
000019F0: 52 B2 43 00 0A 22 CB 00 8D 32 36 3A 8B 4C 24 B2 |R.C.."...26:.L$.|
00001A00: 44 24 28 32 34 29 89 32 31 33 00 17 22 CC 00 8B |D$(24).213.."...|
00001A10: 5A B2 30 89 32 31 34 00 37 22 CD 00 41 B2 33 33 |Z.0.214.7"..A.33|
00001A20: 3A 8D 39 3A 8B 41 A7 58 B2 31 33 2E 31 3A 8D 31 |:.9:.A.X.13.1:.1|
00001A30: 35 31 3A 89 31 34 33 00 43 22 CE 00 42 B2 32 3A |51:.143.C"..B.2:|
00001A40: 8D 32 35 00 5D 22 CF 00 54 24 B2 22 2C 22 3A 42 |.25.]"..T$.",":B|
00001A50: B2 31 3A 8D 33 30 3A 8B 42 89 32 31 30 00 90 22 |.1:.30:.B.210.."|
00001A60: D0 00 54 24 B2 22 3A 22 3A 8D 33 30 3A 8B 42 A7 |..T$.":":.30:.B.|
00001A70: 4E 49 B2 4E 49 AA 31 3A 49 28 4E 49 29 B2 AB C5 |NI.NI.1:I(NI)...|
00001A80: 28 CA 28 43 24 2C 42 AA 31 29 29 3A 89 32 31 32 |(.(C$,B.1)):.212|
00001A90: 00 A5 22 D1 00 58 B2 31 33 2E 32 3A 8D 31 35 31 |.."..X.13.2:.151|
00001AA0: 3A 89 31 34 33 00 BA 22 D2 00 4E 49 B2 4E 49 AA |:.143.."..NI.NI.|
00001AB0: 31 3A 49 28 4E 49 29 B2 53 42 00 D1 22 D3 00 53 |1:I(NI).SB.."..S|
00001AC0: 42 B2 53 42 AA C5 28 CA 28 43 24 2C 42 AA 31 29 |B.SB..(.(C$,B.1)|
00001AD0: 29 00 F5 22 D4 00 43 24 B2 C8 28 43 24 2C 42 AB |).."..C$..(C$,B.|
00001AE0: 31 29 3A 8D 32 36 3A 49 24 28 4E 49 29 B2 43 24 |1):.26:I$(NI).C$|
00001AF0: 3A 89 32 30 32 00 21 23 D5 00 8D 32 35 38 3A 8D |:.202.!#...258:.|
00001B00: 32 30 3A 44 24 B2 53 24 3A 8D 31 33 3A 43 24 B2 |20:D$.S$:.13:C$.|
00001B10: 44 24 3A 46 B2 59 3A 52 B2 43 3A 8B 5A 89 32 30 |D$:F.Y:R.C:.Z.20|
00001B20: 33 00 30 23 D6 00 A0 31 3A 8B 4D 55 B1 30 A7 8E |3.0#...1:.MU.0..|
00001B30: 00 59 23 D7 00 43 24 B2 48 53 24 3A 48 53 24 B2 |.Y#..C$.HS$:HS$.|
00001B40: 22 22 3A 4E 24 28 51 29 B2 43 24 3A 4D 55 B2 B6 |"":N$(Q).C$:MU..|
00001B50: 28 4D 55 29 3A 89 31 39 39 00 78 23 D8 00 8B 4D |(MU):.199.x#...M|
00001B60: 48 B3 30 A7 4D 53 B2 AB 4D 48 3A 4D 48 B2 4D 53 |H.0.MS..MH:MH.MS|
00001B70: AA 53 42 3A 89 32 31 38 00 A4 23 D9 00 4D 48 B2 |.SB:.218..#..MH.|
00001B80: 4D 48 AB 28 C2 28 35 35 29 AA 32 35 36 AC C2 28 |MH.(.(55).256..(|
00001B90: 35 36 29 29 AC 28 4D 48 B2 30 29 3A 4D 53 B2 4D |56)).(MH.0):MS.M|
00001BA0: 48 AB 53 42 00 C9 23 DA 00 81 49 B2 4E 4A A4 4E |H.SB..#...I.NJ.N|
00001BB0: 49 3A 8B 49 28 49 29 B3 30 A7 49 28 49 29 B2 AB |I:.I(I).0.I(I)..|
00001BC0: 49 28 49 29 3A 89 32 32 30 00 DA 23 DB 00 49 28 |I(I):.220..#..I(|
00001BD0: 49 29 B2 49 28 49 29 AA 4D 53 00 E0 23 DC 00 82 |I).I(I).MS..#...|
00001BE0: 00 16 24 DD 00 58 B2 4D 53 3A 8D 38 3A 46 24 B2 |..$..X.MS:.8:F$.|
00001BF0: C4 28 4D 53 29 3A 58 B2 55 3A 8D 32 33 3A 43 24 |.(MS):X.U:.23:C$|
00001C00: B2 44 24 28 33 30 29 AA 22 35 32 2C 22 AA C4 28 |.D$(30)."52,"..(|
00001C10: 41 29 AA 22 3A 22 00 4B 24 DE 00 43 24 B2 43 24 |A).":".K$..C$.C$|
00001C20: AA 44 24 28 33 30 29 AA 22 35 33 2C 22 AA C4 28 |.D$(30)."53,"..(|
00001C30: 42 29 AA 22 3A 22 AA 44 24 28 33 31 29 3A 8B 4D |B).":".D$(31):.M|
00001C40: 53 B3 33 32 37 36 38 A7 8D 31 34 00 7E 24 DF 00 |S.32768..14.~$..|
00001C50: 58 B2 55 3A 43 24 B2 44 24 28 32 39 29 AA 22 49 |X.U:C$.D$(29)."I|
00001C60: 22 AA 44 24 28 32 35 29 AA 46 24 AA 44 24 28 33 |".D$(25).F$.D$(3|
00001C70: 32 29 AA C4 28 4D 48 AB 31 29 3A 8D 31 34 00 AE |2)..(MH.1):.14..|
00001C80: 24 E0 00 58 B2 51 32 3A 48 53 24 B2 4E 24 28 58 |$..X.Q2:HS$.N$(X|
00001C90: 29 3A 4E 24 28 58 29 B2 22 4D 4C 44 22 3A 56 B2 |):N$(X)."MLD":V.|
00001CA0: 55 AA 53 3A 54 B2 31 3A 53 42 B2 30 3A 8E 00 C1 |U.S:T.1:SB.0:...|
00001CB0: 24 E1 00 8B 58 24 B2 44 24 28 32 33 29 89 31 32 |$...X$.D$(23).12|
00001CC0: 37 00 D4 24 E2 00 8B 58 24 B2 44 24 28 32 30 29 |7..$...X$.D$(20)|
00001CD0: 89 31 32 37 00 E7 24 E3 00 8B 58 24 B2 44 24 28 |.127..$...X$.D$(|
00001CE0: 32 38 29 89 31 32 37 00 F2 24 E4 00 82 3A 89 31 |28).127..$...:.1|
00001CF0: 33 33 00 14 25 E5 00 99 22 11 C4 49 53 4B 45 54 |33..%..."..ISKET|
00001D00: 54 45 20 4D 49 54 20 D0 52 4F 47 52 41 4D 4D 20 |TE MIT .ROGRAMM |
00001D10: 12 22 43 24 00 34 25 E6 00 99 22 49 4E 20 CC 41 |."C$.4%..."IN .A|
00001D20: 55 46 57 45 52 4B 22 52 24 22 20 45 49 4E 4C 45 |UFWERK"R$" EINLE|
00001D30: 47 45 4E 21 00 56 25 E7 00 85 22 11 C6 45 52 54 |GEN!.V%..."..ERT|
00001D40: 49 47 20 20 4A 9D 9D 9D 22 3B 58 24 3A 8B 58 24 |IG J...";X$:.X$|
00001D50: B2 22 4A 22 A7 8E 00 5C 25 E8 00 8A 00 84 25 E9 |."J"...\%.....%.|
00001D60: 00 86 42 24 28 32 31 38 29 3A 81 4A B2 31 32 38 |..B$(218):.J.128|
00001D70: A4 32 31 38 3A 87 42 24 28 4A 29 3A 82 3A 54 4B |.218:.B$(J):.:TK|
00001D80: B2 4A 3A 8E 00 99 25 EA 00 56 24 B2 46 24 3A 8B |.J:...%..V$.F$:.|
00001D90: 54 4B B2 30 A7 8D 32 33 33 00 A6 25 EB 00 8B 46 |TK.0..233..%...F|
00001DA0: 24 B2 22 22 A7 8E 00 D1 25 EC 00 51 24 B2 22 22 |$.""....%..Q$.""|
00001DB0: 3A 81 4A B2 31 A4 C3 28 46 24 29 3A 41 24 B2 CA |:.J.1..(F$):A$..|
00001DC0: 28 46 24 2C 4A 2C 31 29 3A 58 58 B2 C6 28 41 24 |(F$,J,1):XX..(A$|
00001DD0: 29 00 E7 25 ED 00 8B 58 58 B1 31 32 37 A7 41 24 |)..%...XX.127.A$|
00001DE0: B2 42 24 28 58 58 29 00 FE 25 EE 00 51 24 B2 51 |.B$(XX)..%..Q$.Q|
00001DF0: 24 AA 41 24 3A 82 3A 46 24 B2 51 24 3A 8E 00 2F |$.A$:.:F$.Q$:../|
00001E00: 26 EF 00 83 45 4E 44 2C 46 4F 52 2C 4E 45 58 54 |&...END,FOR,NEXT|
00001E10: 2C 44 41 54 41 2C 49 4E 50 55 54 23 2C 49 4E 50 |,DATA,INPUT#,INP|
00001E20: 55 54 2C 44 49 4D 2C 52 45 41 44 2C 4C 45 54 00 |UT,DIM,READ,LET.|
00001E30: 5E 26 F0 00 83 47 4F 54 4F 2C 52 55 4E 2C 49 46 |^&...GOTO,RUN,IF|
00001E40: 2C 52 45 53 54 4F 52 45 2C 47 4F 53 55 42 2C 52 |,RESTORE,GOSUB,R|
00001E50: 45 54 55 52 4E 2C 52 45 4D 2C 53 54 4F 50 00 8C |ETURN,REM,STOP..|
00001E60: 26 F1 00 83 4F 4E 2C 57 41 49 54 2C 4C 4F 41 44 |&...ON,WAIT,LOAD|
00001E70: 2C 53 41 56 45 2C 56 45 52 49 46 59 2C 44 45 46 |,SAVE,VERIFY,DEF|
00001E80: 2C 50 4F 4B 45 2C 50 52 49 4E 54 23 00 BC 26 F2 |,POKE,PRINT#..&.|
00001E90: 00 83 50 52 49 4E 54 2C 43 4F 4E 54 2C 4C 49 53 |..PRINT,CONT,LIS|
00001EA0: 54 2C 43 4C 52 2C 43 4D 44 2C 53 59 53 2C 4F 50 |T,CLR,CMD,SYS,OP|
00001EB0: 45 4E 2C 43 4C 4F 53 45 2C 47 45 54 00 ED 26 F3 |EN,CLOSE,GET..&.|
00001EC0: 00 83 4E 45 57 2C 54 41 42 28 2C 54 4F 2C 46 4E |..NEW,TAB(,TO,FN|
00001ED0: 2C 53 50 43 28 2C 54 48 45 4E 2C 4E 4F 54 2C 53 |,SPC(,THEN,NOT,S|
00001EE0: 54 45 50 2C 2B 2C 2D 2C 2A 2C 2F 2C 5E 00 1B 27 |TEP,+,-,*,/,^..'|
00001EF0: F4 00 83 41 4E 44 2C 4F 52 2C 3E 2C 3D 2C 3C 2C |...AND,OR,>,=,<,|
00001F00: 53 47 4E 2C 49 4E 54 2C 41 42 53 2C 55 53 52 2C |SGN,INT,ABS,USR,|
00001F10: 46 52 45 2C 50 4F 53 2C 53 51 52 00 4A 27 F5 00 |FRE,POS,SQR.J'..|
00001F20: 83 52 4E 44 2C 4C 4F 47 2C 45 58 50 2C 43 4F 53 |.RND,LOG,EXP,COS|
00001F30: 2C 53 49 4E 2C 54 41 4E 2C 41 54 4E 2C 50 45 45 |,SIN,TAN,ATN,PEE|
00001F40: 4B 2C 4C 45 4E 2C 53 54 52 24 00 71 27 F6 00 83 |K,LEN,STR$.q'...|
00001F50: 56 41 4C 2C 41 53 43 2C 43 48 52 24 2C 4C 45 46 |VAL,ASC,CHR$,LEF|
00001F60: 54 24 2C 52 49 47 48 54 24 2C 4D 49 44 24 2C 47 |T$,RIGHT$,MID$,G|
00001F70: 4F 00 A0 27 F7 00 83 43 4F 4E 43 41 54 2C 44 4F |O..'...CONCAT,DO|
00001F80: 50 45 4E 2C 44 43 4C 4F 53 45 2C 52 45 43 4F 52 |PEN,DCLOSE,RECOR|
00001F90: 44 2C 48 45 41 44 45 52 2C 43 4F 4C 4C 45 43 54 |D,HEADER,COLLECT|
00001FA0: 00 CD 27 F8 00 83 42 41 43 4B 55 50 2C 43 4F 50 |..'...BACKUP,COP|
00001FB0: 59 2C 41 50 50 45 4E 44 2C 44 53 41 56 45 2C 43 |Y,APPEND,DSAVE,C|
00001FC0: 4F 4E 43 41 54 2C 43 41 54 41 4C 4F 47 00 EB 27 |ONCAT,CATALOG..'|
00001FD0: F9 00 83 52 45 4E 41 4D 45 2C 53 43 52 41 54 43 |...RENAME,SCRATC|
00001FE0: 48 2C 44 49 52 45 43 54 4F 52 59 00 04 28 FA 00 |H,DIRECTORY..(..|
00001FF0: 8B 49 28 30 29 A7 49 28 30 29 B2 B5 28 49 28 30 |.I(0).I(0)..(I(0|
00002000: 29 AD 57 29 00 26 28 FB 00 57 B2 57 AA B5 28 28 |).W).&(..W.W..((|
00002010: B5 28 28 46 AB 56 29 AD 31 30 30 30 29 AA 31 29 |.((F.V).1000).1)|
00002020: AC 31 30 30 30 29 00 54 28 FC 00 4E B2 30 3A 4D |.1000).T(..N.0:M|
00002030: B2 4E 3A 4B B2 4E 3A 48 B2 4E 3A 49 4A B2 4E 3A |.N:K.N:H.N:IJ.N:|
00002040: 8B 49 28 30 29 A7 49 28 30 29 B2 B5 28 49 28 30 |.I(0).I(0)..(I(0|
00002050: 29 AC 57 29 00 90 28 FD 00 81 51 B2 30 A4 47 3A |).W)..(...Q.0.G:|
00002060: 8B 51 28 51 29 B2 31 A7 49 4A B2 49 4A AA 31 3A |.Q(Q).1.IJ.IJ.1:|
00002070: 49 28 49 4A 29 B2 28 51 AB 4D 55 29 AC 57 3A 8B |I(IJ).(Q.MU).W:.|
00002080: 51 AB 4D 55 B2 30 A7 49 28 49 4A 29 B2 31 30 30 |Q.MU.0.I(IJ).100|
00002090: 00 BF 28 FE 00 82 3A 55 B2 31 30 30 3A 56 B2 55 |..(...:U.100:V.U|
000020A0: 3A 4D 55 B2 AB 4D 55 3A 47 B2 47 31 3A 4E 49 B2 |:MU..MU:G.G1:NI.|
000020B0: 4E 4A AB 31 3A A0 31 3A A0 32 3A 89 31 39 34 00 |NJ.1:.1:.2:.194.|
000020C0: CB 28 FF 00 8B 4D 55 89 32 31 36 00 F1 28 00 01 |.(...MU.216..(..|
000020D0: 58 B2 30 3A 8B 49 28 30 29 A7 43 24 B2 44 24 28 |X.0:.I(0).C$.D$(|
000020E0: 32 30 29 AA C4 28 49 28 30 29 29 3A 91 54 89 31 |20)..(I(0)):.T.1|
000020F0: 35 00 F7 28 01 01 8E 00 2A 29 02 01 58 24 B2 C8 |5..(....*)..X$..|
00002100: 28 53 50 24 2C 36 AB C3 28 C4 28 52 29 29 29 AA |(SP$,6..(.(R))).|
00002110: C4 28 52 29 AA C8 28 53 50 24 2C 36 AB C3 28 C4 |.(R)..(SP$,6..(.|
00002120: 28 4B 29 29 29 AA C4 28 4B 29 00 4F 29 03 01 41 |(K)))..(K).O)..A|
00002130: 24 B2 4E 24 28 51 29 3A 8B C8 28 41 24 2C 31 29 |$.N$(Q):..(A$,1)|
00002140: B2 22 23 22 A7 41 24 B2 CA 28 41 24 2C 32 29 00 |."#".A$..(A$,2).|
00002150: 67 29 04 01 99 22 20 3E 1D 22 41 24 A3 32 34 29 |g)..." >."A$.24)|
00002160: 58 24 22 91 22 3A 8E 00 72 29 05 01 8B 41 B2 30 |X$".":..r)...A.0|
00002170: A7 8E 00 8E 29 06 01 58 B2 41 AB 31 3A 8B 51 28 |....)..X.A.1:.Q(|
00002180: 58 29 B2 30 A7 51 28 58 29 B2 AB 31 3A 8E 00 A3 |X).0.Q(X)..1:...|
00002190: 29 07 01 8B 51 28 58 29 B2 32 A7 41 B2 58 3A 89 |)...Q(X).2.A.X:.|
000021A0: 32 36 31 00 A9 29 08 01 8E 00 D5 29 09 01 8B 4D |261..).....)...M|
000021B0: A7 4D B2 4D AB 31 3A 58 B2 58 28 4D 29 3A 43 24 |.M.M.1:X.X(M):C$|
000021C0: B2 46 24 28 58 29 3A 42 B2 32 3A 54 24 B2 22 5C |.F$(X):B.2:T$."\|
000021D0: 22 3A 89 33 30 00 E2 29 0A 01 58 B2 36 3A 89 31 |":.30..)..X.6:.1|
000021E0: 35 31 00 F6 29 0B 01 46 24 28 58 29 B2 CA 28 43 |51..)..F$(X)..(C|
000021F0: 24 2C 42 AA 31 29 00 0C 2A 0C 01 53 24 B2 48 24 |$,B.1)..*..S$.H$|
00002200: AA C8 28 43 24 2C 42 AB 31 29 3A 8E 00 18 2A 0D |..(C$,B.1):...*.|
00002210: 01 8B 41 31 B2 30 89 33 00 23 2A 0E 01 8B 49 B2 |..A1.0.3.#*...I.|
00002220: 31 89 33 00 58 2A 0F 01 48 53 24 B2 53 24 3A 53 |1.3.X*..HS$.S$:S|
00002230: 24 B2 54 24 3A 8D 33 3A 58 28 4D AB 31 29 B2 58 |$.T$:.3:X(M.1).X|
00002240: 28 4D AB 31 29 AA 31 3A 53 24 B2 48 53 24 3A 48 |(M.1).1:S$.HS$:H|
00002250: 53 24 B2 22 22 3A 89 34 00 68 2A 10 01 4F B2 41 |S$."":.4.h*..O.A|
00002260: 3A 8D 39 3A 8B 41 A7 8E 00 81 2A 11 01 8B 43 24 |:.9:.A....*...C$|
00002270: B3 B1 44 24 28 4F 29 A7 58 B2 31 31 3A 89 31 35 |..D$(O).X.11:.15|
00002280: 31 00 87 2A 12 01 8E 00 BC 2A 13 01 99 22 11 20 |1..*.....*...". |
00002290: D0 52 4F 47 52 41 4D 4D 20 12 22 4E 24 28 51 29 |.ROGRAMM ."N$(Q)|
000022A0: 22 92 20 4E 49 43 48 54 20 56 4F 52 48 41 4E 44 |". NICHT VORHAND|
000022B0: 45 4E 21 22 3A A0 31 3A A0 32 3A 80 00 DF 2A 14 |EN!":.1:.2:...*.|
000022C0: 01 85 22 11 D3 54 41 4E 44 41 52 44 2D CE 55 4D |.."..TANDARD-.UM|
000022D0: 4D 45 52 4E 20 20 20 4A 9D 9D 9D 22 3B 58 24 00 |MERN J...";X$.|
000022E0: 10 2B 15 01 8B 58 24 B3 B1 22 4A 22 A7 85 22 91 |.+...X$.."J"..".|
000022F0: D3 54 41 52 54 2C C1 42 53 54 41 4E 44 2C D3 45 |.TART,.BSTAND,.E|
00002300: 47 4D 45 4E 54 22 3B 55 2C 53 2C 57 3A 56 B2 55 |GMENT";U,S,W:V.U|
00002310: 00 3D 2B 16 01 85 22 CD 4F 44 55 53 3A 20 31 2F |.=+...".ODUS: 1/|
00002320: 32 20 20 20 20 20 20 20 20 20 31 9D 9D 9D 22 3B |2 1...";|
00002330: 54 3A 8B 54 B3 31 B0 54 B1 32 89 34 34 00 5E 2B |T:.T.1.T.2.44.^+|
00002340: 17 01 8B 54 B2 32 A7 85 22 CE 45 55 45 52 20 CE |...T.2..".EUER .|
00002350: 41 4D 45 20 20 20 20 20 20 20 22 3B 45 24 00 8A |AME ";E$..|
00002360: 2B 18 01 85 22 57 45 49 54 45 52 45 20 CC 41 55 |+..."WEITERE .AU|
00002370: 46 57 45 52 4B 45 20 20 4E 9D 9D 9D 22 3B 58 24 |FWERKE N...";X$|
00002380: 3A 8B 58 24 B2 22 4E 22 A7 8E 00 A5 2B 19 01 99 |:.X$."N"....+...|
00002390: 22 11 20 31 20 2D 20 5A 57 45 49 54 45 20 D6 C3 |". 1 - ZWEITE ..|
000023A0: 31 35 34 31 22 00 C5 2B 1A 01 99 22 20 32 20 2D |1541"..+..." 2 -|
000023B0: 20 C9 C5 C3 3A C4 4F 50 50 45 4C 2D C6 4C 4F 50 | ...:.OPPEL-.LOP|
000023C0: 50 59 22 3A 99 00 DF 2B 1B 01 85 22 20 31 20 4F |PY":...+..." 1 O|
000023D0: 44 45 52 20 32 22 3B 58 3A 4C 57 B2 58 AA 31 00 |DER 2";X:LW.X.1.|
000023E0: F9 2B 1C 01 91 58 89 32 38 35 2C 32 38 38 3A 99 |.+...X.285,288:.|
000023F0: 22 91 91 22 3A 89 32 38 33 00 2E 2C 1D 01 85 22 |"..":.283..,..."|
00002400: 11 D3 43 48 52 45 49 42 2D CC 41 55 46 57 45 52 |..CHREIB-.AUFWER|
00002410: 4B 3A 20 38 2F 39 20 20 20 20 38 9D 9D 9D 22 3B |K: 8/9 8...";|
00002420: 58 3A 8B 58 B3 38 B0 58 B1 39 89 32 38 38 00 47 |X:.X.8.X.9.288.G|
00002430: 2C 1E 01 52 24 B2 C4 28 39 29 3A 8B 58 B2 39 A7 |,..R$..(9):.X.9.|
00002440: 52 24 B2 C4 28 38 29 00 50 2C 1F 01 89 32 39 30 |R$..(8).P,...290|
00002450: 00 85 2C 20 01 85 22 11 D3 43 48 52 45 49 42 2D |.., .."..CHREIB-|
00002460: CC 41 55 46 57 45 52 4B 3A 20 30 2F 31 20 20 20 |.AUFWERK: 0/1 |
00002470: 20 30 9D 9D 9D 22 3B 58 3A 8B 58 B3 30 B0 58 B1 | 0...";X:.X.0.X.|
00002480: 31 89 32 38 38 00 93 2C 21 01 52 24 B2 C4 28 31 |1.288..,!.R$..(1|
00002490: AB 58 29 00 A3 2C 22 01 44 24 B2 C4 28 58 29 3A |.X)..,".D$..(X):|
000024A0: 99 3A 8E 00 CB 2C 23 01 9F 31 2C 38 2C 30 2C 4E |.:...,#..1,8,0,N|
000024B0: 24 28 51 29 3A 8D 31 3A 8D 31 38 32 3A 8B 41 B2 |$(Q):.1:.182:.A.|
000024C0: 36 32 B0 41 B2 37 34 89 32 37 35 00 D1 2C 24 01 |62.A.74.275..,$.|
000024D0: 8E 00 03 2D 25 01 9F 31 2C 38 2C 30 2C 4E 24 28 |...-%..1,8,0,N$(|
000024E0: 51 29 3A 8D 31 3A 8D 31 38 32 3A 8B 41 B2 36 32 |Q):.1:.182:.A.62|
000024F0: B0 41 B2 37 34 A7 43 24 B2 4E 24 28 51 29 3A 89 |.A.74.C$.N$(Q):.|
00002500: 32 39 35 00 09 2D 26 01 8E 00 36 2D 27 01 8D 32 |295..-&...6-'..2|
00002510: 32 39 3A 9F 31 2C 39 2C 30 2C 4E 24 28 51 29 3A |29:.1,9,0,N$(Q):|
00002520: 8D 31 3A 8D 31 38 32 3A 8B 41 B2 36 32 B0 41 B2 |.1:.182:.A.62.A.|
00002530: 37 34 89 32 39 35 00 3C 2D 28 01 8E 00 6E 2D 29 |74.295.<-(...n-)|
00002540: 01 9F 31 2C 38 2C 30 2C 4E 24 28 51 29 3A 8D 31 |..1,8,0,N$(Q):.1|
00002550: 3A 8D 31 38 32 3A 8B 41 B2 36 32 A7 43 24 B2 4E |:.182:.A.62.C$.N|
00002560: 24 28 51 29 3A 8D 32 32 39 3A 89 32 39 37 00 74 |$(Q):.229:.297.t|
00002570: 2D 2A 01 8E 00 AB 2D 2B 01 9F 35 2C 38 2C 35 2C |-*....-+..5,8,5,|
00002580: 46 24 AA 22 2C 50 22 3A 4A B2 41 3A 84 33 2C 41 |F$.",P":J.A:.3,A|
00002590: 3A A0 35 3A 8B 41 B2 36 32 B0 41 B2 37 34 A7 4F |:.5:.A.62.A.74.O|
000025A0: B2 42 3A 58 B2 39 3A 89 31 35 31 00 B1 2D 2C 01 |.B:X.9:.151..-,.|
000025B0: 8E 00 DF 2D 2D 01 9F 35 2C 38 2C 35 2C 46 24 AA |...--..5,8,5,F$.|
000025C0: 22 2C 50 22 3A 4A B2 41 3A 84 33 2C 41 3A A0 35 |",P":J.A:.3,A:.5|
000025D0: 3A 8B 41 B2 36 32 B0 41 B2 37 34 89 33 30 33 00 |:.A.62.A.74.303.|
000025E0: E5 2D 2E 01 8E 00 1C 2E 2F 01 9F 35 2C 39 2C 35 |.-....../..5,9,5|
000025F0: 2C 46 24 AA 22 2C 50 22 3A 4A B2 41 3A 84 33 2C |,F$.",P":J.A:.3,|
00002600: 41 3A A0 35 3A 8B 41 B2 36 32 B0 41 B2 37 34 A7 |A:.5:.A.62.A.74.|
00002610: 4F B2 42 3A 58 B2 39 3A 89 31 35 31 00 22 2E 30 |O.B:X.9:.151.".0|
00002620: 01 8E 00 47 2E 31 01 9F 31 2C 38 2C 30 2C 43 24 |...G.1..1,8,0,C$|
00002630: 3A 8D 31 3A 8D 31 38 32 3A 8B 41 B2 36 32 B0 41 |:.1:.182:.A.62.A|
00002640: B2 37 34 89 32 37 35 00 4D 2E 32 01 8E 00 72 2E |.74.275.M.2...r.|
00002650: 33 01 9F 31 2C 38 2C 30 2C 43 24 3A 8D 31 3A 8D |3..1,8,0,C$:.1:.|
00002660: 31 38 32 3A 8B 41 B2 36 32 B0 41 B2 37 34 89 33 |182:.A.62.A.74.3|
00002670: 30 39 00 78 2E 34 01 8E 00 A2 2E 35 01 8D 32 32 |09.x.4.....5..22|
00002680: 39 3A 9F 31 2C 39 2C 30 2C 43 24 3A 8D 31 3A 8D |9:.1,9,0,C$:.1:.|
00002690: 31 38 32 3A 8B 41 B2 36 32 B0 41 B2 37 34 89 33 |182:.A.62.A.74.3|
000026A0: 30 39 00 A8 2E 36 01 8E 00 CE 2E 37 01 9F 31 2C |09...6.....7..1,|
000026B0: 38 2C 30 2C 43 24 3A 8D 31 3A 8D 31 38 32 3A 8B |8,0,C$:.1:.182:.|
000026C0: 41 B2 36 32 A7 8D 32 32 39 3A 89 33 31 31 00 D4 |A.62..229:.311..|
000026D0: 2E 38 01 8E 00 F4 2E 39 01 9F 32 2C 38 2C 31 2C |.8.....9..2,8,1,|
000026E0: 22 40 3A 22 AA 4E 24 3A 8D 31 38 32 3A 8B 41 B2 |"@:".N$:.182:.A.|
000026F0: 37 34 A7 80 00 FA 2E 3A 01 8E 00 1E 2F 3B 01 9F |74.....:..../;..|
00002700: 32 2C C5 28 44 24 29 2C 31 2C 22 40 3A 22 AA 4E |2,.(D$),1,"@:".N|
00002710: 24 3A 8D 31 38 32 3A 8B 41 B2 37 34 A7 80 00 24 |$:.182:.A.74...$|
00002720: 2F 3C 01 8E 00 42 2F 3D 01 9F 32 2C 38 2C 31 2C |/<...B/=..2,8,1,|
00002730: 22 40 22 AA 44 24 AA 22 3A 22 AA 4E 24 3A 8D 31 |"@".D$.":".N$:.1|
00002740: 38 32 00 48 2F 3E 01 8E 00 00 00 41 |82.H/>.....A |
..F....36:(C)1983 GEBHARD V.BLUECHER,POB
500207,D.2000 HAMBURG 50,#3241.^....#1,X
$:.X$."".X.0:..L...X.F(X$):......X(M).K.
1.A1:M.M.1......A1.A1.0:F$(K).F$(K)."\".
S$:......K.K.1:F$(K).S$:..O....M.M.M.1:X
.X(M):......X.6:.151.....B..(X.256):A.X.
B.256:X$.G(A).G(B):.."...A.H(C$,C(D$(A))
)..D$(A):..<....1:A.X:.1:X.256.X.A:..O..
..8:.2,X$;:.182.B....K.S$.H$.C$:.4.J...X
.F......T..(X).1.28,15:Q$.C$:.19.....Q$.
"":D..1:.J.1.C(C$):A$.J(C$,J,1):.A$.D$(2
1).18.Q....A$.D$(21).D..D......A$." "..D
.......Q$.Q$.A$:.......8:.2,D$(26).X$.Q$
.G(0);:.182.'....10:Z.X:.Z.0.23.8....10:
C.X:S$.".O....1:.X.S$.S$.X$:.22.M...Y.U:
Y$.D(Y):I$.Y$:U.U.S:..U...B.1.....C$.J(C
$,B.1).....L$.H(C$,1):.L$." ".C$.J(C$,2)
:.26.V...L.C(C$):.I(C$,1)." ".C$.H(C$,L.
1):.27............O.1.K:X.E(F$(O)):C$.J(
F$(O),C(D(X)).1):.14:.:K.0:..I...L.C(C$)
:O.C(T$):.B.B.(B.0).L.1.O:.J(C$,B,O).T$.
..U....:B.0:..L. .C$.J(C$,2,L.2):.26...!
..L.C$.D$(19)."(".C$.")".D$(25)."0":....
".X.7:.151...#.F.Y:H$.Y$:.23...$..F$(50)
,D(10),G(6),X(20),I$(40),I(40):.A:.D$(A)
:.I.1.A.#.%..C$:A.E(C$):..(A).1.39,38:D$
(I).D$(I).G(.A):.37./.&.C$.G(A).M.'.D$(I
).D$(I).C$:.:.4,3:.3,8,15:.53272,23:.532
80,0:.53281,0...(.."... *** PETAL-
PRECOMPILER ***":U.100:S.10:W.1000:V.U:
T.1...*.LW.1:.".AENDERUNGEN N..."
;X$:.X$."J"..276...+........" ....";C$:
.". ":.C$."."..". ";:.193.?./..H(C$,2)
."##".MH.E(J(C$,3)):.46.I.0.Q(Q).0:.26:.
L$."#".MU.MU.1:Q(Q).2:.52...1..L$.."*"..
". "C$:.C.52:C.1:R.(Q.MU).W:Q1.Q:.52..
.2..24:.T.1.52:NI.NI.1:I$(NI).C$:I(NI).(
Q.MU).W:.Q.MU.0.I(NI).U...3.Q(Q).1:A.Q:.
261...4.N$(Q).C$:Q.Q.1:.46.#.5...26)"ZEI
LE PUFFER.".H.6..Q.0.G:C$.N$(Q):.26:.L$.
"#"..198.].7..Q:.255:X.0:HI.X...8..Q.X.G
:.H(N$(Q),1)."#".HI.HI.1:.141...9..LW.29
1,293,297...:..1:." ":U.V:V.W.(Q.1.HI).
S.;..20:C$.S$:F.Y:H$.Y$:R.C...<.A.33:.9:
..A..T.2.X.12:.151:.143...=..258:.20:D$.
S$:C2.0:.T.2.133.,.>..26:.L$.":"..24.J.?
.B.1:T$.D$(11):.30:.B.0.67.F.@.V$."":.B.
1.V$.H(C$,B.1)...A.B.B.O:T$.D$(12):.30:.
B.C$.V$.J(C$,B.O):.63...B.C$.V$...C..26.
..D.B.1:.L.0.134.J.E.A.26:.9:.A.82...F..
D(N).5.D(N).6.X.1:.151...G..B.3.L:.J(C$,
B,2)..D$(27)..:X.2:.151.5.H.M$.C$:C$.J(C
$,3,B.3):.26:.L.0..34.G.I..C$..D$(9).77.
W.J..D(N)..6.76...K..6:H$.I$:F$(X).F$(X)
.H$:S$.D(F).D$(20):F.Y:.3:E.E.1:.23...L.
D(N).7:.81...M..D(N).5.D(N).6:.80.S.N..6
:F$(X).F$(X).D(F.S)...O.S$.D(F).D$(20):.
3:E.E.1:.35.*.P.S$.D(F).D$(19)."(".C$.")
".D$(25)."0".D$(20):.3:.35.B.Q.C$.M$:B.B
.1:.25:.68.T.R.A.19:.9:.A.89.}.S..I(C$,1
).D$(22).N.N.1:D(N).8:.32:.88...T..I(C$,
4)..D$(3).126...U..D(N)..3.X.4:.151...V.
C$.H(C$,L.4):.26:.I(C$,1).D$(22).C$.H(C$
,L.1):.26...W.D(N).4:.L.1..34...X.S$.H$.
C$.D$(20):.135.!.Y.A.9:.272:.A.92.7.Z..D
(N)..8.X.3:.151.L.[..6:D(N).9:F$(X).F$(X
).I$:.X.29:S$.H$.D$(20):.135..\.A.10:.9
:.A.100...].E$.C$:B.2:.25:N.N.1...^..I.1
.3:A.I:.9:.A..:N.N.1:.120.Y._.D(N).I:X$.
H$:S$."":.I.98,99...`.A.3:.272...A.X(M).
K.1.A1:M.M.1:X(M).F:M.M.1:.134...B.X$.S$
:S$.H$.X.C.B.5:.25:.33:S$.S$.C$.D$(20).X
$:.269:A1.I.1:.I.136,134.K.D.A.16:.9:.A.
121...E.E$.C$:C2.1:.24:A.19:.272:.A.104.
..F..D(N).8.181.J.G..265:F$(X).F$(X).H$:
.X.B.29:N.N.1:.134...H.A.1:.272:.A.107..
.I..D(N)..1.181.).J..265:F$(X).F$(X).I$:
S$.H$.D$(20).D(E(J(C$,B.1))):.114.=.K.A.
2:.272:.A.111.N.L..D(N)..2.181.\.M..265:
.267.N.N.B.0:C2.B:.114...O.A.3:.272:.A.1
15...P..D(N)..4.X.5:.151.H.Q..6:F$(X).F$
(X).I$:.6:S$.H$.D$(20).D(X):.265...R..4:
.X.B.29:N.N.1:.136...S.A.5:.272:.A.120..
.T..D(N).5.D(N).7.181.+.U..D(N).6..6:F$(
X).F$(X).H$.Q.V..E.1..B.1.E.1:.6:F$(X).F
$(X).H$:....W..265:.X.B.29:.H.1.136:H.H.
1:N.N.1:E.G(H):.134...X.C$.E$:C2.0...Y.A
.15:.9:.A.124.S.Z.B.3:.25:.L.NI.NI.1:I(N
I).F:I$(NI).C$:.134...{.X.10:.151...|.A.
5:.272:.A.126...}.N.N.1:D(N).5:G(H).E:H.
H.1:E.1:X(M).K.1.A1:M.M.1:.134.S.~.L.C(C
$):.B.B.L:X$.J(C$,B,1):.225....B.B.1:BB
.B:T$.":":.30:BC.B:T$.",":B.BB:.BC.0.BC.
L.1.....A.1:BB.B:.30:.B.0.B.BC.B.BC:A.2.
....M$.C$:C$.J(C$,BB,B.BB):.26:F$.C$:C$.
M$:.E(L$).L$."0".B.B.1:.132......IJ.NI.1
..1:.F$..I$(IJ)..:IJ.0:.188:A.J.`...C$.H
(C$,BB.1).D(I(IJ)).J(C$,B):X.C(C$).C(M$)
:B.B.X.1:BC.BC.X......X$.D$(28).1.126:.A
.128,126......12:.136.....Y.F:Y$.H$:U.U.
S:.136......3.K...C$.D$:F.Y:H$.Y$:R.C:.Z
.61......HS$.""..C2.Q(Q).C$.D$(Q(Q).17):
.C$..D$.X.F:.14..... 1:.N.X.8:.151.G....
T.1.143:.HS$."".N$(Q).HS$:HS$."":V.100:.
256:.57.Z....F..V..Q.G.250......Q:X.Q:.Q
..G.1.56:.184:.198,2:.631,13:.632,13....
.."...LO"D$(21)N$D$(21)",8":."....RUN":.
".";:.......".."Q$D(P)" FEHLER GEFUNDEN!
":.175......".FEHLER-AUSDRUCK J/N J.
..";X$:.X$.."J"...*... 4:.4,4:SB.1.M....
4:.ST..128.."DRUCKER EINSCHALTEN! J...
";X$:..(X$."J").146:.......4,".PROGRAMM:
"H(N$,C(N$).2)Q$P"FEHLER":.4......4,".Z
EILE: CODE: FEHLER:......I.0.P.1:X.XE
(I):D(N).E(I):R.H(I):C$.C$(I):O.OE(I):F$
.C$.!....4,".";:.154:.:.4:.175:.4:.4: 4:
..[....T.1.153:T.0:.".ZEILE: CODE: FE
HLER:":D.X:.184:X.D.....P.19:.H(P),XE(P)
,E(P),C$(P),OE(P):P.0.A...H(P).R:XE(P).X
:E(P).D(N):C$(P).C$:OE(P).O:P.P.1:Q$."
"......4,R" "...(X.10));X.D(N).10" ";:
.D(N).0..4," ";.3....X.157,159,160,162,
164,165,170,167,172,171,177,179,180.E...
.P.19.1.192:.......D(N).7..4,"AUF "D$(13
)D$(34)D$(14)" DARF KEIN WEITERER FALL F
OLGEN!":..A....4,"FALLANWEISUNG AUSSERHA
LB CASE-BLOCK!":.......4,"SCHLIESSENDE F
ALLKLAMMER "D$(14)" FEHLT!":.. . ..D(N).
9..4,"ELSE BEREITS VORHANDEN!":..E....4,
"HIER KEIN ELSE ZULAESSIG!":..P....D(N).
4..4,"EXIT BEREITS VORHANDEN!":.......4,
"HIER KEIN EXIT ZULAESSIG!":.......4,"EX
IT FEHLT!":..M....D(N)..4,D$(D(N))"-BLOC
K!":.......4,"KEIN "C$"-BLOCK OFFEN!":..
....B$."BLOECKE":.N.1.B$."BLOCK".*....4,
"NOCH"N;B$" OFFEN!.]....4:.J.0.N.1:.4,E(
F$(X(J)))" < ".D$(D(J.1)):.:..Y....4,"BE
DINGUNG FEHLT!":.......4,"NAME FEHLT!":.
.D....4,"SUBROUTINE "F$" IST NICHT DEFIN
IERT!":.SB........II.1.IN:.F$..IE$(II)..
:IN.IN.1:IE$(IN).F$.....C$(P.1).F$:B.O:.
.9....IN.1.28:.4,".NICHT DEFINIERTE SUBR
OUTINEN:".Y....I.1.IN:.4,". "IE$(I):.:
..G....O.9.O.34......4,"AUF "D$(O)" DARF
NICHTS FOLGEN!":.......4,"HIER KEIN MUP
ZULAESSIG!":..P....4,"FEHLER IM MUP!":.
.....X.6:.151:.136......3,A,A$,B$,L$:.A.
20...0...."....."A;A$" "B$" "L$: 1:.A.62
.1.A.74.1.28:.:..L...X.0:.11: 2:.T.1.28,
28:.......34,WHILE,UNTIL,EXIT,EXIT2,CASE
,CASE2,CASE3,IF,ELSE,DO,[,],<<,>>,SUB.V.
...128,58,142,139,137,34,167,141,131,178
,-179,179,-177,177,158......129,151,156,
164,-35,158,ELSE.: ...234:NI.NI.1:I$(NI)
.V$:.X$.D$(28).O.B:F$.F$." (MUP)":X.9:.1
51.N ...LW.299,301,299.Q ..G.G.1:Q(G).1:
N$(G).F$:A.G:.261.. ..I(NI).(G.MU).W:IJ.
NI:... ...SB.28:Q$." .MEHR ALS": 1:.143.
. A..Q.1.46:G.Q.1:G1.G:I(0).R:MU..MU:NJ.
NI.1:SP$." "..!B.N$.N$(Q1).
"/B":.Q.0.G:.H(N$(Q),1)."#"..:N$.J(N$,2)
:G.G.1.B!C.Q2.Q:.T.2.N$.E$.V!D..LW.313,3
15,317.M!E.X.1025:.11:X.0:.53..!F..MU.0.
HS$.C$:C$."MDL":T.2:N$(Q).C$:.200..!G..2
4..!H..LW.305,307,311..!I..1:." ":.20:C
$.S$:F.Y:R.C:.26:.205..!J..20:C$.S$:F.Y:
R.C.."K..26:.L$.D$(24).213.."L..Z.0.214.
7"M.A.33:.9:.A.X.13.1:.151:.143.C"N.B.2:
.25.]"O.T$.",":B.1:.30:.B.210.."P.T$.":"
:.30:.B.NI.NI.1:I(NI)..E(J(C$,B.1)):.212
.."Q.X.13.2:.151:.143.."R.NI.NI.1:I(NI).
SB.Q"S.SB.SB.E(J(C$,B.1)).."T.C$.H(C$,B.
1):.26:I$(NI).C$:.202.!#U..258:.20:D$.S$
:.13:C$.D$:F.Y:R.C:.Z.203.0#V. 1:.MU.0..
.Y#W.C$.HS$:HS$."":N$(Q).C$:MU..(MU):.19
9.X#X..MH.0.MS..MH:MH.MS.SB:.218..#Y.MH.
MH.(B(55).256.B(56)).(MH.0):MS.MH.SB.I#Z
..I.NJ.NI:.I(I).0.I(I)..I(I):.220.Z#..I(
I).I(I).MS..#.....$..X.MS:.8:F$.D(MS):X.
U:.23:C$.D$(30)."52,".D(A).":".K$..C$.C$
.D$(30)."53,".D(B).":".D$(31):.MS.32768.
.14.~$..X.U:C$.D$(29)."I".D$(25).F$.D$(3
2).D(MH.1):.14..$..X.Q2:HS$.N$(X):N$(X).
"MLD":V.U.S:T.1:SB.0:..A$...X$.D$(23).12
7.T$...X$.D$(20).127..$...X$.D$(28).127.
.$...:.133..%...".DISKETTE MIT PROGRAMM
."C$.4%..."IN LAUFWERK"R$" EINLEGEN!.V%.
..".FERTIG J...";X$:.X$."J"...\%.....%.
..B$(218):.J.128.218:.B$(J):.:TK.J:...%.
.V$.F$:.TK.0..233..%...F$.""...Q%..Q$.""
:.J.1.C(F$):A$.J(F$,J,1):XX.F(A$)..%...X
X.127.A$.B$(XX)..%..Q$.Q$.A$:.:F$.Q$:../
&...END,FOR,NEXT,DATA,INPUT#,INPUT,DIM,R
EAD,LET.^&...GOTO,RUN,IF,RESTORE,GOSUB,R
ETURN,REM,STOP..&...ON,WAIT,LOAD,SAVE,VE
RIFY,DEF,POKE,PRINT#..&...PRINT,CONT,LIS
T,CLR,CMD,SYS,OPEN,CLOSE,GET..&...NEW,TA
B(,TO,FN,SPC(,THEN,NOT,STEP,+,-,*,/,^..'
...AND,OR,>,=,<,SGN,INT,ABS,USR,FRE,POS,
SQR.J'...RND,LOG,EXP,COS,SIN,TAN,ATN,PEE
K,LEN,STR$.Q'...VAL,ASC,CHR$,LEFT$,RIGHT
$,MID$,GO. '...CONCAT,DOPEN,DCLOSE,RECOR
D,HEADER,COLLECT.M'...BACKUP,COPY,APPEND
,DSAVE,CONCAT,CATALOG..'...RENAME,SCRATC
H,DIRECTORY..(...I(0).I(0)..(I(0).W).&(.
.W.W..((.((F.V).1000).1).1000).T(..N.0:M
.N:K.N:H.N:IJ.N:.I(0).I(0)..(I(0).W)..(.
..Q.0.G:.Q(Q).1.IJ.IJ.1:I(IJ).(Q.MU).W:.
Q.MU.0.I(IJ).100..(...:U.100:V.U:MU..MU:
G.G1:NI.NJ.1: 1: 2:.194.K(...MU.216..(..
X.0:.I(0).C$.D$(20).D(I(0)):.T.15..(....
*)..X$.H(SP$,6.C(D(R))).D(R).H(SP$,6.C(D
(K))).D(K).O)..A$.N$(Q):.H(A$,1)."#".A$.
J(A$,2).G)..." >."A$.24)X$".":..R)...A.0
....)..X.A.1:.Q(X).0.Q(X)..1:...)...Q(X)
.2.A.X:.261..)....U)...M.M.M.1:X.X(M):C$
.F$(X):B.2:T$."\":.30..)..X.6:.151..)..F
$(X).J(C$,B.1)..*..S$.H$.H(C$,B.1):...*.
..A1.0.3.#*...I.1.3.X*..HS$.S$:S$.T$:.3:
X(M.1).X(M.1).1:S$.HS$:HS$."":.4.H*..O.A
:.9:.A....*...C$..D$(O).X.11:.151..*....
.*...". PROGRAMM ."N$(Q)". NICHT VORHAND
EN!": 1: 2:...*...".STANDARD-NUMMERN J
...";X$..+...X$.."J"..".START,ABSTAND,SE
GMENT";U,S,W:V.U.=+..."MODUS: 1/2
1...";T:.T.1.T.2.44.^+...T.2.."NEUER N
AME ";E$..+..."WEITERE LAUFWERKE
N...";X$:.X$."N"....+...". 1 - ZWEITE VC
1541".E+..." 2 - IEC:DOPPEL-FLOPPY":...+
..." 1 ODER 2";X:LW.X.1..+...X.285,288:.
"..":.283..,...".SCHREIB-LAUFWERK: 8/9
8...";X:.X.8.X.9.288.G,..R$.D(9):.X.9.
R$.D(8).P,...290.., ..".SCHREIB-LAUFWERK
: 0/1 0...";X:.X.0.X.1.288..,!.R$.D(1
.X)..,".D$.D(X):.:..K,#..1,8,0,N$(Q):.1:
.182:.A.62.A.74.275.Q,$....-%..1,8,0,N$(
Q):.1:.182:.A.62.A.74.C$.N$(Q):.295..-&.
..6-'..229:.1,9,0,N$(Q):.1:.182:.A.62.A.
74.295.<-(...N-)..1,8,0,N$(Q):.1:.182:.A
.62.C$.N$(Q):.229:.297.T-*....-+..5,8,5,
F$.",P":J.A:.3,A: 5:.A.62.A.74.O.B:X.9:.
151..-,....--..5,8,5,F$.",P":J.A:.3,A: 5
:.A.62.A.74.303..-....../..5,9,5,F$.",P"
:J.A:.3,A: 5:.A.62.A.74.O.B:X.9:.151.".0
...G.1..1,8,0,C$:.1:.182:.A.62.A.74.275.
M.2...R.3..1,8,0,C$:.1:.182:.A.62.A.74.3
09.X.4.....5..229:.1,9,0,C$:.1:.182:.A.6
2.A.74.309...6...N.7..1,8,0,C$:.1:.182:.
A.62..229:.311.T.8.....9..2,8,1,"@:".N$:
.182:.A.74.....:..../;..2,E(D$),1,"@:".N
$:.182:.A.74...$/<...B/=..2,8,1,"@".D$."
:".N$:.182.H/>.....A
> CLICK IMAGE PREVIEW FOR FULL MODAL