berserkAttackSpike :: EntThink
berserkAttackSpike =
  GenericEntThink "berserk_attack_spike" $ \selfRef -> do
    r <- Lib.rand
    let n = r `mod` 6 + 15
        aim = V3 (fromIntegral Constants.meleeDistance) 0 (-24)
    void $ GameWeapon.fireHit selfRef aim (fromIntegral n) 400
    -- Faster attack -- upwards and backwards
    return True
berserkAttackSpike :: EntThink
berserkAttackSpike =
  GenericEntThink "berserk_attack_spike" $ \selfRef -> do
    r <- Lib.rand
    let n = r `mod` 6 + 15
        aim = V3 (fromIntegral Constants.meleeDistance) 0 (-24)
    void $ GameWeapon.fireHit selfRef aim (fromIntegral n) 400
    -- Faster attack -- upwards and backwards
    return True
berserkAttackSpike =
  GenericEntThink "berserk_attack_spike" $ \selfRef -> do
    r <- Lib.rand
    let n = r `mod` 6 + 15
        aim = V3 (fromIntegral Constants.meleeDistance) 0 (-24)
    void $ GameWeapon.fireHit selfRef aim (fromIntegral n) 400
    -- Faster attack -- upwards and backwards
    return True