Hilbert curve: Difference between revisions

m
Line 1,532:
lg = lg / 2
fn HilbertCurve( x+i1*lg, y+i1*lg, lg, i1, 1-i2 )
pen 2.0, fn ColorGreen
fn HilbertCurve( x+i2*lg, y+(1-i2)*lg, lg, i1, i2 )
fn HilbertCurve( x+(1-i1)*lg, y+(1-i1)*lg, lg, i1, i2 )
Line 1,539:
 
fn BuildWindow
pen -2.0, fn ColorClearColorGreen
fn HilbertCurve( 0, 0, ORDER, 0, 0 )
 
729

edits