ludic/packages/ludic.clock/system.ludic
2026-09-25 14:02:21 +03:00

27 lines
1 KiB
Text

# system.ludic - the clock as a system: it runs first (PH_INPUT) so every later system reads this
# frame's hour, and it saves its own section
function clock_tick(base_st: mut BaseState, clock_st: mut ClockState, t: Tick) -> void { clock_advance(base_st, clock_st, t.hours) }
export function clock_save(clock_st: ClockState) -> Val {
let v = Value.object()
sv_put_int(v, "day", clock_st.ck_day)
sv_put_float(v, "hours", clock_st.ck_hours)
sv_put_float(v, "moon", clock_st.ck_moon)
return v
}
export function clock_load(base_st: mut BaseState, clock_st: mut ClockState, v: Val, version: int) -> void {
clock_st.ck_day = sv_int(v, "day", 1)
clock_set_hours(clock_st, sv_float(v, "hours", clock_st.ck_start_hours))
clock_st.ck_moon = sv_float(v, "moon", 0.5)
q_clear(base_st, clock_days(base_st, clock_st))
}
export function clock_system() -> System {
let s = system_new("clock", PH_INPUT)
s.reset = fn clock_reset
s.tick = fn clock_tick
s.save = fn clock_save
s.load = fn clock_load
return s
}