53 lines
938 B
Text
Executable file
53 lines
938 B
Text
Executable file
# Auto-ported from "D&L - Life Is Violated.avs" (Winamp AVS / D&L)
|
|
# SuperScope point program, 4 AVSTrans macros expanded.
|
|
name: "Life Is Violated"
|
|
author: "D&L"
|
|
mode: lines
|
|
blend: additive
|
|
persist: 0.88
|
|
linewidth: 2
|
|
ysign: -1
|
|
|
|
[init]
|
|
n=800;xa=-0.5;ya=0.0;xb=-0.0;yb=0.75;c=200;f=0;
|
|
nxa=(rnd(100)-50)*.02;nya=(rnd(100)-50)*.02;
|
|
nxb=(rnd(100)-50)*.02;nyb=(rnd(100)-50)*.02;
|
|
|
|
[frame]
|
|
f=f+1;
|
|
t=1-((cos((f*3.1415)/c)+1)*.5);
|
|
xa=((nxa-lxa)*t)+lxa;
|
|
ya=((nya-lya)*t)+lya;
|
|
xb=((nxb-lxb)*t)+lxb;
|
|
yb=((nyb-lyb)*t)+lyb;
|
|
ex=(xb-xa);
|
|
ey=(yb-ya);
|
|
d=sqrt(sqr(ex)+sqr(ey));
|
|
r=atan(ey/ex)+(3.1415/2);
|
|
dv=d*2
|
|
|
|
[beat]
|
|
c=f;
|
|
f=0;
|
|
lxa=nxa;
|
|
lya=nya;
|
|
lxb=nxb;
|
|
lyb=nyb;
|
|
nxa=(rnd(100)-50)*.02;
|
|
nya=(rnd(100)-50)*.02;
|
|
nxb=(rnd(100)-50)*.02;
|
|
nyb=(rnd(100)-50)*.02
|
|
|
|
[point]
|
|
//primary render
|
|
x=(ex*i)+xa;
|
|
y=(ey*i)+ya;
|
|
|
|
//volume offset
|
|
x=x+ ( cos(r) * v * dv);
|
|
y=y+ ( sin(r) * v * dv);
|
|
|
|
//color values
|
|
red=i;
|
|
green=(1-i);
|
|
blue=abs(v*6);
|