家紋シリーズ 片喰(2) 丸に剣片喰,角立て井筒に片喰,片喰
家紋シリーズ 片喰(1) 丸に角立て井筒に剣片喰 は片喰に丸と角立て井筒の装飾があるものだったので,装飾を除いたバージョンを描けるように引数を追加した。
function kenkatabami(; r=1, igeta=true, maru=true, width=400, height=400)
plotbegin(w=width, h=height)
for θ ∈ [0, 120, 240]
ken(θ, r)
katabami(θ, r)
ken(θ, r, true)
katabami(θ, r, true)
end
for θ ∈ [30, 150, 270]
y, x = 70r .* sincosd(θ)
plotline(0, 0, x, y, lwd=2, col=:white)
plotcircle(x, y, 10r, lwd=0, col=:white, fcol=:white)
end
plotcircle(0, 0, 40r, lwd=0, col=:white, fcol=:white)
plotcircle(0, 0, 30r, lwd=0, col=:black, fcol=:black)
igeta && plotigeta(r)
if igeta == maru == true
plotring(0, 0, 700r, 580r)
elseif maru
plotring(0, 0, 260r, 300r)
end
plotend()
end
kenkatabami(igeta=false)
kenkatabami(maru=false)
kenkatabami(igeta=false, maru=false)