update readme, add main.rkt header, fix text entry

This commit is contained in:
kiefac 2024-05-18 13:02:38 -04:00
parent 4544fbe54b
commit 3b622ce3c6
2 changed files with 24 additions and 1 deletions

View file

@ -1,3 +1,18 @@
# lispjam24 # lispjam24
repo for entry to lisp game jam 2024 repo for entry to lisp game jam 2024
## compilation in DrRacket
### ensure you have the gui-easy package installed
File -> Package Manager... -> Do What I Mean
Package Source: `gui-easy` [return/enter]
### create the package
Racket -> Create Executable...
Type: [any]
Base: GRacket
-> Create

View file

@ -1,3 +1,11 @@
#|-----------------------------------------|
| Entry for the Spring Lisp Game Jam 2024 |
| Title: <TODO> |
| Genre: Procedural text adventure |
| Author: kiefac (homie@tensi.org) |
| Start date: 2024-18-5 |
| End date: <TODO> |
|-----------------------------------------|#
#lang racket/gui #lang racket/gui
(require racket/gui/easy (require racket/gui/easy
racket/gui/easy/operator) racket/gui/easy/operator)
@ -8,7 +16,7 @@
(define (text-entered event content) (define (text-entered event content)
(when (eqv? event 'return) (when (eqv? event 'return)
(:= @log (~a (obs-peek @log) (obs-peek @input) "\n")))) (:= @log (~a (obs-peek @log) content "\n"))))
(render (render
(window (window