diff options
Diffstat (limited to 'api.moon')
| -rw-r--r-- | api.moon | 21 |
1 files changed, 20 insertions, 1 deletions
@@ -152,7 +152,7 @@ input = frm, to = @frm!, @to! @set :frm, :to - draw.line frm, to + draw.arrow frm, to rect: do meta = size: => @max - @min @@ -236,6 +236,25 @@ op = tmp + remove: pushpop (obj) -> + lg.setColor .8, 0, 0 + copy = obj\copy! + copy\draw! + + if COMMIT + SESSION.objects = [o for o in *SESSION.objects when o != obj] + + copy: pushpop (obj, pos) -> + lg.setColor 0, .8, 0 + copy = obj\copy! + copy.pos = pos + copy\draw! + + if COMMIT + table.insert SESSION.objects, copy + + copy + { :hit :random |
