module Mode (Mode(..)) where import Menu (Menu(..), Promptable(..)) data Mode = OnePlayer | PlayerVsPlayer deriving (Enum, Bounded) instance Promptable Mode where menu = Menu { title = "Choix du mode de jeu" , question = "Entrez le numero du mode qui vous interesse : " , invalidText = "Votre choix n'est pas valide, merci de taper 1 ou 2 selon le mode de jeu que vous souhaitez activer." } showOption OnePlayer = "Mode un joueur" showOption PlayerVsPlayer = "Mode deux joueurs"