1キーでe=0.5, 2キーでe=1, 3キーでe=1.5にセット ※aの値によっては、楕円・双曲線のはずが画面上に表示されるのは放物線っぽい図形という事態が起こることがありますが、見切れているだけです。aの値を小さくすれば全体が表示されるかと思います。
バグや感想などがあればコメント欄で教えてください。 r=ae / (1-e cosθ) (e:離心率、a:極の位置) 0<e<1 : 楕円 e=1 : 放物線 e>1 : 双曲線