Context Free 日記

だんだんコツが分かってきたような気がするけど,どこをどうすれば,というのを言葉にするのは難しくて……自転車に乗るのを覚えているような感じ。ともかく楽しいよ!

fleas

startshape Start
rule Start {
 10*{} Bar1 {b 0 sat 0 h 240 a -0.3}
}
rule Bar1 {
  SQUARE {s 0.04 0.04}
  Bar1 {s 0.95 x 0.1 r 10 b 0.01}
}
rule Bar1 0.05 {
  Star {}
  Bar2 {r -90 s 1.4 skew 15 0}
}
rule Bar1 0.005 {}
rule Bar2 {
  SQUARE {s 0.04 0.04}
  Bar2 {s 0.95 x 0.1 r -10 b 0.01}
}
rule Bar2 0.05 {
  Star {}
  Bar1 {r -90 s 1.4 skew -15 0}
}
rule Bar2 0.005 {}
rule Star {
  6*{r 30} CIRCLE
    {s 0.5 0.005 a -0.3 z -1}
}

knitting

startshape Start
rule Start {
  Chain {}
}
rule Chain {
  Arc {}
  Bubble {}
  Chain {r 90 x 1 y 1 h 0.1}
}
rule Chain {
  Arc {}
  Bubble {}
  Chain {flip 90 r -90 x 1 y 1 h 0.1}
}
rule Chain 0.01 {}
rule Bubble {
  CIRCLE {y 1 s 1.4 b 1 sat 1 h 3}
}
path Arc {
  MOVETO {x -0 y 0}
  ARCTO {x 1 y 1}
  STROKE {width 0.3}
  STROKE {b 1 width 0.1 p squarecap}
}