Bezier Curve by pooq

dim a(8)
for i=1to 8input""a(i)next
for b=0to 10t=b/10
w=1-t
for n=0to 1?w^3*a(1+n)+3*w^2*t*a(3+n)+3*w*t^2*a(5+n)+a(7+n)*t^3;next
?next

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page