ScalaのBresenhamサークル（35）
Bresenham-アルゴリズムには2つの主要なポイントがあります。
- 罪/余弦なしで動作します
- 計算するのはcalculate *½円だけです。その他の点はミラーリングによって検出されます。
どうやってするの：
2 1
DCBABCD
GFE | EFG
IJ y | ---- JI
GJ | / JG
F | / | F
DE | r / | ED
C | / | C
B 4 | / | B 3
A + ------- A
B 4 'x B 3'
CC
DE ED
FF
GJ JG
IJ JI
GFE EFG
DCBABCD
2'1 '
- ゼニットのAからIまでの数値のみを計算します。
- ポイントIは45°にあり、x == yで定義されます。
- +の位置はグラウンドゼロです。
- ゼニットのAはポイント（x = 0、y = r）、r =半径です。
- 閉じた円を描くには、時計回り（++ x）、つまり右（x + = 1）または下（y- = 1）に移動します。
- 円上のすべての点（x、y）は、中心からr離れています。ピタゴラスは言う、r²=x²+y²。
- これは、平方根と2つの解法の方程式のようなにおいがしますが、注意してください！
- Aから始めて、次にペイントするか、右下にペイントするかを知りたいと思います。
- 両方のポイント（x²+y²）を計算し、r²への差の両方を構築します（もちろん一定です）。
- 差がマイナスになる可能性があるため、absを使用します。
- 次に、どの点が結果（r²）に近いか、eo ipsoより小さいかを調べます。
- それに応じて、右隣または下隣を描画します。
- そう見つけたポイント
- 1 x、yはミラーリングされます
- 2 -x、左にy
- 3 y、xは対角線
- 4 -y、x左から
- それらのすべての点は再び南にミラーリングされます
- 1 'x、-y
- 2 '-x、-y
- 3 'y、-x
- 4 '-y、-x完了。
これはゴルフのコードではありませんが、既存のソリューションの一番上にある数字はすべてそれを考えさせてくれたので、私のソリューションをゴルフすることに無駄な時間を費やしました。したがって、私も上に無駄な数を追加しました。Piを丸めた11倍です。
object BresenhamCircle extends App {
var count = 0
val r = args(0).toInt
// ratio > 1 means expansion in horizontal direction
val ratio = args(1).toInt
val field = ((0 to 2 * r).map (i=> (0 to 2 * r * ratio).map (j=> ' ').toArray)).toArray
def square (x: Int, y: Int): Int = x * x + y * y
def setPoint (x: Int, y: Int) {
field (x)(y*ratio) = "Bresenham"(count)
field (y)(x*ratio) = "Bresenham"(count)
}
def points (x: Int, y: Int)
{
setPoint (r + x, r + y)
setPoint (r - x, r + y)
setPoint (r + x, r - y)
setPoint (r - x, r - y)
}
def bresenwalk () {
var x = 0;
var y = r;
val rxr = r * r
points (x, y);
do
{
val (dx, dy) = { if (math.abs (rxr - square ((x+1), y)) < math.abs (rxr - square (x, (y-1))))
(1, 0)
else
(0, -1)
}
count = (count + 1) % "Bresenham".length
x += dx
y += dy
points (x, y)
}while ((x <= y))
}
bresenwalk ()
println (field.map (_.mkString ("")).mkString ("\n"))
}
フォントの質問は、サイトのウェブサーバーとブラウザの設定によって決まります。今、私が探しているのは
'Droid Sans Mono',Consolas,Menlo,Monaco,Lucida Console,Liberation Mono,DejaVu Sans Mono,Bitstream Vera Sans Mono,Courier New,monospace,serif
フォントサイズは12pxです。あなたが私に尋ねればかなり役に立たない情報ですが、誰がしますか？
ボーナス：楕円とサンプル出力：
呼び出しは
scala BresenhamCircle SIZE RATIO
例えば
scala BresenhamCircle 10 2
s e r B r e s
h n e e n h
e m a a m e
e r r e
m m
h a a h
n n
s e e s
e e
r r
B B
r r
e e
s e e s
n n
h a a h
m m
e r r e
e m a a m e
h n e e n h
s e r B r e s
A ratio of 2 will print a circular shape for most fonts which happen to be about twice as tall than wide. To compensate for that, we widen by 2.
# As smaller value than 2 only 1 is available:
scala BresenhamCircle 6 1
erBre
aes sea
ah ha
e e
es se
r r
B B
r r
es se
e e
ah ha
aes sea
erBre
# widening it has more freedom:
scala BresenhamCircle 12 5
s e r B r e s
a h n e e n h a
B m m B
e r r e
e s s e
B r r B
a m m a
h h
n n
s e e s
e e
r r
B B
r r
e e
s e e s
n n
h h
a m m a
B r r B
e s s e
e r r e
B m m B
a h n e e n h a
s e r B r e s
Intのratioパラメータを制限してシンプルにしていますが、フロートを許可するように簡単に拡張できます。