What Links Here? (2 articles…)
Sierpinski Curve

to half_sierpinski :size :level
 ifelse :level = 0 
[
forward :size 
]
[
 half_sierpinski :size :level - 1
 left 45
 forward :size * sqrt 2 
 left 45
 half_sierpinski :size :level - 1
 right 90
 forward :size 
 right 90
 half_sierpinski :size :level - 1
 left 45
 forward :size * sqrt 2
 left 45
 half_sierpinski :size :level - 1
]
end

to sierpinski :size :level
 half_sierpinski :size :level
 right 90
 forward :size
 right 90
 half_sierpinski :size :level
 right 90
 forward :size 
 right 90

end
sierpinski 10 0
setxy 90 200
sierpinski 10 1
setxy 190 200
sierpinski 10 2
setxy 350 200
sierpinski 10 3
setxy 690 200
sierpinski 3 5