Sierpinski Habr

startshape habr
CF::Background = [hue 200 sat 0.28 b -0.31 alpha -0]

shape habr
{
        letter []

        habr [x -1 y -1 size 0.333]
        habr [x -1 y 0 size 0.333]
        habr [x -1 y 1 size 0.333]

        habr [x 0 y -1 size 0.333]
        habr [x 0 y 1 size 0.333]

        habr [x 1 y -1 size 0.333]
        habr [x 1 y 0 size 0.333]
        habr [x 1 y 1 size 0.333]
}

shape letter {
        SQUARE [hue 200 sat 0.28 b 0.69]

        SQUARE [hue 0 sat 0 b 1 size .25 x -.20 y -.25]
        SQUARE [hue 0 sat 0 b 1 size .25 x -.20]
        SQUARE [hue 0 sat 0 b 1 size .25 x -.20 y .25]

        SQUARE [hue 0 sat 0 b 1 size .20]

        SQUARE [hue 0 sat 0 b 1 size .25 x .20 y -.25]
        SQUARE [hue 0 sat 0 b 1 size .25 x .20]
        SQUARE [hue 0 sat 0 b 1 size .25 x .20 y .25]
}