家紋シリーズ 稲妻(1) 丸に平稲妻
plotter.jl を include
include("plotter.jl")
function hirainazuma(; r=1, maru=false, width=400, height=400)
plotbegin(w=width, h=height)
if maru
plotcircle(-0.5r, -0.5r, 25, lwd=0, fcol=:black)
plotcircle(-0.5r, -0.5r, 15.25*sqrt(2), lwd=0, fcol=:white)
end
x = [-15, 14, 14, -15, -15, 9, 9, -10, -10, 4, 4, -5,
-5, 0, 0, -6, -6, 5, 5, -11, -11, 10, 10, -15] .* r
y = [-15, -15, 14, 14, -10, -10, 9, 9, -5, -5, 4, 4,
0, 0, -1, -1, 5, 5, -6, -6, 10, 10, -11, -11] .* r
plotpolygon(x, y, lwd=0, fcol=:black)
plotend()
end
marunihirainazuma(; r=1, width=400, height=400) =
hirainazuma(; r, maru=true, width, height)
hirainazuma()
