Nero1024
354 lines
12 KiB
Plaintext
354 lines
12 KiB
Plaintext
|
|
/**********************Asteroid**************************/
|
|
|
|
/turf/open/floor/plating/asteroid //floor piece
|
|
gender = PLURAL
|
|
name = "asteroid sand"
|
|
baseturfs = /turf/open/floor/plating/asteroid
|
|
icon = 'icons/turf/floors.dmi'
|
|
icon_state = "asteroid"
|
|
icon_plating = "asteroid"
|
|
postdig_icon_change = TRUE
|
|
footstep = FOOTSTEP_SAND
|
|
barefootstep = FOOTSTEP_SAND
|
|
clawfootstep = FOOTSTEP_SAND
|
|
heavyfootstep = FOOTSTEP_GENERIC_HEAVY
|
|
var/environment_type = "asteroid"
|
|
var/turf_type = /turf/open/floor/plating/asteroid //Because caves do whacky shit to revert to normal
|
|
var/floor_variance = 20 //probability floor has a different icon state
|
|
attachment_holes = FALSE
|
|
var/obj/item/stack/digResult = /obj/item/stack/ore/glass/basalt
|
|
var/dug
|
|
|
|
/turf/open/floor/plating/asteroid/Initialize()
|
|
var/proper_name = name
|
|
. = ..()
|
|
name = proper_name
|
|
if(prob(floor_variance))
|
|
icon_state = "[environment_type][rand(0,12)]"
|
|
|
|
/turf/open/floor/plating/asteroid/proc/getDug()
|
|
new digResult(src, 5)
|
|
if(postdig_icon_change)
|
|
if(!postdig_icon)
|
|
icon_plating = "[environment_type]_dug"
|
|
icon_state = "[environment_type]_dug"
|
|
dug = TRUE
|
|
|
|
/turf/open/floor/plating/asteroid/proc/can_dig(mob/user)
|
|
if(!dug)
|
|
return TRUE
|
|
if(user)
|
|
to_chat(user, "<span class='notice'>Looks like someone has dug here already.</span>")
|
|
|
|
/turf/open/floor/plating/asteroid/try_replace_tile(obj/item/stack/tile/T, mob/user, params)
|
|
return
|
|
|
|
/turf/open/floor/plating/asteroid/burn_tile()
|
|
return
|
|
|
|
/turf/open/floor/plating/asteroid/MakeSlippery(wet_setting, min_wet_time, wet_time_to_add, max_wet_time, permanent)
|
|
return
|
|
|
|
/turf/open/floor/plating/asteroid/MakeDry()
|
|
return
|
|
|
|
/turf/open/floor/plating/asteroid/attackby(obj/item/W, mob/user, params)
|
|
. = ..()
|
|
if(!.)
|
|
if(W.tool_behaviour == TOOL_SHOVEL || W.tool_behaviour == TOOL_MINING)
|
|
if(!can_dig(user))
|
|
return TRUE
|
|
|
|
if(!isturf(user.loc))
|
|
return
|
|
|
|
to_chat(user, "<span class='notice'>You start digging...</span>")
|
|
|
|
if(W.use_tool(src, user, 40, volume=50))
|
|
if(!can_dig(user))
|
|
return TRUE
|
|
to_chat(user, "<span class='notice'>You dig a hole.</span>")
|
|
getDug()
|
|
SSblackbox.record_feedback("tally", "pick_used_mining", 1, W.type)
|
|
return TRUE
|
|
else if(istype(W, /obj/item/storage/bag/ore))
|
|
for(var/obj/item/stack/ore/O in src)
|
|
SEND_SIGNAL(W, COMSIG_PARENT_ATTACKBY, O)
|
|
|
|
/turf/open/floor/plating/asteroid/singularity_act()
|
|
if(is_planet_level(z))
|
|
return ..()
|
|
ScrapeAway()
|
|
|
|
/turf/open/floor/plating/asteroid/ex_act(severity, target)
|
|
. = SEND_SIGNAL(src, COMSIG_ATOM_EX_ACT, severity, target)
|
|
contents_explosion(severity, target)
|
|
|
|
/turf/open/floor/plating/lavaland_baseturf
|
|
baseturfs = /turf/open/floor/plating/asteroid/basalt/lava_land_surface
|
|
|
|
/turf/open/floor/plating/asteroid/basalt
|
|
name = "volcanic floor"
|
|
baseturfs = /turf/open/floor/plating/asteroid/basalt
|
|
icon = 'icons/turf/floors.dmi'
|
|
icon_state = "basalt"
|
|
icon_plating = "basalt"
|
|
environment_type = "basalt"
|
|
floor_variance = 15
|
|
digResult = /obj/item/stack/ore/glass/basalt
|
|
|
|
/turf/open/floor/plating/asteroid/basalt/lava //lava underneath
|
|
baseturfs = /turf/open/lava/smooth
|
|
|
|
/turf/open/floor/plating/asteroid/basalt/airless
|
|
baseturfs = /turf/open/floor/plating/asteroid/airless
|
|
initial_gas_mix = "TEMP=2.7"
|
|
|
|
/turf/open/floor/plating/asteroid/basalt/Initialize()
|
|
. = ..()
|
|
set_basalt_light(src)
|
|
|
|
/turf/open/floor/plating/asteroid/getDug()
|
|
set_light(0)
|
|
return ..()
|
|
|
|
/proc/set_basalt_light(turf/open/floor/B)
|
|
switch(B.icon_state)
|
|
if("basalt1", "basalt2", "basalt3")
|
|
B.set_light(2, 0.6, LIGHT_COLOR_LAVA) //more light
|
|
if("basalt5", "basalt9")
|
|
B.set_light(1.4, 0.6, LIGHT_COLOR_LAVA) //barely anything!
|
|
|
|
///////Surface. The surface is warm, but survivable without a suit. Internals are required. The floors break to chasms, which drop you into the underground.
|
|
|
|
/turf/open/floor/plating/asteroid/basalt/lava_land_surface
|
|
initial_gas_mix = LAVALAND_DEFAULT_ATMOS
|
|
planetary_atmos = TRUE
|
|
baseturfs = /turf/open/lava/smooth/lava_land_surface
|
|
|
|
|
|
|
|
|
|
/turf/open/floor/plating/asteroid/airless
|
|
initial_gas_mix = "TEMP=2.7"
|
|
turf_type = /turf/open/floor/plating/asteroid/airless
|
|
|
|
|
|
#define SPAWN_MEGAFAUNA "bluh bluh huge boss"
|
|
#define SPAWN_BUBBLEGUM 6
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave
|
|
var/length = 100
|
|
var/list/mob_spawn_list
|
|
var/list/megafauna_spawn_list
|
|
var/list/flora_spawn_list
|
|
var/sanity = 1
|
|
var/forward_cave_dir = 1
|
|
var/backward_cave_dir = 2
|
|
var/going_backwards = TRUE
|
|
var/has_data = FALSE
|
|
var/data_having_type = /turf/open/floor/plating/asteroid/airless/cave/has_data
|
|
turf_type = /turf/open/floor/plating/asteroid/airless
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/has_data //subtype for producing a tunnel with given data
|
|
has_data = TRUE
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/volcanic
|
|
mob_spawn_list = list(/mob/living/simple_animal/hostile/asteroid/goliath/beast/random = 50, /mob/living/simple_animal/hostile/spawner/lavaland/goliath = 3, \
|
|
/mob/living/simple_animal/hostile/asteroid/basilisk/watcher/random = 40, /mob/living/simple_animal/hostile/spawner/lavaland = 2, \
|
|
/mob/living/simple_animal/hostile/asteroid/hivelord/legion/random = 30, /mob/living/simple_animal/hostile/spawner/lavaland/legion = 3, \
|
|
SPAWN_MEGAFAUNA = 6, /mob/living/simple_animal/hostile/asteroid/goldgrub = 10)
|
|
|
|
data_having_type = /turf/open/floor/plating/asteroid/airless/cave/volcanic/has_data
|
|
turf_type = /turf/open/floor/plating/asteroid/basalt/lava_land_surface
|
|
initial_gas_mix = LAVALAND_DEFAULT_ATMOS
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/volcanic/has_data //subtype for producing a tunnel with given data
|
|
has_data = TRUE
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/Initialize()
|
|
if (!mob_spawn_list)
|
|
mob_spawn_list = list(/mob/living/simple_animal/hostile/asteroid/goldgrub = 1, /mob/living/simple_animal/hostile/asteroid/goliath = 5, /mob/living/simple_animal/hostile/asteroid/basilisk = 4, /mob/living/simple_animal/hostile/asteroid/hivelord = 3)
|
|
if (!megafauna_spawn_list)
|
|
megafauna_spawn_list = list(/mob/living/simple_animal/hostile/megafauna/dragon = 4, /mob/living/simple_animal/hostile/megafauna/colossus = 2, /mob/living/simple_animal/hostile/megafauna/bubblegum = SPAWN_BUBBLEGUM)
|
|
if (!flora_spawn_list)
|
|
flora_spawn_list = list(/obj/structure/flora/ash/leaf_shroom = 2 , /obj/structure/flora/ash/cap_shroom = 2 , /obj/structure/flora/ash/stem_shroom = 2 , /obj/structure/flora/ash/cacti = 1, /obj/structure/flora/ash/tall_shroom = 2)
|
|
|
|
. = ..()
|
|
if(!has_data)
|
|
produce_tunnel_from_data()
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/proc/get_cave_data(set_length, exclude_dir = -1)
|
|
// If set_length (arg1) isn't defined, get a random length; otherwise assign our length to the length arg.
|
|
if(!set_length)
|
|
length = rand(25, 50)
|
|
else
|
|
length = set_length
|
|
|
|
// Get our directiosn
|
|
forward_cave_dir = pick(GLOB.alldirs - exclude_dir)
|
|
// Get the opposite direction of our facing direction
|
|
backward_cave_dir = angle2dir(dir2angle(forward_cave_dir) + 180)
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/proc/produce_tunnel_from_data(tunnel_length, excluded_dir = -1)
|
|
get_cave_data(tunnel_length, excluded_dir)
|
|
// Make our tunnels
|
|
make_tunnel(forward_cave_dir)
|
|
if(going_backwards)
|
|
make_tunnel(backward_cave_dir)
|
|
// Kill ourselves by replacing ourselves with a normal floor.
|
|
SpawnFloor(src)
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/proc/make_tunnel(dir)
|
|
var/turf/closed/mineral/tunnel = src
|
|
var/next_angle = pick(45, -45)
|
|
|
|
for(var/i = 0; i < length; i++)
|
|
if(!sanity)
|
|
break
|
|
|
|
var/list/L = list(45)
|
|
if(ISODD(dir2angle(dir))) // We're going at an angle and we want thick angled tunnels.
|
|
L += -45
|
|
|
|
// Expand the edges of our tunnel
|
|
for(var/edge_angle in L)
|
|
var/turf/closed/mineral/edge = get_step(tunnel, angle2dir(dir2angle(dir) + edge_angle))
|
|
if(istype(edge))
|
|
SpawnFloor(edge)
|
|
|
|
if(!sanity)
|
|
break
|
|
|
|
// Move our tunnel forward
|
|
tunnel = get_step(tunnel, dir)
|
|
|
|
if(istype(tunnel))
|
|
// Small chance to have forks in our tunnel; otherwise dig our tunnel.
|
|
if(i > 3 && prob(20))
|
|
if(istype(tunnel.loc, /area/mine/explored) || (istype(tunnel.loc, /area/lavaland/surface/outdoors) && !istype(tunnel.loc, /area/lavaland/surface/outdoors/unexplored)))
|
|
sanity = 0
|
|
break
|
|
var/turf/open/floor/plating/asteroid/airless/cave/C = tunnel.ChangeTurf(data_having_type, null, CHANGETURF_IGNORE_AIR)
|
|
C.going_backwards = FALSE
|
|
C.produce_tunnel_from_data(rand(10, 15), dir)
|
|
else
|
|
SpawnFloor(tunnel)
|
|
else //if(!istype(tunnel, parent)) // We hit space/normal/wall, stop our tunnel.
|
|
break
|
|
|
|
// Chance to change our direction left or right.
|
|
if(i > 2 && prob(33))
|
|
// We can't go a full loop though
|
|
next_angle = -next_angle
|
|
setDir(angle2dir(dir2angle(dir) )+ next_angle)
|
|
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/proc/SpawnFloor(turf/T)
|
|
for(var/S in RANGE_TURFS(1, src))
|
|
var/turf/NT = S
|
|
if(!NT || isspaceturf(NT) || istype(NT.loc, /area/mine/explored) || (istype(NT.loc, /area/lavaland/surface/outdoors) && !istype(NT.loc, /area/lavaland/surface/outdoors/unexplored)))
|
|
sanity = 0
|
|
break
|
|
if(!sanity)
|
|
return
|
|
SpawnFlora(T)
|
|
|
|
SpawnMonster(T)
|
|
T.ChangeTurf(turf_type, null, CHANGETURF_IGNORE_AIR)
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/proc/SpawnMonster(turf/T)
|
|
if(prob(30))
|
|
if(istype(loc, /area/mine/explored) || !istype(loc, /area/lavaland/surface/outdoors/unexplored))
|
|
return
|
|
var/randumb = pickweight(mob_spawn_list)
|
|
while(randumb == SPAWN_MEGAFAUNA)
|
|
if(istype(loc, /area/lavaland/surface/outdoors/unexplored/danger)) //this is danger. it's boss time.
|
|
var/maybe_boss = pickweight(megafauna_spawn_list)
|
|
if(megafauna_spawn_list[maybe_boss])
|
|
randumb = maybe_boss
|
|
if(ispath(maybe_boss, /mob/living/simple_animal/hostile/megafauna/bubblegum)) //there can be only one bubblegum, so don't waste spawns on it
|
|
megafauna_spawn_list[maybe_boss] = 0
|
|
else //this is not danger, don't spawn a boss, spawn something else
|
|
randumb = pickweight(mob_spawn_list)
|
|
|
|
for(var/mob/living/simple_animal/hostile/H in urange(12,T)) //prevents mob clumps
|
|
if((ispath(randumb, /mob/living/simple_animal/hostile/megafauna) || ismegafauna(H)) && get_dist(src, H) <= 7)
|
|
return //if there's a megafauna within standard view don't spawn anything at all
|
|
if(ispath(randumb, /mob/living/simple_animal/hostile/asteroid) || istype(H, /mob/living/simple_animal/hostile/asteroid))
|
|
return //if the random is a standard mob, avoid spawning if there's another one within 12 tiles
|
|
if((ispath(randumb, /mob/living/simple_animal/hostile/spawner/lavaland) || istype(H, /mob/living/simple_animal/hostile/spawner/lavaland)) && get_dist(src, H) <= 2)
|
|
return //prevents tendrils spawning in each other's collapse range
|
|
|
|
new randumb(T)
|
|
return
|
|
|
|
#undef SPAWN_MEGAFAUNA
|
|
#undef SPAWN_BUBBLEGUM
|
|
|
|
/turf/open/floor/plating/asteroid/airless/cave/proc/SpawnFlora(turf/T)
|
|
if(prob(12))
|
|
if(istype(loc, /area/mine/explored) || istype(loc, /area/lavaland/surface/outdoors/explored))
|
|
return
|
|
var/randumb = pickweight(flora_spawn_list)
|
|
for(var/obj/structure/flora/ash/F in range(4, T)) //Allows for growing patches, but not ridiculous stacks of flora
|
|
if(!istype(F, randumb))
|
|
return
|
|
new randumb(T)
|
|
|
|
|
|
|
|
/turf/open/floor/plating/asteroid/snow
|
|
gender = PLURAL
|
|
name = "snow"
|
|
desc = "Looks cold."
|
|
icon = 'icons/turf/snow.dmi'
|
|
baseturfs = /turf/open/floor/plating/asteroid/snow
|
|
icon_state = "snow"
|
|
icon_plating = "snow"
|
|
initial_gas_mix = "o2=22;n2=82;TEMP=180"
|
|
slowdown = 2
|
|
environment_type = "snow"
|
|
flags_1 = NONE
|
|
planetary_atmos = TRUE
|
|
burnt_states = list("snow_dug")
|
|
bullet_sizzle = TRUE
|
|
bullet_bounce_sound = null
|
|
digResult = /obj/item/stack/sheet/mineral/snow
|
|
|
|
/turf/open/floor/plating/asteroid/snow/burn_tile()
|
|
if(!burnt)
|
|
visible_message("<span class='danger'>[src] melts away!.</span>")
|
|
slowdown = 0
|
|
burnt = TRUE
|
|
icon_state = "snow_dug"
|
|
return TRUE
|
|
return FALSE
|
|
|
|
/turf/open/floor/plating/asteroid/snow/ice
|
|
name = "icy snow"
|
|
desc = "Looks colder."
|
|
baseturfs = /turf/open/floor/plating/asteroid/snow/ice
|
|
initial_gas_mix = "o2=0;n2=82;plasma=24;TEMP=120"
|
|
floor_variance = 0
|
|
icon_state = "snow-ice"
|
|
icon_plating = "snow-ice"
|
|
environment_type = "snow_cavern"
|
|
footstep = FOOTSTEP_FLOOR
|
|
barefootstep = FOOTSTEP_HARD_BAREFOOT
|
|
clawfootstep = FOOTSTEP_HARD_CLAW
|
|
heavyfootstep = FOOTSTEP_GENERIC_HEAVY
|
|
|
|
/turf/open/floor/plating/asteroid/snow/ice/burn_tile()
|
|
return FALSE
|
|
|
|
/turf/open/floor/plating/asteroid/snow/airless
|
|
initial_gas_mix = "TEMP=2.7"
|
|
|
|
/turf/open/floor/plating/asteroid/snow/temperatre
|
|
initial_gas_mix = "o2=22;n2=82;TEMP=255.37"
|
|
|
|
/turf/open/floor/plating/asteroid/snow/atmosphere
|
|
initial_gas_mix = "o2=22;n2=82;TEMP=180"
|
|
planetary_atmos = FALSE |