Fade out/in when resetting game after credits.
This commit is contained in:
parent
fb96e0e913
commit
2151abef57
1 changed files with 8 additions and 3 deletions
7
game.scm
7
game.scm
|
@ -225,9 +225,14 @@
|
||||||
(load-level! *level-idx*)))))
|
(load-level! *level-idx*)))))
|
||||||
|
|
||||||
(define (reset-game!)
|
(define (reset-game!)
|
||||||
|
(run-script
|
||||||
|
(lambda ()
|
||||||
(set! *level-idx* 0)
|
(set! *level-idx* 0)
|
||||||
(save-game!)
|
(save-game!)
|
||||||
(load-level! 0))
|
(set! *state* 'interstitial)
|
||||||
|
(show-effect! (make-fade-out+in-effect 2.0))
|
||||||
|
(wait 60)
|
||||||
|
(load-level! 0))))
|
||||||
|
|
||||||
;; Update loop
|
;; Update loop
|
||||||
(define (move-player dir)
|
(define (move-player dir)
|
||||||
|
|
Loading…
Add table
Reference in a new issue