| 12345678910111213141516171819202122232425262728293031323334353637383940 |
- require "Polycode/Event"
- class "ScreenEvent" (Event)
- ENTITY_MOVE_TOP = 0
- ENTITY_MOVE_BOTTOM = 1
- ENTITY_MOVE_UP = 2
- ENTITY_MOVE_DOWN = 3
- function ScreenEvent:ScreenEvent(...)
- if type(arg[1]) == "table" and count(arg) == 1 then
- if ""..arg[1]:class() == "Event" then
- self.__ptr = arg[1].__ptr
- return
- end
- end
- for k,v in pairs(arg) do
- if type(v) == "table" then
- if v.__ptr ~= nil then
- arg[k] = v.__ptr
- end
- end
- end
- if self.__ptr == nil and arg[1] ~= "__skip_ptr__" then
- self.__ptr = Polycore.ScreenEvent(unpack(arg))
- Polycore.__ptr_lookup[self.__ptr] = self
- end
- end
- function ScreenEvent:__delete()
- Polycore.__ptr_lookup[self.__ptr] = nil
- Polycore.delete_ScreenEvent(self.__ptr)
- end
|