I used Box Beat as a starting point so there might be remnants of it's code.
Here it is:
Code: Select all
//Throned by ShohS
Aspc=1
NUM="10"
Stps="101"
A0="0"
A1="sin( - PI * .4 * 0 )"
A2="cos( - PI * .4 * 0 )"
A5="rnd( .3 ) + .1"
A6="rnd( .3 ) + .1"
A7="rnd( .3 ) + .1"
A8="rnd( 10 )"
A9="rnd( 10 )"
A10="rnd( 10 )"
A11="100"
B0="sin(id/num*A8)*t * (A5*.5+id*.1)"
B1="cos( sin(id/num*A9)*t * (A6*.5+id*.1) )"
B2="sin( sin(id/num*A9)*t * (A6*.5+id*.1) )"
B5="cos( sin(id/num*A10)*t * (A7*.5+id*.1) )"
B6="sin( sin(id/num*A10)*t * (A7*.5+id*.1) )"
C0="cos( 2 * PI * s + B0 )"
C1="sin( 2 * PI * s + B0 )"
B3=""
B4=" ( a4 -id/num*A4 +mag(s*4)*(.3-(id*.03)))"
C2=" C1 * B1 + B3 * B2"
C3=" C1 * B2 - B3 * B1"
C4=" C0 * B5 + C3 * B6"
C5=" C0 * B6 - C3 * B5"
A3="2"
A4="A3 * ( 1)"
C6=" c2 * a2 + c5 * a1"
C7="a3 + c5 * a2 - c2 * a1"
X0=" b4 * c4 / c7"
Y0=" b4 * c6 / c7"
LWdt="(((1.7*15)-Id*1.7*1.5)*(fft(id/num)*.5+.75))/C7-sqwv(id/num*11)*2000"
ConB=0
Vers=270