/
githubmirror
/
vgstation13
Обзор
Документация
Войти
/
githubmirror
/
vgstation13
Код
Запросы
0
Пакеты
0
Релизы
0
Аналитика
Безопасность
1.02
code/game/say.dm
441 строка
12 KB
9600bauds
Tape recorder uses say(), so it can talk through intercomms (#12731)
21 дек 2016, 18:50
21 дек 2016, 18:50
2292f2a
Код
Авторство
О чём код?
var/global/nextDecTalkDelay = 5 //seconds var/global/lastDecTalkUse = 0 /proc/dectalk(msg) if(!msg) return 0 if (world.timeofday > (lastDecTalkUse + (nextDecTalkDelay * 10))) lastDecTalkUse = world.timeofday msg = copytext(msg, 1, 2000) var/res[] = world.Export("[config.tts_server]?tts=[url_encode(msg)]") //var/res[] = world.Export("http://localhost:1203/?tts=[url_encode(msg)]") //change server if(!res || !res["CONTENT"]) return 0 var/audio = file2text(res["CONTENT"]) return list("audio" = audio, "message" = msg) else return list("cooldown" = 1) /* Miauw's big Say() rewrite. This file has the basic atom/movable level speech procs. And the base of the send_speech() proc, which is the core of saycode. */ var/list/freqtospan = list( "1351" = "sciradio", "1355" = "medradio", "1357" = "engradio", "1347" = "supradio", "1349" = "serradio", "1359" = "secradio", "1353" = "comradio", "1447" = "aiprivradio", "1213" = "syndradio", "1441" = "dsquadradio", "1345" = "resteamradio", ) var/list/freqtoname = list( "1351" = "Science", "1353" = "Command", "1355" = "Medical", "1357" = "Engineering", "1359" = "Security", "1441" = "Deathsquad", "1213" = "Syndicate", "1347" = "Supply", "1349" = "Service", "1447" = "AI Private", "1345" = "Response Team", ) /atom/movable/proc/say(message, var/datum/language/speaking, var/atom/movable/radio=src, var/class) //so we can force nonmobs to speak a certain language if(!can_speak()) return if(message == "" || !message) return var/datum/speech/speech = create_speech(message, null, radio) speech.language=speaking if(class) speech.message_classes.Add(class) send_speech(speech, world.view) returnToPool(speech) /atom/movable/proc/Hear(var/datum/speech/speech, var/rendered_speech="") return /atom/movable/proc/can_speak() return 1 /atom/movable/proc/send_speech(var/datum/speech/speech, var/range=7) say_testing(src, "/atom/movable/proc/send_speech() start, msg = [speech.message]; message_range = [range]; language = [speech.language ? speech.language.name : "None"];") if(isnull(range)) range = 7 var/rendered = render_speech(speech) for(var/atom/movable/AM in get_hearers_in_view(range, src)) AM.Hear(speech, rendered) /atom/movable/proc/create_speech(var/message, var/frequency=0, var/atom/movable/transmitter=null) if(!transmitter) transmitter=GetDefaultRadio() var/datum/speech/speech = getFromPool(/datum/speech) speech.message = message speech.frequency = frequency speech.job = get_job(speech) speech.radio = transmitter speech.speaker = src speech.name = GetVoice() speech.as_name = get_alt_name() return speech /atom/movable/proc/render_speech_name(var/datum/speech/speech) // old getVoice-based shit //return "[speech.speaker.GetVoice()][speech.speaker.get_alt_name()]" return "[speech.name][speech.render_as_name()]" /atom/movable/proc/render_speech(var/datum/speech/speech) say_testing(src, "render_speech() - Freq: [speech.frequency], radio=\ref[speech.radio]") var/freqpart = "" var/radioicon = "" if(speech.frequency) if(speech.radio) radioicon = "[bicon(speech.radio)]" freqpart = " [radioicon]\[[get_radio_name(speech.frequency)]\]" speech.wrapper_classes.Add(get_radio_span(speech.frequency)) var/pooled=0 var/datum/speech/filtered_speech if(speech.language) filtered_speech = speech.language.filter_speech(speech.clone()) else filtered_speech = speech var/atom/movable/source = speech.speaker.GetSource() say_testing(speech.speaker, "Checking if [src]([type]) understands [source]([source.type])") if(!say_understands(source, speech.language)) say_testing(speech.speaker," We don't understand this fuck, adding stars().") filtered_speech=filtered_speech.scramble() pooled=1 else say_testing(speech.speaker," We <i>do</i> understand this gentle\[wo\]man.") #ifdef SAY_DEBUG var/enc_wrapclass=jointext(filtered_speech.wrapper_classes, ", ") say_testing(src, "render_speech() - wrapper_classes = \[[enc_wrapclass]\]") #endif // Below, but formatted nicely. /* return {" <span class='[filtered_speech.render_wrapper_classes()]'> <span class='name'> [render_speaker_track_start(filtered_speech)][render_speech_name(filtered_speech)][render_speaker_track_end(filtered_speech)] [freqpart] [render_job(filtered_speech)] </span> [filtered_speech.render_message()] </span>"} */ . = "<span class='[filtered_speech.render_wrapper_classes()]'><span class='name'>[render_speaker_track_start(filtered_speech)][render_speech_name(filtered_speech)][render_speaker_track_end(filtered_speech)][freqpart][render_job(filtered_speech)]</span> [filtered_speech.render_message()]</span>" say_testing(src, html_encode(.)) if(pooled) returnToPool(filtered_speech) /atom/movable/proc/render_speaker_track_start(var/datum/speech/speech) return "" /atom/movable/proc/render_speaker_track_end(var/datum/speech/speech) return "" /atom/movable/proc/get_job(var/datum/speech/speech) return "" /atom/movable/proc/render_job(var/datum/speech/speech) if(speech.job) return " ([speech.job])" return "" /atom/movable/proc/say_quote(var/text) if(!text) return "says, \"...\"" //not the best solution, but it will stop a large number of runtimes. The cause is somewhere in the Tcomms code var/ending = copytext(text, length(text)) if (ending == "?") return "asks, [text]" if (ending == "!") return "exclaims, [text]" return "says, [text]" var/global/image/ghostimg = image("icon"='icons/mob/mob.dmi',"icon_state"="ghost") /atom/movable/proc/render_lang(var/datum/speech/speech) var/raw_message=speech.message if(speech.language) //var/overRadio = (istype(speech.speaker, /obj/item/device/radio) || istype(speech.speaker.GetSource(), /obj/item/device/radio)) var/atom/movable/AM = speech.speaker.GetSource() if(say_understands((istype(AM) ? AM : speech.speaker),speech.language)) return render_speech(speech) //if(overRadio) // return speech.language.format_message_radio(speech.speaker, raw_message) //return speech.language.format_message(speech.speaker, raw_message) else return render_speech(speech.scramble()) //if(overRadio) // return speech.language.format_message_radio(speech.speaker, speech.language.scramble(raw_message)) //return speech.language.format_message(speech.speaker, speech.language.scramble(raw_message)) else var/atom/movable/AM = speech.speaker.GetSource() var/atom/movable/source = istype(AM) ? AM : speech.speaker var/rendered = raw_message say_testing(speech.speaker, "Checking if [src]([type]) understands [source]([source.type])") if(!say_understands(source)) say_testing(speech.speaker," We don't understand this fuck, adding stars().") rendered = stars(rendered) else say_testing(speech.speaker," We <i>do</i> understand this gentle\[wo\]man.") rendered="[speech.lquote][html_encode(rendered)][speech.rquote]" if(AM) return AM.say_quote(rendered) else return speech.speaker.say_quote(rendered) /*else if(message_langs & SPOOKY) return "[bicon(ghostimg)] <span class='sinister'>Too spooky...</span> [bicon(ghostimg)]" else if(message_langs & MONKEY) return "chimpers." else if(message_langs & ALIEN) return "hisses." else if(message_langs & ROBOT) return "beeps rapidly." else if(message_langs & SIMPLE_ANIMAL) var/mob/living/simple_animal/SA = speaker.GetSource() if(!SA || !istype(SA)) SA = speaker if(istype(SA)) return "[pick(SA.speak_emote)]." else return "makes a strange sound." else return "makes a strange sound."*/ /proc/get_radio_span(freq) var/returntext = freqtospan["[freq]"] if(returntext) return returntext return "radio" /proc/get_radio_name(freq) var/returntext = radiochannelsreverse["[freq]"] if(returntext) return returntext return "[copytext("[freq]", 1, 4)].[copytext("[freq]", 4, 5)]" /* NO YOU FOOL /proc/attach_spans(input, list/spans) return "[message_spans(spans)][input]</span>" /proc/message_spans(list/spans) var/output = "<SPAN CLASS='" for(var/span in spans) output = "[output][span] " output = "[output]'>" return output */ /** * The "voice" of the thing that's speaking. Shows up as name. */ /atom/movable/proc/GetVoice() return name /atom/movable/proc/IsVocal() return 1 /** * The "voice" of the thing that's speaking. Shows up as name. */ /atom/movable/proc/get_alt_name() return //these exist mostly to deal with the AIs hrefs and job stuff. /atom/movable/proc/GetJob() return /** * Probably used for getting tracking coordinates? * TODO: verify */ /atom/movable/proc/GetTrack() return /** * What is speaking for us? Usually src. */ /atom/movable/proc/GetSource() return src // GetRadio() removed because which radio is used can be different per message. (such as when using :L :R :I macros) // - N3X /atom/movable/proc/GetDefaultRadio() return null /atom/movable/virtualspeaker var/job var/faketrack var/atom/movable/source var/obj/item/device/radio/radio /atom/movable/virtualspeaker/GetJob() return job /atom/movable/virtualspeaker/GetTrack() return faketrack /atom/movable/virtualspeaker/GetSource() return source /atom/movable/virtualspeaker/GetDefaultRadio() return radio /atom/movable/virtualspeaker/resetVariables() job = null faketrack = null source = null radio = null ..("job", "faketrack", "source", "radio") proc/handle_render(var/mob,var/message,var/speaker) if(istype(mob, /mob/new_player)) return //One extra layer of sanity if(istype(mob,/mob/dead/observer)) var/reference = "<a href='?src=\ref[mob];follow=\ref[speaker]'>(Follow)</a> " message = reference+message to_chat(mob, message) else to_chat(mob, message) var/global/resethearers = 0 /proc/sethearing() for(var/mob/virtualhearer/VH in movable_hearers) VH.loc = get_turf(VH.attached) resethearers = world.time + 2 // Returns a list of hearers in range of R from source. Used in saycode. /proc/get_hearers_in_view(var/R, var/atom/source) if(world.time>resethearers) sethearing() var/turf/T = get_turf(source) . = new/list() if(!T) return for(var/mob/virtualhearer/VH in hearers(R, T)) . += VH.attached /** * Returns a list of mobs who can hear any of the radios given in @radios. */ /proc/get_mobs_in_radio_ranges(list/obj/item/device/radio/radios) if(world.time>resethearers) sethearing() . = new/list() for(var/obj/item/device/radio/radio in radios) if(radio) var/turf/turf = get_turf(radio) if(turf) for(var/mob/virtualhearer/VH in hearers(radio.canhear_range, turf)) . |= VH.attached /* Unused /proc/get_movables_in_radio_ranges(var/list/obj/item/device/radio/radios) . = new/list() // Returns a list of mobs who can hear any of the radios given in @radios for(var/i = 1; i <= radios.len; i++) var/obj/item/device/radio/R = radios[i] if(R) . |= get_hearers_in_view(R) . |= get_mobs_in_radio_ranges(radios) //But I don't want to check EVERYTHING to find a hearer you say? I agree //This is the new version of recursive_mob_check, used for say(). //The other proc was left intact because morgue trays use it. /proc/recursive_hear_check(atom/O) var/list/processing_list = list(O) var/list/processed_list = list() var/found_atoms = list() while (processing_list.len) var/atom/A = processing_list[1] if (A.flags & HEAR) found_atoms |= A for (var/atom/B in A) if (!processed_list[B]) processing_list |= B processing_list.Cut(1, 2) processed_list[A] = A return found_atoms Even further legacy saycode // Will recursively loop through an atom's contents and check for mobs, then it will loop through every atom in that atom's contents. // It will keep doing this until it checks every content possible. This will fix any problems with mobs, that are inside objects, // being unable to hear people due to being in a box within a bag. /proc/recursive_mob_check(var/atom/O,var/client_check=1,var/sight_check=1,var/include_radio=1) var/list/processing_list = list(O) var/list/processed_list = list() var/list/found_mobs = list() while(processing_list.len) var/atom/A = processing_list[1] var/passed = 0 if(ismob(A)) var/mob/A_tmp = A passed=1 if(client_check && !A_tmp.client) passed=0 if(sight_check && !isInSight(A_tmp, O)) passed=0 else if(include_radio && istype(A, /obj/item/device/radio)) passed=1 if(sight_check && !isInSight(A, O)) passed=0 if(passed) found_mobs |= A for(var/atom/B in A) if(!processed_list[B]) processing_list |= B processing_list.Cut(1, 2) processed_list[A] = A return found_mobs*/