Plasma effect: Difference between revisions
→{{header|Kotlin}}
(added Ol) |
|||
Line 903:
</body>
</html></lang>
=={{header|Julia}}==
{{trans|Perl}}==
<lang julia>using Luxor, Colors
Drawing(800, 800)
background("white")
origin()
function drawpoint(p, hue)
sethue(hue)
circle(p, 1, :fill)
end
function plasma(wid, hei)
for x in 1:wid, y in 1:hei
sethue(parse(Colorant, HSV(180 + 45sin(x/19) + 45sin(y/9) +
45sin((x+y)/25) + 45sin(sqrt(x^2 + y^2)/8), 1, 1)))
circle(Point(x, y), 1, :fill)
end
end
@png begin plasma(800, 800) end
</lang>
=={{header|Kotlin}}==
| |||