pti/bloatrunner
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Compare commits

base: pti:aa12c340e9ed4e84b0057d96944c6827b36cc073
Branches Tags
pti:main
..
compare: pti:e930629b76bd2a76f7d4d0188c20c222c0e9f002
Branches Tags
pti:main

No commits in common. "aa12c340e9ed4e84b0057d96944c6827b36cc073" and "e930629b76bd2a76f7d4d0188c20c222c0e9f002" have entirely different histories.
aa12c340e9 ... e930629b76

3 changed files with 7 additions and 8 deletions
Show stats Expand all files Collapse all files

4
.guix/modules/bloatrunner.scm
View file

@ -47,9 +47,9 @@
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(guile (assoc-ref inputs "guile")) (guile (assoc-ref inputs "guile"))
(guile-opengl (assoc-ref inputs "guile-opengl")) (guile-opengl (assoc-ref inputs "guile-opengl"))
(guile-sdl2 (assoc-ref inputs "guile-sdl2")) (guile-sdl22 (assoc-ref inputs "guile-sdl2"))
(chickadee (assoc-ref inputs "guile-chickadee")) (chickadee (assoc-ref inputs "guile-chickadee"))
(deps (list out guile-opengl guile-sdl2 chickadee guile)) (deps (list out chickadee guile))
(effective (read-line (effective (read-line
(open-pipe* OPEN_READ (open-pipe* OPEN_READ
(string-append guile "/bin/guile") (string-append guile "/bin/guile")

8
README.org
View file

@ -36,7 +36,7 @@ let the _others_ fall in so you can pass over their head.
So now, go out, collect the keys and maintain a healthy diet! So now, go out, collect the keys and maintain a healthy diet!
* Game Plan [9/16] * Game Plan [7/16]
- [X] start project organization - [X] start project organization
- [X] select some assets to start with - [X] select some assets to start with
@ -45,11 +45,11 @@ So now, go out, collect the keys and maintain a healthy diet!
- [X] create hero entity - [X] create hero entity
- [X] implement hero movement - [X] implement hero movement
- [X] create other entity - [X] create other entity
- [X] bundle game for distribution - [-] bundle game for distribution
- [X] add assets to the package - [X] add assets to the package
- [X] wrap the script to find the libraries - [X] wrap the script to find the libraries
- [X] ensure the assets can be found by the render packages - [ ] ensure the assets can be found by the render packages
- [X] upload to itch.io - [ ] upload to itch.io
- [ ] automate upload to itch.io - [ ] automate upload to itch.io
- [ ] create other's AI - [ ] create other's AI
- [ ] add keys and portal - [ ] add keys and portal

3
game/model/level.scm
View file

@ -1,5 +1,4 @@
(define-module (game model level) (define-module (game model level)
#:use-module (game util assets)
#:use-module (ice-9 match) #:use-module (ice-9 match)
#:use-module (ice-9 pretty-print) #:use-module (ice-9 pretty-print)
#:use-module (ice-9 textual-ports) #:use-module (ice-9 textual-ports)
@ -70,7 +69,7 @@
(%make-level width height tiles #f #f entities))) (%make-level width height tiles #f #f entities)))
(define (level-parse-file filename) (define (level-parse-file filename)
(level-parse (call-with-input-file (asset-file-name filename) get-string-all))) (level-parse (call-with-input-file filename get-string-all)))
(define (level-tile-at-row-col level row col ) (define (level-tile-at-row-col level row col )