module Dodge.Item.Weapon.Bullet
    ( basicBullet
    , ltBullet
    , hvBullet
    ) where
import Dodge.Data
import Dodge.WorldEvent.HitEffect
import Dodge.Particle.Bullet.HitEffect

import Geometry.Data
basicBullet :: Ammo
basicBullet = BulletAmmo
    { _amString = "BULLET"
    , _amBulEff = destroyOnImpact bulHitCr bulHitWall
    , _amBulWth = 2
    , _amBulVel = V2 50 0
    }
ltBullet :: Ammo
ltBullet = BulletAmmo
    { _amString = "LTBULLET"
    , _amBulEff = destroyOnImpact bulHitCr bulHitWall
    , _amBulWth = 2
    , _amBulVel = V2 40 0
    }
hvBullet :: Ammo
hvBullet = BulletAmmo
    { _amString = "HVBULLET"
    , _amBulEff = penWalls hvBulHitCr hvBulHitWall
    , _amBulWth = 6
    , _amBulVel = V2 80 0
    }
