Shelly: a programming language for drawing

Save

Save and share your code

let rot = (s.
    if (s == 0) then left 90 else right 90
)
let H_rec = (l t n.
    if (n == 0) then (
        repeat 3 (i.
            fw l
            if (i < 2) then rot t
        )
    ) else (
        H_rec l/2 t n-1
        if (n%2 == 1) then rot 1-t
        fw l/(pow 2 n)
        if (n%2 == 0) then rot t
        H_rec l/2 1-t n-1
        if (n%2 == 1) then rot t
        fw l/(pow 2 n)
        if (n%2 == 1) then rot t
        H_rec l/2 1-t n-1
        if (n%2 == 0) then rot t
        fw l/(pow 2 n)
        if (n%2 == 1) then rot 1-t
        H_rec l/2 t n-1
    )
)
let W = 240
up
left 135
fw W*3/2
right 225
down

OK, value: (function)

Save as an image

Position of turtle at current expression

(0, 0)

Direction of turtle at current expression

Previous turtle at current expression

/ 1

Next turtle at current expression

Number of instructions

21443

Number of tokens

166

Zoom in

Zoom out

Locate turtle

Reset to the center