startshape heart background{sat 121 b 1 alpha -1}
rule heart {
rr{s 1 -1} rr{s 1 -1 f 90 x 5}
} rule rr {
ll{r 45} ll{r 45 s -1} rr{x -4 y -4 r 20 s 0.8}
} rule ll {
SQUARE{} ll {s 0.95 x 1.1 r 10} jj{}
} rule jj {
CIRCLE{} jj{s 0.85 x -1.1 r 10} mm{}
} rule mm {
TRIANGLE{} mm{s 0.8 x -1.1 r 10}
}