Partially implement separate blocks
This commit is contained in:
@@ -6,10 +6,9 @@ module Dodge.Particle.Bullet.HitEffect
|
||||
import Dodge.Data
|
||||
import Dodge.Data.DamageType
|
||||
import Dodge.Data.SoundOrigin
|
||||
--import Dodge.Base
|
||||
import Dodge.WorldEvent.DamageBlock
|
||||
import Dodge.WorldEvent
|
||||
import Dodge.Particle.Bullet.Spawn
|
||||
import Dodge.WorldEvent.DamageBlock
|
||||
import Dodge.SoundLogic
|
||||
import Dodge.SoundLogic.LoadSound
|
||||
import Dodge.RandomHelp
|
||||
@@ -190,6 +189,7 @@ bulConWall'
|
||||
bulConWall' _ p wl = damageBlocksBy 1 wl .
|
||||
over worldEvents ( makeShockwaveAt [] p 15 4 1 white . )
|
||||
|
||||
|
||||
hvBulHitWall'
|
||||
:: Particle
|
||||
-> Point2 -- ^ Impact point
|
||||
|
||||
Reference in New Issue
Block a user