Files
Bubberstation/code/modules/wiremod/components/utility/delay.dm
Zonespace f7c26bbf25 515 Compat (#17465)
* ONLY SKYRAT CHANGES

* ACTUALLY SKYRAT CHANGES

* yolo, revert later

* Update alternate_byond_versions.txt

Co-authored-by: AnturK <AnturK@users.noreply.github.com>
2022-11-15 06:59:06 +00:00

52 lines
1.7 KiB
Plaintext

/// The minimum delay value that the delay component can have.
#define COMP_DELAY_MIN_VALUE 0.1
/**
* # Delay Component
*
* Delays a signal by a specified duration.
*/
/obj/item/circuit_component/delay
display_name = "Delay"
desc = "A component that delays a signal by a specified duration. Timer gets reset when triggered again."
category = "Utility"
/// Amount to delay by
var/datum/port/input/delay_amount
/// Input signal to fire the delay
var/datum/port/input/trigger
/// Interrupts the delay before it fires
var/datum/port/input/interrupt
var/timer_id = TIMER_ID_NULL
/// The output of the signal
var/datum/port/output/output
/obj/item/circuit_component/delay/populate_ports()
delay_amount = add_input_port("Delay", PORT_TYPE_NUMBER, trigger = null)
trigger = add_input_port("Trigger", PORT_TYPE_SIGNAL, trigger = PROC_REF(trigger_delay))
interrupt = add_input_port("Interrupt", PORT_TYPE_SIGNAL, trigger = PROC_REF(interrupt_timer))
output = add_output_port("Result", PORT_TYPE_SIGNAL)
/obj/item/circuit_component/delay/proc/trigger_delay(datum/port/input/port)
CIRCUIT_TRIGGER
var/delay = delay_amount.value
if(delay > COMP_DELAY_MIN_VALUE)
// Convert delay into deciseconds
timer_id = addtimer(CALLBACK(output, TYPE_PROC_REF(/datum/port/output, set_output), trigger.value), delay*10, TIMER_UNIQUE|TIMER_STOPPABLE|TIMER_OVERRIDE)
else
if(timer_id != TIMER_ID_NULL)
deltimer(timer_id)
timer_id = TIMER_ID_NULL
output.set_output(trigger.value)
/obj/item/circuit_component/delay/proc/interrupt_timer(datum/port/input/port)
CIRCUIT_TRIGGER
if(timer_id != TIMER_ID_NULL)
deltimer(timer_id)
timer_id = TIMER_ID_NULL
#undef COMP_DELAY_MIN_VALUE