Every time I enter something using the variable “time” it tells me “error: no such variable: t” so it doesn’t parse the input very well.
((sin(A * 20 + time/7) + 2) * 30 + (cos(r * (20 + sin(A * 2 + time/83) * 5) + time/11) + 4) * 30) + (sin(x * time / y / 1000) + 2) * 5 - 20
Very peaceful.
r%50Atime*10000
Simple, but hints at fractals. Wait for the red. If you have lots of patience, you can bump the multiplier at the end down.
http://maxbittker.github.io/Mojulo/#ciU1MCpBKnRpbWUqMTAwMDA=
x * y * timetime
A * timetime
Also hints at fractals.
Nice work getting a smooth gradient! Are the constants derived mathematically or from trial and error?
I’ve been able to shift the result into different colour channels with the bitwise operators, here’s 3 of your waves going at different frequencies:
(((((sin(A * 20 + time/14) + 2) * 30 + (cos(r * (20 + sin(A * 2 + time/41) * 5) + time/22) + 4) * 30) + (sin(x * time / y / 1000) + 2) * 5 - 20)*0x0000ff)&0x00ff00)
+
(((((sin(A * 20 + time/7) + 2) * 30 + (cos(r * (20 + sin(A * 2 + time/83) * 5) + time/11) + 4) * 30) + (sin(x * time / y / 1000) + 2) * 5 - 20)*1)&0x0000ff)
+
(((((sin(A * 20 + time/3.5) + 2) * 30 + (cos(r * (20 + sin(A * 2 + time/166) * 5) + time/6) + 4) * 30) + (sin(x * time / y / 1000) + 2) * 5 - 20)*0x00ff00)&0xff0000)
Here’s a few:
y^(-time)*x^time
or
(256 * ((x - 50)^4 - 6 * (x - 50)^2 * (y - 50)^2 + (y - 50)^4) * (-56860.3008158835 * ((x - 50)^2 + (y - 50)^2)^3 + 989.873854845905 * ((x - 50)^2 + (y - 50)^2)^2)) * sin(time/(3.14 * 10))
(((((sin(x * sin(time/16)/3.14159265)* 128)+128))0x00ff00)&0xff0000)
+
(((((sin(y * sin(time/8)/3.14159265) 128)+128))0x0000ff)&0x00ff00)
+
(((((sin(x * sin(time/8)/3.14159265) 128)+128))*1)&0x0000ff)
If you want to go further with this idea (a data stack! more operators, sound!) - AND you can handle a stack based language based on Forth, I recommend trying IBNIZ. It is quite a bit more complicated if you have hasven’t userd Forth before (or perhaps postscript). Once you get used to the style, it is a LOT of fun.
If you just want to see what IBNIZ does, the original demo video is rather impressive. (WARNING: VERY LOUD UNFILTERED SQUARE WAVES).
Also, while it unfortunately lacks sound support, a javascript port exists.
Another one:
https://maxbittker.github.io/Mojulo/#KHheMi15XjIpKnRpbWUqKHJeKHRpbWUvKHgqeSkpKSpzaW4oeCk=
If we run the result through a sin() operation for each colour channel, and offset each one by 2/3PI, it keeps the output at roughly the same brightness while changing the hue (i.e. rainbow colours): http://maxbittker.github.io/Mojulo/#KCgoKChzaW4oeCp5KnRpbWUvMTAwMCkgKjEyOCkrMTI4KSkqMHgwMGZmMDApJjB4ZmYwMDAwKSAgKyAgKCgoKChzaW4oeCp5KnRpbWUvMTAwMCsyLjA5NDM5NTEwMjM5KSoxMjgpKzEyOCkpKjB4MDAwMGZmKSYweDAwZmYwMCkgICsgICgoKCgoc2luKHgqeSp0aW1lLzEwMDArNC4xODg3OTAyMDQ3OSkqMTI4KSsxMjgpKSoxKSYweDAwMDBmZik=
(((((sin(xytime/1000) 128)+128)) 0x00ff00)&0xff0000)
+
(((((sin(xytime/1000+2.09439510239) 128)+128)) 0x0000ff)&0x00ff00)
+
(((((sin(xytime/1000+4.18879020479) *128)+128)) *1)&0x0000ff)
(((((sin(Atimetime) 128)+128)) 0x00ff00)&0xff0000)
+
(((((sin(Atimetime+2.09439510239)* 128)+128)) 0x0000ff)&0x00ff00)
+
(((((sin(Atimetime+4.18879020479) 128)+128)) *1)&0x0000ff)
This topic was automatically closed after 5 days. New replies are no longer allowed.