From 6678cfe464ed9ee595f4f3dd7398dec1416454c9 Mon Sep 17 00:00:00 2001
From: nsensfel <SpamShield0@noot-noot.org>
Date: Fri, 15 Mar 2019 18:16:55 +0100
Subject: [Broken] Starting a code refactoring...

---
 .../BattleCharacters/Struct/Weapon.elm             | 99 ++++++++++++++++++++++
 1 file changed, 99 insertions(+)
 create mode 100644 src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm

(limited to 'src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm')

diff --git a/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm b/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm
new file mode 100644
index 0000000..0aff932
--- /dev/null
+++ b/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm
@@ -0,0 +1,99 @@
+module BattleCharacters.Struct.Weapon exposing
+   (
+      Type,
+      Ref,
+      get_id,
+      get_name,
+      get_is_primary,
+      get_attack_range,
+      get_defense_range,
+      get_omnimods,
+      get_damage_sum,
+      decoder,
+      default,
+      none
+   )
+
+-- Elm -------------------------------------------------------------------------
+import Json.Decode
+import Json.Decode.Pipeline
+
+-- Battle ----------------------------------------------------------------------
+import Battle.Struct.Omnimods
+
+--------------------------------------------------------------------------------
+-- TYPES -----------------------------------------------------------------------
+--------------------------------------------------------------------------------
+type alias Type =
+   {
+      id : String,
+      name : String,
+      is_primary : Bool,
+      def_range : Int,
+      atk_range : Int,
+      omnimods : Battle.Struct.Omnimods.Type,
+      damage_sum : Int
+   }
+
+type alias Ref = String
+
+--------------------------------------------------------------------------------
+-- LOCAL -----------------------------------------------------------------------
+--------------------------------------------------------------------------------
+
+--------------------------------------------------------------------------------
+-- EXPORTED --------------------------------------------------------------------
+--------------------------------------------------------------------------------
+get_id : Type -> String
+get_id wp = wp.id
+
+get_name : Type -> String
+get_name wp = wp.name
+
+get_is_primary : Type -> Bool
+get_is_primary wp = wp.is_primary
+
+get_attack_range : Type -> Int
+get_attack_range wp = wp.atk_range
+
+get_defense_range : Type -> Int
+get_defense_range wp = wp.def_range
+
+get_omnimods : Type -> Battle.Struct.Omnimods.Type
+get_omnimods wp = wp.omnimods
+
+get_damage_sum : Type -> Int
+get_damage_sum wp = wp.damage_sum
+
+decoder : (Json.Decode.Decoder Type)
+decoder =
+   (Json.Decode.map
+      (\e ->
+         {e | damage_sum = (Battle.Struct.Omnimods.get_damage_sum e.omnimods)}
+      )
+      (Json.Decode.succeed
+         Type
+         |> (Json.Decode.Pipeline.required "id" Json.Decode.string)
+         |> (Json.Decode.Pipeline.required "nam" Json.Decode.string)
+         |> (Json.Decode.Pipeline.required "pri" Json.Decode.bool)
+         |> (Json.Decode.Pipeline.required "rmi" Json.Decode.int)
+         |> (Json.Decode.Pipeline.required "rma" Json.Decode.int)
+         |> (Json.Decode.Pipeline.required "omni" Battle.Struct.Omnimods.decoder)
+         |> (Json.Decode.Pipeline.hardcoded 0)
+      )
+   )
+
+none : Type
+none =
+   {
+      id = "",
+      name = "None",
+      is_primary = False,
+      def_range = 0,
+      atk_range = 0,
+      omnimods = (Battle.Struct.Omnimods.none),
+      damage_sum = 0
+   }
+
+default : Type
+default = (none)
-- 
cgit v1.2.3-70-g09d2