summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/map-editor')
-rw-r--r-- | src/map-editor/src/Struct/HelpRequest.elm | 8 | ||||
-rw-r--r-- | src/map-editor/src/View/MessageBoard/Help.elm | 14 |
2 files changed, 22 insertions, 0 deletions
diff --git a/src/map-editor/src/Struct/HelpRequest.elm b/src/map-editor/src/Struct/HelpRequest.elm index 50d2ee6..6fa0af2 100644 --- a/src/map-editor/src/Struct/HelpRequest.elm +++ b/src/map-editor/src/Struct/HelpRequest.elm @@ -1,7 +1,15 @@ module Struct.HelpRequest exposing (Type(..)) +-- Battle ---------------------------------------------------------------------- +import Battle.Struct.Attributes +import Battle.Struct.Statistics +import Battle.Struct.DamageType + -------------------------------------------------------------------------------- -- TYPES ----------------------------------------------------------------------- -------------------------------------------------------------------------------- type Type = None + | Attribute Battle.Struct.Attributes.Category + | Statistic Battle.Struct.Statistics.Category + | DamageType Battle.Struct.DamageType.Type diff --git a/src/map-editor/src/View/MessageBoard/Help.elm b/src/map-editor/src/View/MessageBoard/Help.elm index eea0c8a..c663e08 100644 --- a/src/map-editor/src/View/MessageBoard/Help.elm +++ b/src/map-editor/src/View/MessageBoard/Help.elm @@ -4,6 +4,11 @@ module View.MessageBoard.Help exposing (get_html) import Html import Html.Attributes +-- Battle ---------------------------------------------------------------------- +import Battle.View.Help.Attribute +import Battle.View.Help.DamageType +import Battle.View.Help.Statistic + -- Local Module ---------------------------------------------------------------- import Struct.Event import Struct.HelpRequest @@ -27,6 +32,15 @@ get_html model = ] ( case model.help_request of + (Struct.HelpRequest.Attribute att_cat) -> + (Battle.View.Help.Attribute.get_html_contents att_cat) + + (Struct.HelpRequest.Statistic stat_cat) -> + (Battle.View.Help.Statistic.get_html_contents stat_cat) + + (Struct.HelpRequest.DamageType dmg_cat) -> + (Battle.View.Help.DamageType.get_html_contents dmg_cat) + Struct.HelpRequest.None -> (View.MessageBoard.Help.Guide.get_html_contents model) ) |