better Readm
This commit is contained in:
parent
8736e93643
commit
4ea203a082
@ -3,3 +3,11 @@
|
||||
Dwarf Fortress Actor-Names in various DF-languages.
|
||||
|
||||
![](img/example.png)
|
||||
|
||||
Given you have an artifact-thief with an agent-name of "Breachlessons":
|
||||
![](img/implication.png)
|
||||
|
||||
Just type it in and get names by race that you can look out for:
|
||||
![](img/translations.png)
|
||||
|
||||
Schema seems to be: 2 random words of thief-race + 's'
|
||||
|
@ -45,7 +45,10 @@ colorLang _ = Default
|
||||
search :: Dictionary -> Text -> [Text]
|
||||
search _ "" = [""]
|
||||
search d name = let prefixes = L.filter (`T.isPrefixOf` name) $ keys d
|
||||
in [(d!p) <> s | p <- prefixes, s <- search d (T.drop (T.length p) name)]
|
||||
in if L.null prefixes then
|
||||
[" - NO PERFECT MACTH ('"<>name<>"' left over from input)"]
|
||||
else
|
||||
[(d!p) <> s | p <- prefixes, s <- search d (T.drop (T.length p) name)]
|
||||
|
||||
getLanguageData :: IO (Map Language Dictionary)
|
||||
getLanguageData = do
|
||||
|
BIN
img/implication.png
Normal file
BIN
img/implication.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 22 KiB |
BIN
img/translations.png
Normal file
BIN
img/translations.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 18 KiB |
Loading…
Reference in New Issue
Block a user