toMessage e (EventMessage (Readied i)) = Just $ "You have readied the " ++ show i
toMessage e (EventMessage (Readied i)) = Just $ "You have readied the " ++ show i
toMessage e (EventMessage (Readied i)) = Just $ "You have readied the " ++ show i