Merge pull request #15147 from Heroman3003/homogenized-fish

Adds generic 'spacefish migration' event, replaces active fish events with it
This commit is contained in:
Heroman3003
2023-07-16 11:05:34 +10:00
committed by CHOMPStation2
parent 7b1c011b44
commit e638b02327
5 changed files with 165 additions and 39 deletions

View File

@@ -0,0 +1,117 @@
/datum/event/spacefish_migration
startWhen = 0 // Start immediately
announceWhen = 45 // Adjusted by setup
endWhen = 75 // Adjusted by setup
var/fish_type = /mob/living/simple_mob/animal/space/carp/event
var/fish_base_cap = 2
var/fish_cap_mult = 3
var/fish_cap = 10
var/list/spawned_fish = list()
// Possible fish types. First is the path, second is base cap, third is cap severity multiplier
var/list/possible_fish_types = list(
list(/mob/living/simple_mob/animal/space/carp/event, 2, 3),
list(/mob/living/simple_mob/vore/alienanimals/space_jellyfish, 2, 3),
list(/mob/living/simple_mob/animal/space/gnat, 8, 4),
list(/mob/living/simple_mob/animal/space/ray, 1, 1),
list(/mob/living/simple_mob/animal/space/shark/event, 1, 1)
)
/datum/event/spacefish_migration/setup()
announceWhen = rand(30, 60) // 1 to 2 minutes
endWhen += severity * 25
var/list/fish_config = pick(possible_fish_types)
fish_type = fish_config[1]
fish_base_cap = fish_config[2]
fish_cap_mult = fish_config[3]
fish_cap = fish_base_cap + fish_cap_mult ** severity // No more than this many at once regardless of waves. (5, 11, 29)
/datum/event/spacefish_migration/start()
affecting_z -= global.using_map.sealed_levels // Space levels only please!
..()
/datum/event/spacefish_migration/announce()
var/announcement = ""
if(severity == EVENT_LEVEL_MAJOR)
announcement = "Massive migration of unknown biological entities has been detected near [location_name()], please stand-by."
else
announcement = "Unknown biological [spawned_fish.len == 1 ? "entity has" : "entities have"] been detected near [location_name()], please stand-by."
command_announcement.Announce(announcement, "Lifesign Alert")
/datum/event/spacefish_migration/tick()
if(activeFor % 5 != 0)
return // Only process every 10 seconds.
if(count_spawned_fish() < fish_cap)
spawn_fish(rand(3, 3 + severity * 2) - 1, 1, severity + 2)
/datum/event/spacefish_migration/proc/spawn_fish(var/num_groups, var/group_size_min, var/group_size_max, var/dir)
if(isnull(dir))
dir = (victim && prob(80)) ? victim.fore_dir : pick(GLOB.cardinal)
// Check if any landmarks exist!
var/list/spawn_locations = list()
for(var/obj/effect/landmark/C in landmarks_list)
if(C.name == "carpspawn" && (C.z in affecting_z))
spawn_locations.Add(C.loc)
if(spawn_locations.len) // Okay we've got landmarks, lets use those!
shuffle_inplace(spawn_locations)
num_groups = min(num_groups, spawn_locations.len)
for (var/i = 1, i <= num_groups, i++)
var/group_size = rand(group_size_min, group_size_max)
for (var/j = 0, j < group_size, j++)
spawn_one_fish(spawn_locations[i])
return
// Okay we did *not* have any landmarks, so lets do our best!
var/i = 1
while (i <= num_groups)
var/Z = pick(affecting_z)
var/group_size = rand(group_size_min, group_size_max)
var/turf/map_center = locate(round(world.maxx/2), round(world.maxy/2), Z)
var/turf/group_center = pick_random_edge_turf(dir, Z, TRANSITIONEDGE + 2)
var/list/turfs = getcircle(group_center, 2)
for (var/j = 0, j < group_size, j++)
var/mob/living/simple_mob/animal/M = spawn_one_fish(turfs[(i % turfs.len) + 1])
// Ray trace towards middle of the map to find where they can stop just outside of structure/ship.
var/turf/target
for(var/turf/T in getline(get_turf(M), map_center))
if(!T.is_space())
break;
target = T
if(target)
M.ai_holder?.give_destination(target) // Ask fish to swim towards the middle of the map
i++
// Spawn a single fish at given location.
/datum/event/spacefish_migration/proc/spawn_one_fish(var/loc)
var/mob/living/simple_mob/animal/M = new fish_type(loc)
GLOB.destroyed_event.register(M, src, PROC_REF(on_fish_destruction))
spawned_fish.Add(M)
return M
// Counts living fish spawned by this event.
/datum/event/spacefish_migration/proc/count_spawned_fish()
. = 0
for(var/mob/living/simple_mob/animal/M as anything in spawned_fish)
if(!QDELETED(M) && M.stat != DEAD)
. += 1
// If fish is bomphed, remove it from the list.
/datum/event/spacefish_migration/proc/on_fish_destruction(var/mob/M)
spawned_fish -= M
GLOB.destroyed_event.unregister(M, src, PROC_REF(on_fish_destruction))
/datum/event/spacefish_migration/end()
. = ..()
// Clean up fish that died in space for some reason.
spawn(0)
for(var/mob/living/simple_mob/SM in spawned_fish)
if(SM.stat == DEAD)
var/turf/T = get_turf(SM)
if(istype(T, /turf/space))
if(prob(75))
qdel(SM)
CHECK_TICK
// Overmap version
/datum/event/spacefish_migration/overmap/announce()
return