Generator/Exponential: Difference between revisions

Content added Content deleted
Line 1,789: Line 1,789:
on new (me, e)
on new (me, e)
me._exp = e
me._exp = e
me._index = 0
return me
return me
end
end
Line 1,796: Line 1,797:
----------------------------------------
----------------------------------------
on exec (me, input)
on exec (me, input)
if voidP(me._index) then me._index = 0 -- first run
me._index = me._index+1
me._index = me._index+1
input[1] = integer(power(me._index, me._exp))
input[1] = integer(power(me._index, me._exp))
Line 1,821: Line 1,821:
me._genv = genv
me._genv = genv
me._genf = genf
me._genf = genf
me._index = 0
return me
return me
end
end
Line 1,828: Line 1,829:
----------------------------------------
----------------------------------------
on exec (me, input)
on exec (me, input)
if voidP(me._index) then me._index = 0 -- first run
me._index = me._index+1
me._index = me._index+1
repeat while TRUE
repeat while TRUE