mirror of
https://github.com/Kiritow/OpenComputerScripts.git
synced 2024-03-22 13:10:46 +08:00
24 lines
622 B
Lua
24 lines
622 B
Lua
require("checkarg")
|
|
local event=require("event")
|
|
|
|
function AddEventListener(EventName,CallbackFunction)
|
|
checkstring(EventName)
|
|
checkfunction(CallbackFunction)
|
|
return event.listen(EventName,CallbackFunction)
|
|
end
|
|
|
|
function RemoveEventListener(ListenerID)
|
|
checknumber(ListenerID)
|
|
return event.ignore(event.handlers[ListenerID].key,event.handlers[ListenerID].callback)
|
|
end
|
|
|
|
function WaitEvent(EventName)
|
|
checkstring(EventName)
|
|
return event.pull(EventName)
|
|
end
|
|
|
|
function WaitEventFor(EventName,TimeOut)
|
|
checkstring(EventName)
|
|
checknumber(TimeOut)
|
|
return event.pull(TimeOut,EventName)
|
|
end |