00000000: 00 20 50 52 20 45 49 4E 50 41 53 53 45 4E 20 3A |. PR EINPASSEN :|
00000010: 42 20 3A 41 4C 54 20 3A 5A 49 45 4C 0D 20 53 45 |B :ALT :ZIEL. SE|
00000020: 54 5A 45 20 22 4E 45 55 20 22 0D 20 41 4E 46 41 |TZE "NEU ". ANFA|
00000030: 4E 47 3A 0D 20 57 45 4E 4E 20 3A 41 4C 54 20 3D |NG:. WENN :ALT =|
00000040: 20 22 20 52 55 45 43 4B 47 41 42 45 20 3A 4E 45 | " RUECKGABE :NE|
00000050: 55 0D 20 50 52 55 45 46 45 20 3A 42 20 3D 20 45 |U. PRUEFE :B = E|
00000060: 52 20 3A 5A 49 45 4C 0D 20 57 57 20 53 45 54 5A |R :ZIEL. WW SETZ|
00000070: 45 20 22 4E 45 55 20 57 4F 52 54 20 3A 4E 45 55 |E "NEU WORT :NEU|
00000080: 20 3A 42 0D 20 57 46 20 53 45 54 5A 45 20 22 4E | :B. WF SETZE "N|
00000090: 45 55 20 57 4F 52 54 20 3A 4E 45 55 20 45 52 20 |EU WORT :NEU ER |
000000A0: 3A 41 4C 54 0D 20 53 45 54 5A 45 20 22 41 4C 54 |:ALT. SETZE "ALT|
000000B0: 20 4F 45 20 3A 41 4C 54 0D 20 53 45 54 5A 45 20 | OE :ALT. SETZE |
000000C0: 22 5A 49 45 4C 20 4F 45 20 3A 5A 49 45 4C 0D 20 |"ZIEL OE :ZIEL. |
000000D0: 47 45 48 45 20 22 41 4E 46 41 4E 47 0D 20 45 4E |GEHE "ANFANG. EN|
000000E0: 44 0D 45 4E 44 45 0D 50 52 20 56 45 52 53 55 43 |D.ENDE.PR VERSUC|
000000F0: 48 20 3A 5A 49 45 4C 0D 20 53 45 54 5A 45 20 22 |H :ZIEL. SETZE "|
00000100: 42 20 4C 54 0D 20 44 5A 20 3A 42 0D 20 52 47 20 |B LT. DZ :B. RG |
00000110: 45 49 4E 50 41 53 53 45 4E 20 3A 42 20 3A 52 41 |EINPASSEN :B :RA|
00000120: 54 45 57 4F 52 54 20 3A 5A 49 45 4C 0D 45 4E 44 |TEWORT :ZIEL.END|
00000130: 45 0D 50 52 20 4C 45 45 52 57 4F 52 54 20 3A 4E |E.PR LEERWORT :N|
00000140: 0D 20 53 45 54 5A 45 20 22 52 41 54 45 57 4F 52 |. SETZE "RATEWOR|
00000150: 54 20 22 0D 20 57 48 20 3A 4E 20 5B 53 45 54 5A |T ". WH :N [SETZ|
00000160: 45 20 22 52 41 54 45 57 4F 52 54 20 57 4F 52 54 |E "RATEWORT WORT|
00000170: 20 22 3F 20 3A 52 41 54 45 57 4F 52 54 5D 0D 20 | "? :RATEWORT]. |
00000180: 52 55 45 43 4B 47 41 42 45 20 3A 52 41 54 45 57 |RUECKGABE :RATEW|
00000190: 4F 52 54 0D 45 4E 44 45 0D 50 52 20 52 41 54 45 |ORT.ENDE.PR RATE|
000001A0: 2E 42 49 53 2E 5A 49 45 4C 20 3A 5A 49 45 4C 0D |.BIS.ZIEL :ZIEL.|
000001B0: 20 57 45 4E 4E 20 3A 52 41 54 45 57 4F 52 54 20 | WENN :RATEWORT |
000001C0: 3D 20 3A 5A 49 45 4C 20 52 4B 0D 20 28 20 44 5A |= :ZIEL RK. ( DZ|
000001D0: 20 3A 52 41 54 45 57 4F 52 54 20 5B 52 41 54 45 | :RATEWORT [RATE|
000001E0: 2E 2E 2E 5D 20 29 0D 20 53 45 54 5A 45 20 22 52 |...] ). SETZE "R|
000001F0: 41 54 45 57 4F 52 54 20 56 45 52 53 55 43 48 20 |ATEWORT VERSUCH |
00000200: 3A 5A 49 45 4C 0D 20 53 45 54 5A 45 20 22 56 45 |:ZIEL. SETZE "VE|
00000210: 52 53 55 43 48 53 5A 41 48 4C 20 3A 56 45 52 53 |RSUCHSZAHL :VERS|
00000220: 55 43 48 53 5A 41 48 4C 20 2B 20 31 0D 20 52 41 |UCHSZAHL + 1. RA|
00000230: 54 45 2E 42 49 53 2E 5A 49 45 4C 20 3A 5A 49 45 |TE.BIS.ZIEL :ZIE|
00000240: 4C 0D 45 4E 44 45 0D 50 52 20 57 4F 52 54 4C 41 |L.ENDE.PR WORTLA|
00000250: 45 4E 47 45 2E 41 4E 5A 45 49 47 45 4E 20 3A 5A |ENGE.ANZEIGEN :Z|
00000260: 49 45 4C 0D 20 53 45 54 5A 45 20 22 52 41 54 45 |IEL. SETZE "RATE|
00000270: 57 4F 52 54 20 4C 45 45 52 57 4F 52 54 20 4C 41 |WORT LEERWORT LA|
00000280: 45 4E 47 45 20 3A 5A 49 45 4C 0D 20 44 5A 20 5B |ENGE :ZIEL. DZ [|
00000290: 53 4F 20 53 49 45 48 54 20 44 41 53 20 57 4F 52 |SO SIEHT DAS WOR|
000002A0: 54 20 41 55 53 3A 5D 0D 20 42 4C 49 4E 4B 45 52 |T AUS:]. BLINKER|
000002B0: 20 31 30 20 34 20 44 5A 20 3A 52 41 54 45 57 4F | 10 4 DZ :RATEWO|
000002C0: 52 54 20 44 5A 20 5B 5D 0D 45 4E 44 45 0D 50 52 |RT DZ [].ENDE.PR|
000002D0: 20 4B 4F 4D 4D 45 4E 54 41 52 0D 20 44 5A 20 5B | KOMMENTAR. DZ [|
000002E0: 5D 20 44 5A 20 5B 5D 0D 20 28 20 44 5A 20 3A 5A |] DZ []. ( DZ :Z|
000002F0: 49 45 4C 20 5B 57 41 52 27 53 2E 20 44 55 20 48 |IEL [WAR'S. DU H|
00000300: 41 53 54 20 45 53 20 45 52 52 41 54 45 4E 20 4D |AST ES ERRATEN M|
00000310: 49 54 5D 20 29 0D 20 28 20 44 5A 20 3A 56 45 52 |IT] ). ( DZ :VER|
00000320: 53 55 43 48 53 5A 41 48 4C 20 5B 56 45 52 53 55 |SUCHSZAHL [VERSU|
00000330: 43 48 45 4E 2E 5D 20 29 0D 45 4E 44 45 0D 50 52 |CHEN.] ).ENDE.PR|
00000340: 20 52 41 54 45 20 3A 5A 49 45 4C 0D 20 4C 53 20 | RATE :ZIEL. LS |
00000350: 44 5A 20 5B 45 53 20 47 45 48 54 20 4C 4F 53 5D |DZ [ES GEHT LOS]|
00000360: 0D 20 57 4F 52 54 4C 41 45 4E 47 45 2E 41 4E 5A |. WORTLAENGE.ANZ|
00000370: 45 49 47 45 4E 20 3A 5A 49 45 4C 0D 20 53 45 54 |EIGEN :ZIEL. SET|
00000380: 5A 45 20 22 56 45 52 53 55 43 48 53 5A 41 48 4C |ZE "VERSUCHSZAHL|
00000390: 20 30 0D 20 52 41 54 45 2E 42 49 53 2E 5A 49 45 | 0. RATE.BIS.ZIE|
000003A0: 4C 20 3A 5A 49 45 4C 0D 45 4E 44 45 0D 50 52 20 |L :ZIEL.ENDE.PR |
000003B0: 53 54 41 52 54 0D 20 4C 53 20 44 5A 20 5B 41 55 |START. LS DZ [AU|
000003C0: 46 20 4C 4F 53 20 47 45 48 54 27 53 20 4C 4F 53 |F LOS GEHT'S LOS|
000003D0: 21 21 21 5D 0D 20 44 5A 20 5B 5D 20 44 5A 20 5B |!!!]. DZ [] DZ [|
000003E0: 44 55 20 47 49 42 53 54 20 45 49 4E 20 5A 49 45 |DU GIBST EIN ZIE|
000003F0: 4C 57 4F 52 54 20 45 49 4E 5D 0D 20 44 5A 20 5B |LWORT EIN]. DZ [|
00000400: 44 45 49 4E 20 4D 49 54 53 50 49 45 4C 45 52 20 |DEIN MITSPIELER |
00000410: 53 43 48 41 55 54 20 44 41 42 45 49 20 57 45 47 |SCHAUT DABEI WEG|
00000420: 2E 5D 0D 20 44 5A 20 5B 44 41 4E 41 43 48 20 53 |.]. DZ [DANACH S|
00000430: 4F 4C 4C 20 45 52 20 45 53 20 42 55 43 48 53 54 |OLL ER ES BUCHST|
00000440: 41 42 45 4E 57 45 49 53 45 20 52 41 54 45 4E 2E |ABENWEISE RATEN.|
00000450: 5D 0D 20 44 5A 20 5B 44 45 49 4E 20 5A 49 45 4C |]. DZ [DEIN ZIEL|
00000460: 57 4F 52 54 3F 5D 0D 20 53 45 54 5A 45 20 22 5A |WORT?]. SETZE "Z|
00000470: 49 45 4C 20 45 52 53 54 45 53 20 4C 4C 0D 45 4E |IEL ERSTES LL.EN|
00000480: 44 45 0D 50 52 20 52 41 54 45 53 50 49 45 4C 0D |DE.PR RATESPIEL.|
00000490: 20 53 54 41 52 54 0D 20 52 41 54 45 20 3A 5A 49 | START. RATE :ZI|
000004A0: 45 4C 0D 20 4B 4F 4D 4D 45 4E 54 41 52 0D 45 4E |EL. KOMMENTAR.EN|
000004B0: 44 45 0D |DE. |
. PR EINPASSEN :B :ALT :ZIEL. SETZE "NEU
". ANFANG:. WENN :ALT = " RUECKGABE :NE
U. PRUEFE :B = ER :ZIEL. WW SETZE "NEU W
ORT :NEU :B. WF SETZE "NEU WORT :NEU ER
:ALT. SETZE "ALT OE :ALT. SETZE "ZIEL OE
:ZIEL. GEHE "ANFANG. END.ENDE.PR VERSUC
H :ZIEL. SETZE "B LT. DZ :B. RG EINPASSE
N :B :RATEWORT :ZIEL.ENDE.PR LEERWORT :N
. SETZE "RATEWORT ". WH :N [SETZE "RATEW
ORT WORT "? :RATEWORT]. RUECKGABE :RATEW
ORT.ENDE.PR RATE.BIS.ZIEL :ZIEL. WENN :R
ATEWORT = :ZIEL RK. ( DZ :RATEWORT [RATE
...] ). SETZE "RATEWORT VERSUCH :ZIEL. S
ETZE "VERSUCHSZAHL :VERSUCHSZAHL + 1. RA
TE.BIS.ZIEL :ZIEL.ENDE.PR WORTLAENGE.ANZ
EIGEN :ZIEL. SETZE "RATEWORT LEERWORT LA
ENGE :ZIEL. DZ [SO SIEHT DAS WORT AUS:].
BLINKER 10 4 DZ :RATEWORT DZ [].ENDE.PR
KOMMENTAR. DZ [] DZ []. ( DZ :ZIEL [WAR
'S. DU HAST ES ERRATEN MIT] ). ( DZ :VER
SUCHSZAHL [VERSUCHEN.] ).ENDE.PR RATE :Z
IEL. LS DZ [ES GEHT LOS]. WORTLAENGE.ANZ
EIGEN :ZIEL. SETZE "VERSUCHSZAHL 0. RATE
.BIS.ZIEL :ZIEL.ENDE.PR START. LS DZ [AU
F LOS GEHT'S LOS!!!]. DZ [] DZ [DU GIBST
EIN ZIELWORT EIN]. DZ [DEIN MITSPIELER
SCHAUT DABEI WEG.]. DZ [DANACH SOLL ER E
S BUCHSTABENWEISE RATEN.]. DZ [DEIN ZIEL
WORT?]. SETZE "ZIEL ERSTES LL.ENDE.PR RA
TESPIEL. START. RATE :ZIEL. KOMMENTAR.EN
DE.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL