cyberpresidentvanellope/Polaris
1
0
Fork 0
mirror of https://github.com/PolarisSS13/Polaris.git synced 2026-01-03 05:52:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

Tweaked hunger values once more.

Browse Source 
Added check if you already ate something but it was not yet metabolized. It's harder to overeat now.
Improved the random look generator. Now it takes in account real-life statistics of skin tone and blood group distribution, and has different colors.
Fixed bug that sprinkles did not metabolized in non-security body.
Made rig suit to be proper space suit.
Cleaned some code
Made mopbucket to have 100 volume.
Added radio report diagnostic verb (but with no effect for now)

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@551 316c924e-a436-60f5-8080-3fe189b3f50e
This commit is contained in:
Rygzengrho
2010-12-06 23:30:18 +00:00
parent d5c2356340
commit 87ad3ade16
12 changed files with 168 additions and 80 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
code/modules/admin/admin_verbs.dm
View File

@@ -32,6 +32,7 @@
src.verbs += /client/proc/admin_cancel_shuttle // -- Skie
src.verbs += /client/proc/air_report
src.verbs += /client/proc/air_status
src.verbs += /client/proc/radio_report
src.verbs += /client/proc/callproc
src.verbs += /client/proc/Cell
src.verbs += /client/proc/cmd_admin_alienize
@@ -131,6 +132,7 @@
src.verbs += /client/proc/admin_cancel_shuttle // -- Skie
src.verbs += /client/proc/air_report
src.verbs += /client/proc/air_status
src.verbs += /client/proc/radio_report
src.verbs += /client/proc/callproc
src.verbs += /client/proc/Cell
src.verbs += /client/proc/cmd_admin_alienize
@@ -287,6 +289,7 @@
src.verbs += /client/proc/general_report
src.verbs += /client/proc/air_report
src.verbs += /client/proc/air_status
src.verbs += /client/proc/radio_report
src.verbs += /client/proc/fix_next_move
src.verbs += /client/proc/toggle_view_range
@@ -581,6 +584,7 @@
src.verbs -= /client/proc/general_report
src.verbs -= /client/proc/air_report
src.verbs -= /client/proc/air_status
src.verbs -= /client/proc/radio_report
src.verbs -= /client/proc/toggle_view_range
src.verbs -= /obj/admins/proc/toggle_aliens
@@ -764,7 +768,7 @@
message_admins("\blue [src.ckey] warned [M.ckey], resulting in a 10 minute autoban.")
del(M.client)
del(M)
//del(M)
/client/proc/drop_bomb() // Some admin dickery that can probably be done better -- TLE
set category = "Special Verbs"
@@ -965,6 +969,7 @@
src.verbs += /client/proc/general_report
src.verbs += /client/proc/air_report
src.verbs += /client/proc/air_status
src.verbs += /client/proc/radio_report
src.verbs += /client/proc/fix_next_move
src.verbs += /client/proc/toggle_view_range
@@ -1047,6 +1052,7 @@
src.verbs += /client/proc/general_report
src.verbs += /client/proc/air_report
src.verbs += /client/proc/air_status
src.verbs += /client/proc/radio_report
src.verbs += /client/proc/fix_next_move
src.verbs += /obj/admins/proc/spawn_atom
@@ -1115,6 +1121,7 @@
src.verbs += /client/proc/general_report
src.verbs += /client/proc/air_report
src.verbs += /client/proc/air_status
src.verbs += /client/proc/radio_report
src.verbs += /client/proc/fix_next_move
src.verbs += /client/proc/toggle_view_range
@@ -1382,6 +1389,7 @@
src.verbs -= /client/proc/general_report
src.verbs -= /client/proc/air_report
src.verbs -= /client/proc/air_status
src.verbs -= /client/proc/radio_report
src.verbs += /client/proc/fix_next_move
src.verbs += /client/proc/toggle_view_range
@@ -1464,6 +1472,7 @@
src.verbs -= /client/proc/general_report
src.verbs -= /client/proc/air_report
src.verbs -= /client/proc/air_status
src.verbs -= /client/proc/radio_report
src.verbs += /client/proc/fix_next_move
src.verbs += /obj/admins/proc/spawn_atom
@@ -1532,6 +1541,7 @@
src.verbs -= /client/proc/general_report
src.verbs -= /client/proc/air_report
src.verbs -= /client/proc/air_status
src.verbs -= /client/proc/radio_report
src.verbs -= /client/proc/fix_next_move
src.verbs += /client/proc/toggle_view_range

22
code/modules/admin/verbs/diagnostics.dm
View File

@@ -109,4 +109,24 @@
message_admins("[key_name_admin(largest_move_mob)] had the largest move delay with [largest_move_time] frames / [largest_move_time/10] seconds!", 1)
message_admins("[key_name_admin(largest_click_mob)] had the largest click delay with [largest_click_time] frames / [largest_click_time/10] seconds!", 1)
message_admins("world.time = [world.time]", 1)
return
return
radio_report()
set category = "Debug"
set name = "Radio report"
var/output = "<b>Radio Report</b><hr>"/*
for (var/fq in radio_controller.frequencies)
output += "<b>Freq: [fq]</b><br>"
var/list/datum/radio_frequency/fqs = radio_controller.frequencies[fq]
output += "&nbsp;&nbsp;Voice: [fqs.voice.len]<br>"
output += "&nbsp;&nbsp;Broadcast: [fqs.broadcast.len]<br>"
output += "&nbsp;&nbsp;Tags: <br>"
for (var/tag in fqs.tags)
var/list/ctag = fqs.tags[tag]
output += "&nbsp;&nbsp;&nbsp;&nbsp;[tag]: [ctag.len]<br>"
output += "&nbsp;&nbsp;Groups: <br>"
for (var/group in fqs.groups)
var/list/cgroup = fqs.groups[group]
output += "&nbsp;&nbsp;&nbsp;&nbsp;[group]: [cgroup.len]<br>"*/
usr << browse(output,"window=radioreport")

2
code/modules/mob/living/carbon/alien/humanoid/life_new.dm
View File

@@ -341,7 +341,7 @@
if(reagents) reagents.metabolize(src)
if(src.nutrition > 400 && !(src.mutations & 32))
if(src.nutrition > 500 && !(src.mutations & 32))
if(prob(5 + round((src.nutrition - 200) / 2)))
src << "\red You suddenly feel blubbery!"
src.mutations |= 32

7
code/modules/mob/living/carbon/human/life.dm
View File

@@ -857,9 +857,12 @@
// Commented out so hunger system won't be such shock
// Damage and effects from not eating
if(src.nutrition <= 50)
src.bruteloss++
if (prob (0.1))
src << "\red Your stomach rumbles."
if (prob (10))
src << "You feel very weak"
src.bruteloss++
if (prob (5))
src << "You feel very weak."
src.weakened += rand(2, 3)
*/
/*

120
code/modules/mob/new_player/preferences.dm
View File

@@ -8,7 +8,6 @@ datum/preferences
var/midis = 1
var/ooccolor = "#b82e00"
var/be_random_name = 0
var/be_random_look = 0
var/underwear = 1
var/occupation1 = "No Preference"
@@ -46,8 +45,28 @@ datum/preferences
else
real_name = capitalize(pick(first_names_female) + " " + capitalize(pick(last_names)))
proc/randomize_skin_tone()
var/tone
var/tmp = pickweight ( list ("caucasian" = 55, "afroamerican" = 15, "african" = 10, "latino" = 10, "albino" = 5, "weird" = 5))
switch (tmp)
if ("caucasian")
tone = -45 + 35
if ("afroamerican")
tone = -150 + 35
if ("african")
tone = -200 + 35
if ("latino")
tone = -90 + 35
if ("albino")
tone = -1 + 35
if ("weird")
tone = -(rand (1, 220)) + 35
src.s_tone = min(max(tone + rand (-25, 25), -185), 34)
proc/randomize_hair_color(var/target = "hair")
if (prob (50) && target == "facial") // Chance to inherit head color
if (prob (75) && target == "facial") // Chance to inherit hair color
r_facial = r_hair
g_facial = g_hair
b_facial = b_hair
@@ -60,29 +79,29 @@ datum/preferences
var/col = pick ("blonde", "black", "chestnut", "copper", "brown", "wheat", "old", "punk")
switch (col)
if ("blonde")
red = 226
green = 209
blue = 140
red = 255
green = 255
blue = 0
if ("black")
red = 0
green = 0
blue = 0
if ("chestnut")
red = 98
green = 77
blue = 60
red = 153
green = 102
blue = 51
if ("copper")
red = 152
green = 81
blue = 63
red = 255
green = 153
blue = 0
if ("brown")
red = 73
green = 52
blue = 39
red = 102
green = 51
blue = 0
if ("wheat")
red = 210
green = 191
blue = 158
red = 255
green = 255
blue = 153
if ("old")
red = rand (100, 255)
green = red
@@ -92,9 +111,9 @@ datum/preferences
green = rand (0, 255)
blue = rand (0, 255)
red = max(min(red + rand (-10, 10), 255), 0)
green = max(min(green + rand (-10, 10), 255), 0)
blue = max(min(blue + rand (-10, 10), 255), 0)
red = max(min(red + rand (-25, 25), 255), 0)
green = max(min(green + rand (-25, 25), 255), 0)
blue = max(min(blue + rand (-25, 25), 255), 0)
switch (target)
if ("hair")
@@ -122,37 +141,37 @@ datum/preferences
green = red
blue = red
if ("brown")
red = 60
green = 30
blue = 19
if ("chestnut")
red = 127
green = 79
blue = 31
if ("blue")
red = 53
red = 102
green = 51
blue = 64
blue = 0
if ("chestnut")
red = 153
green = 102
blue = 0
if ("blue")
red = 51
green = 102
blue = 204
if ("lightblue")
red = 94
green = 101
blue = 115
red = 102
green = 204
blue = 255
if ("green")
red = 115
green = 114
blue = 84
red = 0
green = 102
blue = 0
if ("albino")
red = rand (100, 255)
green = rand (0, 70)
blue = rand (0, 70)
red = rand (200, 255)
green = rand (0, 150)
blue = rand (0, 150)
if ("weird")
red = rand (0, 255)
green = rand (0, 255)
blue = rand (0, 255)
red = max(min(red + rand (-10, 10), 255), 0)
green = max(min(green + rand (-10, 10), 255), 0)
blue = max(min(blue + rand (-10, 10), 255), 0)
red = max(min(red + rand (-25, 25), 255), 0)
green = max(min(green + rand (-25, 25), 255), 0)
blue = max(min(blue + rand (-25, 25), 255), 0)
r_eyes = red
g_eyes = green
@@ -303,8 +322,9 @@ datum/preferences
else
dat += "\t<a href=\"byond://?src=\ref[user];preferences=1;occ=1\">No Preference</a><br>"
dat += "<hr><table><tr><td><b>Body</b>"
dat += " (<a href=\"byond://?src=\ref[user];preferences=1;s_tone=random;underwear=random;age=random;b_type=random;hair=random;h_style=random;facial=random;f_style=random;eyes=random\">&reg;</A>)<br>" // Random look
dat += "<hr><table><tr><td><b>Body</b> "
dat += "(<a href=\"byond://?src=\ref[user];preferences=1;s_tone=random;underwear=random;age=random;b_type=random;hair=random;h_style=random;facial=random;f_style=random;eyes=random\">&reg;</A>)" // Random look
dat += "<br>"
dat += "Blood Type: <a href='byond://?src=\ref[user];preferences=1;b_type=input'>[src.b_type]</a><br>"
dat += "Skin Tone: <a href='byond://?src=\ref[user];preferences=1;s_tone=input'>[-src.s_tone + 35]/220<br></a>"
@@ -517,7 +537,7 @@ datum/preferences
if (new_b_type)
src.b_type = new_b_type
if ("random")
src.b_type = pick ("A+", "A-", "B+", "B-", "AB+", "AB-", "O+", "O-")
src.b_type = pickweight ( list ("A+" = 31, "A-" = 7, "B+" = 8, "B-" = 2, "AB+" = 2, "AB-" = 1, "O+" = 40, "O-" = 9))
if (link_tags["hair"])
@@ -614,7 +634,7 @@ datum/preferences
if (link_tags["s_tone"])
switch(link_tags["s_tone"])
if ("random")
src.s_tone = (-(rand (1, 220))) -35
randomize_skin_tone()
if("input")
var/new_tone = input(user, "Please select skin tone level: 1-220 (1=albino, 35=caucasian, 150=black, 220='very' black)", "Character Generation") as text
if (new_tone)
@@ -639,10 +659,10 @@ datum/preferences
if (link_tags["f_style"])
switch(link_tags["f_style"])
if ("random")
if (src.gender == FEMALE && !prob (1))
src.f_style = "Shaved"
if (src.gender == FEMALE)
src.f_style = pickweight ( list("Watson" = 1, "Chaplin" = 1, "Selleck" = 1, "Full Beard" = 1, "Long Beard" = 1, "Neckbeard" = 1, "Van Dyke" = 1, "Elvis" = 1, "Abe" = 1, "Chinstrap" = 1, "Hipster" = 1, "Goatee" = 1, "Hogan" = 1, "Shaved" = 100))
else
src.f_style = pick ("Watson", "Chaplin", "Selleck", "Full Beard", "Long Beard", "Neckbeard", "Van Dyke", "Elvis", "Abe", "Chinstrap", "Hipster", "Goatee", "Hogan")
src.f_style = pickweight ( list("Watson" = 1, "Chaplin" = 1, "Selleck" = 1, "Full Beard" = 1, "Long Beard" = 1, "Neckbeard" = 1, "Van Dyke" = 1, "Elvis" = 1, "Abe" = 1, "Chinstrap" = 1, "Hipster" = 1, "Goatee" = 1, "Hogan" = 1, "Shaved" = 10))
if("input")
var/new_style = input(user, "Please select facial style", "Character Generation") as null|anything in list("Watson", "Chaplin", "Selleck", "Full Beard", "Long Beard", "Neckbeard", "Van Dyke", "Elvis", "Abe", "Chinstrap", "Hipster", "Goatee", "Hogan", "Shaved")
if (new_style)
@@ -670,7 +690,7 @@ datum/preferences
if(!IsGuestKey(user.key))
switch(link_tags["underwear"])
if ("random")
if (prob (65))
if (prob (75))
src.underwear = 1
else
src.underwear = 0