{-# LANGUAGE OverloadedStrings #-}

module Hrpg.Game.Resources.Mobs.Common
      ( skeleton
      , rat
      ) where

import Data.Text

import Hrpg.Framework.Level
import Hrpg.Framework.Mobs.MobType
import Hrpg.Framework.Stats
import Hrpg.Game.Resources.Items.LootTables

defaultMobBaseStats = Stats (Str 50) (Agi 50)

skeleton = MobType 
  { mobTypeId        = 1000
  , mobTypeName      = "a skeleton" 
  , mobTypeMinLevel  = Level 1
  , mobTypeMaxLevel  = Level 2 
  , mobTypeBaseStats = defaultMobBaseStats 
  , mobTypeMaxHp     = 100 
  , mobTypeLootTable = (Just commonItems)
  }

rat = MobType 
  { mobTypeId        = 1001
  , mobTypeName      = "a rat" 
  , mobTypeMinLevel  = Level 1
  , mobTypeMaxLevel  = Level 2
  , mobTypeBaseStats = defaultMobBaseStats 
  , mobTypeMaxHp     = 100
  , mobTypeLootTable = (Just commonItems)
  }
