mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2026-02-07 07:00:29 +00:00
a49b18dacc
Co-authored-by: Will <7099514+Willburd@users.noreply.github.com> Co-authored-by: Cameron Lennox <killer65311@gmail.com> Co-authored-by: Kashargul <144968721+Kashargul@users.noreply.github.com>
99 lines
3.7 KiB
Plaintext
99 lines
3.7 KiB
Plaintext
// Defaults are tuned for bluespace cascade
|
|
#define DEFAULT_CONVERSION_RATE 350
|
|
#define DEFAULT_CONVERSION_PROB 60
|
|
#define DEFAULT_CONVERSION_DELAY 2.5 SECONDS
|
|
|
|
SUBSYSTEM_DEF(turf_cascade)
|
|
name = "Turf Cascade"
|
|
wait = 2
|
|
flags = SS_NO_INIT
|
|
runlevels = RUNLEVEL_GAME | RUNLEVEL_POSTGAME
|
|
|
|
VAR_PRIVATE/last_group_time = 0
|
|
VAR_PRIVATE/next_group_delay = DEFAULT_CONVERSION_DELAY
|
|
|
|
VAR_PRIVATE/list/currentrun = list()
|
|
VAR_PRIVATE/list/remaining_turf = list()
|
|
VAR_PRIVATE/turf_iterations = 0
|
|
|
|
VAR_PRIVATE/turf_replace_type = null // Turf path that turfs will be replaced with
|
|
VAR_PRIVATE/conversion_probability = DEFAULT_CONVERSION_PROB // Randomized rate of conversion, 0 to 100
|
|
VAR_PRIVATE/conversion_rate = DEFAULT_CONVERSION_RATE // Maximum number of turfs converted in each batch
|
|
|
|
/datum/controller/subsystem/turf_cascade/stat_entry(msg)
|
|
msg = "C: [length(currentrun)] | R: [length(remaining_turf)] | R: [conversion_rate] | P: [turf_replace_type]"
|
|
. = ..()
|
|
|
|
/datum/controller/subsystem/turf_cascade/fire(resumed = FALSE)
|
|
if(!resumed)
|
|
if(world.time < (last_group_time + next_group_delay)) // Wait for next expansion
|
|
return
|
|
if(!turf_replace_type || (!length(remaining_turf) && !length(currentrun)))
|
|
stop_cascade()
|
|
return
|
|
last_group_time = world.time
|
|
|
|
if(!length(currentrun) && length(remaining_turf) && turf_iterations <= 0)
|
|
// Create a random list of tiles to expand with instead of doing it in order
|
|
var/subtractive_rand_max = conversion_rate * (1 - (conversion_probability / 100))
|
|
var/i = 10 // Always do at least a handful of the oldest, to avoid spots that linger unfilled
|
|
while(i-- > 0)
|
|
var/turf/next = remaining_turf[1]
|
|
remaining_turf -= next
|
|
currentrun += next
|
|
if(!length(remaining_turf))
|
|
break
|
|
|
|
// Now for randomized growth. If we still have any left to grow into!
|
|
if(length(remaining_turf))
|
|
turf_iterations = max(1, conversion_rate - rand(0, subtractive_rand_max)) // Allows for slower rates and more messy growth, min 1, max conversion_rate
|
|
|
|
while(turf_iterations-- > 0)
|
|
var/turf/next = pick(remaining_turf)
|
|
remaining_turf -= next
|
|
currentrun += next
|
|
if(!length(remaining_turf))
|
|
break
|
|
if(MC_TICK_CHECK)
|
|
return
|
|
|
|
while(length(currentrun))
|
|
var/turf/changing = currentrun[1]
|
|
currentrun -= changing
|
|
|
|
// Convert turf if we are not the replacement type already
|
|
if(changing.type != turf_replace_type)
|
|
changing.ChangeTurf(turf_replace_type)
|
|
remaining_turf += changing.conversion_cascade_act(remaining_turf)
|
|
|
|
if(MC_TICK_CHECK)
|
|
return
|
|
|
|
/// Starts the turf cascade and boots up the subsystem. If a cascade is already in process, it will not allow another another to start.
|
|
/datum/controller/subsystem/turf_cascade/proc/start_cascade(turf/start_turf, turf_path, max_per_fire = DEFAULT_CONVERSION_RATE, time_delay = DEFAULT_CONVERSION_DELAY, convert_probability = DEFAULT_CONVERSION_PROB)
|
|
if(turf_replace_type)
|
|
return
|
|
if(!isturf(start_turf) || !max_per_fire)
|
|
return
|
|
turf_replace_type = turf_path
|
|
remaining_turf.Add(start_turf)
|
|
conversion_rate = max_per_fire
|
|
conversion_probability = convert_probability
|
|
// Configure subsystem for the cascade... Doing it with tick delays is uglier than just making the subsystem slower or faster. Considering this will end the round anyway.
|
|
can_fire = TRUE
|
|
next_group_delay = DEFAULT_CONVERSION_DELAY
|
|
|
|
/// Called when we have no more turfs to convert, or an admin wants to emergency stop
|
|
/datum/controller/subsystem/turf_cascade/proc/stop_cascade()
|
|
turf_replace_type = null
|
|
remaining_turf.Cut()
|
|
currentrun.Cut()
|
|
conversion_rate = DEFAULT_CONVERSION_RATE
|
|
conversion_probability = DEFAULT_CONVERSION_PROB
|
|
next_group_delay = DEFAULT_CONVERSION_DELAY
|
|
can_fire = FALSE
|
|
|
|
#undef DEFAULT_CONVERSION_RATE
|
|
#undef DEFAULT_CONVERSION_PROB
|
|
#undef DEFAULT_CONVERSION_DELAY
|