ludic/packages/ludic.tracks/system.ludic

32 lines
1 KiB
Text

# system.ludic - the reader as a system: what has been read and the last bearing are saved; the
# prints themselves are the ground's and are not (the animals leave new ones)
export function tracks_reset(tracks_st: mut TracksState) -> void {
tracks_st.tk_read_n = 0
tracks_st.tk_yaw = 0.0
tracks_st.tk_has_yaw = false
tracks_st.tk_chain = -1
q_clear(tracks_reads(tracks_st))
}
export function tracks_save(tracks_st: TracksState) -> Val {
let v = Value.object()
sv_put_int(v, "read", tracks_st.tk_read_n)
sv_put_bool(v, "has_yaw", tracks_st.tk_has_yaw)
sv_put_float(v, "yaw", tracks_st.tk_yaw)
return v
}
export function tracks_load(tracks_st: mut TracksState, v: Val, version: int) -> void {
tracks_reset(tracks_st)
tracks_st.tk_read_n = sv_int(v, "read", 0)
tracks_st.tk_has_yaw = sv_bool(v, "has_yaw", false)
tracks_st.tk_yaw = sv_float(v, "yaw", 0.0)
}
export function tracks_system() -> System {
let s = system_new("tracks", PH_SIMULATE)
s.reset = fn tracks_reset
s.save = fn tracks_save
s.load = fn tracks_load
return s
}