syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

New terrain

This commit is contained in:
Tony Garnock-Jones 2015-10-26 20:33:38 -04:00
parent 4b81179e7a
commit 287341cbbc
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
examples/platformer/game.rkt
View File

@ -691,6 +691,8 @@
(match level-number
[0 (spawn-level #:level-size (vector 4000 800)
(spawn-ground-block (vector 400 200) (vector 200 standard-ground-height))
(spawn-ground-block (vector 200 280) (vector 200 200)
#:color "orange")
(spawn-ground-block (vector 25 300) (vector 500 standard-ground-height)))]))
(define (spawn-level-spawner)