Custom Scene - Red Blue Rings

Anyone wanna give this a try and tell what you think.
It's modifyed from Gordon's Rings of Fire. Try it out with some good music.
Just put it in a .r4 file in the predefine folder.
***************START RedBlueRings.r4************************
scene (
"name" = "Red Blue Rings";
"author" = "Chris Griffiths";
SOLID black();
TEXTURE env();
BUFLOAD bl();
MAP m(black,bl);
TWIST t(m,env);
BUFSAVE bs(t);
)
int x,y,p;
float r;
void init() {
strncpy(env.filename,"envmap_dimblur.jpg",256);
strncpy(t.shader,"T0;B11;GSS;GTS;",256);
strncpy(t.filename,"thintorus.raw",256);
t.layers = 12;
t.scalel = 1.08;
for (y=0;y<24;y=y+1)
for (x=0;x<32;x=x+1) {
m.x[y][x] = (rand()-0.5)*0.01;
m.y[y][x] = (rand()-0.5)*0.01;
p=y;
if (p>12) p=24-y;
if (x>16) p=p+32-x; else p=p+x;
r=rand();
m.r[y][x] = p*0.032;
m.g[y][x] = 0;
m.b[y][x] = 0.5-p*0.034+r*0.8;
}
m.timed = 0;
}
void reset() {
}
void render() {
t.kick = soundb;
t.scalel=1.08 + soundb*0.035;
bl.handle = bs.handle;
for (y=0;y<24;y=y+1)
for (x=0;x<32;x=x+1) {
p=y;
if (p>12) p=24-y;
if (x>16) p=p+32-x; else p=p+x;
p=p+soundb*10;
m.r[y][x] = p*0.032;
m.b[y][x] = 1.2-p*0.034;
if (m.r[y][x]>0.9) m.r[y][x]=0.9;
if (m.b[y][x]>0.9) m.b[y][x]=0.9;
}
}
It's modifyed from Gordon's Rings of Fire. Try it out with some good music.
Just put it in a .r4 file in the predefine folder.
***************START RedBlueRings.r4************************
scene (
"name" = "Red Blue Rings";
"author" = "Chris Griffiths";
SOLID black();
TEXTURE env();
BUFLOAD bl();
MAP m(black,bl);
TWIST t(m,env);
BUFSAVE bs(t);
)
int x,y,p;
float r;
void init() {
strncpy(env.filename,"envmap_dimblur.jpg",256);
strncpy(t.shader,"T0;B11;GSS;GTS;",256);
strncpy(t.filename,"thintorus.raw",256);
t.layers = 12;
t.scalel = 1.08;
for (y=0;y<24;y=y+1)
for (x=0;x<32;x=x+1) {
m.x[y][x] = (rand()-0.5)*0.01;
m.y[y][x] = (rand()-0.5)*0.01;
p=y;
if (p>12) p=24-y;
if (x>16) p=p+32-x; else p=p+x;
r=rand();
m.r[y][x] = p*0.032;
m.g[y][x] = 0;
m.b[y][x] = 0.5-p*0.034+r*0.8;
}
m.timed = 0;
}
void reset() {
}
void render() {
t.kick = soundb;
t.scalel=1.08 + soundb*0.035;
bl.handle = bs.handle;
for (y=0;y<24;y=y+1)
for (x=0;x<32;x=x+1) {
p=y;
if (p>12) p=24-y;
if (x>16) p=p+32-x; else p=p+x;
p=p+soundb*10;
m.r[y][x] = p*0.032;
m.b[y][x] = 1.2-p*0.034;
if (m.r[y][x]>0.9) m.r[y][x]=0.9;
if (m.b[y][x]>0.9) m.b[y][x]=0.9;
}
}