to 
end
To x2 :b :n  ; x2 130 5 
Draw 
Xb1 :b :n
End
To xb1 :b :n
If :n=0 then stop
Xb1 :b/2 :n-1
Rt 30 fd :b/2 lt 30
Xb1 :b/2 :n-1
Rt 30 fd :b/2 rt 120 fd :b
Rt 120 fd :b/2  rt 90
Xb1 :b/2 :n-1
Lt 90 fd :b/2 rt 90
End







