52 lines
2.1 KiB
Text
52 lines
2.1 KiB
Text
# spawn.ludic - a valley filled: ranges set out, then each range to its target on its own habitat.
|
|
# Each morning the ranges move with the season and every range under its target gets ONE back,
|
|
# out of every player's sight: a valley recovers, it does not refill.
|
|
export function wildlife_spawn(wildlife_st: mut WildlifeState, x0: float, z0: float) -> void {
|
|
wildlife_ranges_setup(wildlife_st, x0, z0)
|
|
wildlife_seed(wildlife_st, 97)
|
|
let rs = wildlife_ranges(wildlife_st)
|
|
for i in 0 .. len(rs) { wl_fill(wildlife_st, i, WildlifeWorld.per_range(rs[i].sp)) }
|
|
wildlife_ranges_migrate(wildlife_st)
|
|
}
|
|
|
|
# up to `want` more in range i; returns how many went in
|
|
function wl_fill(wildlife_st: mut WildlifeState, i: int, want: int) -> int {
|
|
let r = wildlife_range(wildlife_st, i)
|
|
var made = 0
|
|
for k in 0 .. want {
|
|
if not wildlife_find_spot_of(wildlife_st, r.sp, wl_sp(wildlife_st, r.sp).habitat, r.x, r.z, 0.0, r.r) { continue }
|
|
let a = wildlife_new(wildlife_st, r.sp, wildlife_st.wl_px, wildlife_st.wl_pz, false)
|
|
if a != null {
|
|
a.rg = i
|
|
made += 1
|
|
}
|
|
}
|
|
return made
|
|
}
|
|
|
|
# each morning: the ranges slide with the season, and the valley gets back what it lost
|
|
export function wildlife_morning(wildlife_st: mut WildlifeState) -> int {
|
|
wildlife_ranges_migrate(wildlife_st)
|
|
return wildlife_repopulate(wildlife_st)
|
|
}
|
|
|
|
# one newcomer for each range under its target, never within 200 m of a player; how many came
|
|
export function wildlife_repopulate(wildlife_st: mut WildlifeState) -> int {
|
|
let rs = wildlife_ranges(wildlife_st)
|
|
var added = 0
|
|
for i in 0 .. len(rs) {
|
|
let want = WildlifeWorld.per_range(rs[i].sp)
|
|
if want == 0 or wildlife_range_alive(wildlife_st, i) >= want { continue }
|
|
for t in 0 .. 12 {
|
|
if not wildlife_find_spot_of(wildlife_st, rs[i].sp, wl_sp(wildlife_st, rs[i].sp).habitat, rs[i].x, rs[i].z, 0.0, rs[i].r) { continue }
|
|
if wl_near(wildlife_st, wildlife_st.wl_px, wildlife_st.wl_pz) < 200.0 { continue }
|
|
let a = wildlife_new(wildlife_st, rs[i].sp, wildlife_st.wl_px, wildlife_st.wl_pz, false)
|
|
if a != null {
|
|
a.rg = i
|
|
added += 1
|
|
}
|
|
break
|
|
}
|
|
}
|
|
return added
|
|
}
|