> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 8F 20 20 20 2A 2A 2A 2A 2A 2A |....... ******|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B |**************.;|
00000020: 08 14 00 8F 20 20 20 2A 3D 3D 3D 3D 3D 3D 3D 3D |.... *========|
00000030: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 2A 00 58 08 1E 00 |==========*.X...|
00000040: 8F 20 20 20 2A 3D 3D 3D 43 48 41 4E 47 45 3D 42 |. *===CHANGE=B|
00000050: 41 53 49 43 3D 3D 3D 2A 00 75 08 28 00 8F 20 20 |ASIC===*.u.(.. |
00000060: 20 2A 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | *==============|
00000070: 3D 3D 3D 3D 2A 00 92 08 32 00 8F 20 20 20 2A 3D |====*...2.. *=|
00000080: 3D 3D 3D 57 52 49 54 54 45 4E 3D 42 59 3D 3D 3D |===WRITTEN=BY===|
00000090: 3D 2A 00 AF 08 3C 00 8F 20 20 20 2A 3D 3D 3D 3D |=*...<.. *====|
000000A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 2A 00 |==============*.|
000000B0: CC 08 46 00 8F 20 20 20 2A 3D 4A 55 45 52 47 45 |..F.. *=JUERGE|
000000C0: 4E 3D 48 41 52 54 4D 41 4E 4E 3D 2A 00 E9 08 50 |N=HARTMANN=*...P|
000000D0: 00 8F 20 20 20 2A 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. *==========|
000000E0: 3D 3D 3D 3D 3D 3D 3D 3D 2A 00 06 09 5A 00 8F 20 |========*...Z.. |
000000F0: 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | **************|
00000100: 2A 2A 2A 2A 2A 2A 00 0C 09 64 00 3A 00 12 09 6E |******...d.:...n|
00000110: 00 3A 00 25 09 78 00 86 20 41 24 28 37 37 29 2C |.:.%.x.. A$(77),|
00000120: 53 28 37 37 29 00 47 09 82 00 8D 20 20 20 36 31 |S(77).G.... 61|
00000130: 30 3A 8F 20 42 49 4C 44 20 57 41 45 48 52 45 4E |0:. BILD WAEHREN|
00000140: 44 20 50 4F 4B 45 4E 00 63 09 8C 00 89 20 20 20 |D POKEN.c.... |
00000150: 20 32 32 30 3A 8F 20 52 4F 4D 20 4B 4F 50 49 45 | 220:. ROM KOPIE|
00000160: 52 45 4E 00 78 09 96 00 8D 20 20 31 36 37 30 3A |REN.x.... 1670:|
00000170: 8F 20 41 4E 46 41 4E 47 00 9B 09 A0 00 8D 20 20 |. ANFANG...... |
00000180: 20 32 39 30 3A 8F 20 52 4F 4D 20 49 4E 20 24 27 | 290:. ROM IN $'|
00000190: 53 20 53 50 45 49 43 48 45 52 4E 00 B8 09 AA 00 |S SPEICHERN.....|
000001A0: 8D 20 20 31 30 39 30 3A 8F 20 45 49 4E 47 41 42 |. 1090:. EINGAB|
000001B0: 45 52 4F 55 54 49 4E 45 00 C4 09 B4 00 8D 20 20 |EROUTINE...... |
000001C0: 31 31 39 30 00 CF 09 BE 00 8D 20 20 39 32 30 00 |1190...... 920.|
000001D0: F0 09 C8 00 89 20 20 31 32 32 30 3A 8F 20 53 50 |..... 1220:. SP|
000001E0: 45 49 43 48 45 52 4E 20 44 45 53 20 52 4F 4D 53 |EICHERN DES ROMS|
000001F0: 00 F6 09 D2 00 3A 00 1C 0A DC 00 8F 2A 2A 2A 2A |.....:......****|
00000200: 2A 2A 2A 2A 20 52 4F 4D 20 4B 4F 50 49 45 52 45 |**** ROM KOPIERE|
00000210: 4E 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 22 0A E6 |N **********."..|
00000220: 00 3A 00 33 0A E7 00 81 49 B2 31 A4 31 30 30 30 |.:.3....I.1.1000|
00000230: 3A 82 49 00 4D 0A EB 00 81 49 B2 39 AC 31 36 AE |:.I.M....I.9.16.|
00000240: 33 A4 28 39 AC 31 36 AE 33 29 AA 33 31 00 5B 0A |3.(9.16.3).31.[.|
00000250: EC 00 87 49 31 3A 97 49 2C 49 31 00 62 0A ED 00 |...I1:.I,I1.b...|
00000260: 82 49 00 70 0A EE 00 9E 28 39 AC 31 36 AE 33 29 |.I.p....(9.16.3)|
00000270: 00 B6 0A 0C 01 83 31 36 39 2C 30 2C 31 33 33 2C |......169,0,133,|
00000280: 32 35 34 2C 31 36 39 2C 31 36 30 2C 31 33 33 2C |254,169,160,133,|
00000290: 32 35 35 2C 31 36 30 2C 30 2C 31 37 37 2C 32 35 |255,160,0,177,25|
000002A0: 34 2C 31 34 35 2C 32 35 34 2C 32 34 2C 32 30 30 |4,145,254,24,200|
000002B0: 2C 31 39 32 2C 30 00 EF 0A 0D 01 83 32 30 38 2C |,192,0......208,|
000002C0: 32 34 36 2C 31 36 35 2C 32 35 35 2C 32 34 2C 31 |246,165,255,24,1|
000002D0: 30 35 2C 31 2C 31 33 33 2C 32 35 35 2C 32 30 31 |05,1,133,255,201|
000002E0: 2C 31 39 32 2C 32 30 38 2C 32 33 33 2C 39 36 00 |,192,208,233,96.|
000002F0: F8 0A 0E 01 89 31 35 30 00 FE 0A 18 01 3A 00 24 |.....150.....:.$|
00000300: 0B 22 01 8F 2A 2A 2A 20 42 45 46 45 48 4C 45 20 |."..*** BEFEHLE |
00000310: 49 4E 20 24 27 53 20 53 50 45 49 43 48 45 52 4E |IN $'S SPEICHERN|
00000320: 20 2A 2A 2A 00 2A 0B 2C 01 3A 00 40 0B 36 01 81 | ***.*.,.:.@.6..|
00000330: 20 41 B2 34 31 31 31 38 20 A4 20 34 31 33 37 33 | A.41118 . 41373|
00000340: 00 4B 0B 40 01 50 B2 C2 28 41 29 00 65 0B 4A 01 |.K.@.P..(A).e.J.|
00000350: 8B 20 50 B1 31 32 38 20 A7 20 50 B2 50 AB 31 32 |. P.128 . P.P.12|
00000360: 38 3A 45 B2 31 00 7A 0B 54 01 41 24 28 43 29 B2 |8:E.1.z.T.A$(C).|
00000370: 41 24 28 43 29 AA C7 28 50 29 00 97 0B 5E 01 8B |A$(C)..(P)...^..|
00000380: 20 45 B2 31 20 A7 20 53 28 43 29 B2 41 3A 43 B2 | E.1 . S(C).A:C.|
00000390: 43 AA 31 3A 45 B2 30 00 9F 0B 68 01 82 20 41 00 |C.1:E.0...h.. A.|
000003A0: B6 0B 72 01 43 B2 30 3A 45 B2 30 3A 99 22 93 22 |..r.C.0:E.0:."."|
000003B0: 3A 8F 20 43 4C 52 00 BC 0B 7C 01 8E 00 C2 0B 86 |:. CLR...|......|
000003C0: 01 3A 00 E8 0B 90 01 8F 2A 20 56 45 52 47 4C 45 |.:......* VERGLE|
000003D0: 49 43 48 20 45 49 4E 47 41 42 45 20 55 4E 44 20 |ICH EINGABE UND |
000003E0: 52 4F 4D 20 24 27 53 2A 00 EE 0B 9A 01 3A 00 FB |ROM $'S*.....:..|
000003F0: 0B A4 01 81 20 41 B2 30 A4 37 36 00 12 0C AE 01 |.... A.0.76.....|
00000400: 8B 20 45 24 B2 41 24 28 41 29 20 A7 20 52 B2 41 |. E$.A$(A) . R.A|
00000410: 3A 8E 00 1A 0C B8 01 82 20 41 00 28 0C C2 01 8B |:....... A.(....|
00000420: 20 52 B2 41 20 A7 20 8E 00 6F 0C CC 01 99 22 11 | R.A . ..o....".|
00000430: 11 1D 1D 1D 1D 1D 12 44 49 45 53 45 4E 20 42 45 |.......DIESEN BE|
00000440: 46 45 48 4C 20 47 49 42 54 20 45 53 20 4E 49 43 |FEHL GIBT ES NIC|
00000450: 48 54 92 22 3A 4F B2 31 3A 8F 20 32 44 20 35 52 |HT.":O.1:. 2D 5R|
00000460: 20 52 56 53 4F 4E 2E 2E 2E 52 56 53 4F 46 46 00 | RVSON...RVSOFF.|
00000470: 82 0C D6 01 81 20 57 B2 30 A4 32 30 30 30 3A 82 |..... W.0.2000:.|
00000480: 20 57 00 88 0C E0 01 8E 00 8E 0C EA 01 3A 00 B4 | W...........:..|
00000490: 0C F4 01 8F 2A 2A 2A 2A 20 4E 45 55 45 4E 20 42 |....**** NEUEN B|
000004A0: 41 53 49 43 42 45 46 45 48 4C 20 50 4F 4B 45 4E |ASICBEFEHL POKEN|
000004B0: 20 2A 2A 2A 00 BA 0C FE 01 3A 00 CE 0C 08 02 41 | ***.....:.....A|
000004C0: 31 B2 53 28 52 29 AB C3 28 49 24 29 AA 31 00 E0 |1.S(R)..(I$).1..|
000004D0: 0C 12 02 81 20 41 B2 41 31 20 A4 20 53 28 52 29 |.... A.A1 . S(R)|
000004E0: 00 EA 0C 1C 02 44 B2 44 AA 31 00 03 0D 26 02 48 |.....D.D.1...&.H|
000004F0: 24 B2 CA 28 49 24 2C 44 2C 31 29 3A 46 B2 C6 28 |$..(I$,D,1):F..(|
00000500: 48 24 29 00 1B 0D 30 02 8B 20 44 B2 C3 28 49 24 |H$)...0.. D..(I$|
00000510: 29 20 A7 20 46 B2 46 AA 31 32 38 00 25 0D 3A 02 |) . F.F.128.%.:.|
00000520: 97 20 41 2C 46 00 2F 0D 44 02 82 3A 44 B2 30 00 |. A,F./.D..:D.0.|
00000530: 35 0D 4E 02 8E 00 3B 0D 58 02 3A 00 61 0D 62 02 |5.N...;.X.:.a.b.|
00000540: 8F 2A 2A 2A 20 42 49 4C 44 20 57 41 45 48 52 45 |.*** BILD WAEHRE|
00000550: 4E 44 20 47 45 50 4F 4B 45 44 20 57 49 52 44 20 |ND GEPOKED WIRD |
00000560: 2A 00 67 0D 6C 02 3A 00 9C 0D 76 02 99 22 93 11 |*.g.l.:...v.."..|
00000570: 11 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A |. ********|
00000580: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000590: 2A 2A 22 3A 8F 20 43 4C 52 20 32 44 00 E5 0D 80 |**":. CLR 2D....|
000005A0: 02 99 22 11 20 20 20 20 20 20 20 91 2A 9D 11 2A |..". .*..*|
000005B0: 20 43 20 48 20 41 20 4E 20 47 20 45 20 20 42 20 | C H A N G E B |
000005C0: 41 20 53 20 49 20 43 20 91 2A 9D 11 2A 22 3A 8F |A S I C .*..*":.|
000005D0: 20 31 44 20 31 55 20 31 4C 20 31 44 20 31 55 20 | 1D 1U 1L 1D 1U |
000005E0: 31 4C 20 31 44 00 2E 0E 8A 02 99 22 11 20 20 20 |1L 1D......". |
000005F0: 20 20 20 20 91 2A 9D 11 2A 2A 2A 2A 2A 2A 2A 2A | .*..********|
00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000610: 2A 91 2A 9D 11 2A 22 3A 8F 20 31 44 20 31 55 20 |*.*..*":. 1D 1U |
00000620: 31 4C 20 31 44 20 31 55 20 31 4C 20 31 44 00 5F |1L 1D 1U 1L 1D._|
00000630: 0E 94 02 99 22 11 11 11 11 11 20 20 20 20 20 20 |...."..... |
00000640: 20 20 20 57 52 49 54 54 45 4E 20 42 59 20 4A 2E | WRITTEN BY J.|
00000650: 20 48 41 52 54 4D 41 4E 4E 22 3A 8F 20 35 44 00 | HARTMANN":. 5D.|
00000660: 8C 0E 9E 02 99 22 11 11 11 11 11 20 20 20 20 20 |....."..... |
00000670: 20 20 20 20 20 20 20 4D 4F 4D 45 4E 54 20 42 49 | MOMENT BI|
00000680: 54 54 45 20 21 20 22 3A 8F 20 35 44 00 92 0E A8 |TTE ! ":. 5D....|
00000690: 02 8E 00 98 0E B2 02 3A 00 BE 0E BC 02 8F 2A 2A |.......:......**|
000006A0: 2A 2A 2A 2A 20 42 41 53 49 43 42 45 46 45 48 4C |**** BASICBEFEHL|
000006B0: 45 20 4C 49 53 54 45 4E 20 2A 2A 2A 2A 2A 00 C4 |E LISTEN *****..|
000006C0: 0E C6 02 3A 00 EF 0E D0 02 99 22 93 22 2C 22 20 |...:......"."," |
000006D0: 50 45 45 4B 22 2C 22 9D 9D 9D 5A 45 49 43 48 45 |PEEK","...ZEICHE|
000006E0: 4E 11 22 3A 8F 20 43 4C 52 20 33 4C 20 31 44 00 |N.":. CLR 3L 1D.|
000006F0: 05 0F DA 02 81 20 41 B2 34 31 31 31 38 20 A4 20 |..... A.41118 . |
00000700: 34 31 33 37 33 00 10 0F E4 02 46 B2 C2 28 41 29 |41373.....F..(A)|
00000710: 00 2A 0F EE 02 8B 20 46 B1 31 32 38 20 A7 20 45 |.*.... F.128 . E|
00000720: B2 31 3A 46 B2 46 AB 31 32 38 00 37 0F F8 02 99 |.1:F.F.128.7....|
00000730: 2C 41 2C C7 28 46 29 00 4C 0F 02 03 8B 20 45 B2 |,A,.(F).L.... E.|
00000740: 31 20 A7 20 45 B2 30 3A 89 37 39 30 00 54 0F 0C |1 . E.0:.790.T..|
00000750: 03 82 3A 8E 00 7F 0F 16 03 99 22 11 11 1D 1D 1D |..:.......".....|
00000760: 1D 1D 1D 1D 1D 1D 1D 1D 57 45 49 54 45 52 3F 20 |........WEITER? |
00000770: 5B 4A 2F 4E 5D 22 3A 8F 20 32 44 20 31 31 52 00 |[J/N]":. 2D 11R.|
00000780: 96 0F 20 03 A1 20 43 24 3A 8B 20 43 24 B2 22 22 |.. .. C$:. C$.""|
00000790: 20 A7 20 38 30 30 00 A7 0F 2A 03 8B 20 43 24 B2 | . 800...*.. C$.|
000007A0: 22 4E 22 20 A7 20 8E 00 BD 0F 34 03 8B 20 43 24 |"N" . ....4.. C$|
000007B0: B3 B1 22 4A 22 20 A7 20 89 20 38 30 30 00 EA 0F |.."J" . . 800...|
000007C0: 3E 03 99 22 93 22 2C 22 20 50 45 45 4B 22 2C 22 |>.."."," PEEK","|
000007D0: 9D 9D 9D 5A 45 49 43 48 45 4E 11 22 3A 82 3A 8F |...ZEICHEN.":.:.|
000007E0: 20 43 4C 52 20 33 4C 20 31 44 00 F5 0F 48 03 8D | CLR 3L 1D...H..|
000007F0: 20 31 31 39 30 00 04 10 52 03 99 22 93 22 3A 8F | 1190...R..".":.|
00000800: 20 43 4C 52 00 13 10 5C 03 99 22 11 11 22 3A 8F | CLR...\.."..":.|
00000810: 20 31 44 00 41 10 66 03 99 22 1D 1D 1D 1D 1D 1D | 1D.A.f.."......|
00000820: 1D 1D 4E 4F 43 48 20 45 49 4E 20 42 45 46 45 48 |..NOCH EIN BEFEH|
00000830: 4C 20 41 45 4E 44 45 52 4E 20 3F 22 3A 8F 20 38 |L AENDERN ?":. 8|
00000840: 52 00 6A 10 70 03 99 22 11 11 1D 1D 1D 1D 1D 1D |R.j.p.."........|
00000850: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 5B 4A 2F 4E 5D |...........[J/N]|
00000860: 22 3A 8F 20 32 44 20 31 37 52 00 82 10 7A 03 A1 |":. 2D 17R...z..|
00000870: 20 47 24 3A 20 8B 20 47 24 B2 22 22 20 A7 20 38 | G$: . G$."" . 8|
00000880: 39 30 00 93 10 84 03 8B 20 47 24 B2 22 4E 22 20 |90...... G$."N" |
00000890: A7 20 8E 00 A9 10 8E 03 8B 20 47 24 B3 B1 22 4A |. ....... G$.."J|
000008A0: 22 20 A7 20 89 20 38 39 30 00 D1 10 98 03 85 20 |" . . 890...... |
000008B0: 22 11 11 11 1D 1D 1D 1D 1D 1D 42 41 53 49 43 42 |".........BASICB|
000008C0: 45 46 45 48 4C 22 3B 45 24 3A 8F 20 33 44 20 36 |EFEHL";E$:. 3D 6|
000008D0: 52 00 F8 10 A2 03 85 20 22 11 11 1D 1D 1D 1D 1D |R...... ".......|
000008E0: 1D 49 48 52 20 42 45 46 45 48 4C 20 22 3B 49 24 |.IHR BEFEHL ";I$|
000008F0: 3A 8F 20 32 44 20 36 52 00 33 11 AC 03 8B 20 C3 |:. 2D 6R.3.... .|
00000900: 28 45 24 29 B3 B1 C3 28 49 24 29 20 A7 20 99 22 |(E$)...(I$) . ."|
00000910: 11 11 22 A3 31 30 29 22 12 45 49 4E 47 41 42 45 |..".10)".EINGABE|
00000920: 46 45 48 4C 45 52 21 92 22 3A 89 39 36 30 3A 8F |FEHLER!.":.960:.|
00000930: 20 32 44 00 3C 11 B6 03 89 39 37 30 00 53 11 C0 | 2D.<....970.S..|
00000940: 03 81 20 57 B2 30 A4 32 30 30 30 3A 82 57 3A 89 |.. W.0.2000:.W:.|
00000950: 38 34 30 00 6B 11 CA 03 8D 34 30 30 3A 8B 20 4F |840.k....400:. O|
00000960: B2 31 A7 4F B2 30 3A 89 38 34 30 00 74 11 D4 03 |.1.O.0:.840.t...|
00000970: 8D 35 30 30 00 7D 11 DE 03 89 38 34 30 00 83 11 |.500.}....840...|
00000980: E8 03 3A 00 A8 11 F2 03 8F 2A 2A 2A 2A 2A 20 50 |..:......***** P|
00000990: 52 4F 47 52 41 4D 4D 20 45 4E 44 45 20 2A 2A 2A |ROGRAMM ENDE ***|
000009A0: 2A 2A 2A 2A 2A 2A 2A 2A 00 AE 11 FC 03 3A 00 BE |********.....:..|
000009B0: 11 06 04 99 22 93 20 22 3A 8F 20 43 4C 52 00 F5 |....". ":. CLR..|
000009C0: 11 10 04 99 22 1D 1D 2A 2A 2A 2A 20 43 4F 4D 4D |...."..**** COMM|
000009D0: 4F 44 4F 52 45 20 36 34 20 43 48 41 4E 47 45 44 |ODORE 64 CHANGED|
000009E0: 20 42 41 53 49 43 20 2A 2A 2A 2A 11 22 3A 8F 20 | BASIC ****.":. |
000009F0: 5A 52 20 31 44 00 29 12 1A 04 99 22 1D 36 34 4B |ZR 1D.)....".64K|
00000A00: 20 52 41 4D 20 53 59 53 54 45 4D 20 20 33 38 39 | RAM SYSTEM 389|
00000A10: 31 31 20 42 41 53 49 43 20 42 59 54 45 53 20 46 |11 BASIC BYTES F|
00000A20: 52 45 45 22 3A 8F 20 31 52 00 33 12 24 04 97 31 |REE":. 1R.3.$..1|
00000A30: 2C 35 34 00 39 12 2E 04 A2 00 3F 12 38 04 3A 00 |,54.9.....?.8.:.|
00000A40: 64 12 42 04 8F 2A 2A 2A 2A 2A 2A 2A 20 45 49 4E |d.B..******* EIN|
00000A50: 47 41 42 45 52 4F 55 54 49 4E 45 20 2A 2A 2A 2A |GABEROUTINE ****|
00000A60: 2A 2A 2A 2A 00 6A 12 4C 04 3A 00 A8 12 56 04 99 |****.j.L.:...V..|
00000A70: 22 93 11 11 11 11 20 57 4F 4C 4C 45 4E 20 53 49 |"..... WOLLEN SI|
00000A80: 45 20 44 49 45 20 42 41 53 49 43 2D 42 45 46 45 |E DIE BASIC-BEFE|
00000A90: 48 4C 45 20 41 55 46 4C 49 53 54 45 4E 3F 22 3A |HLE AUFLISTEN?":|
00000AA0: 8F 20 43 4C 52 20 34 44 00 C2 12 60 04 99 22 11 |. CLR 4D...`..".|
00000AB0: 11 22 A3 31 36 29 22 5B 4A 2F 4E 5D 22 3A 8F 20 |.".16)"[J/N]":. |
00000AC0: 32 44 00 D8 12 6A 04 A1 20 47 24 3A 8B 20 47 24 |2D...j.. G$:. G$|
00000AD0: B2 22 22 A7 31 31 33 30 00 E9 12 74 04 8B 20 47 |."".1130...t.. G|
00000AE0: 24 B2 22 4E 22 20 A7 20 8E 00 FF 12 7E 04 8B 20 |$."N" . ....~.. |
00000AF0: 47 24 B3 B1 22 4A 22 20 A7 20 89 31 31 32 30 00 |G$.."J" . .1120.|
00000B00: 09 13 88 04 8D 20 37 30 30 00 0F 13 92 04 8E 00 |..... 700.......|
00000B10: 15 13 9C 04 8E 00 4A 13 A6 04 99 22 93 11 11 11 |......J...."....|
00000B20: 1D 1D 1D 1D 1D 1D 1D 1D 42 41 53 49 43 2D 42 45 |........BASIC-BE|
00000B30: 46 45 48 4C 45 20 41 45 4E 44 45 52 4E 22 3A 8F |FEHLE AENDERN":.|
00000B40: 20 43 4C 52 20 32 44 20 38 52 00 50 13 B0 04 8E | CLR 2D 8R.P....|
00000B50: 00 56 13 BA 04 3A 00 7B 13 C4 04 8F 2A 2A 2A 2A |.V...:.{....****|
00000B60: 20 53 50 45 49 43 48 45 52 4E 20 44 45 53 20 52 | SPEICHERN DES R|
00000B70: 4F 4D 53 20 2A 2A 2A 2A 2A 2A 2A 00 81 13 CE 04 |OMS *******.....|
00000B80: 3A 00 8B 13 D3 04 97 31 2C 35 34 00 9A 13 D8 04 |:......1,54.....|
00000B90: 99 22 93 22 3A 8F 20 43 4C 52 00 C8 13 E2 04 99 |.".":. CLR......|
00000BA0: 22 11 11 20 55 4E 54 45 52 20 57 45 4C 43 48 45 |".. UNTER WELCHE|
00000BB0: 4D 20 4E 41 4D 45 4E 20 53 4F 4C 4C 20 44 49 45 |M NAMEN SOLL DIE|
00000BC0: 53 45 22 3A 8F 20 32 44 00 F9 13 EC 04 99 22 11 |SE":. 2D......".|
00000BD0: 20 42 41 53 49 43 20 56 45 52 53 49 4F 4E 20 47 | BASIC VERSION G|
00000BE0: 45 53 50 45 49 43 48 45 52 54 20 57 45 52 44 45 |ESPEICHERT WERDE|
00000BF0: 4E 20 3F 22 3A 8F 20 31 44 00 34 14 F6 04 85 22 |N ?":. 1D.4...."|
00000C00: 11 11 20 22 3B 50 4E 24 3A 8B C3 28 50 4E 24 29 |.. ";PN$:..(PN$)|
00000C10: B1 31 36 A7 99 22 11 20 46 49 4C 45 4E 41 4D 45 |.16..". FILENAME|
00000C20: 20 5A 55 20 4C 41 4E 47 22 3A 89 31 32 37 30 3A | ZU LANG":.1270:|
00000C30: 8F 20 32 44 00 73 14 00 05 99 22 11 11 20 20 20 |. 2D.s....".. |
00000C40: 20 20 20 20 20 42 49 54 54 45 20 27 12 44 92 27 | BITTE '.D.'|
00000C50: 20 46 55 45 52 20 44 49 53 4B 45 54 54 45 22 3A | FUER DISKETTE":|
00000C60: 8F 20 32 44 20 52 56 53 4F 4E 2E 2E 2E 52 56 53 |. 2D RVSON...RVS|
00000C70: 4F 46 46 00 B7 14 0A 05 99 22 11 20 20 20 20 4F |OFF......". O|
00000C80: 44 45 52 20 27 12 4B 92 27 20 46 55 45 52 20 4B |DER '.K.' FUER K|
00000C90: 41 53 53 45 54 54 45 20 44 52 55 45 43 4B 45 4E |ASSETTE DRUECKEN|
00000CA0: 20 21 22 3A 8F 20 31 44 20 52 56 53 4F 4E 2E 2E | !":. 1D RVSON..|
00000CB0: 2E 52 56 53 4F 46 46 00 CB 14 14 05 A1 41 24 3A |.RVSOFF......A$:|
00000CC0: 8B 41 24 B2 22 22 A7 31 33 30 30 00 F6 14 1E 05 |.A$."".1300.....|
00000CD0: 8B 41 24 B2 22 4B 22 A7 4E 46 B2 31 3A 99 22 11 |.A$."K".NF.1:.".|
00000CE0: 1D 1D 1D 1D 1D 1D 22 3B 3A 89 31 33 36 30 3A 8F |......";:.1360:.|
00000CF0: 20 31 44 20 36 52 00 0D 15 28 05 8B 41 24 B2 22 | 1D 6R...(..A$."|
00000D00: 44 22 A7 4E 46 B2 33 3A 89 31 33 34 30 00 17 15 |D".NF.3:.1340...|
00000D10: 32 05 89 31 33 30 30 00 2E 15 3C 05 9F 4E 46 2C |2..1300...<..NF,|
00000D20: 38 2C 32 2C 50 4E 24 AA 22 2C 53 2C 57 22 00 38 |8,2,PN$.",S,W".8|
00000D30: 15 46 05 89 31 33 37 30 00 48 15 50 05 9F 4E 46 |.F..1370.H.P..NF|
00000D40: 2C 31 2C 31 2C 50 4E 24 00 5B 15 5A 05 81 49 B2 |,1,1,PN$.[.Z..I.|
00000D50: 34 31 31 31 38 A4 34 31 33 37 32 00 6C 15 64 05 |41118.41372.l.d.|
00000D60: 98 4E 46 2C C7 28 C2 28 49 29 29 3B 00 73 15 6E |.NF,.(.(I));.s.n|
00000D70: 05 82 49 00 7B 15 78 05 A0 4E 46 00 85 15 82 05 |..I.{.x..NF.....|
00000D80: 89 31 30 31 30 00 8B 15 8C 05 3A 00 B0 15 96 05 |.1010.....:.....|
00000D90: 8F 20 2A 2A 4C 41 44 45 4E 20 45 49 4E 45 52 20 |. **LADEN EINER |
00000DA0: 42 41 53 49 43 20 56 45 52 53 49 4F 4E 2A 2A 2A |BASIC VERSION***|
00000DB0: 00 B6 15 A0 05 3A 00 CB 15 AA 05 99 22 93 22 3A |.....:......".":|
00000DC0: 97 31 2C 35 35 3A 8F 20 43 4C 52 00 00 16 B4 05 |.1,55:. CLR.....|
00000DD0: 99 22 11 11 20 42 49 54 54 45 20 44 45 4E 20 4E |.".. BITTE DEN N|
00000DE0: 41 4D 45 4E 20 55 4E 54 45 52 20 44 45 52 20 44 |AMEN UNTER DER D|
00000DF0: 49 45 53 45 20 42 41 53 49 43 22 3A 8F 20 32 44 |IESE BASIC":. 2D|
00000E00: 00 31 16 BE 05 99 22 11 20 56 45 52 53 49 4F 4E |.1....". VERSION|
00000E10: 20 47 45 53 50 45 49 43 48 45 52 54 20 49 53 54 | GESPEICHERT IST|
00000E20: 20 45 49 4E 47 45 42 45 4E 20 21 22 3A 8F 20 31 | EINGEBEN !":. 1|
00000E30: 44 00 45 16 C8 05 85 22 11 11 20 22 3B 42 56 24 |D.E....".. ";BV$|
00000E40: 3A 8F 20 32 44 00 76 16 D2 05 8B C3 28 42 56 24 |:. 2D.v.....(BV$|
00000E50: 29 B1 31 36 A7 99 22 11 20 20 46 49 4C 45 4E 41 |).16..". FILENA|
00000E60: 4D 45 20 5A 55 20 4C 41 4E 47 22 3A 89 31 34 33 |ME ZU LANG":.143|
00000E70: 30 3A 8F 20 31 44 00 B5 16 DC 05 99 22 11 11 20 |0:. 1D......".. |
00000E80: 20 20 20 20 20 20 20 42 49 54 54 45 20 27 12 44 | BITTE '.D|
00000E90: 92 27 20 46 55 45 52 20 44 49 53 4B 45 54 54 45 |.' FUER DISKETTE|
00000EA0: 22 3A 8F 20 32 44 20 52 56 53 4F 4E 2E 2E 2E 52 |":. 2D RVSON...R|
00000EB0: 56 53 4F 46 46 00 F9 16 E6 05 99 22 11 20 20 20 |VSOFF......". |
00000EC0: 20 4F 44 45 52 20 27 12 4B 92 27 20 46 55 45 52 | ODER '.K.' FUER|
00000ED0: 20 4B 41 53 53 45 54 54 45 20 44 52 55 45 43 4B | KASSETTE DRUECK|
00000EE0: 45 4E 20 21 22 3A 8F 20 31 44 20 52 56 53 4F 4E |EN !":. 1D RVSON|
00000EF0: 2E 2E 2E 52 56 53 4F 46 46 00 0D 17 F0 05 A1 41 |...RVSOFF......A|
00000F00: 24 3A 8B 41 24 B2 22 22 A7 31 35 32 30 00 38 17 |$:.A$."".1520.8.|
00000F10: FA 05 8B 41 24 B2 22 4B 22 A7 4E 46 B2 31 3A 99 |...A$."K".NF.1:.|
00000F20: 22 11 1D 1D 1D 1D 1D 1D 22 3B 3A 89 31 35 38 30 |".......";:.1580|
00000F30: 3A 8F 20 31 44 20 36 52 00 4F 17 04 06 8B 41 24 |:. 1D 6R.O....A$|
00000F40: B2 22 44 22 A7 4E 46 B2 33 3A 89 31 35 36 30 00 |."D".NF.3:.1560.|
00000F50: 59 17 0E 06 89 31 35 32 30 00 70 17 18 06 9F 4E |Y....1520.p....N|
00000F60: 46 2C 38 2C 32 2C 42 56 24 AA 22 2C 53 2C 52 22 |F,8,2,BV$.",S,R"|
00000F70: 00 7A 17 22 06 89 31 35 39 30 00 8A 17 2C 06 9F |.z."..1590...,..|
00000F80: 4E 46 2C 31 2C 30 2C 42 56 24 00 9D 17 36 06 81 |NF,1,0,BV$...6..|
00000F90: 49 B2 34 31 31 31 38 A4 34 31 33 37 32 00 A9 17 |I.41118.41372...|
00000FA0: 40 06 A1 23 4E 46 2C 47 24 00 B6 17 4A 06 97 49 |@..#NF,G$...J..I|
00000FB0: 2C C6 28 47 24 29 00 BD 17 54 06 82 49 00 C5 17 |,.(G$)...T..I...|
00000FC0: 5E 06 A0 4E 46 00 CF 17 68 06 97 31 2C 35 34 00 |^..NF...h..1,54.|
00000FD0: D9 17 72 06 89 31 30 31 30 00 DF 17 7C 06 3A 00 |..r..1010...|.:.|
00000FE0: 04 18 86 06 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********|
00000FF0: 2A 20 41 4E 46 41 4E 47 20 2A 2A 2A 2A 2A 2A 2A |* ANFANG *******|
00001000: 2A 2A 2A 2A 00 0A 18 90 06 3A 00 19 18 9A 06 99 |****.....:......|
00001010: 22 93 22 3A 8F 20 43 4C 52 00 4B 18 A4 06 99 22 |".":. CLR.K...."|
00001020: 11 11 20 57 4F 4C 4C 45 4E 20 53 49 45 20 45 49 |.. WOLLEN SIE EI|
00001030: 4E 45 20 47 45 53 50 45 49 43 48 45 52 54 45 20 |NE GESPEICHERTE |
00001040: 42 41 53 49 43 22 3A 8F 20 32 44 00 8B 18 AE 06 |BASIC":. 2D.....|
00001050: 99 22 11 20 56 45 52 53 49 4F 4E 20 4C 41 44 45 |.". VERSION LADE|
00001060: 4E 20 55 4E 44 20 53 54 41 52 54 45 4E 20 20 28 |N UND STARTEN (|
00001070: 27 12 4C 92 27 29 22 3A 8F 20 31 44 20 52 56 53 |'.L.')":. 1D RVS|
00001080: 4F 4E 2E 2E 2E 52 56 53 4F 46 46 00 CB 18 B8 06 |ON...RVSOFF.....|
00001090: 99 22 11 20 4F 44 45 52 20 45 49 4E 45 20 4E 45 |.". ODER EINE NE|
000010A0: 55 45 20 45 52 5A 45 55 47 45 4E 20 20 20 20 28 |UE ERZEUGEN (|
000010B0: 27 12 45 92 27 29 22 3A 8F 20 31 44 20 52 56 53 |'.E.')":. 1D RVS|
000010C0: 4F 4E 2E 2E 2E 52 56 53 4F 46 46 00 DF 18 C2 06 |ON...RVSOFF.....|
000010D0: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 37 33 30 00 |.A$:.A$."".1730.|
000010E0: F1 18 CC 06 8B 41 24 B2 22 4C 22 A7 89 31 34 33 |.....A$."L"..143|
000010F0: 30 00 1F 19 D6 06 8B 41 24 B2 22 45 22 A7 99 22 |0......A$."E".."|
00001100: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 4D |... M|
00001110: 4F 4D 45 4E 54 20 42 49 54 54 45 21 22 3A 8E 00 |OMENT BITTE!":..|
00001120: 29 19 E0 06 89 31 37 33 30 00 5A 19 EA 06 8F 20 |)....1730.Z.... |
00001130: 2A 2A 2A 20 45 52 4B 4C 41 45 52 55 4E 47 20 5A |*** ERKLAERUNG Z|
00001140: 55 20 43 55 52 53 4F 52 20 53 54 45 55 45 52 5A |U CURSOR STEUERZ|
00001150: 45 49 43 48 45 4E 20 2A 2A 2A 00 60 19 F4 06 3A |EICHEN ***.`...:|
00001160: 00 66 19 FE 06 3A 00 88 19 08 07 8F 20 20 20 44 |.f...:...... D|
00001170: 3D 44 4F 57 4E 20 20 20 20 20 20 20 20 5A 42 2E |=DOWN ZB.|
00001180: 20 22 11 11 22 3D 32 44 00 8E 19 12 07 3A 00 B0 | ".."=2D.....:..|
00001190: 19 1C 07 8F 20 20 20 4C 3D 4C 45 46 54 20 20 20 |.... L=LEFT |
000011A0: 20 20 20 20 20 5A 42 2E 20 22 9D 9D 22 3D 32 4C | ZB. ".."=2L|
000011B0: 00 B6 19 26 07 3A 00 D8 19 30 07 8F 20 20 20 52 |...&.:...0.. R|
000011C0: 3D 52 49 47 48 54 20 20 20 20 20 20 20 5A 42 2E |=RIGHT ZB.|
000011D0: 20 22 1D 1D 22 3D 32 52 00 DE 19 3A 07 3A 00 00 | ".."=2R...:.:..|
000011E0: 1A 44 07 8F 20 20 20 55 3D 55 50 20 20 20 20 20 |.D.. U=UP |
000011F0: 20 20 20 20 20 5A 42 2E 20 22 91 91 22 3D 32 55 | ZB. ".."=2U|
00001200: 00 06 1A 4E 07 3A 00 2A 1A 58 07 8F 20 20 20 52 |...N.:.*.X.. R|
00001210: 56 53 4F 4E 3D 49 4E 56 45 52 53 20 20 5A 42 2E |VSON=INVERS ZB.|
00001220: 20 22 12 22 3D 52 56 53 4F 4E 00 30 1A 62 07 3A | "."=RVSON.0.b.:|
00001230: 00 55 1A 6C 07 8F 20 20 20 52 56 53 4F 46 46 3D |.U.l.. RVSOFF=|
00001240: 4E 4F 52 4D 41 4C 20 5A 42 2E 20 22 92 22 3D 52 |NORMAL ZB. "."=R|
00001250: 56 53 4F 46 46 00 5B 1A 6D 07 80 00 61 1A 6E 07 |VSOFF.[.m...a.n.|
00001260: 3A 00 72 1A 6F 07 8F 20 42 45 4D 45 52 4B 55 4E |:.r.o.. BEMERKUN|
00001270: 47 3A 00 BB 1A 70 07 8F 20 44 49 45 20 4E 45 55 |G:...p.. DIE NEU|
00001280: 45 4E 20 42 41 53 49 43 20 42 45 46 45 48 4C 45 |EN BASIC BEFEHLE|
00001290: 20 4D 55 45 53 53 45 4E 20 20 20 20 20 20 20 20 | MUESSEN |
000012A0: 20 47 45 4E 41 55 53 4F 20 4C 41 4E 47 45 20 53 | GENAUSO LANGE S|
000012B0: 45 49 4E 20 57 49 45 20 44 49 45 00 CC 1A 71 07 |EIN WIE DIE...q.|
000012C0: 8F 20 4F 52 49 47 49 4E 41 4C 45 2E 00 00 00 |. ORIGINALE.... |
....... ********************.;.... *
==================*.X.... *===CHANGE=B
ASIC===*.U.(.. *==================*...
2.. *====WRITTEN=BY====*...<.. *====
==============*.L.F.. *=JUERGEN=HARTMA
NN=*...P.. *==================*...Z..
********************...D.:...N.:.%.X..
A$(77),S(77).G.... 610:. BILD WAEHREN
D POKEN.C.... 220:. ROM KOPIEREN.X...
. 1670:. ANFANG... .. 290:. ROM IN $'
S SPEICHERN...... 1090:. EINGABEROUTINE
.D.... 1190.O.... 920...H.. 1220:. SP
EICHERN DES ROMS...R.:......******** ROM
KOPIEREN **********."...:.3....I.1.1000
:.I.M....I.9.16.3.(9.16.3).31.[....I1:.I
,I1.B....I.P....(9.16.3)......169,0,133,
254,169,160,133,255,160,0,177,254,145,25
4,24,200,192,0......208,246,165,255,24,1
05,1,133,255,201,192,208,233,96......150
.....:.$."..*** BEFEHLE IN $'S SPEICHERN
***.*.,.:.@.6.. A.41118 . 41373.K.@.P.B
(A).E.J.. P.128 . P.P.128:E.1.Z.T.A$(C).
A$(C).G(P)...^.. E.1 . S(C).A:C.C.1:E.0.
..H.. A...R.C.0:E.0:.".":. CLR...|...B..
.:......* VERGLEICH EINGABE UND ROM $'S*
.....:...... A.0.76...... E$.A$(A) . R.A
:....... A.(.B.. R.A . ..O.L.."........D
IESEN BEFEHL GIBT ES NICHT.":O.1:. 2D 5R
RVSON...RVSOFF...V.. W.0.2000:. W......
.....:......**** NEUEN BASICBEFEHL POKEN
***.....:.N...A1.S(R).C(I$).1...... A.A
1 . S(R).....D.D.1...&.H$.J(I$,D,1):F.F(
H$)...0.. D.C(I$) . F.F.128.%.:.. A,F./.
D..:D.0.5.N...;.X.:.A.B..*** BILD WAEHRE
ND GEPOKED WIRD *.G.L.:...V.."...
**************************":. CLR 2D....
..". .*..* C H A N G E B A S I C
.*..*":. 1D 1U 1L 1D 1U 1L 1D......".
.*..*************************.*..*":
. 1D 1U 1L 1D 1U 1L 1D._....".....
WRITTEN BY J. HARTMANN":. 5D......"..
... MOMENT BITTE ! ":. 5D....
.......:......****** BASICBEFEHLE LISTEN
*****.D.F.:...P.."."," PEEK","...ZEICHE
N.":. CLR 3L 1D...Z.. A.41118 . 41373...
..F.B(A).*.... F.128 . E.1:F.F.128.7....
,A,G(F).L.... E.1 . E.0:.790.T....:....
..".............WEITER? [J/N]":. 2D 11R.
.. .. C$:. C$."" . 800...*.. C$."N" . ..
..4.. C$.."J" . . 800...>.."."," PEEK","
...ZEICHEN.":.:. CLR 3L 1D...H.. 1190...
R..".":. CLR...\.."..":. 1D.A.F.."......
..NOCH EIN BEFEHL AENDERN ?":. 8R.J.P.."
...................[J/N]":. 2D 17R...Z..
G$: . G$."" . 890...... G$."N" . ......
. G$.."J" . . 890.Q.... ".........BASICB
EFEHL";E$:. 3D 6R...... "........IHR BEF
EHL ";I$:. 2D 6R.3.... C(E$)..C(I$) . ."
..".10)".EINGABEFEHLER!.":.960:. 2D.<...
.970.S.... W.0.2000:.W:.840.K.J..400:. O
.1.O.0:.840.T.T..500.}....840.....:.....
.***** PROGRAMM ENDE ***********.....:..
....". ":. CLR......"..**** COMMODORE 64
CHANGED BASIC ****.":. ZR 1D.)....".64K
RAM SYSTEM 38911 BASIC BYTES FREE":. 1
R.3.$..1,54.9.....?.8.:.D.B..******* EIN
GABEROUTINE ********.J.L.:...V.."..... W
OLLEN SIE DIE BASIC-BEFEHLE AUFLISTEN?":
. CLR 4D.B.`.."..".16)"[J/N]":. 2D.X.J..
G$:. G$."".1130...T.. G$."N" . ....~..
G$.."J" . .1120...... 700.............J.
..."............BASIC-BEFEHLE AENDERN":.
CLR 2D 8R.P.....V...:.{.D..**** SPEICHE
RN DES ROMS *******...N.:...S..1,54...X.
.".":. CLR.H....".. UNTER WELCHEM NAMEN
SOLL DIESE":. 2D......". BASIC VERSION G
ESPEICHERT WERDEN ?":. 1D.4....".. ";PN$
:.C(PN$).16..". FILENAME ZU LANG":.1270:
. 2D.S....".. BITTE '.D.' FUER DI
SKETTE":. 2D RVSON...RVSOFF......". O
DER '.K.' FUER KASSETTE DRUECKEN !":. 1D
RVSON...RVSOFF.K....A$:.A$."".1300.....
.A$."K".NF.1:.".......";:.1360:. 1D 6R..
.(..A$."D".NF.3:.1340...2..1300...<..NF,
8,2,PN$.",S,W".8.F..1370.H.P..NF,1,1,PN$
.[.Z..I.41118.41372.L.D..NF,G(B(I));.S.N
..I.{.X. NF......1010.....:...... **LADE
N EINER BASIC VERSION***... .:.K....".":
.1,55:. CLR......".. BITTE DEN NAMEN UNT
ER DER DIESE BASIC":. 2D.1....". VERSION
GESPEICHERT IST EINGEBEN !":. 1D.E.H.."
.. ";BV$:. 2D.V.R..C(BV$).16..". FILENA
ME ZU LANG":.1430:. 1D......".. B
ITTE '.D.' FUER DISKETTE":. 2D RVSON...R
VSOFF......". ODER '.K.' FUER KASSETT
E DRUECKEN !":. 1D RVSON...RVSOFF......A
$:.A$."".1520.8....A$."K".NF.1:.".......
";:.1580:. 1D 6R.O....A$."D".NF.3:.1560.
Y....1520.P....NF,8,2,BV$.",S,R".Z."..15
90...,..NF,1,0,BV$...6..I.41118.41372...
@..#NF,G$...J..I,F(G$)...T..I.E.^. NF.O.
H..1,54.Y.R..1010...|.:...... **********
* ANFANG ***********.....:......".":. CL
R.K....".. WOLLEN SIE EINE GESPEICHERTE
BASIC":. 2D......". VERSION LADEN UND ST
ARTEN ('.L.')":. 1D RVSON...RVSOFF.K...
.". ODER EINE NEUE ERZEUGEN ('.E.')":
. 1D RVSON...RVSOFF...B..A$:.A$."".1730.
..L..A$."L"..1430...V..A$."E".."...
MOMENT BITTE!":..)....1730.Z....
*** ERKLAERUNG ZU CURSOR STEUERZEICHEN *
**.`...:.F...:...... D=DOWN ZB.
".."=2D.....:...... L=LEFT ZB.
".."=2L...&.:.X.0.. R=RIGHT ZB.
".."=2R...:.:...D.. U=UP ZB.
".."=2U...N.:.*.X.. RVSON=INVERS ZB.
"."=RVSON.0.B.:.U.L.. RVSOFF=NORMAL Z
B. "."=RVSOFF.[.M...A.N.:.R.O.. BEMERKUN
G:...P.. DIE NEUEN BASIC BEFEHLE MUESSEN
GENAUSO LANGE SEIN WIE DIE.L.Q.
. ORIGINALE....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL