{-# OPTIONS_HADDOCK hide #-}
{-# LANGUAGE NoImplicitPrelude #-}
module Imj.Game.Hamazed.Loop.Event.Priorities
( deadlinePriority
, playerEventPriority
) where
import Imj.Prelude
import Imj.Game.Hamazed.Loop.Event.Types
playerEventPriority :: Int
playerEventPriority = 40
deadlinePriority :: DeadlineType -> Int
deadlinePriority AnimateUI = playerEventPriority + 30
deadlinePriority DisplayContinueMessage = playerEventPriority + 20
deadlinePriority MoveFlyingItems = playerEventPriority + 10
deadlinePriority Animate = playerEventPriority - 10