ludic/packages/ludic.tracks/config.ludic
Orkuncakilkaya 19fcf60599 wip(0.S3): packages and examples migrated again from their pre-0.S sources in one run
ludic migrate state packages <every example program> packages/ludic.lab/example/plate.ludic
  1804 vars into 126 states, 64 into lets; 23498 edits in 460 files

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
2026-09-25 15:31:34 +03:00

34 lines
1.1 KiB
Text

# config.ludic - how many kinds of print, how many of each the ground remembers, how the reader
# reads, and the port's defaults
export function tracks_config(tracks_st: mut TracksState, kinds: int, cap: int) -> void {
tracks_st.tk_kinds = kinds
tracks_st.tk_cap = cap
tracks_st.tk_ring = new []Track
tracks_st.tk_count = new []int
tracks_st.tk_next = new []int
for i in 0 .. kinds * cap { push(tracks_st.tk_ring, new Track) }
for k in 0 .. kinds {
push(tracks_st.tk_count, 0)
push(tracks_st.tk_next, 0)
}
}
# a reader at `name_at` or above can tell the animal; a print is fresh under `fresh` hours old,
# recent under `recent`, and old after
export function tracks_config_reading(tracks_st: mut TracksState, name_at: int, fresh: float, recent: float) -> void {
tracks_st.tk_name_at = name_at
tracks_st.tk_fresh_h = fresh
tracks_st.tk_recent_h = recent
}
function tk_now() -> float {
return TracksWorld.now()
}
function tk_named(tracks_st: TracksState) -> bool {
return TracksWorld.skill() >= tracks_st.tk_name_at
}
function tk_bearing(yaw: float) -> string {
return TracksWorld.bearing(yaw)
}