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>
52 lines
2.5 KiB
Text
52 lines
2.5 KiB
Text
# controls_key.ludic - <input type="key">, a key binding: Enter or a click starts listening, and then
|
|
# the next key pressed is its value - Tab, the arrows and Enter included, which move nothing while it
|
|
# listens. Esc stops listening and keeps the value; Backspace, when it is not listening, clears it (0).
|
|
# `shown` is what it says for its value (a host's own name for the key), else the keyboard's label.
|
|
function ct_key_start(ui_st: mut UiState, n: UiNode) -> void {
|
|
ui_st.ct_capture = n.key
|
|
ui_st.ct_capture_at = ui_st.an_frame
|
|
ui_st.ct_capture_seen = ui_st.an_frame
|
|
}
|
|
# while it listens, the frame's keys are the field's: nothing else reads them (fc_keys)
|
|
function ct_key_listening(ui_st: UiState) -> bool { return ui_st.ct_capture != "" and ui_st.ct_capture_at != ui_st.an_frame }
|
|
# the field listening, given this frame's key; false when there is none to give it to
|
|
function ct_key_capture(ui_st: mut UiState, list: []UiNode) -> bool {
|
|
if ui_st.ct_capture == "" { return false }
|
|
ui_st.ct_capture_seen = ui_st.an_frame
|
|
var n: UiNode = null
|
|
for i in 0 .. len(list) {
|
|
if list[i].key == ui_st.ct_capture { n = list[i] }
|
|
}
|
|
if n == null {
|
|
ui_st.ct_capture = ""
|
|
return false
|
|
}
|
|
if ui_st.ct_capture_at == ui_st.an_frame { return true }
|
|
if ui_st.in_now.escape {
|
|
ui_st.ct_capture = ""
|
|
return true
|
|
}
|
|
if ui_st.in_now.key != 0 {
|
|
ui_st.ct_capture = ""
|
|
ct_change(ui_st, n, Value.int(ui_st.in_now.key))
|
|
}
|
|
return true
|
|
}
|
|
# focused, not listening: Backspace unbinds it
|
|
function ct_key_typed(ui_st: mut UiState, n: UiNode) -> void {
|
|
if ui_st.ct_capture != n.key and ui_st.in_now.backspace { ct_change(ui_st, n, Value.int(0)) }
|
|
}
|
|
# a press anywhere but the field stops it listening
|
|
function ct_key_pressed_away(ui_st: mut UiState, hit: UiNode) -> void {
|
|
if ui_st.ct_capture != "" and (hit == null or hit.key != ui_st.ct_capture) { ui_st.ct_capture = "" }
|
|
}
|
|
function ct_key_text(ui_st: UiState, n: UiNode) -> string {
|
|
if ui_st.ct_capture == n.key { return ui_tr(ui_st, "press a key...") }
|
|
if Value.kind(ui_attr(n, "shown")) != 0 { return ui_tr(ui_st, ui_attr_text(n, "shown")) }
|
|
let v = Value.as_int(ui_attr(n, "value"))
|
|
if v >= UI_MOUSE_LEFT and v <= UI_MOUSE_MIDDLE { return ct_mouse_name(ui_st, v) }
|
|
return Input.key_label(v)
|
|
}
|
|
# a key field is listening: the host should leave the keys alone until it is done (it stays true
|
|
# for the frame in which Esc or a key ended it, so that key is not read twice)
|
|
export function ui_capturing(ui_st: UiState) -> bool { return ui_st.ct_capture != "" or ui_st.ct_capture_seen == ui_st.an_frame }
|