24 lines
329 B
Plaintext
24 lines
329 B
Plaintext
property _exp
|
|
property _index
|
|
|
|
-- @constructor
|
|
on new (me, e)
|
|
me._exp = e
|
|
me._index = 0
|
|
return me
|
|
end
|
|
|
|
on exec (me, input)
|
|
me._index = me._index+1
|
|
input[1] = integer(power(me._index, me._exp))
|
|
return TRUE
|
|
end
|
|
|
|
on skip (me, steps)
|
|
me._index = me._index + steps
|
|
end
|
|
|
|
on reset (me)
|
|
me._index = 0
|
|
end
|