@create Nuker
&is-player? nuker = hastype(%0, player)
&get-players nuker = filter(me/is-player?, lcon(here))
&seconds-before-purging nuker = 2592000
&is-connected? nuker = sign(conn(%0))
&is-nukable? nuker = gt(connlast(%0), v(seconds-before-purging))
&get-disconnected-players nuker = filter(me/is-connected?, u(me/get-players))
&get-nukable-players nuker = filter(me/is-nukable?, u(me/get-disconnected-players))
&is-disconnected? nuker = lt(conn(%0), 0)
@create Nuker
&seconds-before-purging nuker = 2592000
&is-player? nuker = hastype(%0, player)
&is-disconnected? nuker = lt(conn(%0, 0)
&is-nukable? nuker = gt(connlast(%0), v(seconds-before-purging))
&nukable-players nuker = and(u(is-player?, %0), u(is-disconnected?, %0), u(is-nukable?, %0))
&get-nukable-players nuker = filter(me/nukable-players, lcon(here))
@create Nuker
&seconds-since-last-connection nuker = sub(secs(), convtime(get(%0/last)))
&seconds-before-purging nuker = 2592000
&is-disconnected? nuker = not(hasflag(%0, connected))
&is-nukable? nuker = gt(u(seconds-since-last-connection, %0), v(seconds-before-purging))
&nukable-players nuker = and(u(is-disconnected?, %0), u(is-nukable?, %0))
&get-nukable-players nuker = filter(me/nukable-players, lcon(here, player))