Pseudorandom number generator image: Difference between revisions
Added Sidef
(Added Sidef) |
|||
Line 390:
</pre>
[https://github.com/SqrtNegInf/Rosettacode-Perl6-Smoke/blob/master/ref/PNG-image500.png image500.png] (sample image, offsite)
=={{header|Sidef}}==
{{trans|Perl}}
<lang ruby>require('GD')
var img = %O<GD::Image>.new(500, 500, 1)
for y in (0..500), x in (0..500) {
var color = img.colorAllocate(255.irand, 255.irand, 255.irand)
img.setPixel(x, y, color)
}
File("image500.png").write(img.png, :raw)</lang>
=={{header|Wren}}==
| |||