mirror of
https://github.com/Bubberstation/Bubberstation.git
synced 2026-07-22 05:25:15 +01:00
Random Name Generation refactor, generate random names based on languages (for species without name lists, like Felinids and Podpeople) (#83021)
## About The Pull Request This PR moves random name generation for species onto their languages. What does this mean? - For species with a predefined name list, such as Lizards and Moths, nothing. - For species without predefined name lists, such as Felinids, their names will now be randomly generated from their language's syllables.   (In the prefs menu:)  Why? - Well, we actually had some dead code that did this. All I did was fix it up and re-enable it. - Generates some pretty believable in-universe names for various languages that are lacking name lists. Obviously defined lists would be preferred, but until they are added, at least. - Moves some stuff off of species, which is always nice. - Also hopefully makes it a tad easier to work with name generation. There's now a standard framework for getting a random name for a mob, and for getting a random name based on a species. Misc: - Adds a generic `species_prototype` global, uses it in a lot of places in prefs code. - Makes `GLOB.species_list` init via the global defines - Deletes Language SS - Alphabetizes some instances of admin tooling using the list of all species IDs - Docs language stuff - Deletes random_skin_tone, it does pretty much nothin ## Changelog 🆑 Melbert refactor: Random Name Generation has been refactored. Report any instances of people having weird (or "Unknown") names. qol: Felinids, Slimepeople, Podpeople, and some other species without defined namelists now automatically generate names based on their primary language(s). qol: More non-human names can be generated in codewords (and other misc. areas) than just lizard names. /🆑
This commit is contained in:
MrMelbert
@@ -0,0 +1,164 @@
|
||||
/// maximum of 50 specific scrambled lines per language
|
||||
#define SCRAMBLE_CACHE_LEN 50
|
||||
|
||||
/// Datum based languages. Easily editable and modular.
|
||||
/datum/language
|
||||
/// Fluff name of language if any.
|
||||
var/name = "an unknown language"
|
||||
/// Short description for 'Check Languages'.
|
||||
var/desc = "A language."
|
||||
/// Character used to speak in language
|
||||
/// If key is null, then the language isn't real or learnable.
|
||||
var/key
|
||||
/// Various language flags.
|
||||
var/flags = NONE
|
||||
/// Used when scrambling text for a non-speaker.
|
||||
var/list/syllables
|
||||
/// List of characters that will randomly be inserted between syllables.
|
||||
var/list/special_characters
|
||||
/// Likelihood of making a new sentence after each syllable.
|
||||
var/sentence_chance = 5
|
||||
/// Likelihood of getting a space in the random scramble string
|
||||
var/space_chance = 55
|
||||
/// Spans to apply from this language
|
||||
var/list/spans
|
||||
/// Cache of recently scrambled text
|
||||
/// This allows commonly reused words to not require a full re-scramble every time.
|
||||
var/list/scramble_cache = list()
|
||||
/// The language that an atom knows with the highest "default_priority" is selected by default.
|
||||
var/default_priority = 0
|
||||
/// If TRUE, when generating names, we will always use the default human namelist, even if we have syllables set.
|
||||
/// This is to be used for languages with very outlandish syllable lists (like pirates).
|
||||
var/always_use_default_namelist = FALSE
|
||||
/// Icon displayed in the chat window when speaking this language.
|
||||
/// if you are seeing someone speak popcorn language, then something is wrong.
|
||||
var/icon = 'icons/misc/language.dmi'
|
||||
/// Icon state displayed in the chat window when speaking this language.
|
||||
var/icon_state = "popcorn"
|
||||
|
||||
/// By default, random names picks this many names
|
||||
var/default_name_count = 2
|
||||
/// By default, random names picks this many syllables (min)
|
||||
var/default_name_syllable_min = 2
|
||||
/// By default, random names picks this many syllables (max)
|
||||
var/default_name_syllable_max = 4
|
||||
/// What char to place in between randomly generated names
|
||||
var/random_name_spacer = " "
|
||||
|
||||
/// Checks whether we should display the language icon to the passed hearer.
|
||||
/datum/language/proc/display_icon(atom/movable/hearer)
|
||||
var/understands = hearer.has_language(src.type)
|
||||
if((flags & LANGUAGE_HIDE_ICON_IF_UNDERSTOOD) && understands)
|
||||
return FALSE
|
||||
if((flags & LANGUAGE_HIDE_ICON_IF_NOT_UNDERSTOOD) && !understands)
|
||||
return FALSE
|
||||
return TRUE
|
||||
|
||||
/// Returns the icon to display in the chat window when speaking this language.
|
||||
/datum/language/proc/get_icon()
|
||||
var/datum/asset/spritesheet/sheet = get_asset_datum(/datum/asset/spritesheet/chat)
|
||||
return sheet.icon_tag("language-[icon_state]")
|
||||
|
||||
/// Simple helper for getting a default firstname lastname
|
||||
/datum/language/proc/default_name(gender = NEUTER)
|
||||
if(gender != MALE)
|
||||
gender = pick(MALE, FEMALE)
|
||||
if(gender == FEMALE)
|
||||
return capitalize(pick(GLOB.first_names_female)) + " " + capitalize(pick(GLOB.last_names))
|
||||
return capitalize(pick(GLOB.first_names_male)) + " " + capitalize(pick(GLOB.last_names))
|
||||
|
||||
|
||||
/**
|
||||
* Generates a random name this language would use.
|
||||
*
|
||||
* * gender: What gender to generate from, if neuter / plural coin flips between male and female
|
||||
* * name_count: How many names to generate in, by default 2, for firstname lastname
|
||||
* * syllable_count: How many syllables to generate in each name, min
|
||||
* * syllable_max: How many syllables to generate in each name, max
|
||||
* * force_use_syllables: If the name should be generated from the syllables list.
|
||||
* Only used for subtypes which implement custom name lists. Also requires the language has syllables set.
|
||||
*/
|
||||
/datum/language/proc/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(gender != MALE)
|
||||
gender = pick(MALE, FEMALE)
|
||||
if(!length(syllables) || always_use_default_namelist)
|
||||
return default_name(gender)
|
||||
|
||||
var/list/full_name = list()
|
||||
for(var/i in 1 to name_count)
|
||||
var/new_name = ""
|
||||
for(var/j in 1 to rand(default_name_syllable_min, default_name_syllable_max))
|
||||
new_name += pick_weight_recursive(syllables)
|
||||
full_name += capitalize(LOWER_TEXT(new_name))
|
||||
|
||||
return jointext(full_name, random_name_spacer)
|
||||
|
||||
/// Generates a random name, and attempts to ensure it is unique (IE, no other mob in the world has it)
|
||||
/datum/language/proc/get_random_unique_name(...)
|
||||
var/result = get_random_name(arglist(args))
|
||||
for(var/i in 1 to 10)
|
||||
if(!findname(result))
|
||||
break
|
||||
result = get_random_name(arglist(args))
|
||||
|
||||
return result
|
||||
|
||||
/datum/language/proc/check_cache(input)
|
||||
var/lookup = scramble_cache[input]
|
||||
if(lookup)
|
||||
scramble_cache -= input
|
||||
scramble_cache[input] = lookup
|
||||
. = lookup
|
||||
|
||||
/datum/language/proc/add_to_cache(input, scrambled_text)
|
||||
// Add it to cache, cutting old entries if the list is too long
|
||||
scramble_cache[input] = scrambled_text
|
||||
if(scramble_cache.len > SCRAMBLE_CACHE_LEN)
|
||||
scramble_cache.Cut(1, scramble_cache.len-SCRAMBLE_CACHE_LEN-1)
|
||||
|
||||
/datum/language/proc/scramble(input)
|
||||
|
||||
if(!length(syllables))
|
||||
return stars(input)
|
||||
|
||||
// If the input is cached already, move it to the end of the cache and return it
|
||||
var/lookup = check_cache(input)
|
||||
if(lookup)
|
||||
return lookup
|
||||
|
||||
var/input_size = length_char(input)
|
||||
var/scrambled_text = ""
|
||||
var/capitalize = TRUE
|
||||
|
||||
while(length_char(scrambled_text) < input_size)
|
||||
var/next = (length(scrambled_text) && length(special_characters) && prob(1)) ? pick(special_characters) : pick_weight_recursive(syllables)
|
||||
if(capitalize)
|
||||
next = capitalize(next)
|
||||
capitalize = FALSE
|
||||
scrambled_text += next
|
||||
var/chance = rand(100)
|
||||
if(chance <= sentence_chance)
|
||||
scrambled_text += ". "
|
||||
capitalize = TRUE
|
||||
else if(chance > sentence_chance && chance <= space_chance)
|
||||
scrambled_text += " "
|
||||
|
||||
scrambled_text = trim(scrambled_text)
|
||||
var/ending = copytext_char(scrambled_text, -1)
|
||||
if(ending == ".")
|
||||
scrambled_text = copytext_char(scrambled_text, 1, -2)
|
||||
var/input_ending = copytext_char(input, -1)
|
||||
if(input_ending in list("!","?","."))
|
||||
scrambled_text += input_ending
|
||||
|
||||
add_to_cache(input, scrambled_text)
|
||||
|
||||
return scrambled_text
|
||||
|
||||
#undef SCRAMBLE_CACHE_LEN
|
||||
@@ -7,3 +7,4 @@
|
||||
space_chance = 20
|
||||
default_priority = 10
|
||||
icon_state = "aphasia"
|
||||
always_use_default_namelist = TRUE // Shouldn't generate names for this anyways
|
||||
|
||||
@@ -17,5 +17,5 @@
|
||||
"heavy", "stellar", "excellent", "triumphant", "babe", "four",
|
||||
"tail", "trim", "tube", "wobble", "roll", "gnarly", "epic",
|
||||
)
|
||||
|
||||
icon_state = "beach"
|
||||
always_use_default_namelist = TRUE
|
||||
|
||||
@@ -8,3 +8,4 @@
|
||||
)
|
||||
icon_state = "buzz"
|
||||
default_priority = 90
|
||||
always_use_default_namelist = TRUE // Otherwise we get Bzzbzbz Zzzbzbz.
|
||||
|
||||
@@ -13,4 +13,16 @@
|
||||
icon_state = "calcic"
|
||||
default_priority = 90
|
||||
|
||||
/datum/language/calcic/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(force_use_syllables)
|
||||
return ..()
|
||||
|
||||
return "[pick(GLOB.plasmaman_names)] \Roman[rand(1, 99)]"
|
||||
|
||||
// Yeah, this goes to skeletons too, since it's basically just skeleton clacking.
|
||||
|
||||
@@ -5,6 +5,7 @@
|
||||
default_priority = 0
|
||||
flags = TONGUELESS_SPEECH | LANGUAGE_HIDE_ICON_IF_NOT_UNDERSTOOD
|
||||
icon_state = "codespeak"
|
||||
always_use_default_namelist = TRUE // No syllables anyways
|
||||
|
||||
/datum/language/codespeak/scramble(input)
|
||||
var/lookup = check_cache(input)
|
||||
|
||||
@@ -7,50 +7,51 @@
|
||||
default_priority = 100
|
||||
|
||||
icon_state = "galcom"
|
||||
|
||||
//Syllable Lists
|
||||
/*
|
||||
This list really long, mainly because I can't make up my mind about which mandarin syllables should be removed,
|
||||
and the english syllables had to be duplicated so that there is roughly a 50-50 weighting.
|
||||
|
||||
Sources:
|
||||
http://www.sttmedia.com/syllablefrequency-english
|
||||
http://www.chinahighlights.com/travelguide/learning-chinese/pinyin-syllables.htm
|
||||
*/
|
||||
/datum/language/common/syllables = list(
|
||||
// each sublist has an equal chance of being picked, so each syllable has an equal chance of being english or chinese
|
||||
list(
|
||||
"a", "ai", "an", "ang", "ao", "ba", "bai", "ban", "bang", "bao", "bei", "ben", "beng", "bi", "bian", "biao",
|
||||
"bie", "bin", "bing", "bo", "bu", "ca", "cai", "can", "cang", "cao", "ce", "cei", "cen", "ceng", "cha", "chai",
|
||||
"chan", "chang", "chao", "che", "chen", "cheng", "chi", "chong", "chou", "chu", "chua", "chuai", "chuan", "chuang", "chui", "chun",
|
||||
"chuo", "ci", "cong", "cou", "cu", "cuan", "cui", "cun", "cuo", "da", "dai", "dan", "dang", "dao", "de", "dei",
|
||||
"den", "deng", "di", "dian", "diao", "die", "ding", "diu", "dong", "dou", "du", "duan", "dui", "dun", "duo", "e",
|
||||
"ei", "en", "er", "fa", "fan", "fang", "fei", "fen", "feng", "fo", "fou", "fu", "ga", "gai", "gan", "gang",
|
||||
"gao", "ge", "gei", "gen", "geng", "gong", "gou", "gu", "gua", "guai", "guan", "guang", "gui", "gun", "guo", "ha",
|
||||
"hai", "han", "hang", "hao", "he", "hei", "hen", "heng", "hm", "hng", "hong", "hou", "hu", "hua", "huai", "huan",
|
||||
"huang", "hui", "hun", "huo", "ji", "jia", "jian", "jiang", "jiao", "jie", "jin", "jing", "jiong", "jiu", "ju", "juan",
|
||||
"jue", "jun", "ka", "kai", "kan", "kang", "kao", "ke", "kei", "ken", "keng", "kong", "kou", "ku", "kua", "kuai",
|
||||
"kuan", "kuang", "kui", "kun", "kuo", "la", "lai", "lan", "lang", "lao", "le", "lei", "leng", "li", "lia", "lian",
|
||||
"liang", "liao", "lie", "lin", "ling", "liu", "long", "lou", "lu", "luan", "lun", "luo", "ma", "mai", "man", "mang",
|
||||
"mao", "me", "mei", "men", "meng", "mi", "mian", "miao", "mie", "min", "ming", "miu", "mo", "mou", "mu", "na",
|
||||
"nai", "nan", "nang", "nao", "ne", "nei", "nen", "neng", "ng", "ni", "nian", "niang", "niao", "nie", "nin", "ning",
|
||||
"niu", "nong", "nou", "nu", "nuan", "nuo", "o", "ou", "pa", "pai", "pan", "pang", "pao", "pei", "pen", "peng",
|
||||
"pi", "pian", "piao", "pie", "pin", "ping", "po", "pou", "pu", "qi", "qia", "qian", "qiang", "qiao", "qie", "qin",
|
||||
"qing", "qiong", "qiu", "qu", "quan", "que", "qun", "ran", "rang", "rao", "re", "ren", "reng", "ri", "rong", "rou",
|
||||
"ru", "rua", "ruan", "rui", "run", "ruo", "sa", "sai", "san", "sang", "sao", "se", "sei", "sen", "seng", "sha",
|
||||
"shai", "shan", "shang", "shao", "she", "shei", "shen", "sheng", "shi", "shou", "shu", "shua", "shuai", "shuan", "shuang", "shui",
|
||||
"shun", "shuo", "si", "song", "sou", "su", "suan", "sui", "sun", "suo", "ta", "tai", "tan", "tang", "tao", "te",
|
||||
"teng", "ti", "tian", "tiao", "tie", "ting", "tong", "tou", "tu", "tuan", "tui", "tun", "tuo", "wa", "wai", "wan",
|
||||
"wang", "wei", "wen", "weng", "wo", "wu", "xi", "xia", "xian", "xiang", "xiao", "xie", "xin", "xing", "xiong", "xiu",
|
||||
"xu", "xuan", "xue", "xun", "ya", "yan", "yang", "yao", "ye", "yi", "yin", "ying", "yong", "you", "yu", "yuan",
|
||||
"yue", "yun", "za", "zai", "zan", "zang", "zao", "ze", "zei", "zen", "zeng", "zha", "zhai", "zhan", "zhang", "zhao",
|
||||
"zhe", "zhei", "zhen", "zheng", "zhi", "zhong", "zhou", "zhu", "zhua", "zhuai", "zhuan", "zhuang", "zhui", "zhun", "zhuo", "zi",
|
||||
"zong", "zou", "zuan", "zui", "zun", "zuo", "zu",
|
||||
),
|
||||
list(
|
||||
"al", "an", "ar", "as", "at", "ea", "ed", "en", "er", "es", "ha", "he", "hi", "in", "is", "it",
|
||||
"le", "me", "nd", "ne", "ng", "nt", "on", "or", "ou", "re", "se", "st", "te", "th", "ti", "to",
|
||||
"ve", "wa", "all", "and", "are", "but", "ent", "era", "ere", "eve", "for", "had", "hat", "hen", "her", "hin",
|
||||
"his", "ing", "ion", "ith", "not", "ome", "oul", "our", "sho", "ted", "ter", "tha", "the", "thi",
|
||||
),
|
||||
)
|
||||
// Default namelist is the human namelist, and common is the human language, so might as well.
|
||||
// Feel free to remove this at some point because common can generate some pretty cool names.
|
||||
always_use_default_namelist = TRUE
|
||||
/**
|
||||
* This list really long, mainly because I can't make up my mind about which mandarin syllables should be removed,
|
||||
* and the english syllables had to be duplicated so that there is roughly a 50-50 weighting.
|
||||
*
|
||||
* Sources:
|
||||
* http://www.sttmedia.com/syllablefrequency-english
|
||||
* http://www.chinahighlights.com/travelguide/learning-chinese/pinyin-syllables.htm
|
||||
*/
|
||||
syllables = list(
|
||||
// each sublist has an equal chance of being picked, so each syllable has an equal chance of being english or chinese
|
||||
list(
|
||||
"a", "ai", "an", "ang", "ao", "ba", "bai", "ban", "bang", "bao", "bei", "ben", "beng", "bi", "bian", "biao",
|
||||
"bie", "bin", "bing", "bo", "bu", "ca", "cai", "can", "cang", "cao", "ce", "cei", "cen", "ceng", "cha", "chai",
|
||||
"chan", "chang", "chao", "che", "chen", "cheng", "chi", "chong", "chou", "chu", "chua", "chuai", "chuan", "chuang", "chui", "chun",
|
||||
"chuo", "ci", "cong", "cou", "cu", "cuan", "cui", "cun", "cuo", "da", "dai", "dan", "dang", "dao", "de", "dei",
|
||||
"den", "deng", "di", "dian", "diao", "die", "ding", "diu", "dong", "dou", "du", "duan", "dui", "dun", "duo", "e",
|
||||
"ei", "en", "er", "fa", "fan", "fang", "fei", "fen", "feng", "fo", "fou", "fu", "ga", "gai", "gan", "gang",
|
||||
"gao", "ge", "gei", "gen", "geng", "gong", "gou", "gu", "gua", "guai", "guan", "guang", "gui", "gun", "guo", "ha",
|
||||
"hai", "han", "hang", "hao", "he", "hei", "hen", "heng", "hm", "hng", "hong", "hou", "hu", "hua", "huai", "huan",
|
||||
"huang", "hui", "hun", "huo", "ji", "jia", "jian", "jiang", "jiao", "jie", "jin", "jing", "jiong", "jiu", "ju", "juan",
|
||||
"jue", "jun", "ka", "kai", "kan", "kang", "kao", "ke", "kei", "ken", "keng", "kong", "kou", "ku", "kua", "kuai",
|
||||
"kuan", "kuang", "kui", "kun", "kuo", "la", "lai", "lan", "lang", "lao", "le", "lei", "leng", "li", "lia", "lian",
|
||||
"liang", "liao", "lie", "lin", "ling", "liu", "long", "lou", "lu", "luan", "lun", "luo", "ma", "mai", "man", "mang",
|
||||
"mao", "me", "mei", "men", "meng", "mi", "mian", "miao", "mie", "min", "ming", "miu", "mo", "mou", "mu", "na",
|
||||
"nai", "nan", "nang", "nao", "ne", "nei", "nen", "neng", "ng", "ni", "nian", "niang", "niao", "nie", "nin", "ning",
|
||||
"niu", "nong", "nou", "nu", "nuan", "nuo", "o", "ou", "pa", "pai", "pan", "pang", "pao", "pei", "pen", "peng",
|
||||
"pi", "pian", "piao", "pie", "pin", "ping", "po", "pou", "pu", "qi", "qia", "qian", "qiang", "qiao", "qie", "qin",
|
||||
"qing", "qiong", "qiu", "qu", "quan", "que", "qun", "ran", "rang", "rao", "re", "ren", "reng", "ri", "rong", "rou",
|
||||
"ru", "rua", "ruan", "rui", "run", "ruo", "sa", "sai", "san", "sang", "sao", "se", "sei", "sen", "seng", "sha",
|
||||
"shai", "shan", "shang", "shao", "she", "shei", "shen", "sheng", "shi", "shou", "shu", "shua", "shuai", "shuan", "shuang", "shui",
|
||||
"shun", "shuo", "si", "song", "sou", "su", "suan", "sui", "sun", "suo", "ta", "tai", "tan", "tang", "tao", "te",
|
||||
"teng", "ti", "tian", "tiao", "tie", "ting", "tong", "tou", "tu", "tuan", "tui", "tun", "tuo", "wa", "wai", "wan",
|
||||
"wang", "wei", "wen", "weng", "wo", "wu", "xi", "xia", "xian", "xiang", "xiao", "xie", "xin", "xing", "xiong", "xiu",
|
||||
"xu", "xuan", "xue", "xun", "ya", "yan", "yang", "yao", "ye", "yi", "yin", "ying", "yong", "you", "yu", "yuan",
|
||||
"yue", "yun", "za", "zai", "zan", "zang", "zao", "ze", "zei", "zen", "zeng", "zha", "zhai", "zhan", "zhang", "zhao",
|
||||
"zhe", "zhei", "zhen", "zheng", "zhi", "zhong", "zhou", "zhu", "zhua", "zhuai", "zhuan", "zhuang", "zhui", "zhun", "zhuo", "zi",
|
||||
"zong", "zou", "zuan", "zui", "zun", "zuo", "zu",
|
||||
),
|
||||
list(
|
||||
"al", "an", "ar", "as", "at", "ea", "ed", "en", "er", "es", "ha", "he", "hi", "in", "is", "it",
|
||||
"le", "me", "nd", "ne", "ng", "nt", "on", "or", "ou", "re", "se", "st", "te", "th", "ti", "to",
|
||||
"ve", "wa", "all", "and", "are", "but", "ent", "era", "ere", "eve", "for", "had", "hat", "hen", "her", "hin",
|
||||
"his", "ing", "ion", "ith", "not", "ome", "oul", "our", "sho", "ted", "ter", "tha", "the", "thi",
|
||||
),
|
||||
)
|
||||
|
||||
@@ -13,5 +13,25 @@
|
||||
"ra", "ar", "re", "er", "ri", "ir", "ro", "or", "ru", "ur", "rs", "sr",
|
||||
"a", "a", "e", "e", "i", "i", "o", "o", "u", "u", "s", "s"
|
||||
)
|
||||
special_characters = list("-")
|
||||
icon_state = "lizard"
|
||||
default_priority = 90
|
||||
default_name_syllable_min = 3
|
||||
default_name_syllable_max = 5
|
||||
random_name_spacer = "-"
|
||||
|
||||
/datum/language/draconic/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(force_use_syllables)
|
||||
return ..()
|
||||
if(gender != MALE)
|
||||
gender = pick(MALE, FEMALE)
|
||||
|
||||
if(gender == MALE)
|
||||
return "[pick(GLOB.lizard_names_male)][random_name_spacer][pick(GLOB.lizard_names_male)]"
|
||||
return "[pick(GLOB.lizard_names_female)][random_name_spacer][pick(GLOB.lizard_names_female)]"
|
||||
|
||||
@@ -11,3 +11,4 @@
|
||||
default_priority = 20
|
||||
|
||||
icon_state = "drone"
|
||||
always_use_default_namelist = TRUE // Nonsense language
|
||||
|
||||
@@ -1,107 +0,0 @@
|
||||
#define SCRAMBLE_CACHE_LEN 50 //maximum of 50 specific scrambled lines per language
|
||||
|
||||
/*
|
||||
Datum based languages. Easily editable and modular.
|
||||
*/
|
||||
|
||||
/datum/language
|
||||
var/name = "an unknown language" // Fluff name of language if any.
|
||||
var/desc = "A language." // Short description for 'Check Languages'.
|
||||
var/key // Character used to speak in language
|
||||
// If key is null, then the language isn't real or learnable.
|
||||
var/flags // Various language flags.
|
||||
var/list/syllables // Used when scrambling text for a non-speaker.
|
||||
var/sentence_chance = 5 // Likelihood of making a new sentence after each syllable.
|
||||
var/space_chance = 55 // Likelihood of getting a space in the random scramble string
|
||||
var/list/spans = list()
|
||||
var/list/scramble_cache = list()
|
||||
var/default_priority = 0 // the language that an atom knows with the highest "default_priority" is selected by default.
|
||||
|
||||
// if you are seeing someone speak popcorn language, then something is wrong.
|
||||
var/icon = 'icons/misc/language.dmi'
|
||||
var/icon_state = "popcorn"
|
||||
|
||||
/datum/language/proc/display_icon(atom/movable/hearer)
|
||||
var/understands = hearer.has_language(src.type)
|
||||
if(flags & LANGUAGE_HIDE_ICON_IF_UNDERSTOOD && understands)
|
||||
return FALSE
|
||||
if(flags & LANGUAGE_HIDE_ICON_IF_NOT_UNDERSTOOD && !understands)
|
||||
return FALSE
|
||||
return TRUE
|
||||
|
||||
/datum/language/proc/get_icon()
|
||||
var/datum/asset/spritesheet/sheet = get_asset_datum(/datum/asset/spritesheet/chat)
|
||||
return sheet.icon_tag("language-[icon_state]")
|
||||
|
||||
/datum/language/proc/get_random_name(gender, name_count=2, syllable_count=4, syllable_divisor=2)
|
||||
if(!syllables || !syllables.len)
|
||||
if(gender == FEMALE)
|
||||
return capitalize(pick(GLOB.first_names_female)) + " " + capitalize(pick(GLOB.last_names))
|
||||
else
|
||||
return capitalize(pick(GLOB.first_names_male)) + " " + capitalize(pick(GLOB.last_names))
|
||||
|
||||
var/full_name = ""
|
||||
var/new_name = ""
|
||||
|
||||
for(var/i in 0 to name_count)
|
||||
new_name = ""
|
||||
var/Y = rand(FLOOR(syllable_count/syllable_divisor, 1), syllable_count)
|
||||
for(var/x in Y to 0)
|
||||
new_name += pick_weight_recursive(syllables)
|
||||
full_name += " [capitalize(LOWER_TEXT(new_name))]"
|
||||
|
||||
return "[trim(full_name)]"
|
||||
|
||||
/datum/language/proc/check_cache(input)
|
||||
var/lookup = scramble_cache[input]
|
||||
if(lookup)
|
||||
scramble_cache -= input
|
||||
scramble_cache[input] = lookup
|
||||
. = lookup
|
||||
|
||||
/datum/language/proc/add_to_cache(input, scrambled_text)
|
||||
// Add it to cache, cutting old entries if the list is too long
|
||||
scramble_cache[input] = scrambled_text
|
||||
if(scramble_cache.len > SCRAMBLE_CACHE_LEN)
|
||||
scramble_cache.Cut(1, scramble_cache.len-SCRAMBLE_CACHE_LEN-1)
|
||||
|
||||
/datum/language/proc/scramble(input)
|
||||
|
||||
if(!syllables || !syllables.len)
|
||||
return stars(input)
|
||||
|
||||
// If the input is cached already, move it to the end of the cache and return it
|
||||
var/lookup = check_cache(input)
|
||||
if(lookup)
|
||||
return lookup
|
||||
|
||||
var/input_size = length_char(input)
|
||||
var/scrambled_text = ""
|
||||
var/capitalize = TRUE
|
||||
|
||||
while(length_char(scrambled_text) < input_size)
|
||||
var/next = pick_weight_recursive(syllables)
|
||||
if(capitalize)
|
||||
next = capitalize(next)
|
||||
capitalize = FALSE
|
||||
scrambled_text += next
|
||||
var/chance = rand(100)
|
||||
if(chance <= sentence_chance)
|
||||
scrambled_text += ". "
|
||||
capitalize = TRUE
|
||||
else if(chance > sentence_chance && chance <= space_chance)
|
||||
scrambled_text += " "
|
||||
|
||||
scrambled_text = trim(scrambled_text)
|
||||
var/ending = copytext_char(scrambled_text, -1)
|
||||
if(ending == ".")
|
||||
scrambled_text = copytext_char(scrambled_text, 1, -2)
|
||||
var/input_ending = copytext_char(input, -1)
|
||||
if(input_ending in list("!","?","."))
|
||||
scrambled_text += input_ending
|
||||
|
||||
add_to_cache(input, scrambled_text)
|
||||
|
||||
return scrambled_text
|
||||
|
||||
#undef SCRAMBLE_CACHE_LEN
|
||||
@@ -14,7 +14,16 @@
|
||||
|
||||
icon_state = "eal"
|
||||
|
||||
/datum/language/machine/get_random_name()
|
||||
/datum/language/machine/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = 2,
|
||||
syllable_min = 2,
|
||||
syllable_max = 4,
|
||||
unique = FALSE,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(force_use_syllables)
|
||||
return ..()
|
||||
if(prob(70))
|
||||
return "[pick(GLOB.posibrain_names)]-[rand(100, 999)]"
|
||||
return pick(GLOB.ai_names)
|
||||
|
||||
@@ -13,4 +13,20 @@
|
||||
icon_state = "moth"
|
||||
default_priority = 90
|
||||
|
||||
default_name_syllable_min = 5
|
||||
default_name_syllable_max = 10
|
||||
|
||||
/datum/language/moffic/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(force_use_syllables)
|
||||
return ..()
|
||||
|
||||
return "[pick(GLOB.moth_first)] [pick(GLOB.moth_last)]"
|
||||
|
||||
|
||||
// Fuck guest accounts, and fuck language testing.
|
||||
|
||||
@@ -7,3 +7,12 @@
|
||||
default_priority = 80
|
||||
|
||||
icon_state = "animal"
|
||||
|
||||
/datum/language/monkey/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = 2,
|
||||
syllable_min = 2,
|
||||
syllable_max = 4,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
return "monkey ([rand(1, 999)])"
|
||||
|
||||
@@ -5,3 +5,5 @@
|
||||
sentence_chance = 0
|
||||
default_priority = 80
|
||||
syllables = list("poof", "pff", "pFfF", "piff", "puff", "pooof", "pfffff", "piffpiff", "puffpuff", "poofpoof", "pifpafpofpuf")
|
||||
default_name_syllable_min = 1
|
||||
default_name_syllable_max = 2
|
||||
|
||||
@@ -12,3 +12,16 @@
|
||||
)
|
||||
icon_state = "neko"
|
||||
default_priority = 90
|
||||
default_name_syllable_min = 2
|
||||
default_name_syllable_max = 2
|
||||
|
||||
/datum/language/nekomimetic/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(prob(33))
|
||||
return default_name(gender)
|
||||
return ..()
|
||||
|
||||
@@ -10,3 +10,4 @@
|
||||
"shiver", "timbers", "matey", "swashbuckler"
|
||||
)
|
||||
icon_state = "pirate"
|
||||
always_use_default_namelist = TRUE
|
||||
|
||||
@@ -16,3 +16,5 @@
|
||||
)
|
||||
icon_state = "shadow"
|
||||
default_priority = 90
|
||||
default_name_syllable_min = 2
|
||||
default_name_syllable_max = 3
|
||||
|
||||
@@ -2,7 +2,8 @@
|
||||
name = "Slime"
|
||||
desc = "A melodic and complex language spoken by slimes. Some of the notes are inaudible to humans."
|
||||
key = "k"
|
||||
syllables = list("qr","qrr","xuq","qil","quum","xuqm","vol","xrim","zaoo","qu-uu","qix","qoo","zix","*","!")
|
||||
syllables = list("qr","qrr","xuq","qil","quum","xuqm","vol","xrim","zaoo","qu-uu","qix","qoo","zix")
|
||||
special_characters = list("!","*")
|
||||
default_priority = 70
|
||||
|
||||
icon_state = "slime"
|
||||
|
||||
@@ -13,3 +13,5 @@
|
||||
)
|
||||
icon_state = "plant"
|
||||
default_priority = 90
|
||||
default_name_syllable_min = 2
|
||||
default_name_syllable_max = 3
|
||||
|
||||
@@ -7,8 +7,25 @@
|
||||
"sha", "vu", "nah", "ha", "yom", "ma", "cha", "ar", "et", "mol", "lua",
|
||||
"ch", "na", "sh", "ni", "yah", "bes", "ol", "hish", "ev", "la", "ot", "la",
|
||||
"khe", "tza", "chak", "hak", "hin", "hok", "lir", "tov", "yef", "yfe",
|
||||
"cho", "ar", "kas", "kal", "ra", "lom", "im", "'", "'", "'", "'", "bok",
|
||||
"cho", "ar", "kas", "kal", "ra", "lom", "im", "bok",
|
||||
"erev", "shlo", "lo", "ta", "im", "yom"
|
||||
)
|
||||
special_characters = list("'")
|
||||
icon_state = "golem"
|
||||
default_priority = 90
|
||||
|
||||
/datum/language/terrum/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(force_use_syllables)
|
||||
return ..()
|
||||
|
||||
var/name = pick(GLOB.golem_names)
|
||||
// 3% chance to be given a human surname for "lore reasons"
|
||||
if (prob(3))
|
||||
name += " [pick(GLOB.last_names)]"
|
||||
return name
|
||||
|
||||
@@ -12,3 +12,21 @@
|
||||
)
|
||||
icon_state = "volt"
|
||||
default_priority = 90
|
||||
default_name_syllable_min = 2
|
||||
default_name_syllable_max = 3
|
||||
|
||||
|
||||
/datum/language/voltaic/get_random_name(
|
||||
gender = NEUTER,
|
||||
name_count = default_name_count,
|
||||
syllable_min = default_name_syllable_min,
|
||||
syllable_max = default_name_syllable_max,
|
||||
force_use_syllables = FALSE,
|
||||
)
|
||||
if(force_use_syllables)
|
||||
return ..()
|
||||
|
||||
var/picked = "[pick(GLOB.ethereal_names)] [random_capital_letter()]"
|
||||
if(prob(65))
|
||||
picked += random_capital_letter()
|
||||
return picked
|
||||
|
||||
@@ -6,3 +6,4 @@
|
||||
default_priority = 50
|
||||
|
||||
icon_state = "xeno"
|
||||
always_use_default_namelist = TRUE // Sssss Ssss?
|
||||
|
||||
Reference in New Issue
Block a user