> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 0A 00 8F 20 D6 4F 4B 41 42 45 4C 54 |....... .OKABELT|
00000010: 52 41 49 4E 45 52 00 54 08 14 00 97 35 33 32 38 |RAINER.T....5328|
00000020: 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 22 93 |0,0:.53281,0:.".|
00000030: 99 22 3A 97 35 33 32 37 32 2C 32 33 3A 58 B2 31 |.":.53272,23:X.1|
00000040: 3A 86 56 24 28 31 30 30 30 29 3A 86 42 24 28 31 |:.V$(1000):.B$(1|
00000050: 30 30 30 29 00 69 08 16 00 97 36 35 30 2C 31 32 |000).i....650,12|
00000060: 38 3A 97 37 38 38 2C 35 32 00 7D 08 17 00 52 49 |8:.788,52.}...RI|
00000070: B2 30 3A 46 41 B2 30 3A 8D 34 30 30 30 00 83 08 |.0:FA.0:.4000...|
00000080: 19 00 3A 00 AB 08 1E 00 99 22 93 22 3A 99 A3 31 |..:......".":..1|
00000090: 30 29 3B 22 12 D6 4F 4B 41 42 45 4C 54 52 41 49 |0);"..OKABELTRAI|
000000A0: 4E 45 52 20 CD 45 4E 55 45 92 22 00 DA 08 28 00 |NER .ENUE."...(.|
000000B0: 97 32 31 34 2C 34 3A 99 3A 99 A3 39 29 3B 22 12 |.214,4:.:..9);".|
000000C0: 31 2D 92 20 20 20 D6 4F 4B 41 42 45 4C 4E 20 45 |1-. .OKABELN E|
000000D0: 49 4E 47 45 42 45 4E 22 3A 99 00 00 09 29 00 99 |INGEBEN":....)..|
000000E0: A3 39 29 3B 22 12 32 2D 92 20 20 20 D6 4F 4B 41 |.9);".2-. .OKA|
000000F0: 42 45 4C 4E 20 41 42 46 52 41 47 45 4E 22 3A 99 |BELN ABFRAGEN":.|
00000100: 00 2A 09 2A 00 99 A3 39 29 3B 22 12 33 2D 92 20 |.*.*...9);".3-. |
00000110: 20 20 D6 4F 4B 41 42 45 4C 4E 20 4E 41 43 48 53 | .OKABELN NACHS|
00000120: 43 48 4C 41 47 45 4E 22 3A 99 00 51 09 2B 00 99 |CHLAGEN":..Q.+..|
00000130: A3 39 29 3B 22 12 34 2D 92 20 20 20 D6 4F 4B 41 |.9);".4-. .OKA|
00000140: 42 45 4C 4E 20 53 50 45 49 43 48 45 52 4E 22 3A |BELN SPEICHERN":|
00000150: 99 00 77 09 2C 00 99 A3 39 29 3B 22 12 35 2D 92 |..w.,...9);".5-.|
00000160: 20 20 20 D6 4F 4B 41 42 45 4C 4E 20 45 49 4E 4C | .OKABELN EINL|
00000170: 45 53 45 4E 22 3A 99 00 96 09 2D 00 99 A3 39 29 |ESEN":....-...9)|
00000180: 3B 22 12 36 2D 92 20 20 20 C1 55 53 57 45 52 54 |;".6-. .USWERT|
00000190: 55 4E 47 22 3A 99 00 AD 09 2E 00 99 A3 39 29 3B |UNG":........9);|
000001A0: 22 12 37 2D 92 20 20 20 C5 4E 44 45 22 00 CE 09 |".7-. .NDE"...|
000001B0: 2F 00 97 32 31 34 2C 32 30 3A 99 3A 99 A3 39 29 |/..214,20:.:..9)|
000001C0: 3B 22 C9 48 52 45 20 D7 41 48 4C 20 3F 22 00 E2 |;".HRE .AHL ?"..|
000001D0: 09 32 00 A1 57 41 24 3A 8B 57 41 24 B2 22 22 A7 |.2..WA$:.WA$."".|
000001E0: 35 30 00 FE 09 37 00 57 41 B2 C5 28 57 41 24 29 |50...7.WA..(WA$)|
000001F0: 3A 8B 57 41 B3 31 B0 57 41 B1 37 A7 35 30 00 2A |:.WA.1.WA.7.50.*|
00000200: 0A 3C 00 91 20 57 41 20 8D 20 31 30 30 2C 35 30 |.<.. WA . 100,50|
00000210: 30 2C 31 30 30 30 2C 31 35 30 30 2C 32 30 30 30 |0,1000,1500,2000|
00000220: 2C 32 35 30 30 2C 33 30 30 30 00 32 0A 41 00 89 |,2500,3000.2.A..|
00000230: 33 30 00 38 0A 46 00 3A 00 67 0A 64 00 99 22 93 |30.8.F.:.g.d..".|
00000240: 12 D6 4F 4B 41 42 45 4C 4E 20 45 49 4E 47 45 42 |..OKABELN EINGEB|
00000250: 45 4E 92 20 20 20 20 12 5F 92 20 46 4F 52 20 CD |EN. ._. FOR .|
00000260: 45 4E 55 45 11 11 22 00 93 0A 69 00 85 22 D6 4F |ENUE.."...i..".O|
00000270: 4B 41 42 45 4C 20 22 3B 56 24 28 58 29 3A 8B 56 |KABEL ";V$(X):.V|
00000280: 24 28 58 29 B2 22 5F 22 A7 56 24 28 58 29 B2 22 |$(X)."_".V$(X)."|
00000290: 22 3A 8E 00 CF 0A 6B 00 85 22 C2 45 44 45 55 54 |":....k..".EDEUT|
000002A0: 55 4E 47 20 22 3B 42 24 28 58 29 3A 99 22 11 22 |UNG ";B$(X):."."|
000002B0: 3A 8B 42 24 28 58 29 B2 22 5F 22 A7 42 24 28 58 |:.B$(X)."_".B$(X|
000002C0: 29 B2 22 22 3A 56 24 28 58 29 B2 22 22 3A 8E 00 |)."":V$(X)."":..|
000002D0: DE 0A 6D 00 58 B2 58 AA 31 3A 89 31 30 35 00 E4 |..m.X.X.1:.105..|
000002E0: 0A 6E 00 3A 00 13 0B F4 01 99 22 93 12 D6 4F 4B |.n.:......"...OK|
000002F0: 41 42 45 4C 4E 20 41 42 46 52 41 47 45 4E 92 20 |ABELN ABFRAGEN. |
00000300: 20 20 20 12 5F 92 20 46 4F 52 20 CD 45 4E 55 45 | ._. FOR .ENUE|
00000310: 11 11 22 00 26 0B F9 01 5A 5A B2 B5 28 BB 28 31 |..".&...ZZ..(.(1|
00000320: 29 AC 58 29 AA 31 00 32 0B FB 01 99 56 24 28 5A |).X).1.2....V$(Z|
00000330: 5A 29 00 54 0B FD 01 85 22 C2 45 44 45 55 54 55 |Z).T....".EDEUTU|
00000340: 4E 47 20 22 3B 41 41 24 3A 8B 41 41 24 B2 22 5F |NG ";AA$:.AA$."_|
00000350: 22 A7 20 8E 00 7E 0B FE 01 8B 41 41 24 B2 42 24 |". ..~....AA$.B$|
00000360: 28 5A 5A 29 A7 99 22 11 D2 49 43 48 54 49 47 21 |(ZZ).."..ICHTIG!|
00000370: 22 3A 52 49 B2 52 49 AA 31 3A 89 35 31 34 00 B8 |":RI.RI.1:.514..|
00000380: 0B 00 02 99 22 CC 45 49 44 45 52 20 46 41 4C 53 |....".EIDER FALS|
00000390: 43 48 21 20 D2 49 43 48 54 49 47 45 20 C2 45 44 |CH! .ICHTIGE .ED|
000003A0: 45 55 54 55 4E 47 3A 22 3A 99 42 24 28 5A 5A 29 |EUTUNG:":.B$(ZZ)|
000003B0: 3A 46 41 B2 46 41 AA 31 00 C6 0B 02 02 99 22 11 |:FA.FA.1......".|
000003C0: 22 3A 89 35 30 35 00 F9 0B E8 03 99 22 93 12 D6 |":.505......"...|
000003D0: 4F 4B 41 42 45 4C 4E 20 4E 41 43 48 53 43 48 4C |OKABELN NACHSCHL|
000003E0: 41 47 45 4E 92 20 20 20 20 12 5F 92 20 46 4F 52 |AGEN. ._. FOR|
000003F0: 20 CD 45 4E 55 45 11 11 22 00 39 0C ED 03 85 22 | .ENUE..".9...."|
00000400: C2 49 54 54 45 20 47 45 42 45 4E 20 D3 49 45 20 |.ITTE GEBEN .IE |
00000410: 44 49 45 20 4E 41 43 48 5A 55 53 43 48 4C 41 47 |DIE NACHZUSCHLAG|
00000420: 45 4E 44 45 20 20 20 20 D6 4F 4B 41 42 45 4C 20 |ENDE .OKABEL |
00000430: 45 49 4E 20 22 3B 47 56 24 00 49 0C EF 03 8B 47 |EIN ";GV$.I....G|
00000440: 56 24 B2 22 5F 22 A7 20 8E 00 81 0C F1 03 81 51 |V$."_". .......Q|
00000450: 51 B2 31 A4 58 3A 8B 56 24 28 51 51 29 B2 47 56 |Q.1.X:.V$(QQ).GV|
00000460: 24 A7 99 22 C2 45 44 45 55 54 55 4E 47 3A 22 3B |$..".EDEUTUNG:";|
00000470: 42 24 28 51 51 29 3B 22 11 11 22 3A 89 31 30 30 |B$(QQ);"..":.100|
00000480: 35 00 87 0C F4 03 82 00 C9 0C F7 03 99 22 C4 49 |5............".I|
00000490: 45 20 47 45 53 55 43 48 54 45 20 D6 4F 4B 41 42 |E GESUCHTE .OKAB|
000004A0: 45 4C 20 49 53 54 20 4E 49 43 48 54 20 47 45 2D |EL IST NICHT GE-|
000004B0: 20 20 20 20 20 20 53 50 45 49 43 48 45 52 54 21 | SPEICHERT!|
000004C0: 11 11 22 3A 89 31 30 30 35 00 F9 0C DC 05 99 22 |..":.1005......"|
000004D0: 93 12 D6 4F 4B 41 42 45 4C 4E 20 53 50 45 49 43 |...OKABELN SPEIC|
000004E0: 48 45 52 4E 12 20 20 20 20 12 5F 92 20 46 4F 52 |HERN. ._. FOR|
000004F0: 20 CD 45 4E 55 45 11 11 22 00 19 0D E6 05 85 22 | .ENUE.."......"|
00000500: C6 49 4C 45 4E 41 4D 45 20 22 3B 46 46 24 3A 8B |.ILENAME ";FF$:.|
00000510: 46 46 24 B2 22 5F 22 A7 8E 00 28 0D F0 05 9F 31 |FF$."_"...(....1|
00000520: 2C 31 2C 31 2C 46 46 24 00 53 0D FA 05 81 46 46 |,1,1,FF$.S....FF|
00000530: B2 31 A4 58 3A 98 31 2C 56 24 28 46 46 29 3A 98 |.1.X:.1,V$(FF):.|
00000540: 31 2C 42 24 28 46 46 29 3A 82 3A 98 31 2C 22 5E |1,B$(FF):.:.1,"^|
00000550: 5E 5E 22 00 5A 0D 04 06 A0 31 00 72 0D 0E 06 99 |^^".Z....1.r....|
00000560: 22 11 11 12 5F 92 20 20 46 4F 52 20 CD 45 4E 55 |"..._. FOR .ENU|
00000570: 45 22 00 88 0D 18 06 A1 41 24 3A 8B 41 24 B3 B1 |E"......A$:.A$..|
00000580: 22 5F 22 A7 31 35 36 30 00 8E 0D 22 06 8E 00 C2 |"_".1560..."....|
00000590: 0D D0 07 99 22 93 12 D6 4F 4B 41 42 45 4C 4E 20 |...."...OKABELN |
000005A0: 45 49 4E 4C 45 53 45 4E 92 20 20 20 20 12 5F 92 |EINLESEN. ._.|
000005B0: 20 46 4F 52 20 CD 45 4E 55 45 11 11 22 3A 46 46 | FOR .ENUE..":FF|
000005C0: B2 31 00 E2 0D D5 07 85 22 C6 49 4C 45 4E 41 4D |.1......".ILENAM|
000005D0: 45 20 22 3B 46 46 24 3A 8B 46 46 24 B2 22 5F 22 |E ";FF$:.FF$."_"|
000005E0: A7 8E 00 F1 0D DA 07 9F 31 2C 31 2C 30 2C 46 46 |........1,1,0,FF|
000005F0: 24 00 1D 0E E4 07 84 31 2C 56 24 28 46 46 29 3A |$......1,V$(FF):|
00000600: 8B 56 24 28 46 46 29 B2 22 5E 5E 5E 22 A7 56 24 |.V$(FF)."^^^".V$|
00000610: 28 46 46 29 B2 22 22 3A 89 32 30 35 30 00 2B 0E |(FF)."":.2050.+.|
00000620: EE 07 84 31 2C 42 24 28 46 46 29 00 3D 0E F8 07 |...1,B$(FF).=...|
00000630: 46 46 B2 46 46 AA 31 3A 89 32 30 32 30 00 55 0E |FF.FF.1:.2020.U.|
00000640: 02 08 99 22 11 11 12 5F 92 20 20 46 4F 52 20 CD |..."..._. FOR .|
00000650: 45 4E 55 45 22 00 6B 0E 0C 08 A1 41 24 3A 8B 41 |ENUE".k....A$:.A|
00000660: 24 B3 B1 22 5F 22 A7 32 30 36 30 00 78 0E 16 08 |$.."_".2060.x...|
00000670: 58 B2 58 AA 46 46 3A 8E 00 A0 0E C4 09 99 22 93 |X.X.FF:.......".|
00000680: 12 C1 55 53 57 45 52 54 55 4E 47 92 20 20 20 20 |..USWERTUNG. |
00000690: 12 5F 92 20 46 4F 52 20 CD 45 4E 55 45 11 11 22 |._. FOR .ENUE.."|
000006A0: 00 C4 0E CE 09 99 22 C2 49 53 48 45 52 20 52 49 |......".ISHER RI|
000006B0: 43 48 54 49 47 45 20 D6 45 52 53 55 43 48 45 3A |CHTIGE .ERSUCHE:|
000006C0: 22 3B 52 49 00 E8 0E D8 09 99 22 11 C2 49 53 48 |";RI......"..ISH|
000006D0: 45 52 20 46 41 4C 53 43 48 45 20 D6 45 52 53 55 |ER FALSCHE .ERSU|
000006E0: 43 48 45 3A 22 3B 46 41 00 08 0F E2 09 97 32 31 |CHE:";FA......21|
000006F0: 34 2C 31 30 3A 99 3A 99 22 12 5F 92 20 20 46 4F |4,10:.:."._. FO|
00000700: 52 20 CD 45 4E 55 45 22 00 1E 0F EC 09 A1 41 24 |R .ENUE"......A$|
00000710: 3A 8B 41 24 B3 B1 22 5F 22 A7 32 35 34 30 00 24 |:.A$.."_".2540.$|
00000720: 0F F6 09 8E 00 3F 0F B8 0B 99 22 93 12 D0 52 4F |.....?...."...RO|
00000730: 47 52 41 4D 4D 20 42 45 45 4E 44 45 4E 92 22 00 |GRAMM BEENDEN.".|
00000740: 80 0F C2 0B 99 3A 99 3A 85 22 CD 4F 45 43 48 54 |.....:.:.".OECHT|
00000750: 45 4E 20 D3 49 45 20 44 41 53 20 D0 52 4F 47 52 |EN .IE DAS .ROGR|
00000760: 41 4D 4D 20 42 45 45 4E 44 45 4E 20 22 3B 57 41 |AMM BEENDEN ";WA|
00000770: 24 3A 8B 57 41 24 B2 22 4A 41 22 A7 33 30 33 30 |$:.WA$."JA".3030|
00000780: 00 88 0F CC 0B 89 33 30 00 A5 0F D6 0B 99 22 93 |......30......".|
00000790: 22 3A 97 35 33 32 37 32 2C 32 31 3A 97 37 38 38 |":.53272,21:.788|
000007A0: 2C 34 39 3A 80 00 AE 0F A0 0F 99 22 93 22 00 D6 |,49:......."."..|
000007B0: 0F A5 0F 97 32 31 34 2C 33 3A 99 3A 99 A3 31 31 |....214,3:.:..11|
000007C0: 29 3B 22 D6 4F 4B 41 42 45 4C 54 52 41 49 4E 45 |);".OKABELTRAINE|
000007D0: 52 20 33 2E 30 22 00 F7 0F AA 0F 99 A3 31 30 29 |R 3.0".......10)|
000007E0: 3B 22 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |;"..............|
000007F0: B9 B9 B9 B9 B9 B9 22 00 1E 10 B4 0F 99 3A 99 3A |......"......:.:|
00000800: 99 3A 99 A3 39 29 3B 22 42 59 20 C6 52 41 4E 4B |.:..9);"BY .RANK|
00000810: 20 C8 41 55 50 54 46 4C 45 49 53 43 48 22 00 3B | .AUPTFLEISCH".;|
00000820: 10 BE 0F 99 3A 99 3A 99 3A 99 3A 99 A3 31 36 29 |....:.:.:.:..16)|
00000830: 3B 22 28 C3 29 20 31 39 38 34 22 00 69 10 D2 0F |;"(.) 1984".i...|
00000840: 97 32 31 34 2C 32 30 3A 99 3A 99 A3 38 29 3B 22 |.214,20:.:..8);"|
00000850: 12 50 52 45 53 53 20 41 4E 59 20 CB 45 59 20 54 |.PRESS ANY .EY T|
00000860: 4F 20 42 45 47 49 4E 92 22 00 7E 10 DC 0F A1 20 |O BEGIN.".~.... |
00000870: 41 24 3A 8B 41 24 B2 22 22 A7 34 30 36 30 00 84 |A$:.A$."".4060..|
00000880: 10 E6 0F 8E 00 00 00 01 10 |......... |
....... VOKABELTRAINER.T....53280,0:.532
81,0:."..":.53272,23:X.1:.V$(1000):.B$(1
000).I....650,128:.788,52.}...RI.0:FA.0:
.4000.....:......".":..10);".VOKABELTRAI
NER MENUE.".Z.(..214,4:.:..9);".1-. VO
KABELN EINGEBEN":....)...9);".2-. VOKA
BELN ABFRAGEN":..*.*...9);".3-. VOKABE
LN NACHSCHLAGEN":..Q.+...9);".4-. VOKA
BELN SPEICHERN":..W.,...9);".5-. VOKAB
ELN EINLESEN":....-...9);".6-. AUSWERT
UNG":........9);".7-. ENDE".N./..214,2
0:.:..9);"IHRE WAHL ?"...2..WA$:.WA$."".
50...7.WA.E(WA$):.WA.1.WA.7.50.*.<.. WA
. 100,500,1000,1500,2000,2500,3000.2.A..
30.8.F.:.G.D.."..VOKABELN EINGEBEN. .
_. FOR MENUE.."...I.."VOKABEL ";V$(X):.V
$(X)."_".V$(X)."":..O.K.."BEDEUTUNG ";B$
(X):.".":.B$(X)."_".B$(X)."":V$(X)."":..
..M.X.X.1:.105...N.:......"..VOKABELN AB
FRAGEN. ._. FOR MENUE..".&...ZZ..(.(1
).X).1.2....V$(ZZ).T...."BEDEUTUNG ";AA$
:.AA$."_". ..~....AA$.B$(ZZ)..".RICHTIG!
":RI.RI.1:.514......"LEIDER FALSCH! RICH
TIGE BEDEUTUNG:":.B$(ZZ):FA.FA.1.F....".
":.505......"..VOKABELN NACHSCHLAGEN.
._. FOR MENUE..".9...."BITTE GEBEN SIE
DIE NACHZUSCHLAGENDE VOKABEL EIN ";GV
$.I....GV$."_". .......QQ.1.X:.V$(QQ).GV
$.."BEDEUTUNG:";B$(QQ);"..":.1005.......
I...."DIE GESUCHTE VOKABEL IST NICHT GE-
SPEICHERT!..":.1005......"..VOKABE
LN SPEICHERN. ._. FOR MENUE.."......"
FILENAME ";FF$:.FF$."_"...(....1,1,1,FF$
.S....FF.1.X:.1,V$(FF):.1,B$(FF):.:.1,"^
^^".Z... 1.R...."..._. FOR MENUE"......
A$:.A$.."_".1560..."...B.P.."..VOKABELN
EINLESEN. ._. FOR MENUE..":FF.1...U..
"FILENAME ";FF$:.FF$."_".....Z..1,1,0,FF
$......1,V$(FF):.V$(FF)."^^^".V$(FF)."":
.2050.+....1,B$(FF).=...FF.FF.1:.2020.U.
..."..._. FOR MENUE".K....A$:.A$.."_".2
060.X...X.X.FF:.. .D.."..AUSWERTUNG.
._. FOR MENUE..".D.N.."BISHER RICHTIGE V
ERSUCHE:";RI...X..".BISHER FALSCHE VERSU
CHE:";FA......214,10:.:."._. FOR MENUE"
......A$:.A$.."_".2540.$.....?...."..PRO
GRAMM BEENDEN."...B..:.:."MOECHTEN SIE D
AS PROGRAMM BEENDEN ";WA$:.WA$."JA".3030
...L..30...V..".":.53272,21:.788,49:....
..".".V....214,3:.:..11);"VOKABELTRAINE
R 3.0".......10);"....................".
.....:.:.:..9);"BY FRANK HAUPTFLEISCH".;
....:.:.:.:..16);"(C) 1984".I.R..214,20:
.:..8);".PRESS ANY KEY TO BEGIN.".~....
A$:.A$."".4060...........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL