Plasma effect: Difference between revisions
Added Easylang
m (→{{header|Wren}}: Changed to Wren S/H) |
(Added Easylang) |
||
Line 941:
</pre>
=={{header|EasyLang}}==
[https://easylang.online/show/#cod=fZHLboMwEEX3fMWRuuGhGEzjZlHxMQ52UiTAiXEi+PvKFClpVWUxs5h75vrK80bvjL0L589lew634Hx56fU0aPEVhp6011PAznq49DZLTrexxXRTQHOkxSASwEgaNDtaPjE1DUd2mCh5G25+RCpypqsPpEaSx40ikjmmzhKRuBE9doMONi6dnGehoWIK9kIl9gSHrKoobvr8Qgfuuqdh6safuOlMQegGm7GgKtQftHhiZxZqRa3+RdKNSZfNkZJDxkFF2xwp6uy19UGxf3q9dTFoupLsM0rkxy/V+fcVipVTI+M/u/7BDO5uo/Nj4m0bqISKtU3XO61tzVw0yEQkyTc= Run it]
<syntaxhighlight>
# lodev.org/cgtutor/plasma.html (last example)
func dist a b c d .
d1 = a - c ; d2 = b - d
return 15 * sqrt (d1 * d1 + d2 * d2)
.
on animate
for y = 0 step 0.4 to 100
for x = 0 step 0.4 to 100
val = sin dist (x + time) y 50 50
val += sin dist x y 25 25
val += sin (dist x (y + time / 7) 75 50 * 1.2)
val += sin dist x y 75 40
col = (val + 4) / 16
color3 col col * 2 1 - col
move x y
rect 0.5 0.5
.
.
time += 1
.
</syntaxhighlight>
=={{header|Forth}}==
Line 987 ⟶ 1,013:
plasma</syntaxhighlight>
=={{header|FreeBASIC}}==
| |||