cyberpresidentvanellope/goonstation-2016
1
0
Fork 0
mirror of https://github.com/goonstation/goonstation-2016.git synced 2026-07-17 20:12:19 +01:00
Code Issues Packages Projects Releases Wiki Activity
Files
master
goonstation-2016/code/datums/preferences.dm
T

1357 lines
51 KiB
Plaintext
Raw Permalink Blame History

datum/preferences
var/profile_name
var/real_name
var/gender = MALE
var/age = 30
var/pin = null
var/blType = "A+"
var/be_changeling = 0
var/be_revhead = 0
var/be_syndicate = 0
var/be_wizard = 0
var/be_traitor = 0
var/be_vampire = 0
var/be_spy = 0
var/be_gangleader = 0
var/be_wraith = 0
var/be_blob = 0
var/be_misc = 0
var/be_random_name = 0
var/be_random_look = 0
var/random_blood = 0
var/view_changelog = 1
var/view_score = 1
var/view_tickets = 1
var/admin_music_volume = 50
var/use_click_buffer = 0
var/listen_ooc = 1
var/listen_looc = 1
var/default_wasd = 0 // do they want wasd on by default?
var/use_azerty = 0 // do they have an AZERTY keyboard?
var/job_favorite = null
var/list/jobs_med_priority = list()
var/list/jobs_low_priority = list()
var/list/jobs_unwanted = list()
var/datum/appearanceHolder/AH = new
var/random = 0
var/random2 = 0
var/random3 = 0
var/icon/preview_icon = null
var/mentor = 0
var/see_mentor_pms = 1 // do they wanna disable mentor pms?
var/antispam = 0
var/datum/traitPreferences/traitPreferences = new
var/target_cursor = "Default"
var/hud_style = "New"
New()
randomize_name()
..()
proc/randomize_name()
real_name = random_name(src.gender)
proc/randomizeLook() // im laze
if (!AH)
logTheThing("debug", usr ? usr : null, null, "a preference datum's appearence holder is null!")
return
randomize_look(AH, 0, 0, 0, 0, 0, 0) // keep gender/bloodtype/age/name/underwear/bioeffects
if (prob(1))
blType = "Zesty Ranch"
update_preview_icon()
proc/sanitize_name()
var/list/bad_characters = list("_", "'", "\"", "<", ">", ";", "\[", "\]", "{", "}", "|", "\\", "/")
for (var/c in bad_characters)
real_name = replacetext(real_name, c, "")
var/list/namecheck = splittext(trim(real_name), " ")
if (namecheck.len < 2 || length(real_name) < 5)
randomize_name()
return
for (var/i = 1, i <= namecheck.len, i++)
namecheck[i] = capitalize(namecheck[i])
real_name = jointext(namecheck, " ")
proc/update_preview_icon()
//qdel(src.preview_icon)
if (!AH)
logTheThing("debug", usr ? usr : null, null, "a preference datum's appearence holder is null!")
return
src.preview_icon = null
src.preview_icon = new /icon('icons/mob/human.dmi', "body_[src.gender == MALE ? "m" : "f"]")
// Skin tone
if (AH.s_tone >= 0)
src.preview_icon.Blend(rgb(AH.s_tone, AH.s_tone, AH.s_tone), ICON_ADD)
else
src.preview_icon.Blend(rgb(-AH.s_tone, -AH.s_tone, -AH.s_tone), ICON_SUBTRACT)
var/icon/eyes_s = new/icon("icon" = 'icons/mob/human_hair.dmi', "icon_state" = "eyes")
if (is_valid_color_string(AH.e_color))
eyes_s.Blend(AH.e_color, ICON_MULTIPLY)
else
eyes_s.Blend("#101010", ICON_MULTIPLY)
var/customization_first_r = customization_styles[AH.customization_first]
if (!customization_first_r)
customization_first_r = "None"
var/customization_second_r = customization_styles[AH.customization_second]
if (!customization_second_r)
customization_second_r = "None"
var/customization_third_r = customization_styles[AH.customization_third]
if (!customization_third_r)
customization_third_r = "none"
var/icon/hair_s = new/icon("icon" = 'icons/mob/human_hair.dmi', "icon_state" = customization_first_r)
if (is_valid_color_string(AH.customization_first_color))
hair_s.Blend(AH.customization_first_color, ICON_MULTIPLY)
else
hair_s.Blend("#101010", ICON_MULTIPLY)
var/icon/facial_s = new/icon("icon" = 'icons/mob/human_hair.dmi', "icon_state" = customization_second_r)
if (is_valid_color_string(AH.customization_second_color))
facial_s.Blend(AH.customization_second_color, ICON_MULTIPLY)
else
facial_s.Blend("#101010", ICON_MULTIPLY)
var/icon/detail_s = new/icon("icon" = 'icons/mob/human_hair.dmi', "icon_state" = customization_third_r)
if (is_valid_color_string(AH.customization_third_color))
detail_s.Blend(AH.customization_third_color, ICON_MULTIPLY)
else
detail_s.Blend("#101010", ICON_MULTIPLY)
var/underwear_style = underwear_styles[AH.underwear]
var/icon/underwear_s = new/icon("icon" = 'icons/mob/human_underwear.dmi', "icon_state" = "[underwear_style]")
if (is_valid_color_string(AH.u_color))
underwear_s.Blend(AH.u_color, ICON_MULTIPLY)
eyes_s.Blend(hair_s, ICON_OVERLAY)
eyes_s.Blend(facial_s, ICON_OVERLAY)
eyes_s.Blend(detail_s, ICON_OVERLAY)
eyes_s.Blend(underwear_s, ICON_OVERLAY)
src.preview_icon.Blend(eyes_s, ICON_OVERLAY)
facial_s = null
hair_s = null
underwear_s = null
eyes_s = null
proc/ShowChoices(mob/user)
sanitize_null_values()
update_preview_icon()
user << browse_rsc(preview_icon, "previewicon.png")
user << browse_rsc(icon(cursors_selection[target_cursor]), "tcursor.png")
user << browse_rsc(icon(hud_style_selection[hud_style], "preview"), "hud_preview.png")
var/dat = "<html><head><meta http-equiv=\"X-UA-Compatible\" content=\"IE=8\"/></head><body><title>Character Setup</title>"
dat += "<b>Profile Name:</b> "
dat += "<a href=\"byond://?src=\ref[user];preferences=1;profile_name=input\"><b>[src.profile_name ? src.profile_name : "Unnamed"]</b></a> "
dat += "<hr><b>Character Name:</b> "
dat += "<a href=\"byond://?src=\ref[user];preferences=1;real_name=input\"><b>[src.real_name]</b></a> "
dat += "<br><b>Random name? </b>"
dat += "(&reg; = <a href=\"byond://?src=\ref[user];preferences=1;b_random_name=1\">[src.be_random_name ? "Yes" : "No"]</a>)"
dat += "<br>"
dat += "<b>Random appearance? </b>"
dat += "(&reg; = <a href=\"byond://?src=\ref[user];preferences=1;b_random_look=1\">[src.be_random_look ? "Yes" : "No"]</a>)"
dat += "<br>"
dat += "<b>Gender:</b> <a href=\"byond://?src=\ref[user];preferences=1;gender=input\"><b>[src.gender == MALE ? "Male" : "Female"]</b></a><br>"
dat += "<b>Age:</b> <a href='byond://?src=\ref[user];preferences=1;age=input'>[src.age]</a><br>"
dat += "<b>Blood Type:</b> <a href='byond://?src=\ref[user];preferences=1;blType=input'>[src.random_blood ? "Random" : src.blType]</a><br>"
dat += "<b>Bank PIN:</b> <a href='byond://?src=\ref[user];preferences=1;pin=input'>[src.pin ? src.pin : "Random"]</a> (<a href=\"byond://?src=\ref[user];preferences=1;random_pin=1\">&reg;</a>)<br>"
var/favoriteJob = find_job_in_controller_by_string(src.job_favorite)
dat += "<b><a href=\"byond://?src=\ref[user];preferences=1;jobswindow=1\">Occupation Choices</a>[ favoriteJob ? " (Fav: [favoriteJob])" : "" ]</b><br>"
dat += "<b><a href=\"byond://?src=\ref[user];preferences=1;traitswindow=1\">Trait Choices</a></b>"
dat += "<hr>"
dat += "<table><tr><td>"
dat += "<b>Appearance:</b><br>"
if (AH)
dat += "<a href='byond://?src=\ref[user];preferences=1;s_tone=input'><b>Skin Tone:</b></a> [-AH.s_tone + 35]/220<br>"
dat += "<a href='byond://?src=\ref[user];preferences=1;underwear=input'><b>Underwear:</b></a> [AH.underwear] "
dat += "<a href='byond://?src=\ref[user];preferences=1;underwear_color=input'><font face=\"fixedsys\" size=\"3\" color=\"[AH.u_color]\"><b>#</b></font></a><br>"
dat += "<a href='byond://?src=\ref[user];preferences=1;eyes=input'><b>Eye Color:</b> <font face=\"fixedsys\" size=\"3\" color=\"[AH.e_color]\"><b>#</b></font></a><br>"
dat += "<a href='byond://?src=\ref[user];preferences=1;customization_first=input'><b>Bottom Detail:</b></a> [AH.customization_first] "
dat += "<a href='byond://?src=\ref[user];preferences=1;hair=input'><font face=\"fixedsys\" size=\"3\" color=\"[AH.customization_first_color]\"><b>#</b></font></a><br>"
dat += "<a href='byond://?src=\ref[user];preferences=1;customization_second=input'><b>Mid Detail:</b></a> [AH.customization_second] "
dat += "<a href='byond://?src=\ref[user];preferences=1;facial=input'><font face=\"fixedsys\" size=\"3\" color=\"[AH.customization_second_color]\"><b>#</b></font></a><br>"
dat += "<a href='byond://?src=\ref[user];preferences=1;customization_third=input'><b>Top Detail:</b></a> [AH.customization_third] "
dat += "<a href='byond://?src=\ref[user];preferences=1;detail=input'><font face=\"fixedsys\" size=\"3\" color=\"[AH.customization_third_color]\"><b>#</b></font></a><br>"
dat += "</td><td>"
dat += "<center><b>Preview</b>:<br>"
dat += "<img style=\"-ms-interpolation-mode:nearest-neighbor;\" src=previewicon.png height=64 width=64></center>"
else
dat += "<span color=red>ERROR:<br>PREFERENCE APPEARENCE HOLDER IS NULL<br>Please alert a coder!</span>"
dat += "</td></tr></table>"
dat += "<hr>"
if ((user && ismob(user)) && user.client && user.client.mentor_authed) // undefined variable /client/var/client
dat += "<b>Display Mentorhelps?</b> <a href=\"byond://?src=\ref[user];preferences=1;toggle_mentorhelp=1\">[(src.see_mentor_pms ? "Yes" : "No")]</a></b><br>"
dat += "<b>HUD style: <a href =\"byond://?src=\ref[user];preferences=1;hud_style=1\"><img style=\"-ms-interpolation-mode:nearest-neighbor;\" src=hud_preview.png></a></b> | "
dat += "<b>Targeting cursor: <a href =\"byond://?src=\ref[user];preferences=1;tcursor=1\"><img style=\"-ms-interpolation-mode:nearest-neighbor;\" src=tcursor.png></a></b><br>"
dat += "<b>Display OOC chat?</b> <a href=\"byond://?src=\ref[user];preferences=1;listen_ooc=1\">[(src.listen_ooc ? "Yes" : "No")]</a></b><br>"
dat += "<b>Display LOOC chat?</b> <a href=\"byond://?src=\ref[user];preferences=1;listen_looc=1\">[(src.listen_looc ? "Yes" : "No")]</a></b><br>"
dat += "<b>View Changelog Automatically?: <a href =\"byond://?src=\ref[user];preferences=1;changelog=1\">[(src.view_changelog ? "Yes" : "No")]</a></b><br>"
dat += "<b>View Score Info Automatically?: <a href =\"byond://?src=\ref[user];preferences=1;scores=1\">[(src.view_score ? "Yes" : "No")]</a></b><br>"
dat += "<b>View Tickets/Fines Automatically?: <a href =\"byond://?src=\ref[user];preferences=1;tickets=1\">[(src.view_tickets ? "Yes" : "No")]</a></b><br>"
dat += "<b>Use Click Buffer?: <a href =\"byond://?src=\ref[user];preferences=1;clickbuffer=1\">[(src.use_click_buffer ? "Yes" : "No")]</a></b><br>"
dat += "<b>Admin Music Volume: <a href =\"byond://?src=\ref[user];preferences=1;volume=1\">[src.admin_music_volume]</a></b><br>"
dat += "<b>Default to WASD Mode?: <a href =\"byond://?src=\ref[user];preferences=1;default_wasd=1\">[(src.default_wasd ? "Yes" : "No")]</a></b><br>"
dat += "<b>Use AZERTY Layout?: <a href =\"byond://?src=\ref[user];preferences=1;use_azerty=1\">[(src.use_azerty ? "Yes" : "No")]</a></b><br>"
dat += "<hr>"
if (!IsGuestKey(user.key))
dat += "<b>Save Profile:</b>"
for (var/i=1, i <= SAVEFILE_PROFILES_MAX, i++)
dat += " <a href='byond://?src=\ref[user];preferences=1;save=[i]'>[i]</a>"
dat += "<br>"
dat += "<b>Load Profile:</b>"
for (var/i=1, i <= SAVEFILE_PROFILES_MAX, i++)
dat += " <a href='byond://?src=\ref[user];preferences=1;load=[i]'>[savefile_get_profile_name(user, i) || i]</a>"
dat += "<br>"
dat += "<a href='byond://?src=\ref[user];preferences=1;reset_all=1'><b>Reset</b></a> - "
dat += "<a href='byond://?src=\ref[user];preferences=1;real_name=random'><b>Randomize</b></A><br>"
dat += "</body></html>"
traitPreferences.updateTraits(user)
user << browse(dat,"window=preferences;size=333x615")
proc/ResetAllPrefsToMed(mob/user)
src.job_favorite = null
src.jobs_med_priority = list()
src.jobs_low_priority = list()
src.jobs_unwanted = list()
for (var/datum/job/J in job_controls.staple_jobs)
if (istype(J, /datum/job/daily))
continue
if (jobban_isbanned(user,J.name) || (J.requires_whitelist && !NT.Find(ckey(user.mind.key))))
src.jobs_unwanted += J.name
continue
src.jobs_med_priority += J.name
return
proc/ResetAllPrefsToLow(mob/user)
src.job_favorite = null
src.jobs_med_priority = list()
src.jobs_low_priority = list()
src.jobs_unwanted = list()
for (var/datum/job/J in job_controls.staple_jobs)
if (istype(J, /datum/job/daily))
continue
if (jobban_isbanned(user,J.name) || (J.requires_whitelist && !NT.Find(ckey(user.mind.key))))
src.jobs_unwanted += J.name
continue
src.jobs_low_priority += J.name
return
proc/ResetAllPrefsToUnwanted(mob/user)
src.job_favorite = null
src.jobs_med_priority = list()
src.jobs_low_priority = list()
src.jobs_unwanted = list()
for (var/datum/job/J in job_controls.staple_jobs)
if (istype(J, /datum/job/daily))
continue
if (J.cant_allocate_unwanted)
src.jobs_low_priority += J.name
else
src.jobs_unwanted += J.name
return
proc/SetChoices(mob/user)
if (isnull(src.jobs_med_priority) || isnull(src.jobs_low_priority) || isnull(src.jobs_unwanted))
src.ResetAllPrefsToLow(user)
boutput(user, "<span style=\"color:red\"><b>Your Job Preferences were null, and have been reset.</b></span>")
else if (isnull(src.job_favorite) && !src.jobs_med_priority.len && !src.jobs_low_priority.len && !src.jobs_unwanted.len)
src.ResetAllPrefsToLow(user)
boutput(user, "<span style=\"color:red\"><b>Your Job Preferences were empty, and have been reset.</b></span>")
var/HTML = "<body><title>Job Preferences</title>"
HTML += "<b>Favorite Job:</b>"
if (!src.job_favorite)
HTML += " None"
else
var/datum/job/J_Fav = find_job_in_controller_by_string(src.job_favorite)
if (!J_Fav)
HTML += " Favorite Job not found!"
else if (jobban_isbanned(user,J_Fav.name) || (J_Fav.requires_whitelist && !NT.Find(ckey(user.mind.key))))
boutput(user, "<span style=\"color:red\"><b>You are no longer allowed to play [J_Fav.name]. It has been removed from your Favorite slot.</span>")
src.jobs_unwanted += J_Fav.name
src.job_favorite = null
else
HTML += " <a href=\"byond://?src=\ref[user];preferences=1;occ=1;job=[J_Fav.name];level=0\"><font color=[J_Fav.linkcolor]>[J_Fav.name]</font></a>"
HTML += " <a href=\"byond://?src=\ref[user];preferences=1;help=favjobs\"><small>(Help)</small></a><br>"
HTML += "<table>"
HTML += "<tr>"
HTML += "<th><b>Medium Priority:</b> <a href=\"byond://?src=\ref[user];preferences=1;help=medjobs\"><small>(Help)</small></a></th>"
HTML += "<th><b>Low Priority:</b> <a href=\"byond://?src=\ref[user];preferences=1;help=lowjobs\"><small>(Help)</small></a></th>"
HTML += "<th><b>Unwanted Jobs:</b> <a href=\"byond://?src=\ref[user];preferences=1;help=unjobs\"><small>(Help)</small></a></th>"
HTML += "</tr><tr>"
var/category_counter = 0
HTML += {"<td valign="top"><center>"}
for (var/J in src.jobs_med_priority)
var/datum/job/J_Med = find_job_in_controller_by_string(J)
if (!J_Med) continue
if (jobban_isbanned(user,J_Med.name))
boutput(user, "<span style=\"color:red\"><b>You are no longer allowed to play [J_Med.name]. It has been removed from your Medium Priority List.</span>")
src.jobs_med_priority -= J_Med.name
src.jobs_unwanted += J_Med.name
else
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;occ=2;job=[J_Med.name];level=1\">\<</a> "
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;occ=2;job=[J_Med.name];level=0\"><font color=[J_Med.linkcolor]>[J_Med.name]</font></a>"
HTML += " <a href=\"byond://?src=\ref[user];preferences=1;occ=2;job=[J_Med.name];level=3\">\></a>"
HTML += "<br>"
category_counter++
if (category_counter == 0)
HTML += "No Jobs are in this category."
HTML += "</center></td>"
category_counter = 0
HTML += {"<td valign="top"><center>"}
for (var/J in src.jobs_low_priority)
var/datum/job/J_Low = find_job_in_controller_by_string(J)
if (!J_Low) continue
if (J_Low.requires_whitelist && !NT.Find(ckey(user.mind.key))) continue
if (jobban_isbanned(user,J_Low.name))
boutput(user, "<span style=\"color:red\"><b>You are no longer allowed to play [J_Low.name]. It has been removed from your Low Priority List.</span>")
src.jobs_low_priority -= J_Low.name
src.jobs_unwanted += J_Low.name
else
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;occ=3;job=[J_Low.name];level=2\">\<</a> "
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;occ=3;job=[J_Low.name];level=0\"><font color=[J_Low.linkcolor]>[J_Low.name]</font></a>"
HTML += " <a href=\"byond://?src=\ref[user];preferences=1;occ=3;job=[J_Low.name];level=4\">\></a>"
HTML += "<br>"
category_counter++
if (category_counter == 0)
HTML += "No Jobs are in this category."
HTML += "</center></td>"
category_counter = 0
HTML += {"<td valign="top"><center>"}
for (var/J in src.jobs_unwanted)
var/datum/job/J_Un = find_job_in_controller_by_string(J)
if (!J_Un) continue
if (J_Un.requires_whitelist && !NT.Find(ckey(user.mind.key))) continue
if (J_Un.cant_allocate_unwanted)
boutput(user, "<span style=\"color:red\"><b>[J_Un.name] is not supposed to be in the Unwanted category. It has been moved to Low Priority.</b></span>")
boutput(user, "<span style=\"color:red\"><b>You may need to refresh your job preferences page to correct the job count.</b></span>")
src.jobs_unwanted -= J_Un.name
src.jobs_low_priority += J_Un.name
if (jobban_isbanned(user,J_Un.name))
HTML += "<strike>[J_Un.name]</strike><br>"
category_counter++
else
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;occ=4;job=[J_Un.name];level=3\">\<</a> "
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;occ=4;job=[J_Un.name];level=0\"><font color=[J_Un.linkcolor]>[J_Un.name]</font></a>"
HTML += "<br>"
category_counter++
if (category_counter == 0)
HTML += "No Jobs are in this category."
HTML += "</center></td>"
HTML += "</tr></table>"
HTML += "<br><b>Antagonist Roles:</b>"
HTML += "<a href=\"byond://?src=\ref[user];preferences=1;help=antags\"><small>(Help)</small></a></a><br>"
if (jobban_isbanned(user, "Syndicate"))
HTML += "You are banned from playing antagonist roles.<br>"
src.be_changeling = 0
src.be_revhead = 0
src.be_syndicate = 0
src.be_wizard = 0
src.be_traitor = 0
src.be_vampire = 0
src.be_spy = 0
src.be_gangleader = 0
else
if (src.be_traitor) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_traitor=1\"><font color=#00CC00>Traitor</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_traitor=1\"><font color=#FF0000><strike>Traitor</strike></font></a>"
HTML += " * "
if (src.be_syndicate) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_syndicate=1\"><font color=#00CC00>Syndicate Operative</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_syndicate=1\"><font color=#FF0000><strike>Syndicate Operative</strike></font></a>"
HTML += " * "
/*
if (src.be_spy) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_spy=1\"><font color=#00CC00>Spy</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_spy=1\"><font color=#FF0000><strike>Spy</strike></font></a>"
HTML += " * "
*/
if (src.be_gangleader) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_gangleader=1\"><font color=#00CC00>Gang Leader</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_gangleader=1\"><font color=#FF0000><strike>Gang Leader</strike></font></a>"
HTML += " * "
/*
if (src.be_revhead) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_revhead=1\"><font color=#00CC00>Revolution Leader</font></a><br>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_revhead=1\"><font color=#FF0000><strike>Revolution Leader</strike></font></a><br>"
*/
if (src.be_changeling) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_changeling=1\"><font color=#00CC00>Changeling</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_changeling=1\"><font color=#FF0000><strike>Changeling</strike></font></a>"
HTML += "<br>"
if (src.be_wizard) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_wizard=1\"><font color=#00CC00>Wizard</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_wizard=1\"><font color=#FF0000><strike>Wizard</strike></font></a>"
HTML += " * "
if (src.be_vampire) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_vampire=1\"><font color=#00CC00>Vampire</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_vampire=1\"><font color=#FF0000><strike>Vampire</strike></font></a>"
HTML += " * "
if (src.be_wraith) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_wraith=1\"><font color=#00CC00>Wraith</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_wraith=1\"><font color=#FF0000><strike>Wraith</strike></font></a>"
HTML += " * "
if (src.be_blob) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_blob=1\"><font color=#00CC00>Blob</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_blob=1\"><font color=#FF0000><strike>Blob</strike></font></a>"
HTML += " * "
if (src.be_misc) HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_misc=1\"><font color=#00CC00>Other Foes</font></a>"
else HTML += "<a href =\"byond://?src=\ref[user];preferences=1;b_misc=1\"><font color=#FF0000><strike>Other Foes</strike></font></a>"
HTML += "<hr>"
HTML += {"<a href=\"byond://?src=\ref[user];preferences=1;help=jobs\"><b>Help</b></a> * "}
HTML += {"<a href=\"byond://?src=\ref[user];preferences=1;jobswindow=1\"><b>Refresh</b></a> * "}
HTML += {"<a href=\"byond://?src=\ref[user];preferences=1;resetalljobs=1\"><b>Reset All Jobs</b></a> * "}
HTML += {"<a href=\"byond://?src=\ref[user];preferences=1;closejobswindow=1\"><b>Close Window</b></a>"}
user << browse(null, "window=preferences")
user << browse(HTML, "window=mob_occupation;size=550x400")
return
proc/SetJob(mob/user, occ=1, job="Captain",var/level = 0)
if (src.antispam)
return
if (!find_job_in_controller_by_string(job,1))
boutput(user, "<span style=\"color:red\"><b>The game could not find that job in the internal list of jobs.</b></span>")
switch(occ)
if (1) src.job_favorite = null
if (2) src.jobs_med_priority -= job
if (3) src.jobs_low_priority -= job
if (4) src.jobs_unwanted -= job
return
if (job=="AI" && (!config.allow_ai))
boutput(user, "<span style=\"color:red\"><b>Selecting the AI is not currently allowed.</b></span>")
if (occ != 4)
switch(occ)
if (1) src.job_favorite = null
if (2) src.jobs_med_priority -= job
if (3) src.jobs_low_priority -= job
src.jobs_unwanted += job
return
if (jobban_isbanned(user, job))
boutput(user, "<span style=\"color:red\"><b>You are banned from this job and may not select it.</b></span>")
if (occ != 4)
switch(occ)
if (1) src.job_favorite = null
if (2) src.jobs_med_priority -= job
if (3) src.jobs_low_priority -= job
src.jobs_unwanted += job
return
src.antispam = 1
var/picker = "Low Priority"
if (level == 0)
var/list/valid_actions = list("Favorite","Medium Priority","Low Priority","Unwanted")
switch(occ)
if (1) valid_actions -= "Favorite"
if (2) valid_actions -= "Medium Priority"
if (3) valid_actions -= "Low Priority"
if (4) valid_actions -= "Unwanted"
picker = input("Which bracket would you like to move this job to?","Job Preferences") as null|anything in valid_actions
if (!picker)
src.antispam = 0
return
else
switch(level)
if (1) picker = "Favorite"
if (2) picker = "Medium Priority"
if (3) picker = "Low Priority"
if (4) picker = "Unwanted"
var/datum/job/J = find_job_in_controller_by_string(job)
if (J.cant_allocate_unwanted && picker == "Unwanted")
boutput(user, "<span style=\"color:red\"><b>[job] cannot be set to Unwanted.</b></span>")
src.antispam = 0
return
var/successful_move = 0
switch(picker)
if ("Favorite")
if (src.job_favorite)
src.jobs_med_priority += src.job_favorite
src.job_favorite = job
successful_move = 1
if ("Medium Priority")
src.jobs_med_priority += job
if (occ == 1)
src.job_favorite = null
successful_move = 1
if ("Low Priority")
src.jobs_low_priority += job
if (occ == 1)
src.job_favorite = null
successful_move = 1
if ("Unwanted")
src.jobs_unwanted += job
if (occ == 1)
src.job_favorite = null
successful_move = 1
if (successful_move)
switch(occ)
// i know, repetitive, but its the safest way i can think of right now
if (2) src.jobs_med_priority -= job
if (3) src.jobs_low_priority -= job
if (4) src.jobs_unwanted -= job
src.antispam = 0
return 1
proc/process_link(mob/user, list/link_tags)
if (!user.client)
return
if (link_tags["help"])
var/helptext = "<html><body><title>Jobs Help</title><b><u>Job Preferences Help:</u></b><br>"
switch(link_tags["help"])
if ("favjobs")
helptext = {"The Favorite Job slot is for the one job you like the most - the game will always try to
get you into this job first if it can.<br><br>
During round setup, favorite jobs are always looked at first - the game will loop through every player
who has not been currently granted a job and see if they have a favorite set. If they do, and there
are still slots for that job open, they will be assigned their favorite. The list of players is
randomized in order before this happens, to make sure the same players don't get priority every time.<br><br>
You might not always get your favorite job, especially if it's a single-slot role like a Head, but
don't be discouraged if you don't get it - it's just luck of the draw. You might get it next time."}
if ("medjobs")
helptext = {"Medium Priority Jobs are any jobs you would like to play that aren't your favorite. People with
jobs in this category get priority over those who have the same job in their low priority bracket. It's best
to put jobs here that you actively enjoy playing and wouldn't mind ending up with if you don't get your favorite."}
if ("lowjobs")
helptext = {"Low Priority Jobs are jobs that you don't mind doing. When the game is finding candidates for a job,
it will try to fill it with Medium Priority players first, then Low Priority players if there are still free slots."}
if ("unjobs")
helptext = {"Unwanted Jobs are jobs that you absolutely don't want to have. Putting a job here will make sure you
are never allocated this job at all. However, certain jobs can't be added to this category, such as Staff Assistant.
This is because these jobs are flagged as low-end jobs that will only be given out once all the other job slots are
taken up - so don't worry, as long as you have jobs in your Medium or Low brackets and the server doesn't have a
large player count at the time, you most likely won't end up as an Assistant unless you have it as your favorite."}
if ("jobs")
helptext = {"This is the Job Preference panel. Hold your mouse over a job icon and a tooltip will appear telling you
what job it corresponds to. Clicking on one of these icons will prompt you for which category you want to move it to.
More information about how the categories work can be obtained by clicking on the help icon next to the category name.<br><br>
If you don't see all the job icons here (or if you don't see any at all), try resetting your job preferences."}
if ("antags")
helptext = {"These are your preferences for antagonist roles. If you have any of these disabled, you will never be
selected automatically by the game to play as one of these enemy types. Green is enabled, Red is disabled. Bear in
mind that admins can still select you by hand to play enemy roles during a round. Generally if you don't want to go
along with whatever the admin has in mind, just adminhelp it and say so. Most of us are cool about that kind of thing."}
user << browse(helptext, "window=jobs_help;size=400x400")
return
if (link_tags["job"])
src.SetJob(user, text2num(link_tags["occ"]), link_tags["job"], text2num(link_tags["level"]))
src.SetChoices(user)
return
if (link_tags["jobswindow"])
src.SetChoices(user)
return
if (link_tags["traitswindow"])
traitPreferences.showTraits(user)
return
if (link_tags["closejobswindow"])
user << browse(null, "window=mob_occupation")
src.ShowChoices(user)
return
if (link_tags["resetalljobs"])
var/resetwhat = input("Reset all jobs to which level?","Job Preferences") as null|anything in list("Medium Priority","Low Priority","Unwanted")
switch(resetwhat)
if ("Medium Priority")
src.ResetAllPrefsToMed(user)
if ("Low Priority")
src.ResetAllPrefsToLow(user)
if ("Unwanted")
src.ResetAllPrefsToUnwanted(user)
else
return
src.SetChoices(user)
return
if (link_tags["profile_name"])
var/new_profile_name
new_profile_name = input(user, "Please select a name:", "Character Generation") as null|text
var/list/bad_characters = list("_", "'", "\"", "<", ">", ";", "[", "]", "{", "}", "|", "\\", "/")
for (var/c in bad_characters)
new_profile_name = replacetext(new_profile_name, c, "")
new_profile_name = trim(new_profile_name)
if (new_profile_name)
if (length(new_profile_name) >= 26)
new_profile_name = copytext(new_profile_name, 1, 26)
src.profile_name = new_profile_name
if (link_tags["real_name"])
var/new_name
switch(link_tags["real_name"])
if ("input")
new_name = input(user, "Please select a name:", "Character Generation") as null|text
var/list/bad_characters = list("_", "'", "\"", "<", ">", ";", "[", "]", "{", "}", "|", "\\", "/")
for (var/c in bad_characters)
new_name = replacetext(new_name, c, "")
new_name = trim(new_name)
if (!new_name || (lowertext(new_name) in list("unknown", "floor", "wall", "r wall")))
alert("That name is reserved for use by the game. Please select another.")
return
if (!usr.client.holder)
var/list/namecheck = splittext(trim(new_name), " ")
if (namecheck.len < 2)
alert("Your name must have at least a First and Last name, e.g. John Smith")
return
if (length(new_name) < 5)
alert("Your name is too short. It must be at least 5 characters long.")
return
for (var/i = 1, i <= namecheck.len, i++)
namecheck[i] = capitalize(namecheck[i])
new_name = jointext(namecheck, " ")
if ("random")
if (src.gender == MALE)
new_name = capitalize(pick(first_names_male) + " " + capitalize(pick(last_names)))
else
new_name = capitalize(pick(first_names_female) + " " + capitalize(pick(last_names)))
randomizeLook()
if (new_name)
if (length(new_name) >= 26)
new_name = copytext(new_name, 1, 26)
src.real_name = new_name
if (link_tags["hud_style"])
var/new_hud = input(user, "Please select HUD style:", "New") as null|anything in hud_style_selection
if (new_hud)
src.hud_style = new_hud
if (link_tags["tcursor"])
var/new_cursor = input(user, "Please select cursor:", "Cursor") as null|anything in cursors_selection
if (new_cursor)
src.target_cursor = new_cursor
if (link_tags["age"])
var/new_age = input(user, "Please select type in age: 20-80", "Character Generation") as null|num
if (new_age)
src.age = max(min(round(text2num(new_age)), 80), 20)
if (link_tags["pin"])
var/new_pin = input(user, "Please select a PIN between 1000 and 9999", "Character Generation") as null|num
if (new_pin)
src.pin = max(min(round(text2num(new_pin)), 9999), 1000)
if (link_tags["blType"])
var/blTypeNew = input(user, "Please select a blood type:", "Character Generation") as null|anything in list("Random", "A+", "A-", "B+", "B-", "AB+", "AB-", "O+", "O-")
if (blTypeNew)
if (blTypeNew == "Random")
src.random_blood = 1
else
src.random_blood = 0
blType = blTypeNew
if (link_tags["hair"])
var/new_hair = input(user, "Please select hair color.", "Character Generation") as null|color
if (new_hair)
AH.customization_first_color = new_hair
if (link_tags["facial"])
var/new_facial = input(user, "Please select detail 1 color.", "Character Generation") as null|color
if (new_facial)
AH.customization_second_color = new_facial
if (link_tags["detail"])
var/new_detail = input(user, "Please select detail 2 color.", "Character Generation") as null|color
if (new_detail)
AH.customization_third_color = new_detail
if (link_tags["eyes"])
var/new_eyes = input(user, "Please select eye color.", "Character Generation") as null|color
if (new_eyes)
AH.e_color = new_eyes
if (link_tags["s_tone"])
var/new_tone = input(user, "Please select skin tone level: 1-220 (1=albino, 35=caucasian, 150=black, 220='very' black)", "Character Generation") as null|num
if (new_tone)
AH.s_tone = max(min(round(new_tone), 220), 1)
AH.s_tone = -AH.s_tone + 35
if (link_tags["customization_first"])
var/new_style = input(user, "Please select the hair style you want.", "Character Generation") as null|anything in customization_styles
if (new_style)
AH.customization_first = new_style
if (link_tags["customization_second"])
var/new_style = input(user, "Please select the detail style you want.", "Character Generation") as null|anything in customization_styles
if (new_style)
AH.customization_second = new_style
if (link_tags["customization_third"])
var/new_style = input(user, "Please select the detail style you want.", "Character Generation") as null|anything in customization_styles
if (new_style)
AH.customization_third = new_style
if (link_tags["underwear"])
var/new_style = input(user, "Please select the underwear you want.", "Character Generation") as null|anything in underwear_styles
if (new_style)
AH.underwear = new_style
if (link_tags["underwear_color"])
var/new_ucolor = input(user, "Please select underwear color.", "Character Generation") as null|color
if (new_ucolor)
AH.u_color = new_ucolor
if (link_tags["gender"])
if (src.gender == MALE)
src.gender = FEMALE
AH.gender = FEMALE
else
src.gender = MALE
AH.gender = MALE
if (link_tags["changelog"])
src.view_changelog = !(src.view_changelog)
if (link_tags["toggle_mentorhelp"])
if (user && user.client && user.client.mentor_authed)
src.see_mentor_pms = !(src.see_mentor_pms)
user.client.set_mentorhelp_visibility(src.see_mentor_pms)
if (link_tags["listen_ooc"])
src.listen_ooc = !(src.listen_ooc)
if (link_tags["listen_looc"])
src.listen_looc = !(src.listen_looc)
if (link_tags["volume"])
src.admin_music_volume = input("Goes from 0 to 100.","Admin Music Volume", src.admin_music_volume) as num
src.admin_music_volume = max(0,min(src.admin_music_volume,100))
if (link_tags["clickbuffer"])
src.use_click_buffer = !(src.use_click_buffer)
if (link_tags["default_wasd"])
src.default_wasd = !(src.default_wasd)
if (link_tags["use_azerty"])
src.use_azerty = !(src.use_azerty)
if (user && user.client)
user.client.use_azerty = src.use_azerty
if (link_tags["scores"])
src.view_score = !(src.view_score)
if (link_tags["tickets"])
src.view_tickets = !(src.view_tickets)
if (link_tags["b_changeling"])
src.be_changeling = !( src.be_changeling )
src.SetChoices(user)
return
if (link_tags["b_revhead"])
src.be_revhead = !( src.be_revhead )
src.SetChoices(user)
return
if (link_tags["b_syndicate"])
src.be_syndicate = !( src.be_syndicate )
src.SetChoices(user)
return
if (link_tags["b_wizard"])
src.be_wizard = !( src.be_wizard)
src.SetChoices(user)
return
if (link_tags["b_traitor"])
src.be_traitor = !( src.be_traitor)
src.SetChoices(user)
return
if (link_tags["b_vampire"])
src.be_vampire = !( src.be_vampire)
src.SetChoices(user)
return
if (link_tags["b_spy"])
src.be_spy = !( src.be_spy)
src.SetChoices(user)
return
if (link_tags["b_gangleader"])
src.be_gangleader = !( src.be_gangleader)
src.SetChoices(user)
return
if (link_tags["b_wraith"])
src.be_wraith = !( src.be_wraith)
src.SetChoices(user)
return
if (link_tags["b_blob"])
src.be_blob = !( src.be_blob)
src.SetChoices(user)
return
if (link_tags["b_misc"])
src.be_misc = !src.be_misc
src.SetChoices(user)
return
if (link_tags["b_random_name"])
if (!force_random_names)
src.be_random_name = !src.be_random_name
else
src.be_random_name = 1
if (link_tags["b_random_look"])
if (!force_random_looks)
src.be_random_look = !src.be_random_look
else
src.be_random_look = 1
/* Wire: a little thing i'll finish up eventually
if (link_tags["set_will"])
var/new_will = input(user, "Write a Will that shall appear in the event of your death. (250 max)", "Character Generation") as text
var/list/bad_characters = list("_", "'", "\"", "<", ">", ";", "[", "]", "{", "}", "|", "\\", "/")
for (var/c in bad_characters)
new_will = replacetext(new_will, c, "")
if (new_will)
if (length(new_will) > 250)
new_will = copytext(new_will, 1, 251)
src.will = new_will
*/
if (!IsGuestKey(user.key))
if (link_tags["save"])
src.savefile_save(user, (isnum(text2num(link_tags["save"])) ? text2num(link_tags["save"]) : 1))
boutput(user, "<span style=\"color:blue\"><b>Character saved to Slot [text2num(link_tags["save"])].</b></span>")
else if (link_tags["load"])
if (!src.savefile_load(user, (isnum(text2num(link_tags["load"])) ? text2num(link_tags["load"]) : 1)))
alert(user, "You do not have a savefile.")
else if (!user.client.holder)
sanitize_name()
boutput(user, "<span style=\"color:blue\"><b>Character loaded from Slot [text2num(link_tags["load"])].</b></span>")
else
boutput(user, "<span style=\"color:blue\"><b>Character loaded from Slot [text2num(link_tags["load"])].</b></span>")
if (link_tags["reset_all"])
src.gender = MALE
AH.gender = MALE
randomize_name()
AH.customization_first = "Trimmed"
AH.customization_second = "None"
AH.customization_third = "None"
AH.underwear = "No Underwear"
AH.customization_first_color = 0
AH.customization_second_color = 0
AH.customization_third_color = 0
AH.e_color = 0
AH.u_color = "#FFFFFF"
AH.s_tone = 0
age = 30
pin = null
src.ResetAllPrefsToLow(user)
listen_ooc = 1
view_changelog = 1
view_score = 1
view_tickets = 1
admin_music_volume = 50
use_click_buffer = 0
be_changeling = 0
be_revhead = 0
be_syndicate = 0
be_wizard = 0
be_wraith = 0
be_blob = 0
be_misc = 0
be_traitor = 0
be_vampire = 0
be_spy = 0
be_gangleader = 0
if (!force_random_names)
be_random_name = 0
else
be_random_name = 1
if (!force_random_looks)
be_random_look = 0
else
be_random_look = 1
blType = "A+"
src.ShowChoices(user)
proc/copy_to(mob/character,var/mob/user,ignore_randomizer = 0)
sanitize_null_values()
if (!ignore_randomizer)
var/namebanned = jobban_isbanned(user, "Custom Names")
if (be_random_name || namebanned)
randomize_name()
if (be_random_look || namebanned)
randomizeLook()
if (character.bioHolder)
if (random_blood || namebanned)
character.bioHolder.bloodType = random_blood_type()
else
character.bioHolder.bloodType = blType
character.real_name = real_name
//Wire: Not everything has a bioholder you morons
if (character.bioHolder)
character.bioHolder.age = age
character.bioHolder.mobAppearance.CopyOther(AH)
character.bioHolder.mobAppearance.gender = src.gender
//Also I think stuff other than human mobs can call this proc jesus christ
if (ishuman(character))
var/mob/living/carbon/human/H = character
H.pin = pin
H.gender = src.gender
if (traitPreferences.isValid() && character.traitHolder)
for (var/T in traitPreferences.traits_selected)
character.traitHolder.addTrait(T)
character.update_face()
character.update_body()
proc/sanitize_null_values()
if (!src.gender || !(src.gender == MALE || src.gender == FEMALE))
src.gender = MALE
if (!AH)
AH = new
if (AH.gender != src.gender)
AH.gender = src.gender
if (AH.customization_first_color == null)
AH.customization_first_color = "#101010"
if (AH.customization_first == null)
AH.customization_first = "None"
if (AH.customization_second_color == null)
AH.customization_second_color = "#101010"
if (AH.customization_second == null)
AH.customization_second = "None"
if (AH.customization_third_color == null)
AH.customization_third_color = "#101010"
if (AH.customization_third == null)
AH.customization_third = "None"
if (AH.e_color == null)
AH.e_color = "#101010"
if (AH.u_color == null)
AH.u_color = "#FFFFFF"
/* ---------------------- RANDOMIZER PROC STUFF */
/proc/random_blood_type(var/weighted = 1)
var/return_type
// set a default one so that, if none of the weighted ones happen, they at least have SOME kind of blood type
return_type = pick("O", "A", "B", "AB") + pick("+", "-")
if (weighted)
var/list/types_and_probs = list(\
"O" = 40,\
"A" = 30,\
"B" = 15,\
"AB" = 5)
for (var/i in types_and_probs)
if (prob(types_and_probs[i]))
return_type = i
if (prob(80))
return_type += "+"
else
return_type += "-"
if (prob(1))
return_type = "Zesty Ranch"
return return_type
/proc/random_saturated_hex_color(var/pound = 0)
var/R
var/G
var/B
var/return_RGB
var/colorpick = rand(1,3)
switch (colorpick)
if (1)
R = "FF"
G = random_hex(2)
B = random_hex(2)
if (2)
R = random_hex(2)
G = "FF"
B = random_hex(2)
if (3)
R = random_hex(2)
G = random_hex(2)
B = "FF"
return_RGB = (pound ? "#" : null) + R + G + B
return return_RGB
/proc/randomize_hair_color(var/hcolor)
if (!hcolor)
return
var/adj = 0
if (copytext(hcolor, 1, 2) == "#")
adj = 1
DEBUG_MESSAGE("HAIR initial: [hcolor]")
var/hR_adj = num2hex(hex2num(copytext(hcolor, 1 + adj, 3 + adj)) + rand(-25,25))
DEBUG_MESSAGE("HAIR R: [hR_adj]")
var/hG_adj = num2hex(hex2num(copytext(hcolor, 3 + adj, 5 + adj)) + rand(-5,5))
DEBUG_MESSAGE("HAIR G: [hG_adj]")
var/hB_adj = num2hex(hex2num(copytext(hcolor, 5 + adj, 7 + adj)) + rand(-10,10))
DEBUG_MESSAGE("HAIR B: [hB_adj]")
var/return_color = "#" + hR_adj + hG_adj + hB_adj
DEBUG_MESSAGE("HAIR final: [return_color]")
return return_color
/proc/randomize_eye_color(var/ecolor)
if (!ecolor)
return
var/adj = 0
if (copytext(ecolor, 1, 2) == "#")
adj = 1
DEBUG_MESSAGE("EYE initial: [ecolor]")
var/eR_adj = num2hex(hex2num(copytext(ecolor, 1 + adj, 3 + adj)) + rand(-10,10))
DEBUG_MESSAGE("EYE R: [eR_adj]")
var/eG_adj = num2hex(hex2num(copytext(ecolor, 3 + adj, 5 + adj)) + rand(-10,10))
DEBUG_MESSAGE("EYE G: [eG_adj]")
var/eB_adj = num2hex(hex2num(copytext(ecolor, 5 + adj, 7 + adj)) + rand(-10,10))
DEBUG_MESSAGE("EYE B: [eB_adj]")
var/return_color = "#" + eR_adj + eG_adj + eB_adj
DEBUG_MESSAGE("EYE final: [return_color]")
return return_color
var/global/list/feminine_hstyles = list("Mohawk" = "mohawk",\
"Pompadour" = "pomp",\
"Ponytail" = "ponytail",\
"Mullet" = "long",\
"Emo" = "emo",\
"Bun" = "bun",\
"Bieber" = "bieb",\
"Parted Hair" = "part",\
"Draped" = "shoulders",\
"Bedhead" = "bedhead",\
"Afro" = "afro",\
"Long Braid" = "longbraid",\
"Very Long" = "vlong",\
"Hairmetal" = "80s",\
"Glammetal" = "glammetal",\
"Fabio" = "fabio",\
"Right Half-Shaved" = "halfshavedL",\
"Left Half-Shaved" = "halfshavedR",\
"High Ponytail" = "spud",\
"Low Ponytail" = "band",\
"Indian" = "indian",\
"Shoulder Drape" = "pulledf",\
"Punky Flip" = "shortflip",\
"Pigtails" = "pig",\
"Low Pigtails" = "lowpig",\
"Mid-Back Length" = "midb",\
"Shoulder Length" = "shoulderl",\
"Pulled Back" = "pulledb",\
"Choppy Short" = "chop_short",\
"Long and Froofy" = "froofy_long",\
"Wavy Ponytail" = "wavy_tail")
var/global/list/masculine_hstyles = list("None" = "None",\
"Balding" = "balding",\
"Tonsure" = "tonsure",\
"Buzzcut" = "cut",\
"Trimmed" = "short",\
"Mohawk" = "mohawk",\
"Flat Top" = "flattop",\
"Pompadour" = "pomp",\
"Ponytail" = "ponytail",\
"Mullet" = "long",\
"Emo" = "emo",\
"Bieber" = "bieb",\
"Persh Cut" = "bowl",\
"Parted Hair" = "part",\
"Einstein" = "einstein",\
"Bedhead" = "bedhead",\
"Dreadlocks" = "dreads",\
"Afro" = "afro",\
"Kingmetal" = "king-of-rock-and-roll",\
"Scraggly" = "scraggly",\
"Right Half-Shaved" = "halfshavedL",\
"Left Half-Shaved" = "halfshavedR",\
"High Flat Top" = "charioteers",\
"Punky Flip" = "shortflip",\
"Mid-Back Length" = "midb",\
"Split-Tails" = "twotail",\
"Choppy Short" = "chop_short")
var/global/list/facial_hair = list("None" = "none",\
"Chaplin" = "chaplin",\
"Selleck" = "selleck",\
"Watson" = "watson",\
"Old Nick" = "devil",\
"Fu Manchu" = "fu",\
"Twirly" = "villain",\
"Dali" = "dali",\
"Hogan" = "hogan",\
"Van Dyke" = "vandyke",\
"Hipster" = "hip",\
"Robotnik" = "robo",\
"Elvis" = "elvis",\
"Goatee" = "gt",\
"Chinstrap" = "chin",\
"Neckbeard" = "neckbeard",\
"Abe" = "abe",\
"Full Beard" = "fullbeard",\
"Braided Beard" = "braided",\
"Puffy Beard" = "puffbeard",\
"Long Beard" = "longbeard",\
"Tramp" = "tramp",\
"Eyebrows" = "eyebrows",\
"Huge Eyebrows" = "thufir")
// this is weird but basically: a list of hairstyles and their appropriate detail styles, aka hair_details["80s"] would return the Hairmetal: Faded style
// further on in the randomize_look() proc we'll see if we've got one of the styles in here and if so, we have a chance to add the detailing
// if it's a list then we'll pick from the options in the list
var/global/list/hair_details = list("einstein" = "einalt",\
"80s" = "80sfade",\
"glammetal" = "glammetalO",\
"pomp" = "pompS",\
"mohawk" = list("mohawkFT", "mohawkFB", "mohawkS"),\
"emo" = "emoH",\
"clown" = list("clownT", "clownM", "clownB"),\
"dreads" = "dreadsA",\
"afro" = list("afroHR", "afroHL", "afroST", "afroSM", "afroSB", "afroSL", "afroSR", "afroSC", "afroCNE", "afroCNW", "afroCSE", "afroCSW", "afroSV", "afroSH"))
// all these icon state names are ridiculous
var/global/list/feminine_ustyles = list("No Underwear" = "none",\
"Bra and Panties" = "brapan",\
"Tanktop and Panties" = "tankpan",\
"Bra and Boyshorts" = "braboy",\
"Tanktop and Boyshorts" = "tankboy",\
"Panties" = "panties",\
"Boyshorts" = "boyshort")
var/global/list/masculine_ustyles = list("No Underwear" = "none",\
"Briefs" = "briefs",\
"Boxers" = "boxers",\
"Boyshorts" = "boyshort")
/proc/randomize_look(var/to_randomize, var/change_gender = 1, var/change_blood = 1, var/change_age = 1, var/change_name = 1, var/change_underwear = 1, var/remove_effects = 1)
if (!to_randomize)
return
var/mob/living/carbon/human/H
var/datum/appearanceHolder/AH
if (ishuman(to_randomize))
H = to_randomize
if (H.bioHolder && H.bioHolder.mobAppearance)
AH = H.bioHolder.mobAppearance
else if (istype(to_randomize, /datum/appearanceHolder))
AH = to_randomize
if (ishuman(AH.owner))
H = AH.owner
else
return
if (H && remove_effects)
H.bioHolder.RemoveAllEffects()
H.bioHolder.BuildEffectPool()
if (change_gender)
AH.gender = pick(MALE, FEMALE)
if (H && change_name)
if (AH.gender == FEMALE)
H.real_name = pick(first_names_female)
else
H.real_name = pick(first_names_male)
H.real_name += " [pick(last_names)]"
var/list/hair_colors = list("#101010", "#924D28", "#61301B", "#E0721D", "#D7A83D",\
"#D8C078", "#E3CC88", "#F2DA91", "#F21AE", "#664F3C", "#8C684A", "#EE2A22", "#B89778", "#3B3024", "#A56b46")
var/hair_color
if (prob(75))
hair_color = randomize_hair_color(pick(hair_colors))
else
hair_color = randomize_hair_color(random_saturated_hex_color())
AH.customization_first_color = hair_color
AH.customization_second_color = hair_color
AH.customization_third_color = hair_color
AH.s_tone = rand(34,-184)
if (AH.s_tone < -30)
AH.s_tone = rand(34,-184)
if (AH.s_tone < -50)
AH.s_tone = rand(34,-184)
if (H)
if (H.limbs)
H.limbs.reset_stone()
var/list/eye_colors = list("#101010", "#613F1D", "#808000", "#3333CC")
AH.e_color = randomize_eye_color(pick(eye_colors))
var/has_second = 0
if (AH.gender == MALE)
if (prob(5)) // small chance to have a hairstyle more geared to the other gender
AH.customization_first = pick(feminine_hstyles)
else // otherwise just use one standard to the current gender
AH.customization_first = pick(masculine_hstyles)
if (prob(33)) // since we're a guy, a chance for facial hair
AH.customization_second = pick(facial_hair)
has_second = 1 // so the detail check doesn't do anything - we already got a secondary thing!!
else // if FEMALE
if (prob(8)) // same as above for guys, just reversed and with a slightly higher chance since it's ~more appropriate~ for ladies to have guy haircuts than vice versa :I
AH.customization_first = pick(masculine_hstyles)
else // ss13 is coded with gender stereotypes IN ITS VERY CORE
AH.customization_first = pick(feminine_hstyles)
if (!has_second)
var/hair_detail = hair_details[AH.customization_first] // check for detail styles for our chosen style
if (hair_detail && prob(50)) // found something in the list
AH.customization_second = hair_detail // default to being whatever we found
if (islist(hair_detail)) // if we found a bunch of things in the list
AH.customization_second = pick(hair_detail) // let's choose just one (we don't need to assign a list as someone's hair detail)
if (prob(20)) // with a small chance for another detail thing
AH.customization_third = pick(hair_detail)
AH.customization_third_color = random_saturated_hex_color()
if (prob(5))
AH.customization_third_color = randomize_hair_color(pick(hair_colors))
else
AH.customization_third = "none"
AH.customization_second_color = random_saturated_hex_color() // if you have a detail style you're likely to want a crazy color
if (prob(15))
AH.customization_second_color = randomize_hair_color(pick(hair_colors)) // but have a chance to be a normal hair color
else if (prob(5)) // chance for a special eye color
AH.customization_second = pick("hetcroL", "hetcroR")
if (prob(75))
AH.customization_second_color = random_saturated_hex_color()
else
AH.customization_second_color = randomize_eye_color(pick(eye_colors))
AH.customization_third = "none"
else // otherwise, nada
AH.customization_second = "none"
AH.customization_third = "none"
if (change_underwear)
if (AH.gender == MALE)
if (prob(1))
AH.underwear = pick(feminine_ustyles)
else
AH.underwear = pick(masculine_ustyles)
else
if (prob(5))
AH.underwear = pick(masculine_ustyles)
else
AH.underwear = pick(feminine_ustyles)
AH.u_color = random_saturated_hex_color()
if (H && change_blood)
H.bioHolder.bloodType = random_blood_type(1)
if (H && change_age)
H.bioHolder.age = rand(20,80)
if (H && H.organHolder && H.organHolder.head && H.organHolder.head.donor_appearance) // aaaa
H.organHolder.head.donor_appearance.CopyOther(AH)
spawn(1)
AH.UpdateMob()
if (H)
H.set_face_icon_dirty()
H.set_body_icon_dirty()
Reference in New Issue View Git Blame Copy Permalink