Code: Select all
//Chromatic Hollow by ShohS
NUM = "4"
ConB=1
Aspc=1
A0="( .1 + rnd( .15 ) )"
A1="rnd(2 * pi)"
A2=".2 + rnd(.3)"
B0="sin(t*.5)*-5"
B1=".3+trwv( 6*s+1 )*2"
B2="cos( PI * ( s - .5 ) )"
B3="Sin(t*.5)+1"
B4="t * -A0 + A1 + 2 * pi * ID / NUM + B0"
B5="sin(t*.5+(ID/NUM))*-5"
B6="t * -A0 + A1 + 2 * pi + B5*4"
B7="Sin(t*.5+(ID/NUM))*3+3"
// R
C0="mag( trwv(2*s) ) * .2"
B8="sin(t*.5+(ID/NUM))"
C1="cos(pi/2*s-fft(s)*B2)"
C2="sin(pi/2*s-fft(s)*B2)"
C3=".7+fft(s)*B2"
C4="cos(pi/2*s+fft(s)*B2*.7)"
C5="sin(pi/2*s+fft(s)*B2*.7)"
C6=".7-fft(s)*B2*.7"
C7="cos(pi/2*s+fft(s)*2*B8)"
C8="sin(pi/2*s+fft(s)*2*B8)"
C8=".7+fft(s)*.1-s*.3"
X0="B3*C3*(C1 * cos( B4 ) - C2 * sin( B4 ))"
Y0="B3*C3*(C1 * sin( B4 ) + C2 * cos( B4 ))"
X1="B3*C6*(C4 * cos( B4 ) - C5 * sin( B4 ))"
Y1="B3*C6*(C4 * sin( B4 ) + C5 * cos( B4 ))"
X2="B7*C8*(C4 * cos( B6 ) - C5 * sin( B6 ))"
Y2="B7*C8*(C4 * sin( B6 ) + C5 * cos( B6 ))"
X3="-B7*C8*(C4 * cos( B6 ) - C5 * sin( B6 ))"
Y3="-B7*C8*(C4 * sin( B6 ) + C5 * cos( B6 ))"
LWdt="2"
Pen="1"
Vers=270