mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2025-12-12 19:22:56 +00:00
140 lines
3.8 KiB
Plaintext
140 lines
3.8 KiB
Plaintext
|
|
#define AUTOHISS_OFF 0
|
|
#define AUTOHISS_BASIC 1
|
|
#define AUTOHISS_FULL 2
|
|
|
|
#define AUTOHISS_NUM 3
|
|
|
|
|
|
/mob/proc/handle_autohiss(message, datum/language/L)
|
|
return message // no autohiss at this level
|
|
|
|
/mob/living/carbon/human/handle_autohiss(message, datum/language/L)
|
|
if(!client || client.autohiss_mode == AUTOHISS_OFF) // no need to process if there's no client or they have autohiss off
|
|
return message
|
|
return species.handle_autohiss(message, L, client.autohiss_mode)
|
|
|
|
/client
|
|
var/autohiss_mode = AUTOHISS_OFF
|
|
|
|
/client/verb/toggle_autohiss()
|
|
set name = "Toggle Auto-Hiss"
|
|
set desc = "Toggle automatic hissing as Unathi and r-rolling as Taj"
|
|
set category = "OOC.Game Settings"
|
|
|
|
autohiss_mode = (autohiss_mode + 1) % AUTOHISS_NUM
|
|
switch(autohiss_mode)
|
|
if(AUTOHISS_OFF)
|
|
to_chat(src, "Auto-hiss is now OFF.")
|
|
if(AUTOHISS_BASIC)
|
|
to_chat(src, "Auto-hiss is now BASIC.")
|
|
if(AUTOHISS_FULL)
|
|
to_chat(src, "Auto-hiss is now FULL.")
|
|
else
|
|
soft_assert(0, "invalid autohiss value [autohiss_mode]")
|
|
autohiss_mode = AUTOHISS_OFF
|
|
to_chat(src, "Auto-hiss is now OFF.")
|
|
|
|
/datum/species
|
|
var/list/autohiss_basic_map = null
|
|
var/list/autohiss_extra_map = null
|
|
var/list/autohiss_exempt = null
|
|
|
|
/datum/species/unathi
|
|
autohiss_basic_map = list(
|
|
"s" = list("ss", "sss", "ssss")
|
|
)
|
|
autohiss_extra_map = list(
|
|
"x" = list("ks", "kss", "ksss")
|
|
)
|
|
autohiss_exempt = list(LANGUAGE_UNATHI)
|
|
|
|
/datum/species/tajaran
|
|
autohiss_basic_map = list(
|
|
"r" = list("rr", "rrr", "rrrr")
|
|
)
|
|
autohiss_exempt = list(LANGUAGE_SIIK,LANGUAGE_AKHANI,LANGUAGE_ALAI)
|
|
|
|
/datum/species/zaddat
|
|
autohiss_basic_map = list(
|
|
"f" = list("v","vh"),
|
|
"ph" = list("v", "vh")
|
|
)
|
|
autohiss_extra_map = list(
|
|
"s" = list("z", "zz", "zzz"),
|
|
"ce" = list("z", "zz"),
|
|
"ci" = list("z", "zz"),
|
|
"v" = list("vv", "vvv")
|
|
)
|
|
autohiss_exempt = list(LANGUAGE_ZADDAT,LANGUAGE_VESPINAE)
|
|
|
|
/datum/species/zaddat
|
|
autohiss_basic_map = list(
|
|
"f" = list("v","vh"),
|
|
"ph" = list("v", "vh")
|
|
)
|
|
autohiss_extra_map = list(
|
|
"s" = list("z", "zz", "zzz"),
|
|
"ce" = list("z", "zz"),
|
|
"ci" = list("z", "zz"),
|
|
"v" = list("vv", "vvv")
|
|
)
|
|
autohiss_exempt = list(LANGUAGE_ZADDAT)
|
|
|
|
//Yawn Wider Edit.
|
|
/datum/species/spider
|
|
autohiss_basic_map = list(
|
|
"s" = list("sz", "z", "zz"),
|
|
"f" = list("zk")
|
|
)
|
|
autohiss_extra_map = list(
|
|
"th" = list("zk", "szk"),
|
|
"r" = list("rk")
|
|
)
|
|
//YW edit over.
|
|
|
|
/datum/species/proc/handle_autohiss(message, datum/language/lang, mode)
|
|
if(!autohiss_basic_map)
|
|
return message
|
|
if(lang.flags & NO_STUTTER) // Currently prevents EAL, Sign language, and emotes from autohissing
|
|
return message
|
|
if(autohiss_exempt && (lang.name in autohiss_exempt))
|
|
return message
|
|
|
|
var/map = autohiss_basic_map.Copy()
|
|
if(mode == AUTOHISS_FULL && autohiss_extra_map)
|
|
map |= autohiss_extra_map
|
|
|
|
. = list()
|
|
|
|
while(length(message))
|
|
var/min_index = 10000 // if the message is longer than this, the autohiss is the least of your problems
|
|
var/min_char = null
|
|
for(var/char in map)
|
|
var/i = findtext(message, char)
|
|
if(!i) // no more of this character anywhere in the string, don't even bother searching next time
|
|
map -= char
|
|
else if(i < min_index)
|
|
min_index = i
|
|
min_char = char
|
|
if(!min_char) // we didn't find any of the mapping characters
|
|
. += message
|
|
break
|
|
. += copytext(message, 1, min_index)
|
|
if(copytext(message, min_index, min_index+1) == uppertext(min_char))
|
|
switch(text2ascii(message, min_index+1))
|
|
if(65 to 90) // A-Z, uppercase; uppercase R/S followed by another uppercase letter, uppercase the entire replacement string
|
|
. += uppertext(pick(map[min_char]))
|
|
else
|
|
. += capitalize(pick(map[min_char]))
|
|
else
|
|
. += pick(map[min_char])
|
|
message = copytext(message, min_index + 1)
|
|
|
|
return jointext(., null)
|
|
|
|
#undef AUTOHISS_OFF
|
|
#undef AUTOHISS_BASIC
|
|
#undef AUTOHISS_FULL
|
|
#undef AUTOHISS_NUM
|