module Dodge.Reloading.Action where

import Dodge.Data.Item.Use.Consumption.LoadAction
import Dodge.SoundLogic.ExternallyGeneratedSounds

loadInsert :: Int -> LoadAction
loadInsert x = LoadInsert x insertS

loadPartialInsert :: Int -> Int -> LoadAction
loadPartialInsert x = LoadAdd x insertOneS

loadEject :: Int -> LoadAction
loadEject x = LoadEject x ejectS

loadPrime :: Int -> LoadAction
loadPrime x = LoadPrime x primeS