Drezil/pioneers
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

moar minor changes

Browse Source
This commit is contained in:
Jonas Betzendahl 2014-02-10 16:25:56 +01:00
parent 542e2810b3
commit c76e03126b
1 changed files with 34 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
src/PioneerTypes.hs
View File

@ -1,10 +1,39 @@
module PioneerTypes
where
data Structure = Flag -- Flag
| Barrack -- Small
| Sawmill -- Medium
| Castle -- Large
data Structure = Flag -- Flag
| Woodcutter -- Huts
| Forester
| Stonemason
| Fisher
| Hunter
| Barracks
| Guardhouse
| LookoutTower
| Well
| Sawmill -- Houses
| Slaughterhouse
| Mill
| Bakery
| IronSmelter
| Metalworks
| Armory
| Mint
| Shipyard
| Brewery
| Storehouse
| Watchtower
| Catapult
| GoldMine -- Mines
| IronMine
| GraniteMine
| CoalMine
| Farm -- Castles
| PigFarm
| DonkeyBreeder
| Harbor
| Fortress
deriving Eq
data Amount = Infinite -- Neverending supply
| Finite Int -- Finite supply
@ -13,6 +42,7 @@ data Amount = Infinite -- Neverending supply
data Commodity = WoodPlank
| Sword
| Fish
deriving Eq
data Resource = Coal
| Iron