Commit before rethinking item positioning, broken item hammer
This commit is contained in:
@@ -43,7 +43,7 @@ defaultBangCane = defaultBulletWeapon
|
||||
, _torqueAfter = 0.1
|
||||
, _randomOffset = 0
|
||||
}
|
||||
, _itUse = ruseAmmoParamsRate 6 upHammer
|
||||
, _itUse = ruseAmmoParamsRate 6
|
||||
[ ammoHammerCheck
|
||||
, useTimeCheck
|
||||
, withSoundStart tap3S
|
||||
@@ -70,7 +70,7 @@ defaultBangCane = defaultBulletWeapon
|
||||
& itConsumption . laCycle .~ [loadPartialInsert 10 1]
|
||||
volleyGun :: Int -> Item
|
||||
volleyGun i = defaultBulletWeapon
|
||||
& itUse .~ ruseAmmoParamsRate 6 upHammer
|
||||
& itUse .~ ruseAmmoParamsRate 6
|
||||
[ ammoHammerCheck
|
||||
, useTimeCheck
|
||||
, withSoundItemChoiceStart caneStickSoundChoice
|
||||
@@ -224,7 +224,7 @@ burstRifle = repeater
|
||||
-- , withRecoil
|
||||
-- ]
|
||||
miniGunUse :: Int -> ItemUse
|
||||
miniGunUse i = ruseInstant (useAmmoParams $ Just 1) NoHammer $
|
||||
miniGunUse i = ruseInstant (useAmmoParams $ Just 1) $
|
||||
[ ammoCheckI
|
||||
, withWarmUp crankSlowS
|
||||
, withSoundForI mini1S 2
|
||||
|
||||
@@ -48,7 +48,7 @@ bangRod = defaultBulletWeapon
|
||||
, _torqueAfter = 0.3
|
||||
, _randomOffset = 0
|
||||
}
|
||||
, _itUse = ruseAmmoParamsRate 12 upHammer
|
||||
, _itUse = ruseAmmoParamsRate 12
|
||||
[ ammoHammerCheck
|
||||
, useTimeCheck
|
||||
, withSoundStart bangEchoS
|
||||
@@ -128,7 +128,7 @@ sniperRifle = elephantGun
|
||||
machineGun :: Item
|
||||
machineGun = bangRod
|
||||
& itType . iyBase .~ MACHINEGUN
|
||||
& itUse .~ (ruseAmmoParamsRate 25 NoHammer
|
||||
& itUse .~ (ruseAmmoParamsRate 25
|
||||
[ ammoCheckI
|
||||
, rateIncAB (torqueBeforeAtLeast 0.1 0.1) withTorqueAfter
|
||||
, withSoundStart bangEchoS
|
||||
|
||||
@@ -13,7 +13,7 @@ import Dodge.Data
|
||||
import Dodge.ChainEffect
|
||||
import Dodge.Default.Weapon
|
||||
--import Dodge.Item.Weapon.InventoryDisplay
|
||||
import Dodge.Default
|
||||
--import Dodge.Default
|
||||
--import Dodge.Item.Attachment
|
||||
--import Dodge.Item.Weapon.ExtraEffect
|
||||
--import Dodge.Item.Weapon.InventoryDisplay
|
||||
@@ -41,7 +41,7 @@ bangStickSoundChoice it
|
||||
|
||||
bangStick :: Int -> Item
|
||||
bangStick i = defaultBulletWeapon
|
||||
{ _itUse = ruseAmmoParamsRate 8 upHammer
|
||||
{ _itUse = ruseAmmoParamsRate 8
|
||||
[ ammoHammerCheck
|
||||
, useTimeCheck
|
||||
, withSoundItemChoiceStart bangStickSoundChoice
|
||||
@@ -159,7 +159,7 @@ pistol = bangStick 1
|
||||
& itConsumption .~ ( defaultBulletLoadable
|
||||
& laMax .~ 15
|
||||
& laCycle .~ [loadEject 5, loadInsert 5 , loadPrime 5] )
|
||||
& itUse .~ ruseAmmoParamsRate 6 upHammer (ammoHammerCheck : pistolAfterHamMods)
|
||||
& itUse .~ ruseAmmoParamsRate 6 (ammoHammerCheck : pistolAfterHamMods)
|
||||
& itDimension . dimSPic .~ (\it -> noPic $ baseStickShape <> makeTinClipAt pi (V3 5 2 0) it)
|
||||
& itParams %~
|
||||
( ( muzVel .~ 0.8 )
|
||||
@@ -193,7 +193,7 @@ smg = autoPistol -- & some parameter affecting stability
|
||||
<> makeTinClipAt 0 (V3 7 (-2) 0) it)
|
||||
revolverX :: Int -> Item
|
||||
revolverX i = revolver
|
||||
{ _itUse = ruseAmmoParamsRate 8 upHammer
|
||||
{ _itUse = ruseAmmoParamsRate 8
|
||||
[ ammoHammerCheck
|
||||
, useTimeCheck
|
||||
-- rather than locking the inventory, a better solution may be to check
|
||||
|
||||
Reference in New Issue
Block a user