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

Add ^switched-emitter, test in level 4

Browse source
This commit is contained in:
Juliana Sims 2024-05-22 15:28:42 -04:00
parent aa8a302fcb
commit 50b6c67db8
6 changed files with 50 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
scripts/compile-map.scm
View file

@ -562,6 +562,7 @@ the default ORIENTATION value of 'orthogonal' is supported."
(define obj:xor-gate 13)
(define obj:electron-warp 14)
(define obj:or-gate 15)
(define obj:switched-emitter 16)
(define (compile-environment-layer tile-map layer-name)
(let ((tw (tile-map-tile-width tile-map))
@ -582,6 +583,7 @@ the default ORIENTATION value of 'orthogonal' is supported."
(kind (error "unsupported wall kind" kind))))
("exit" (list x y obj:exit))
("clock-emitter" (list x y obj:clock-emitter))
("switched-emitter" (list x y obj:switched-emitter))
(type (error "unsupported background object" type))))))
(iota (tile-layer-width layer)))))
(iota (tile-layer-height layer)))))