Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Replacing language placeholders: Merfolk -> Sylvan (Aquan), Vampire -> Infernal |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
706c71665d1dc4f4dbfef16ad5cb7d5f |
| User & Date: | murphy 2020-05-06 11:24:55 |
Context
|
2020-05-07
| ||
| 20:53 | Allow deltas for skill checks and in some other commands check-in: 89253a68b2 user: murphy tags: trunk | |
|
2020-05-06
| ||
| 11:24 | Replacing language placeholders: Merfolk -> Sylvan (Aquan), Vampire -> Infernal check-in: 706c71665d user: murphy tags: trunk | |
|
2020-05-01
| ||
| 18:06 | Additional race (and language) options from Ixalan and Arkadia check-in: 350b0e4e3f user: murphy tags: trunk | |
Changes
Changes to DragonDice/Language.fs.
45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 |
]
let [<Literal>] Abyssal = "Abyssal"
let [<Literal>] Celestial = "Celestial"
let [<Literal>] Draconic = "Draconic"
let [<Literal>] DeepSpeech = "Deep Speech"
let [<Literal>] Infernal = "Infernal"
let [<Literal>] Merfolk = "Merfolk"
let [<Literal>] Primordial = "Primordial"
let [<Literal>] Sylvan = "Sylvan"
let [<Literal>] Undercommon = "Undercommon"
let [<Literal>] Vampire = "Vampire"
/// Set of exotic languages.
let Exotic =
Set.ofList [
Abyssal
Celestial
Draconic
DeepSpeech
Infernal
Merfolk
Primordial
Sylvan
Undercommon
Vampire
]
let [<Literal>] Druidic = "Druidic"
let [<Literal>] ThievesCant = "Thieves' Cant"
let [<Literal>] DrowSilentCant = "Drow Silent Cant"
/// Set of secret languages.
|
< < < < |
45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 |
]
let [<Literal>] Abyssal = "Abyssal"
let [<Literal>] Celestial = "Celestial"
let [<Literal>] Draconic = "Draconic"
let [<Literal>] DeepSpeech = "Deep Speech"
let [<Literal>] Infernal = "Infernal"
let [<Literal>] Primordial = "Primordial"
let [<Literal>] Sylvan = "Sylvan"
let [<Literal>] Undercommon = "Undercommon"
/// Set of exotic languages.
let Exotic =
Set.ofList [
Abyssal
Celestial
Draconic
DeepSpeech
Infernal
Primordial
Sylvan
Undercommon
]
let [<Literal>] Druidic = "Druidic"
let [<Literal>] ThievesCant = "Thieves' Cant"
let [<Literal>] DrowSilentCant = "Drow Silent Cant"
/// Set of secret languages.
|
Changes to DragonDice/Race.fs.
196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 |
| Race.Dwarf -> Set.ofList [Language.Common; Language.Dwarvish]
| Race.Elf
| Race.HalfElf -> Set.ofList [Language.Common; Language.Elvish]
| Race.Halfling -> Set.ofList [Language.Common; Language.Halfling]
| Race.Dragonborn -> Set.ofList [Language.Common; Language.Draconic]
| Race.Gnome -> Set.ofList [Language.Common; Language.Gnomish]
| Race.HalfOrc -> Set.ofList [Language.Common; Language.Orc]
| Race.Merfolk -> Set.ofList [Language.Common; Language.Merfolk]
| Race.Phaedran -> Set.ofList [Language.Common; Language.Sylvan]
| Race.Tiefling -> Set.ofList [Language.Common; Language.Infernal]
| Race.Vampire -> Set.ofList [Language.Common; Language.Vampire]
| _ -> Set.singleton Language.Common
/// Map a race tag to a name.
let toString race =
match race with
| Race.HillDwarf -> "Hill Dwarf"
| Race.MountainDwarf -> "Mountain Dwarf"
|
| | | |
196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 |
| Race.Dwarf -> Set.ofList [Language.Common; Language.Dwarvish]
| Race.Elf
| Race.HalfElf -> Set.ofList [Language.Common; Language.Elvish]
| Race.Halfling -> Set.ofList [Language.Common; Language.Halfling]
| Race.Dragonborn -> Set.ofList [Language.Common; Language.Draconic]
| Race.Gnome -> Set.ofList [Language.Common; Language.Gnomish]
| Race.HalfOrc -> Set.ofList [Language.Common; Language.Orc]
| Race.Merfolk
| Race.Phaedran -> Set.ofList [Language.Common; Language.Sylvan]
| Race.Tiefling
| Race.Vampire -> Set.ofList [Language.Common; Language.Infernal]
| _ -> Set.singleton Language.Common
/// Map a race tag to a name.
let toString race =
match race with
| Race.HillDwarf -> "Hill Dwarf"
| Race.MountainDwarf -> "Mountain Dwarf"
|