UT 36
FILE INFORMATION
FILENAME(S): UT 36
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 01:07:57
APPEARS ON: 1 disk(s)
FILE HASH
47adb38df603e418eee4c3b1b415c6a2f9ff42bfc02458d3e47a17b433e766b7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIE DISK | UT 36 | PRG | Treasure Chest - Wolfgang Rauprich | 28 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 97 34 35 2C C2 28 31 37 34 29 |.......45,.(174)|
00000010: 3A 97 34 36 2C C2 28 31 37 35 29 3A 9C 00 27 08 |:.46,.(175):..'.|
00000020: 09 00 89 32 30 30 30 00 43 08 0A 00 8D 32 30 30 |...2000.C....200|
00000030: 31 3A 99 22 11 11 11 11 11 11 11 11 11 11 11 11 |1:."............|
00000040: 11 11 22 00 75 08 0B 00 99 22 20 12 9A B0 C0 C0 |..".u...." .....|
00000050: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000060: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000070: C0 C0 AE 92 22 00 AD 08 0C 00 99 22 20 12 9A C2 |...."......" ...|
00000080: 20 20 50 52 4F 47 52 41 4D 4D 4E 41 4D 45 4E 20 | PROGRAMMNAMEN |
00000090: 45 49 4E 47 45 42 45 4E 20 20 20 20 20 20 20 20 |EINGEBEN |
000000A0: 92 12 81 46 20 31 92 12 9A 20 C2 92 22 00 E5 08 |...F 1... .."...|
000000B0: 0D 00 99 22 20 12 9A C2 20 20 5A 55 4D 20 48 41 |..." ... ZUM HA|
000000C0: 55 50 54 4D 45 4E 55 45 20 20 20 20 20 20 20 20 |UPTMENUE |
000000D0: 20 20 20 20 20 20 20 20 92 12 81 46 20 37 92 12 | ...F 7..|
000000E0: 9A 20 C2 92 22 00 17 09 0E 00 99 22 20 12 9A AD |. .."......" ...|
000000F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000100: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000110: C0 C0 C0 C0 BD 92 22 00 2D 09 0F 00 97 31 39 38 |......".-....198|
00000120: 2C 30 3A 92 31 39 38 2C 31 3A A1 45 24 00 3F 09 |,0:.198,1:.E$.?.|
00000130: 10 00 8B 45 24 B2 C7 28 31 33 33 29 A7 33 30 00 |...E$..(133).30.|
00000140: 53 09 11 00 8B 45 24 B2 C7 28 31 33 36 29 A7 33 |S....E$..(136).3|
00000150: 30 30 30 00 5B 09 12 00 89 31 35 00 78 09 1E 00 |000.[....15.x...|
00000160: 86 49 28 31 29 3A 49 28 30 29 B2 31 3A 49 28 31 |.I(1):I(0).1:I(1|
00000170: 29 B2 30 3A 5A 5A B2 31 00 AD 09 28 00 86 41 24 |).0:ZZ.1...(..A$|
00000180: 28 39 30 29 3A 81 41 B2 30 A4 39 30 3A 87 41 24 |(90):.A.0.90:.A$|
00000190: 28 41 29 3A 82 3A 4C 24 B2 22 30 22 3A 4F 24 B2 |(A):.:L$."0":O$.|
000001A0: 22 4E 22 3A 44 24 B2 C7 28 31 36 30 29 00 BE 09 |"N":D$..(160)...|
000001B0: 32 00 99 22 13 11 11 11 11 11 11 11 11 22 00 E1 |2.."........."..|
000001C0: 09 3C 00 99 A3 36 29 3A 85 22 50 52 4F 47 52 41 |.<...6):."PROGRA|
000001D0: 4D 4D 4E 41 4D 45 20 20 20 20 9D 9D 9D 22 3B 4E |MMNAME ...";N|
000001E0: 24 00 08 0A 3D 00 8B C3 28 4E 24 29 B3 B2 30 B0 |$...=...(N$)..0.|
000001F0: C3 28 4E 24 29 B1 31 36 A7 4E 24 B2 22 22 3A 99 |.(N$).16.N$."":.|
00000200: 22 91 91 22 3A 89 36 30 00 1D 0A 50 00 4C 30 B2 |"..":.60...P.L0.|
00000210: 30 3A 53 B2 31 3A 49 28 4C 30 29 B2 30 00 52 0A |0:S.1:I(L0).0.R.|
00000220: 6E 00 81 4C B2 31 A4 C3 28 4E 24 29 3A 8B CA 28 |n..L.1..(N$):..(|
00000230: 4E 24 2C 4C 2C 31 29 B3 B1 22 3D 22 A7 82 4C 3A |N$,L,1).."="..L:|
00000240: 42 31 B2 30 3A 42 32 B2 36 33 39 39 39 3A 89 31 |B1.0:B2.63999:.1|
00000250: 36 30 00 74 0A 78 00 41 24 B2 CA 28 4E 24 2C 4C |60.t.x.A$..(N$,L|
00000260: AA 31 29 3A 4E 24 B2 C8 28 4E 24 2C 4C AB 31 29 |.1):N$..(N$,L.1)|
00000270: 3A 53 B2 30 00 AA 0A 82 00 81 4C B2 31 A4 C3 28 |:S.0......L.1..(|
00000280: 41 24 29 3A 8B CA 28 41 24 2C 4C 2C 31 29 B3 B1 |A$):..(A$,L,1)..|
00000290: 22 2D 22 A7 82 4C 3A 42 31 B2 C5 28 41 24 29 3A |"-"..L:B1..(A$):|
000002A0: 42 32 B2 41 31 3A 89 31 36 30 00 D5 0A 8C 00 42 |B2.A1:.160.....B|
000002B0: 31 B2 C5 28 C8 28 41 24 2C 4C AB 31 29 29 3A 8B |1..(.(A$,L.1)):.|
000002C0: 4C B2 C3 28 41 24 29 A7 42 32 B2 36 33 39 39 39 |L..(A$).B2.63999|
000002D0: 3A 89 31 36 30 00 E9 0A 96 00 42 32 B2 C5 28 CA |:.160.....B2..(.|
000002E0: 28 41 24 2C 4C AA 31 29 29 00 10 0B A0 00 9F 31 |(A$,L.1))......1|
000002F0: 2C 38 2C 31 35 3A 8B 49 28 4C 30 29 B2 30 A7 98 |,8,15:.I(L0).0..|
00000300: 31 2C 22 49 22 AA 4C 24 3A 49 28 4C 30 29 B2 31 |1,"I".L$:I(L0).1|
00000310: 00 2C 0B AA 00 9F 32 2C 38 2C 32 2C 4C 24 AA 22 |.,....2,8,2,L$."|
00000320: 3A 22 AA 4E 24 AA 22 2C 50 2C 52 22 00 41 0B B4 |:".N$.",P,R".A..|
00000330: 00 84 31 2C 41 2C 41 24 3A 8B 41 B2 30 A7 32 32 |..1,A,A$:.A.0.22|
00000340: 30 00 66 0B BE 00 A0 32 3A A0 31 3A 8B 41 B3 B1 |0.f....2:.1:.A..|
00000350: 36 32 A7 99 22 11 11 22 3B 41 2C 41 24 3B 22 11 |62.."..";A,A$;".|
00000360: 11 22 3A 89 35 30 00 77 0B C8 00 99 22 13 11 11 |.":.50.w...."...|
00000370: 11 11 11 11 11 11 22 00 9B 0B C9 00 99 A3 36 29 |......".......6)|
00000380: 22 44 41 53 20 50 52 4F 47 52 41 4D 4D 20 27 22 |"DAS PROGRAMM '"|
00000390: 3B 4E 24 3B 22 27 20 49 53 54 22 00 C8 0B D2 00 |;N$;"' IST".....|
000003A0: 99 A3 36 29 22 4E 49 43 48 54 20 56 4F 52 48 41 |..6)"NICHT VORHA|
000003B0: 4E 44 45 4E 21 22 3A 81 4B B2 31 A4 32 35 30 30 |NDEN!":.K.1.2500|
000003C0: 3A 82 3A 89 34 30 30 30 00 E3 0B DC 00 8D 32 30 |:.:.4000......20|
000003D0: 30 31 3A 99 22 11 11 11 11 11 11 11 11 11 11 11 |01:."...........|
000003E0: 11 11 22 00 15 0C DD 00 99 22 20 12 9A B0 C0 C0 |.."......" .....|
000003F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000400: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000410: C0 C0 AE 92 22 00 4D 0C DE 00 99 22 20 12 9A C2 |....".M...." ...|
00000420: 20 20 41 55 53 47 41 42 45 20 42 49 4C 44 53 43 | AUSGABE BILDSC|
00000430: 48 49 52 4D 20 20 20 20 20 20 20 20 20 20 20 92 |HIRM .|
00000440: 12 81 46 20 31 92 12 9A 20 20 C2 92 22 00 85 0C |..F 1... .."...|
00000450: DF 00 99 22 20 12 9A C2 20 20 41 55 53 47 41 42 |..." ... AUSGAB|
00000460: 45 20 44 52 55 43 4B 45 52 20 20 20 20 20 20 20 |E DRUCKER |
00000470: 20 20 20 20 20 20 20 92 12 81 46 20 33 92 12 9A | ...F 3...|
00000480: 20 20 C2 92 22 00 BD 0C E0 00 99 22 20 12 9A C2 | .."......" ...|
00000490: 20 20 5A 55 4D 20 48 41 55 50 54 4D 45 4E 55 45 | ZUM HAUPTMENUE|
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 | .|
000004B0: 12 81 46 20 37 92 12 9A 20 20 C2 92 22 00 EF 0C |..F 7... .."...|
000004C0: E1 00 99 22 20 12 9A AD C0 C0 C0 C0 C0 C0 C0 C0 |..." ...........|
000004D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 92 22 00 |..............".|
000004F0: 05 0D E2 00 97 31 39 38 2C 30 3A 92 31 39 38 2C |.....198,0:.198,|
00000500: 31 3A A1 45 24 00 27 0D E3 00 8B 45 24 B2 C7 28 |1:.E$.'....E$..(|
00000510: 31 33 33 29 A7 4F B2 33 3A 4C 52 B2 30 3A 4C B2 |133).O.3:LR.0:L.|
00000520: 33 39 3A 89 32 39 30 00 4F 0D E4 00 8B 45 24 B2 |39:.290.O....E$.|
00000530: C7 28 31 33 34 29 A7 4F B2 34 3A 4C 52 B2 34 3A |.(134).O.4:LR.4:|
00000540: 4C B2 37 35 3A 53 5A B2 36 36 3A 89 32 36 30 00 |L.75:SZ.66:.260.|
00000550: 63 0D E5 00 8B 45 24 B2 C7 28 31 33 36 29 A7 33 |c....E$..(136).3|
00000560: 30 30 30 00 6C 0D E6 00 89 32 32 36 00 81 0D 04 |000.l....226....|
00000570: 01 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000580: 22 00 B6 0D 0E 01 99 A3 36 29 3A 85 22 81 53 54 |".......6):.".ST|
00000590: 4F 50 20 41 4D 20 53 45 49 54 45 4E 45 4E 44 45 |OP AM SEITENENDE|
000005A0: 3F 20 28 12 4A 92 2F 12 4E 92 29 20 20 9F 4E 9D |? (.J./.N.) .N.|
000005B0: 9D 9D 22 3B 50 24 00 D6 0D 18 01 8B 50 24 B3 B1 |..";P$......P$..|
000005C0: 22 4A 22 AF 50 24 B3 B1 22 4E 22 A7 99 22 91 91 |"J".P$.."N".."..|
000005D0: 22 3A 89 32 37 30 00 ED 0D 22 01 45 52 B2 31 3A |":.270...".ER.1:|
000005E0: 53 30 B2 30 3A 5A B2 30 3A 5A 30 B2 31 00 0E 0E |S0.0:Z.0:Z0.1...|
000005F0: 2C 01 A1 23 32 2C 41 24 3A 41 44 B2 30 3A 8B 41 |,..#2,A$:AD.0:.A|
00000600: 24 B3 B1 22 22 A7 41 44 B2 C6 28 41 24 29 00 31 |$.."".AD..(A$).1|
00000610: 0E 36 01 A1 23 32 2C 41 24 3A 8B 41 24 B3 B1 22 |.6..#2,A$:.A$.."|
00000620: 22 A7 41 44 B2 41 44 AA 32 35 36 AC C6 28 41 24 |".AD.AD.256..(A$|
00000630: 29 00 6C 0E 40 01 8D 31 32 37 30 3A 9F 34 2C 4F |).l.@..1270:.4,O|
00000640: 3A 8B 4F B2 33 A7 8D 32 30 30 31 3A 99 22 50 52 |:.O.3..2001:."PR|
00000650: 4F 47 52 41 4D 4D 4E 41 4D 45 20 22 3B 4E 24 3B |OGRAMMNAME ";N$;|
00000660: A3 32 30 29 3B 41 24 3A 89 33 37 30 00 A9 0E 4A |.20);A$:.370...J|
00000670: 01 8B 53 B2 30 A7 99 22 11 11 41 42 20 53 45 49 |..S.0.."..AB SEI|
00000680: 54 45 22 3A 85 22 4F 48 4E 45 20 53 45 49 54 45 |TE":."OHNE SEITE|
00000690: 4E 5A 41 48 4C 45 4E 3A 20 12 30 92 91 9D 9D 9D |NZAHLEN: .0.....|
000006A0: 9D 9D 30 9D 9D 9D 22 3B 53 00 C6 0E 54 01 8B 53 |..0...";S...T..S|
000006B0: B3 B1 31 A7 8D 31 32 35 30 3A 5A 5A B2 5A 5A AA |..1..1250:ZZ.ZZ.|
000006C0: 31 3A 89 33 37 30 00 EF 0E 5E 01 98 34 2C C7 28 |1:.370...^..4,.(|
000006D0: 31 29 3B 22 50 52 4F 47 52 41 4D 4D 4E 41 4D 45 |1);"PROGRAMMNAME|
000006E0: 20 3A 20 22 3B 4E 24 3B C7 28 31 34 31 29 3B 00 | : ";N$;.(141);.|
000006F0: 0D 0F 68 01 98 34 2C A6 4C AB 39 29 3B 41 24 3B |..h..4,.L.9);A$;|
00000700: C7 28 31 33 29 3A 5A 5A B2 5A 5A AA 32 00 1F 0F |.(13):ZZ.ZZ.2...|
00000710: 72 01 41 44 B2 41 44 AB 31 3A 41 30 B2 41 44 00 |r.AD.AD.1:A0.AD.|
00000720: 3E 0F 86 01 A1 23 32 2C 41 24 3A 41 B2 30 3A 8B |>....#2,A$:A.0:.|
00000730: 41 24 B3 B1 22 22 A7 41 B2 C6 28 41 24 29 00 5F |A$.."".A..(A$)._|
00000740: 0F 90 01 A1 23 32 2C 41 24 3A 8B 41 24 B3 B1 22 |....#2,A$:.A$.."|
00000750: 22 A7 41 B2 41 AA 32 35 36 AC C6 28 41 24 29 00 |".A.A.256..(A$).|
00000760: 75 0F 9A 01 8B 41 B2 30 A7 41 44 B2 41 44 AA 32 |u....A.0.AD.AD.2|
00000770: 3A 89 39 37 30 00 94 0F A4 01 A1 23 32 2C 41 24 |:.970......#2,A$|
00000780: 3A 42 B2 30 3A 8B 41 24 B3 B1 22 22 A7 42 B2 C6 |:B.0:.A$.."".B..|
00000790: 28 41 24 29 00 B5 0F AE 01 A1 23 32 2C 41 24 3A |(A$)......#2,A$:|
000007A0: 8B 41 24 B3 B1 22 22 A7 42 B2 42 AA 32 35 36 AC |.A$.."".B.B.256.|
000007B0: C6 28 41 24 29 00 E6 0F B8 01 8B 42 B3 42 31 A7 |.(A$)......B.B1.|
000007C0: 99 3A 99 42 3B 22 91 91 22 3A 81 41 44 B2 41 44 |.:.B;"..":.AD.AD|
000007D0: AA 35 A4 41 AB 32 3A A1 23 32 2C 41 24 3A 82 41 |.5.A.2:.#2,A$:.A|
000007E0: 44 3A 89 39 34 30 00 F4 0F C2 01 8B 42 B1 42 32 |D:.940......B.B2|
000007F0: A7 39 37 30 00 28 10 CC 01 58 B2 30 3A 58 30 B2 |.970.(...X.0:X0.|
00000800: 30 3A 58 31 B2 30 3A 59 B2 30 3A 59 30 B2 30 3A |0:X1.0:Y.0:Y0.0:|
00000810: 59 31 B2 30 3A 8D 31 31 33 30 3A 42 24 B2 C4 28 |Y1.0:.1130:B$..(|
00000820: 42 29 3A 43 24 B2 22 22 00 5B 10 D6 01 8B 4F B2 |B):C$."".[....O.|
00000830: 33 A7 8B 53 30 B2 31 A7 99 22 11 22 3A 8D 31 33 |3..S0.1..".":.13|
00000840: 30 30 3A 99 22 91 91 91 22 3A 8B 53 24 B2 C7 28 |00:."...":.S$..(|
00000850: 31 33 29 A7 99 3A 89 31 30 39 30 00 6C 10 E0 01 |13)..:.1090.l...|
00000860: 81 41 44 B2 41 44 AA 35 A4 41 AB 32 00 86 10 EA |.AD.AD.5.A.2....|
00000870: 01 A1 23 32 2C 41 24 3A 41 B2 31 3A 8B 41 24 B2 |..#2,A$:A.1:.A$.|
00000880: 22 22 A7 41 B2 30 00 CD 10 F4 01 8F 20 49 46 59 |"".A.0...... IFY|
00000890: 3D 31 54 48 45 4E 41 24 3D 53 54 52 24 28 41 29 |=1THENA$=STR$(A)|
000008A0: 3A 47 4F 54 4F 35 31 30 20 3A 52 45 4D 20 46 55 |:GOTO510 :REM FU|
000008B0: 45 52 20 4D 41 53 43 48 49 4E 45 4E 50 52 4F 47 |ER MASCHINENPROG|
000008C0: 52 41 4D 4D 20 4E 41 43 48 20 52 45 4D 00 E9 10 |RAMM NACH REM...|
000008D0: FE 01 8B 41 B2 30 A7 41 B2 32 35 35 3A 41 24 B2 |...A.0.A.255:A$.|
000008E0: C7 28 41 29 3A 89 36 33 30 00 0F 11 08 02 41 B2 |.(A):.630.....A.|
000008F0: C6 28 41 24 29 3A 8B 41 B3 B1 35 38 A7 8B 58 B2 |.(A$):.A..58..X.|
00000900: 30 AF 5A B2 32 A7 8D 31 31 33 30 3A 5A B2 30 00 |0.Z.2..1130:Z.0.|
00000910: 2D 11 12 02 8B 41 B2 35 38 A7 58 30 B2 30 3A 8B |-....A.58.X0.0:.|
00000920: 58 B2 30 A7 5A 30 B2 30 3A 89 36 34 30 00 3F 11 |X.0.Z0.0:.640.?.|
00000930: 1C 02 8B 41 B2 33 34 A7 59 30 B2 31 AB 59 30 00 |...A.34.Y0.1.Y0.|
00000940: 5D 11 26 02 8B 41 B2 34 34 A7 8B 58 30 B2 31 A7 |].&..A.44..X0.1.|
00000950: 8B 45 52 B1 31 A7 45 52 B2 45 52 AB 32 00 A3 11 |.ER.1.ER.ER.2...|
00000960: 30 02 8F 20 49 46 41 3E 31 39 32 54 48 45 4E 49 |0.. IFA>192THENI|
00000970: 46 59 3D 31 4F 52 59 30 3D 31 54 48 45 4E 41 24 |FY=1ORY0=1THENA$|
00000980: 3D 43 48 52 24 28 41 2D 31 32 38 29 3A 52 45 4D |=CHR$(A-128):REM|
00000990: 20 46 55 45 52 20 50 45 54 2D 43 4F 44 45 2D 54 | FUER PET-CODE-T|
000009A0: 45 58 54 00 BB 11 3A 02 8B 41 B3 31 32 38 B0 59 |EXT...:..A.128.Y|
000009B0: B2 31 B0 59 30 B2 31 A7 36 33 30 00 D3 11 44 02 |.1.Y0.1.630...D.|
000009C0: 8B 41 B3 32 31 39 A7 41 24 B2 41 24 28 41 AB 31 |.A.219.A$.A$(A.1|
000009D0: 32 38 29 00 F6 11 4E 02 8B 41 B2 31 33 30 A7 58 |28)...N..A.130.X|
000009E0: 30 B2 31 3A 8B 45 52 B1 31 A7 45 52 B2 45 52 AB |0.1:.ER.1.ER.ER.|
000009F0: 32 3A 89 36 33 30 00 0A 12 58 02 8B 41 B2 31 33 |2:.630...X..A.13|
00000A00: 39 A7 5A B2 33 3A 89 36 33 30 00 2E 12 62 02 8B |9.Z.3:.630...b..|
00000A10: 41 B2 31 34 33 A7 59 B2 31 3A 8B 58 B2 30 A7 5A |A.143.Y.1:.X.0.Z|
00000A20: 30 B2 30 3A 8B 5A B2 31 A7 8D 31 31 33 30 00 6C |0.0:.Z.1..1130.l|
00000A30: 12 6C 02 8B 5A B3 33 A7 8B 41 B2 31 32 38 B0 41 |.l..Z.3..A.128.A|
00000A40: B2 31 33 37 B0 41 B2 31 33 38 B0 41 B2 31 34 32 |.137.A.138.A.142|
00000A50: B0 41 B2 31 34 34 B0 41 B2 31 34 37 B0 41 B2 31 |.A.144.A.147.A.1|
00000A60: 35 35 B0 41 B2 31 36 32 A7 37 37 30 00 87 12 76 |55.A.162.770...v|
00000A70: 02 91 58 89 36 36 30 2C 36 36 30 2C 37 38 30 2C |..X.660,660,780,|
00000A80: 37 38 30 2C 37 38 30 00 A6 12 80 02 4C 4E B2 34 |780,780.....LN.4|
00000A90: AB 28 42 B1 39 39 39 39 29 3A 4C 5A B2 4C 4E AA |.(B.9999):LZ.LN.|
00000AA0: 45 52 3A 58 B2 31 00 D2 12 8A 02 98 34 2C A6 4C |ER:X.1......4,.L|
00000AB0: 52 29 3B C9 28 22 30 30 30 22 AA CA 28 42 24 2C |R);.("000"..(B$,|
00000AC0: 32 29 2C 4C 4E 29 3B A6 45 52 29 3B 3A 42 24 B2 |2),LN);.ER);:B$.|
00000AD0: 22 22 00 F3 12 94 02 8B 4C 5A AA C3 28 42 24 29 |""......LZ..(B$)|
00000AE0: AA C3 28 41 24 29 B1 4C A7 8D 31 31 30 30 3A 8D |..(A$).L..1100:.|
00000AF0: 37 36 30 00 17 13 9E 02 8B 41 B2 31 32 39 A7 8B |760......A.129..|
00000B00: 4C 5A B1 4C 4E AA 45 52 AF 59 B2 30 AF 59 30 B2 |LZ.LN.ER.Y.0.Y0.|
00000B10: 30 A7 8D 31 31 30 30 00 3B 13 A8 02 8B 58 31 B2 |0..1100.;....X1.|
00000B20: 31 A7 8B 41 B2 33 32 B0 41 B2 34 34 B0 41 B2 35 |1..A.32.A.44.A.5|
00000B30: 38 B0 41 B2 35 39 A7 8D 37 36 30 00 53 13 B2 02 |8.A.59..760.S...|
00000B40: 8B 58 31 B2 31 A7 42 24 B2 42 24 AA 41 24 3A 89 |.X1.1.B$.B$.A$:.|
00000B50: 37 32 30 00 6A 13 BC 02 98 34 2C 41 24 3B 3A 4C |720.j....4,A$;:L|
00000B60: 5A B2 4C 5A AA C3 28 41 24 29 00 89 13 C6 02 8B |Z.LZ..(A$)......|
00000B70: 41 B2 33 32 B0 41 B2 34 34 B0 41 B2 35 39 A7 58 |A.32.A.44.A.59.X|
00000B80: 31 B2 31 3A 59 31 B2 59 30 00 9B 13 D0 02 8B 59 |1.1:Y1.Y0......Y|
00000B90: B2 31 B0 59 30 B2 31 A7 39 31 30 00 AB 13 DA 02 |.1.Y0.1.910.....|
00000BA0: 8B 41 B2 35 38 A7 58 B2 58 AA 32 00 C2 13 E4 02 |.A.58.X.X.2.....|
00000BB0: 8B 41 B2 31 32 39 A7 58 B2 32 3A 45 52 B2 45 52 |.A.129.X.2:ER.ER|
00000BC0: AA 32 00 CB 13 EE 02 89 39 31 30 00 F5 13 F8 02 |.2......910.....|
00000BD0: 98 34 2C 42 24 3B 3A 4C 5A B2 4C 5A AA C3 28 42 |.4,B$;:LZ.LZ..(B|
00000BE0: 24 29 3A 42 24 B2 22 22 3A 58 31 B2 30 3A 59 31 |$):B$."":X1.0:Y1|
00000BF0: B2 59 30 3A 8E 00 07 14 02 03 5A B2 32 3A 5A 30 |.Y0:......Z.2:Z0|
00000C00: B2 31 3A 89 36 33 30 00 1D 14 0C 03 8B 41 B2 31 |.1:.630......A.1|
00000C10: 32 39 A7 8D 31 31 30 30 3A 89 37 30 30 00 3D 14 |29..1100:.700.=.|
00000C20: 16 03 8B 41 B2 31 33 30 A7 8B 58 B2 33 AF 5A B3 |...A.130..X.3.Z.|
00000C30: B1 33 A7 8D 31 31 30 30 3A 89 37 30 30 00 51 14 |.3..1100:.700.Q.|
00000C40: 20 03 8B 41 B2 31 33 30 A7 8B 58 B2 34 A7 58 B2 | ..A.130..X.4.X.|
00000C50: 35 00 75 14 2A 03 42 24 B2 42 24 AA 41 24 3A 8B |5.u.*.B$.B$.A$:.|
00000C60: 4C 5A AA C3 28 43 24 29 AA C3 28 42 24 29 B3 B2 |LZ..(C$)..(B$)..|
00000C70: 4C A7 38 37 30 00 93 14 34 03 8B 4C 4E AA 45 52 |L.870...4..LN.ER|
00000C80: AA C3 28 43 24 29 AA C3 28 42 24 29 B3 B2 4C A7 |..(C$)..(B$)..L.|
00000C90: 38 35 30 00 A9 14 3E 03 8B 58 B2 33 A7 98 34 2C |850...>..X.3..4,|
00000CA0: 42 24 3B 3A 42 24 B2 22 22 00 C4 14 48 03 8B 58 |B$;:B$.""...H..X|
00000CB0: B1 B2 34 A7 98 34 2C 43 24 3B 3A 43 24 B2 22 22 |..4..4,C$;:C$.""|
00000CC0: 3A 58 B2 33 00 F3 14 52 03 8D 31 31 30 30 3A 98 |:X.3...R..1100:.|
00000CD0: 34 2C 43 24 AA 42 24 3B 3A 4C 5A B2 4C 5A AA C3 |4,C$.B$;:LZ.LZ..|
00000CE0: 28 43 24 AA 42 24 29 3A 8B 43 24 B3 B1 22 22 A7 |(C$.B$):.C$.."".|
00000CF0: 58 B2 33 00 03 15 5C 03 43 24 B2 22 22 3A 42 24 |X.3...\.C$."":B$|
00000D00: B2 22 22 00 1B 15 66 03 8B 41 B3 B1 35 38 B0 59 |.""...f..A..58.Y|
00000D10: B2 31 B0 59 30 B2 31 A7 39 31 30 00 3E 15 70 03 |.1.Y0.1.910.>.p.|
00000D20: 8B 58 B2 33 A7 41 24 B2 42 24 3A 42 24 B2 22 22 |.X.3.A$.B$:B$.""|
00000D30: 3A 58 B2 31 3A 58 30 B2 30 3A 89 37 30 30 00 51 |:X.1:X0.0:.700.Q|
00000D40: 15 7A 03 43 24 B2 43 24 AA 42 24 3A 42 24 B2 22 |.z.C$.C$.B$:B$."|
00000D50: 22 00 74 15 84 03 8B 58 B2 35 A7 41 24 B2 43 24 |".t....X.5.A$.C$|
00000D60: 3A 43 24 B2 22 22 3A 58 B2 31 3A 58 30 B2 30 3A |:C$."":X.1:X0.0:|
00000D70: 89 37 30 30 00 8C 15 8E 03 82 41 44 3A 98 34 2C |.700......AD:.4,|
00000D80: 43 24 AA 42 24 3B 3A 43 24 B2 22 22 00 9A 15 98 |C$.B$;:C$.""....|
00000D90: 03 8B 5A 30 B2 30 A7 5A B2 30 00 AD 15 A2 03 8B |..Z0.0.Z.0......|
00000DA0: 5A 30 B2 31 AF 5A B3 B1 32 A7 5A B2 31 00 C8 15 |Z0.1.Z..2.Z.1...|
00000DB0: AC 03 5A 30 B2 31 3A A1 23 32 2C 41 24 3A 8B 41 |..Z0.1:.#2,A$:.A|
00000DC0: 24 B2 22 22 A7 33 39 30 00 06 16 B6 03 98 34 3A |$."".390......4:|
00000DD0: 5A 5A B2 5A 5A AA 31 3A 99 22 11 11 46 45 48 4C |ZZ.ZZ.1:."..FEHL|
00000DE0: 45 52 20 49 4D 20 50 52 4F 47 52 41 4D 4D 20 4E |ER IM PROGRAMM N|
00000DF0: 41 43 48 20 5A 45 49 4C 45 22 3B 42 3B 22 21 11 |ACH ZEILE";B;"!.|
00000E00: 22 3A 5A 30 B2 30 00 0C 16 C0 03 3A 00 3A 16 CA |":Z0.0.....:.:..|
00000E10: 03 98 34 3A 98 34 3A 41 B2 B5 28 28 41 44 AB 41 |..4:.4:A..((AD.A|
00000E20: 30 29 AD 32 35 34 29 AA 31 3A 8B 4F B2 34 A7 98 |0).254).1:.O.4..|
00000E30: 34 2C A6 4C 52 AA 4C 4E 29 3B 00 56 16 D4 03 98 |4,.LR.LN);.V....|
00000E40: 34 2C 41 3B 3A 8B 41 B2 31 A7 98 34 2C 22 42 4C |4,A;:.A.1..4,"BL|
00000E50: 4F 43 4B 2C 22 3B 00 6E 16 DE 03 8B 41 B1 31 A7 |OCK,";.n....A.1.|
00000E60: 98 34 2C 22 42 4C 4F 45 43 4B 45 2C 22 3B 00 9E |.4,"BLOECKE,";..|
00000E70: 16 E8 03 8D 31 32 37 30 3A 98 34 2C 41 44 AB 41 |....1270:.4,AD.A|
00000E80: 30 3B 22 42 59 54 45 53 22 3B 3A 8B 4F B2 33 A7 |0;"BYTES";:.O.3.|
00000E90: 99 A3 32 36 29 3B 41 24 3A 89 31 30 39 30 00 D1 |..26);A$:.1090..|
00000EA0: 16 F2 03 98 34 2C C7 28 31 34 31 29 3B A6 4C AB |....4,.(141);.L.|
00000EB0: 39 29 3B 41 24 3B C7 28 31 33 29 3A 5A 5A B2 5A |9);A$;.(13):ZZ.Z|
00000EC0: 5A AA 34 3A 8B 5A 5A B1 53 5A AB 36 A7 31 30 37 |Z.4:.ZZ.SZ.6.107|
00000ED0: 30 00 12 17 FC 03 99 22 11 11 4E 45 55 45 20 53 |0......"..NEUE S|
00000EE0: 45 49 54 45 3F 20 28 12 4A 92 2F 12 4E 92 29 20 |EITE? (.J./.N.) |
00000EF0: 22 3A 99 22 45 4E 44 45 3A 20 12 52 45 54 55 52 |":."ENDE: .RETUR|
00000F00: 4E 92 20 20 20 20 20 20 91 22 3B 3A 97 31 36 37 |N. .";:.167|
00000F10: 2C 30 00 26 17 06 04 A1 41 24 3A 8B 41 24 B2 22 |,0.&....A$:.A$."|
00000F20: 22 A7 31 30 33 30 00 51 17 10 04 97 31 36 37 2C |".1030.Q....167,|
00000F30: 31 3A 8B 41 24 B2 C7 28 31 33 29 A7 99 22 20 11 |1:.A$..(13).." .|
00000F40: 11 22 3A A0 34 3A A0 32 3A A0 31 3A 89 33 30 30 |.":.4:.2:.1:.300|
00000F50: 30 00 77 17 1A 04 99 41 24 3A 8B 41 24 B2 22 4E |0.w....A$:.A$."N|
00000F60: 22 A7 99 3A 98 34 3A 98 34 3A 5A 5A B2 5A 5A AA |"..:.4:.4:ZZ.ZZ.|
00000F70: 32 3A 89 31 30 39 30 00 8C 17 24 04 8B 41 24 B3 |2:.1090...$..A$.|
00000F80: B1 22 4A 22 A7 99 3A 89 31 30 32 30 00 A8 17 2E |."J"..:.1020....|
00000F90: 04 81 5A 5A B2 5A 5A A4 53 5A AA 36 3A 98 34 3A |..ZZ.ZZ.SZ.6:.4:|
00000FA0: 82 5A 5A 3A 5A 5A B2 31 00 B7 17 38 04 8B 5A 30 |.ZZ:ZZ.1...8..Z0|
00000FB0: B2 31 A7 99 22 93 22 00 C4 17 42 04 A0 34 3A A0 |.1.."."...B..4:.|
00000FC0: 32 3A A0 31 00 F3 17 47 04 99 22 11 12 81 20 20 |2:.1...G.."... |
00000FD0: 20 20 44 41 54 45 4E 45 4E 44 45 20 20 2A 20 05 | DATENENDE * .|
00000FE0: 44 52 55 45 43 4B 20 53 50 41 43 45 20 20 20 20 |DRUECK SPACE |
00000FF0: 20 92 22 00 09 18 48 04 97 31 39 38 2C 30 3A 92 | ."...H..198,0:.|
00001000: 31 39 38 2C 31 3A A1 45 24 00 1C 18 49 04 8B 45 |198,1:.E$...I..E|
00001010: 24 B2 C7 28 33 32 29 A7 33 30 30 30 00 26 18 4A |$..(32).3000.&.J|
00001020: 04 89 31 30 39 36 00 42 18 4C 04 8F 20 50 52 4F |..1096.B.L.. PRO|
00001030: 47 52 41 4D 4D 5A 45 49 4C 45 20 5A 55 20 4C 41 |GRAMMZEILE ZU LA|
00001040: 4E 47 00 73 18 56 04 8D 31 31 33 30 3A 4C 5A B2 |NG.s.V..1130:LZ.|
00001050: 4C 4E AA 45 52 3A 98 34 2C A6 4C 52 AA 4C 5A 29 |LN.ER:.4,.LR.LZ)|
00001060: 3B 3A 8B 4F B2 33 A7 8B 59 31 B2 31 A7 97 32 30 |;:.O.3..Y1.1..20|
00001070: 35 2C 31 00 82 18 60 04 58 B2 31 3A 58 31 B2 30 |5,1...`.X.1:X1.0|
00001080: 3A 8E 00 9F 18 6A 04 8F 20 4E 45 55 45 20 5A 45 |:....j.. NEUE ZE|
00001090: 49 4C 45 2C 20 4E 45 55 45 20 53 45 49 54 45 00 |ILE, NEUE SEITE.|
000010A0: BB 18 74 04 98 34 3A 99 22 11 20 20 20 20 20 20 |..t..4:.". |
000010B0: 20 20 20 20 20 20 20 20 20 20 22 00 D0 18 7E 04 | "...~.|
000010C0: A1 53 24 3A 8B 53 24 B2 22 20 22 A7 53 30 B2 31 |.S$:.S$." ".S0.1|
000010D0: 00 FB 18 88 04 8B 4F B2 34 A7 8B 53 30 B2 31 A7 |......O.4..S0.1.|
000010E0: 8D 31 33 30 30 3A 8B 53 24 B2 C7 28 31 33 29 A7 |.1300:.S$..(13).|
000010F0: 99 22 91 91 22 3A 89 31 30 39 30 00 30 19 97 04 |."..":.1090.0...|
00001100: 8B 53 30 B2 30 A7 99 22 9F 53 54 4F 50 3A 20 20 |.S0.0..".STOP: |
00001110: 12 9E 4C 45 45 52 54 41 53 54 45 92 9F 20 20 20 |..LEERTASTE.. |
00001120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00001130: 00 42 19 9C 04 99 22 91 91 91 22 3A 8B 4F B2 33 |.B...."...":.O.3|
00001140: A7 8E 00 57 19 A6 04 5A 5A B2 5A 5A AA 31 3A 8B |...W...ZZ.ZZ.1:.|
00001150: 5A 5A B3 53 5A A7 8E 00 69 19 B0 04 8B 5A 5A B2 |ZZ.SZ...i....ZZ.|
00001160: 53 5A AF 5A B3 B1 32 A7 8E 00 6F 19 BA 04 3A 00 |SZ.Z..2...o...:.|
00001170: 7D 19 C4 04 8B 5A 5A B2 53 5A A7 98 34 00 AC 19 |}....ZZ.SZ..4...|
00001180: CE 04 81 5A 5A B2 AB 33 A4 32 3A 98 34 3A 82 3A |...ZZ..3.2:.4:.:|
00001190: 8B 50 24 B2 22 4A 22 A7 8D 31 33 30 30 3A 8B 53 |.P$."J"..1300:.S|
000011A0: 24 B2 C7 28 31 33 29 A7 31 30 39 30 00 C5 19 D8 |$..(13).1090....|
000011B0: 04 53 B2 53 AA 31 3A 5A B2 30 3A 8D 31 32 35 30 |.S.S.1:Z.0:.1250|
000011C0: 3A 98 34 3A 8E 00 F3 19 E2 04 98 34 2C A6 4C 52 |:.4:.......4,.LR|
000011D0: 29 3B 4E 24 3B A6 35 29 3B 44 24 3B 3A 8B 53 B1 |);N$;.5);D$;:.S.|
000011E0: 30 A7 98 34 2C A6 35 29 3B 22 53 45 49 54 45 22 |0..4,.5);"SEITE"|
000011F0: 3B 53 3B 00 FC 19 EC 04 98 34 3A 8E 00 24 1A F6 |;S;......4:..$..|
00001200: 04 41 24 B2 22 22 3A 41 B2 41 44 3A 81 49 B2 31 |.A$."":A.AD:.I.1|
00001210: A4 34 3A 42 B2 41 AF 31 35 3A 8B 42 B1 39 A7 42 |.4:B.A.15:.B.9.B|
00001220: B2 42 AA 37 00 43 1A 00 05 41 24 B2 C7 28 42 AA |.B.7.C...A$..(B.|
00001230: 34 38 29 AA 41 24 3A 41 B2 B5 28 41 AD 31 36 29 |48).A$:A..(A.16)|
00001240: 3A 82 49 00 5E 1A 0A 05 41 24 B2 22 24 22 AA 41 |:.I.^...A$."$".A|
00001250: 24 AA 22 20 3D 22 AA C4 28 41 44 29 3A 8E 00 6C |$." ="..(AD):..l|
00001260: 1A 0B 05 8B 4F B2 34 A7 31 32 39 33 00 76 1A 0C |....O.4.1293.v..|
00001270: 05 89 31 33 30 30 00 89 1A 0D 05 99 22 13 11 11 |..1300......"...|
00001280: 11 11 11 11 11 11 11 11 22 00 BA 1A 14 05 99 22 |........"......"|
00001290: 53 54 41 52 54 3A 12 9A 4C 45 45 52 54 41 53 54 |START:..LEERTAST|
000012A0: 45 92 9F 20 41 42 42 52 45 43 48 45 4E 3A 12 9A |E.. ABBRECHEN:..|
000012B0: 52 45 54 55 52 4E 92 9F 91 22 00 DA 1A 1E 05 A1 |RETURN..."......|
000012C0: 53 24 3A 8B 53 24 B3 B1 22 20 22 AF 53 24 B3 B1 |S$:.S$.." ".S$..|
000012D0: C7 28 31 33 29 A7 31 33 31 30 00 10 1B 2D 05 99 |.(13).1310...-..|
000012E0: 22 9F 53 54 4F 50 3A 20 20 20 20 20 20 20 20 20 |".STOP: |
000012F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001300: 20 20 20 20 20 20 91 9F 22 3A 53 30 B2 30 3A 8E | ..":S0.0:.|
00001310: 00 3E 1B 32 05 83 20 45 4E 44 2C 46 4F 52 2C 4E |.>.2.. END,FOR,N|
00001320: 45 58 54 2C 44 41 54 41 2C 49 4E 50 55 54 23 2C |EXT,DATA,INPUT#,|
00001330: 49 4E 50 55 54 2C 44 49 4D 2C 52 45 41 44 00 6D |INPUT,DIM,READ.m|
00001340: 1B 3C 05 83 20 4C 45 54 2C 47 4F 54 4F 2C 52 55 |.<.. LET,GOTO,RU|
00001350: 4E 2C 49 46 2C 52 45 53 54 4F 52 45 2C 47 4F 53 |N,IF,RESTORE,GOS|
00001360: 55 42 2C 52 45 54 55 52 4E 2C 52 45 4D 00 9A 1B |UB,RETURN,REM...|
00001370: 46 05 83 20 53 54 4F 50 2C 4F 4E 2C 57 41 49 54 |F.. STOP,ON,WAIT|
00001380: 2C 4C 4F 41 44 2C 53 41 56 45 2C 56 45 52 49 46 |,LOAD,SAVE,VERIF|
00001390: 59 2C 44 45 46 2C 50 4F 4B 45 00 C8 1B 50 05 83 |Y,DEF,POKE...P..|
000013A0: 20 50 52 49 4E 54 23 2C 50 52 49 4E 54 2C 43 4F | PRINT#,PRINT,CO|
000013B0: 4E 54 2C 4C 49 53 54 2C 43 4C 52 2C 43 4D 44 2C |NT,LIST,CLR,CMD,|
000013C0: 53 59 53 2C 4F 50 45 4E 00 F1 1B 5A 05 83 20 43 |SYS,OPEN...Z.. C|
000013D0: 4C 4F 53 45 2C 47 45 54 2C 4E 45 57 2C 54 41 42 |LOSE,GET,NEW,TAB|
000013E0: 28 2C 54 4F 2C 46 4E 2C 53 50 43 28 2C 54 48 45 |(,TO,FN,SPC(,THE|
000013F0: 4E 00 0E 1C 64 05 83 20 4E 4F 54 2C 53 54 45 50 |N...d.. NOT,STEP|
00001400: 2C 2B 2C 2D 2C 2A 2C 2F 2C 5E 2C 41 4E 44 00 2D |,+,-,*,/,^,AND.-|
00001410: 1C 6E 05 83 20 4F 52 2C 3E 2C 3D 2C 3C 2C 53 47 |.n.. OR,>,=,<,SG|
00001420: 4E 2C 49 4E 54 2C 41 42 53 2C 55 53 52 00 53 1C |N,INT,ABS,USR.S.|
00001430: 78 05 83 20 46 52 45 2C 50 4F 53 2C 53 51 52 2C |x.. FRE,POS,SQR,|
00001440: 52 4E 44 2C 4C 4F 47 2C 45 58 50 2C 43 4F 53 2C |RND,LOG,EXP,COS,|
00001450: 53 49 4E 00 7C 1C 82 05 83 20 54 41 4E 2C 41 54 |SIN.|.... TAN,AT|
00001460: 4E 2C 50 45 45 4B 2C 4C 45 4E 2C 53 54 52 24 2C |N,PEEK,LEN,STR$,|
00001470: 56 41 4C 2C 41 53 43 2C 43 48 52 24 00 B2 1C 8C |VAL,ASC,CHR$....|
00001480: 05 83 20 4C 45 46 54 24 2C 52 49 47 48 54 24 2C |.. LEFT$,RIGHT$,|
00001490: 4D 49 44 24 2C 47 4F 2C 43 4F 4E 43 41 54 2C 44 |MID$,GO,CONCAT,D|
000014A0: 4F 50 45 4E 2C 44 43 4C 4F 53 45 2C 52 45 43 4F |OPEN,DCLOSE,RECO|
000014B0: 52 44 00 EE 1C 96 05 83 20 48 45 41 44 45 52 2C |RD...... HEADER,|
000014C0: 43 4F 4C 4C 45 43 54 2C 42 41 43 4B 55 50 2C 43 |COLLECT,BACKUP,C|
000014D0: 4F 50 59 2C 41 50 50 45 4E 44 2C 44 53 41 56 45 |OPY,APPEND,DSAVE|
000014E0: 2C 44 4C 4F 41 44 2C 43 41 54 41 4C 4F 47 00 0D |,DLOAD,CATALOG..|
000014F0: 1D A0 05 83 20 52 45 4E 41 4D 45 2C 53 43 52 41 |.... RENAME,SCRA|
00001500: 54 43 48 2C 44 49 52 45 43 54 4F 52 59 00 2F 1D |TCH,DIRECTORY./.|
00001510: D0 07 97 35 33 32 38 30 2C 36 3A 97 35 33 32 38 |...53280,6:.5328|
00001520: 31 2C 30 3A 8D 32 30 30 31 3A 89 32 30 31 30 00 |1,0:.2001:.2010.|
00001530: 61 1D D1 07 99 22 91 93 9E 20 B0 C0 C0 C0 C0 C0 |a...."... ......|
00001540: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001550: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE |................|
00001560: 22 00 94 1D D2 07 99 22 20 C2 12 9C 20 20 20 20 |"......" ... |
00001570: 20 20 20 20 53 54 52 55 4B 54 55 52 49 45 52 54 | STRUKTURIERT|
00001580: 45 53 20 4C 49 53 54 45 4E 20 20 20 20 20 20 20 |ES LISTEN |
00001590: 92 9E C2 22 00 C8 1D D3 07 99 22 20 AD C0 C0 C0 |..."......" ....|
000015A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000015B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000015C0: C0 BD 11 11 9F 22 3A 8E 00 EE 1D DA 07 99 A3 34 |.....":........4|
000015D0: 29 22 4D 49 54 20 44 49 45 53 45 4E 20 50 52 4F |)"MIT DIESEN PRO|
000015E0: 47 52 41 4D 4D 20 4B 4F 45 4E 4E 45 4E 22 00 13 |GRAMM KOENNEN"..|
000015F0: 1E DB 07 99 A3 34 29 22 53 49 45 20 41 4E 44 45 |.....4)"SIE ANDE|
00001600: 52 45 20 42 41 53 49 43 2D 50 52 4F 47 52 41 4D |RE BASIC-PROGRAM|
00001610: 4D 45 22 00 39 1E DC 07 99 A3 34 29 22 41 55 46 |ME".9.....4)"AUF|
00001620: 4C 49 53 54 45 4E 2E 20 44 49 45 20 41 55 53 47 |LISTEN. DIE AUSG|
00001630: 41 42 45 20 4B 41 4E 4E 22 00 5F 1E DD 07 99 A3 |ABE KANN"._.....|
00001640: 34 29 22 55 45 42 45 52 20 42 49 4C 44 53 43 48 |4)"UEBER BILDSCH|
00001650: 49 52 4D 20 4F 44 45 52 20 55 45 42 45 52 22 00 |IRM ODER UEBER".|
00001660: 87 1E DE 07 99 A3 34 29 22 44 52 55 43 4B 45 52 |......4)"DRUCKER|
00001670: 20 45 52 46 4F 4C 47 45 4E 2E 20 44 49 45 20 41 | ERFOLGEN. DIE A|
00001680: 55 53 47 41 42 45 22 00 AF 1E DF 07 99 A3 34 29 |USGABE".......4)|
00001690: 22 4B 4F 45 4E 4E 45 4E 20 53 49 45 20 28 42 45 |"KOENNEN SIE (BE|
000016A0: 49 20 44 52 55 43 4B 45 52 20 4F 44 45 52 22 00 |I DRUCKER ODER".|
000016B0: D9 1E E0 07 99 A3 34 29 22 42 49 4C 44 53 43 48 |......4)"BILDSCH|
000016C0: 49 52 4D 29 20 4D 49 54 20 44 45 52 20 53 50 41 |IRM) MIT DER SPA|
000016D0: 43 45 2D 54 41 53 54 45 22 00 02 1F E1 07 99 A3 |CE-TASTE".......|
000016E0: 34 29 22 53 54 4F 50 50 45 4E 2E 20 48 41 4C 54 |4)"STOPPEN. HALT|
000016F0: 45 4E 20 53 49 45 20 53 49 43 48 20 42 49 54 54 |EN SIE SICH BITT|
00001700: 45 22 00 2B 1F E2 07 99 A3 34 29 22 41 4E 20 44 |E".+.....4)"AN D|
00001710: 49 45 20 50 52 4F 47 52 41 4D 4D 41 4E 57 45 49 |IE PROGRAMMANWEI|
00001720: 53 55 4E 47 45 4E 2E 11 11 05 22 00 43 1F E3 07 |SUNGEN....".C...|
00001730: 99 A3 31 33 29 22 44 52 55 45 43 4B 20 53 50 41 |..13)"DRUECK SPA|
00001740: 43 45 22 00 59 1F E4 07 97 31 39 38 2C 30 3A 92 |CE".Y....198,0:.|
00001750: 31 39 38 2C 31 3A A1 45 24 00 6C 1F E5 07 8B 45 |198,1:.E$.l....E|
00001760: 24 B2 C7 28 33 32 29 A7 33 30 30 30 00 76 1F E6 |$..(32).3000.v..|
00001770: 07 89 32 30 32 30 00 89 1F B8 0B 8D 32 30 30 31 |..2020......2001|
00001780: 3A 99 22 11 11 11 11 11 22 00 AF 1F B9 0B 99 A3 |:.".....".......|
00001790: 36 29 22 50 52 4F 47 52 41 4D 4D 20 41 55 53 46 |6)"PROGRAMM AUSF|
000017A0: 55 45 48 52 45 4E 20 20 20 20 5B 31 5D 11 22 00 |UEHREN [1].".|
000017B0: D5 1F BA 0B 99 A3 36 29 22 50 52 4F 47 52 41 4D |......6)"PROGRAM|
000017C0: 4D 20 42 45 45 4E 44 45 4E 20 20 20 20 20 20 20 |M BEENDEN |
000017D0: 5B 32 5D 11 22 00 FA 1F BB 0B 99 A3 36 29 22 5A |[2].".......6)"Z|
000017E0: 55 4D 20 55 54 49 4C 49 54 49 45 20 2D 20 4D 45 |UM UTILITIE - ME|
000017F0: 4E 55 45 20 20 20 5B 33 5D 22 00 10 20 BD 0B 97 |NUE [3]".. ...|
00001800: 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 45 24 |198,0:.198,1:.E$|
00001810: 00 24 20 BE 0B 8B 45 24 B2 22 31 22 A7 9C 3A 8C |.$ ...E$."1"..:.|
00001820: 3A 89 31 30 00 37 20 BF 0B 8B 45 24 B2 22 32 22 |:.10.7 ...E$."2"|
00001830: A7 9E 36 34 37 33 38 00 48 20 C0 0B 8B 45 24 B2 |..64738.H ...E$.|
00001840: 22 33 22 A7 33 30 31 30 00 52 20 C1 0B 89 33 30 |"3".3010.R ...30|
00001850: 30 35 00 90 20 C2 0B 99 22 13 11 11 11 11 11 11 |05.. ...".......|
00001860: 11 11 11 11 11 11 11 11 11 22 A3 36 29 22 95 42 |.........".6)".B|
00001870: 49 54 54 45 20 57 41 52 54 45 4E 20 20 20 20 20 |ITTE WARTEN |
00001880: 20 20 20 20 22 3A 93 22 4D 45 4E 55 45 22 2C 38 | ":."MENUE",8|
00001890: 00 A5 20 A0 0F A0 34 3A A0 32 3A A0 31 3A 9C 3A |.. ...4:.2:.1:.:|
000018A0: 8C 3A 89 31 30 00 00 00 |.:.10... |
.......45,B(174):.46,B(175):..'....2000.
C....2001:."..............".U...." .....
...................................."...
..." ..B PROGRAMMNAMEN EINGEBEN
...F 1... B."......" ..B ZUM HAUPTMENUE
...F 7... B."......" ...
......................................".
-....198,0:.198,1:.E$.?....E$.G(133).30.
S....E$.G(136).3000.[....15.X....I(1):I(
0).1:I(1).0:ZZ.1...(..A$(90):.A.0.90:.A$
(A):.:L$."0":O$."N":D$.G(160)...2.."....
....."...<...6):."PROGRAMMNAME ...";N
$...=..C(N$)..0.C(N$).16.N$."":."..":.60
...P.L0.0:S.1:I(L0).0.R.N..L.1.C(N$):.J(
N$,L,1).."="..L:B1.0:B2.63999:.160.T.X.A
$.J(N$,L.1):N$.H(N$,L.1):S.0......L.1.C(
A$):.J(A$,L,1).."-"..L:B1.E(A$):B2.A1:.1
60.U...B1.E(H(A$,L.1)):.L.C(A$).B2.63999
:.160.....B2.E(J(A$,L.1))... ..1,8,15:.I
(L0).0..1,"I".L$:I(L0).1.,....2,8,2,L$."
:".N$.",P,R".A....1,A,A$:.A.0.220.F... 2
: 1:.A..62.."..";A,A$;"..":.50.W.H.."...
......"...I...6)"DAS PROGRAMM '";N$;"' I
ST".H.R...6)"NICHT VORHANDEN!":.K.1.2500
:.:.4000......2001:.".............".....
." .....................................
....".M...." ..B AUSGABE BILDSCHIRM
...F 1... B."......" ..B AUSGAB
E DRUCKER ...F 3... B."...
..." ..B ZUM HAUPTMENUE .
..F 7... B."......" ...................
......................"......198,0:.198,
1:.E$.'....E$.G(133).O.3:LR.0:L.39:.290.
O....E$.G(134).O.4:LR.4:L.75:SZ.66:.260.
C....E$.G(136).3000.L....226......".....
........".......6):.".STOP AM SEITENENDE
? (.J./.N.) .N...";P$.V....P$.."J".P$..
"N".."..":.270...".ER.1:S0.0:Z.0:Z0.1...
,..#2,A$:AD.0:.A$.."".AD.F(A$).1.6..#2,A
$:.A$.."".AD.AD.256.F(A$).L.@..1270:.4,O
:.O.3..2001:."PROGRAMMNAME ";N$;.20);A$:
.370...J..S.0.."..AB SEITE":."OHNE SEITE
NZAHLEN: .0.......0...";S.F.T..S..1..125
0:ZZ.ZZ.1:.370...^..4,G(1);"PROGRAMMNAME
: ";N$;G(141);...H..4,.L.9);A$;G(13):ZZ
.ZZ.2...R.AD.AD.1:A0.AD.>....#2,A$:A.0:.
A$.."".A.F(A$)._....#2,A$:.A$.."".A.A.25
6.F(A$).U....A.0.AD.AD.2:.970......#2,A$
:B.0:.A$.."".B.F(A$)......#2,A$:.A$.."".
B.B.256.F(A$)......B.B1..:.B;"..":.AD.AD
.5.A.2:.#2,A$:.AD:.940...B..B.B2.970.(.L
.X.0:X0.0:X1.0:Y.0:Y0.0:Y1.0:.1130:B$.D(
B):C$."".[.V..O.3..S0.1..".":.1300:."...
":.S$.G(13)..:.1090.L....AD.AD.5.A.2....
..#2,A$:A.1:.A$."".A.0.M.... IFY=1THENA$
=STR$(A):GOTO510 :REM FUER MASCHINENPROG
RAMM NACH REM......A.0.A.255:A$.G(A):.63
0.....A.F(A$):.A..58..X.0.Z.2..1130:Z.0.
-....A.58.X0.0:.X.0.Z0.0:.640.?....A.34.
Y0.1.Y0.].&..A.44..X0.1..ER.1.ER.ER.2...
0.. IFA>192THENIFY=1ORY0=1THENA$=CHR$(A-
128):REM FUER PET-CODE-TEXT...:..A.128.Y
.1.Y0.1.630.S.D..A.219.A$.A$(A.128)...N.
.A.130.X0.1:.ER.1.ER.ER.2:.630...X..A.13
9.Z.3:.630...B..A.143.Y.1:.X.0.Z0.0:.Z.1
..1130.L.L..Z.3..A.128.A.137.A.138.A.142
.A.144.A.147.A.155.A.162.770...V..X.660,
660,780,780,780.....LN.4.(B.9999):LZ.LN.
ER:X.1.R....4,.LR);I("000".J(B$,2),LN);.
ER);:B$.""......LZ.C(B$).C(A$).L..1100:.
760......A.129..LZ.LN.ER.Y.0.Y0.0..1100.
;....X1.1..A.32.A.44.A.58.A.59..760.S...
.X1.1.B$.B$.A$:.720.J....4,A$;:LZ.LZ.C(A
$)...F..A.32.A.44.A.59.X1.1:Y1.Y0...P..Y
.1.Y0.1.910...Z..A.58.X.X.2.B....A.129.X
.2:ER.ER.2.K....910......4,B$;:LZ.LZ.C(B
$):B$."":X1.0:Y1.Y0:......Z.2:Z0.1:.630.
.....A.129..1100:.700.=....A.130..X.3.Z.
.3..1100:.700.Q. ..A.130..X.4.X.5.U.*.B$
.B$.A$:.LZ.C(C$).C(B$)..L.870...4..LN.ER
.C(C$).C(B$)..L.850...>..X.3..4,B$;:B$."
".D.H..X..4..4,C$;:C$."":X.3...R..1100:.
4,C$.B$;:LZ.LZ.C(C$.B$):.C$.."".X.3...\.
C$."":B$.""...F..A..58.Y.1.Y0.1.910.>.P.
.X.3.A$.B$:B$."":X.1:X0.0:.700.Q.Z.C$.C$
.B$:B$."".T....X.5.A$.C$:C$."":X.1:X0.0:
.700......AD:.4,C$.B$;:C$.""......Z0.0.Z
.0......Z0.1.Z..2.Z.1.H...Z0.1:.#2,A$:.A
$."".390......4:ZZ.ZZ.1:."..FEHLER IM PR
OGRAMM NACH ZEILE";B;"!.":Z0.0.....:.:.J
..4:.4:A..((AD.A0).254).1:.O.4..4,.LR.LN
);.V.T..4,A;:.A.1..4,"BLOCK,";.N....A.1.
.4,"BLOECKE,";......1270:.4,AD.A0;"BYTES
";:.O.3...26);A$:.1090.Q....4,G(141);.L.
9);A$;G(13):ZZ.ZZ.4:.ZZ.SZ.6.1070......"
..NEUE SEITE? (.J./.N.) ":."ENDE: .RETUR
N. .";:.167,0.&....A$:.A$."".1030.Q
....167,1:.A$.G(13).." ..": 4: 2: 1:.300
0.W....A$:.A$."N"..:.4:.4:ZZ.ZZ.2:.1090.
..$..A$.."J"..:.1020......ZZ.ZZ.SZ.6:.4:
.ZZ:ZZ.1...8..Z0.1..".".D.B. 4: 2: 1...G
.."... DATENENDE * .DRUECK SPACE
."...H..198,0:.198,1:.E$...I..E$.G(32).
3000.&.J..1096.B.L.. PROGRAMMZEILE ZU LA
NG.S.V..1130:LZ.LN.ER:.4,.LR.LZ);:.O.3..
Y1.1..205,1...`.X.1:X1.0:....J.. NEUE ZE
ILE, NEUE SEITE...T..4:.".
".P.~..S$:.S$." ".S0.1......O.4..S0.1.
.1300:.S$.G(13).."..":.1090.0....S0.0.."
.STOP: ..LEERTASTE.. ";
.B...."...":.O.3...W...ZZ.ZZ.1:.ZZ.SZ...
I....ZZ.SZ.Z..2...O...:.}.D..ZZ.SZ..4...
N..ZZ..3.2:.4:.:.P$."J"..1300:.S$.G(13).
1090.E.X.S.S.1:Z.0:.1250:.4:.......4,.LR
);N$;.5);D$;:.S.0..4,.5);"SEITE";S;.....
.4:..$...A$."":A.AD:.I.1.4:B.A.15:.B.9.B
.B.7.C...A$.G(B.48).A$:A..(A.16):.I.^...
A$."$".A$." =".D(AD):..L....O.4.1293.V..
..1300......"..........."......"START:..
LEERTASTE.. ABBRECHEN:..RETURN...".Z....
S$:.S$.." ".S$..G(13).1310...-..".STOP:
..":S0.0:.
.>.2.. END,FOR,NEXT,DATA,INPUT#,INPUT,DI
M,READ.M.<.. LET,GOTO,RUN,IF,RESTORE,GOS
UB,RETURN,REM...F.. STOP,ON,WAIT,LOAD,SA
VE,VERIFY,DEF,POKE.H.P.. PRINT#,PRINT,CO
NT,LIST,CLR,CMD,SYS,OPEN...Z.. CLOSE,GET
,NEW,TAB(,TO,FN,SPC(,THEN...D.. NOT,STEP
,+,-,*,/,^,AND.-.N.. OR,>,=,<,SGN,INT,AB
S,USR.S.X.. FRE,POS,SQR,RND,LOG,EXP,COS,
SIN.|.... TAN,ATN,PEEK,LEN,STR$,VAL,ASC,
CHR$...... LEFT$,RIGHT$,MID$,GO,CONCAT,D
OPEN,DCLOSE,RECORD...... HEADER,COLLECT,
BACKUP,COPY,APPEND,DSAVE,DLOAD,CATALOG..
. .. RENAME,SCRATCH,DIRECTORY./.P..53280
,6:.53281,0:.2001:.2010.A.Q.."... ......
................................"...R.."
B.. STRUKTURIERTES LISTEN
..B".H.S.." ............................
.............":....Z...4)"MIT DIESEN PRO
GRAMM KOENNEN".......4)"SIE ANDERE BASIC
-PROGRAMME".9.....4)"AUFLISTEN. DIE AUSG
ABE KANN"._.....4)"UEBER BILDSCHIRM ODER
UEBER".......4)"DRUCKER ERFOLGEN. DIE A
USGABE".......4)"KOENNEN SIE (BEI DRUCKE
R ODER".Y.....4)"BILDSCHIRM) MIT DER SPA
CE-TASTE".......4)"STOPPEN. HALTEN SIE S
ICH BITTE".+.....4)"AN DIE PROGRAMMANWEI
SUNGEN....".C.....13)"DRUECK SPACE".Y...
.198,0:.198,1:.E$.L....E$.G(32).3000.V..
..2020......2001:.".....".......6)"PROGR
AMM AUSFUEHREN [1].".U.....6)"PROGRAM
M BEENDEN [2].".......6)"ZUM UTILI
TIE - MENUE [3]".. ...198,0:.198,1:.E$
.$ ...E$."1"..:.:.10.7 ...E$."2"..64738.
H ...E$."3".3010.R A..3005.. B..".......
.........".6)".BITTE WARTEN ":."
MENUE",8.. . 4: 2: 1:.:.:.10...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL