Constrained random points on a circle: Difference between revisions
Constrained random points on a circle (view source)
Revision as of 14:41, 24 September 2020
, 3 years agoAdded Wren
(→{{header|C sharp|C#}}: r.Next(403) should be r.Next(404) as the parameter is an exclusive upper-bound.) |
(Added Wren) |
||
Line 3,786:
1
</pre>
=={{header|Wren}}==
{{libheader|DOME}}
<lang ecmascript>import "graphics" for Canvas, Color
import "dome" for Window
import "random" for Random
class Game {
static init() {
Window.title = "Constrained random points on a circle"
var width = 800
var height = 800
Window.resize(width, height)
Canvas.resize(width, height)
var rand = Random.new()
var count = 0
var max = 100 // set to 1000 to produce a much more pronounced annulus
while (true) {
var x = rand.int(-15, 16)
var y = rand.int(-15, 16)
var dist = (x*x + y*y).sqrt
if (10 <= dist && dist <= 15) {
// translate coordinates to fit in the window
Canvas.circlefill((x + 16) * 25, (y + 16) * 25, 2, Color.white)
count = count + 1
if (count == max) break
}
}
}
static update() {}
static draw(alpha) {}
}</lang>
=={{header|XPL0}}==
| |||