SuperKamiGuru/foss-mmo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Change the kind of non-copper walls to inert

Browse source
This commit is contained in:
Juliana Sims 2024-05-24 12:00:17 -04:00
parent c4b308232f
commit 51bc034756
No known key found for this signature in database
GPG key ID: 2A00BD4B0090029E
5 changed files with 42 additions and 47 deletions
Download patch file Download diff file Expand all files Collapse all files

4
scripts/compile-map.scm
View file

@ -547,7 +547,7 @@ the default ORIENTATION value of 'orthogonal' is supported."
(y-loop (1+ y))))
bv))
(define obj:wall:brick 1)
(define obj:wall:inert 1)
(define obj:wall:copper 2)
(define obj:player-spawn 3)
(define obj:exit 4)
@ -579,7 +579,7 @@ the default ORIENTATION value of 'orthogonal' is supported."
(#f #f)
("wall"
(match (assq-ref (tile-properties tile) 'kind)
("brick" (list x y obj:wall:brick))
("inert" (list x y obj:wall:inert))
("copper" (list x y obj:wall:copper))
(kind (error "unsupported wall kind" kind))))
("exit" (list x y obj:exit))