cd70055bc7
Renamed files: constanten→constants, adt-positie→adt-position, adt-doolhof→adt-maze, adt-sleutel→adt-key, adt-tijdslimiet→adt-timer, adt-teken→adt-draw, adt-spel→adt-game. All message names, variables, comments, and tests converted to English. Also fixed counter location bug (time-label x/y were swapped). Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
54 lines
2.2 KiB
Racket
54 lines
2.2 KiB
Racket
#lang r7rs
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Constanten ;;
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
;; We maken eerst een lijstje met variabelen die ons spel zullen
|
|
;; configureren. Uiteraard willen we niet dat deze "magic constants" doorheen
|
|
;; het hele programma verspreid staan. Dit heeft als gevolg dat wanneer je
|
|
;; bijvoorbeeld het formaat van het spel wil aanpassen je dan doorheen je hele
|
|
;; code moet graven en zoeken om dit te doen. Het abstraheren van deze waardes
|
|
;; in variabelen zorgt voor heel flexibele code.
|
|
|
|
(define-library ()
|
|
(import (scheme base))
|
|
(export cel-breedte-px
|
|
cel-hoogte-px
|
|
spel-breedte
|
|
spel-hoogte
|
|
venster-breedte-px
|
|
venster-hoogte-px
|
|
appel-refresh-rate
|
|
slang-snelheid)
|
|
|
|
(begin
|
|
|
|
(define cel-breedte-px 20)
|
|
(define cel-hoogte-px 20)
|
|
|
|
(define spel-breedte 20)
|
|
(define spel-hoogte 20)
|
|
|
|
(define venster-breedte-px (* cel-breedte-px spel-breedte))
|
|
(define venster-hoogte-px (* cel-hoogte-px spel-hoogte))
|
|
|
|
;; Hoe lang een appel op dezelfde plaats blijft staan...
|
|
(define appel-refresh-rate 20000) ;; 20000 milliseconden = 20 seconden
|
|
|
|
;; Aan welke snelheid de slang ongeveer beweegt...
|
|
(define slang-snelheid 200) ;; 200 milliseconden = 0.2 seconden
|
|
|
|
;; De code in dit bestand moet abstractie maken van hoe of wat de elementen
|
|
;; (de appel en de slang) getekend worden. Deze taken zijn namelijk uitbesteed
|
|
;; aan het teken-ADT (en zo aan de Graphics.rkt library). Vermits de code hier
|
|
;; niet weet of het teken-ADT gaat tekenen naar een computerscherm, of elke
|
|
;; frame naar een kleurenprinter gaat sturen, of gaat uitbeelden in kiezeltjes
|
|
;; op de grond, of... mag de code in dit bestand niet geschreven worden in
|
|
;; functie van pixels (of punten/kiezels/etc.) In plaats daarvan werken we met
|
|
;; een abstract grid dat het speelvenster voorstelt. De volgende berekeningen
|
|
;; zijn nodig voor het Teken ADT. Het is jouw taak om de spellogica zodanig te
|
|
;; schrijven dat deze onafhankelijk is van de tekenlogica.
|
|
|
|
))
|