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

Add particle effects for pickups, e-switches, and warps.

Browse source
This commit is contained in:
David Thompson 2024-05-26 20:40:42 -04:00
parent 4d507e472f
commit 76fdb7c6f6
4 changed files with 70 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

4
modules/game/actors.scm
View file

@ -300,15 +300,15 @@
($ timer t)
(when (= t 0)
($ on? #f)
($ grid-info 'append-event `(electric-switch-off ,x ,y))
(for-each (lambda (obj)
($ grid-info 'append-event `(electic-switch-off ,x ,y))
($ obj 'deactivate grid-info))
(non-player-occupants grid-info target-x target-y))))
(when (>= (electron-head-count neighbor-grid) 1)
($ on? #t)
($ timer 2)
($ grid-info 'append-event `(electric-switch-on ,x ,y))
(for-each (lambda (obj)
($ grid-info 'append-event `(electic-switch-on ,x ,y))
($ obj 'activate grid-info))
(non-player-occupants grid-info target-x target-y)))))
(('alive?) #t)