goto -60,  9 ; pendown ; goto x+13, y+13 ; penup
goto -60,  6 ; pendown ; goto x+13, y+8  ; penup
goto -60,  3 ; pendown ; goto x+13, y+5  ; penup
goto -60,  0 ; pendown ; goto x+13, y    ; penup

goto -47,  -8 ; pendown ; goto x-13, y+5  ; penup
goto -47, -14 ; pendown ; goto x-13, y+8  ; penup
goto -47, -22 ; pendown ; goto x-13, y+13 ; penup

setvar 0, A

repeat 6
  goto -35,16-7A
  pendown
  goto x+3A+3,y+5
  penup
  goto x+A+3,y
  pendown
  goto x-3A-3,y-5
  penup
  setvar A+1, A
repeat_end

setvar 0, B

repeat 5
  setvar 0, A

  repeat 4
    goto 3A, 24-30B
    goto x+B,y+B
    pendown
    goto x+A,y+A
    penup
    setvar A+1, A
  repeat_end
  setvar B+0.2,B
repeat_end