Woorden raden

18 mei 2025
De spelleider voert een te raden woord in zonder dat de spelers het zien. Verschillende spelers kun je, eventueel op verschillende computers, lettergewijs naar hetzelfde woord laten raden. Omdat de scores op een eerlijke manier vergelijkbaar zijn, kun je er een wedstrijd van maken.

RAAD ( adr len -- )

Voorbeeld:
s" FORTHGEBRUIKERSGROEP" RAAD ( adr len -- )
Dit is natuurlijk niet handig. Liever, voorgeprogrammeerd buiten het zicht van de spelers:
: W1 ( -- adr len ) s" FORTHGEBRUIKERSGROEP" ;
En later:
w1 RAAD

Het raden zelf verloopt zo:

Blauw = de opdracht Groen = reactie van het programma Grijs = niet afgedrukte input van de gebruiker
:)W1 RAAD↩
....................             Raad de 20 letters van dit woord A -5 B
.......B............             0 C -5 D -10 E
......EB............             -5 F
F.....EB............             0 G
F....GEB............             5 H
F...HGEB............             10 I
F...HGEB..I.........             15 J 10 K
F...HGEB..IK........             15 L 10 M 5 N 0 O
FO..HGEB..IK........             5 P
FO..HGEB..IK.......P             10 Q 5 R
FOR.HGEB..IK.......P             10 S
FOR.HGEB..IK..S....P             15 T
FORTHGEB..IK..S....P             20 U
FORTHGEB.UIK..S....P             25 V 20 W 15 X 10 Y 5 Z 0 R
FORTHGEBRUIK..S....P             5 E
FORTHGEBRUIKE.S....P             10 R
FORTHGEBRUIKERS....P             15 G
FORTHGEBRUIKERSG...P             20 R
FORTHGEBRUIKERSGR..P             25 O
FORTHGEBRUIKERSGRO.P             30 E
FORTHGEBRUIKERSGROEP             35 = eindscore (max is 100)
 OK.0
:)

De puntentelling

Begin op nul Goed geraden letter -> 1 punt erbij Fout geraden letter -> 1 punt eraf Scoreberekening Het woord is foutloos geraden -> score=100 Evenveel goed als fout geraden letters -> score=0 De omrekening van punten naar score gaat dus zo:
: SCORE ( punten -- score ) 100 woordlengte */ ;

Radeloos?

Met de ESC-toets kun je het programma op elk moment verlaten.

RAAD: (voor de freaks)

: RAAD: ( <versleuteld-woord> -- ) bl-word count 2dup ontsleutel raad ;
\ Vb: RAAD: [DDSV[[_A[GEZMMPREAW[@D
Om het eenvoudig te houden: maak versleutel en ontsleutel gelijk aan elkaar. Succes! (AN)