Pixel-Composer/scripts/d3d_terrain/d3d_terrain.gml

423 lines
No EOL
14 KiB
Text

function __3dTerrain() : __3dObject() constructor {
VB = [ noone ];
VF = global.VF_POS_NORM_TEX_COL;
render_type = pr_trianglelist;
smooth = false;
self.subdivision = 4;
heights = array_create((subdivision + 1) * (subdivision + 1));
static initModel = function() {
var _hs = 1 / 2;
var _vt = array_create(3 * 2 * subdivision * subdivision);
var _in = 0;
var amo_ch = (subdivision + 1) * (subdivision + 1);
var hs = array_length(heights) == amo_ch;
var st = 1 / subdivision;
var st2 = st * 2;
if(!hs) {
for( var i = 0; i < subdivision; i++ )
for( var j = 0; j < subdivision; j++ ) {
var u0 = i * st;
var u1 = u0 + st;
var v0 = j * st;
var v1 = v0 + st;
var x0 = u0 - 0.5;
var x1 = u1 - 0.5;
var y0 = v0 - 0.5;
var y1 = v1 - 0.5;
_vt[_in + 0] = new __vertex(x0, y0, 0).setNormal(0., 0., 1.).setUV(u0, v0);
_vt[_in + 1] = new __vertex(x1, y1, 0).setNormal(0., 0., 1.).setUV(u1, v1);
_vt[_in + 2] = new __vertex(x1, y0, 0).setNormal(0., 0., 1.).setUV(u1, v0);
_vt[_in + 3] = new __vertex(x0, y0, 0).setNormal(0., 0., 1.).setUV(u0, v0);
_vt[_in + 4] = new __vertex(x0, y1, 0).setNormal(0., 0., 1.).setUV(u0, v1);
_vt[_in + 5] = new __vertex(x1, y1, 0).setNormal(0., 0., 1.).setUV(u1, v1);
_in += 6;
}
} else {
for( var i = 0; i < subdivision; i++ )
for( var j = 0; j < subdivision; j++ ) {
var u0 = i * st;
var u1 = u0 + st;
var v0 = j * st;
var v1 = v0 + st;
var x0 = u0 - 0.5;
var x1 = u1 - 0.5;
var y0 = v0 - 0.5;
var y1 = v1 - 0.5;
var _h0 = heights[ j * (subdivision + 1) + i ];
var _h1 = heights[ j * (subdivision + 1) + i + 1];
var _h2 = heights[(j + 1) * (subdivision + 1) + i ];
var _h3 = heights[(j + 1) * (subdivision + 1) + i + 1];
if(smooth) {
var _h4 = heights[clamp(j , 0, subdivision) * (subdivision + 1) + clamp(i - 1, 0, subdivision)];
var _h5 = heights[clamp(j - 1, 0, subdivision) * (subdivision + 1) + clamp(i , 0, subdivision)];
var _h6 = heights[clamp(j - 1, 0, subdivision) * (subdivision + 1) + clamp(i + 1, 0, subdivision)];
var _h7 = heights[clamp(j , 0, subdivision) * (subdivision + 1) + clamp(i + 2, 0, subdivision)];
var _h8 = heights[clamp(j + 1, 0, subdivision) * (subdivision + 1) + clamp(i + 2, 0, subdivision)];
var _h9 = heights[clamp(j + 2, 0, subdivision) * (subdivision + 1) + clamp(i + 1, 0, subdivision)];
var _h10 = heights[clamp(j + 2, 0, subdivision) * (subdivision + 1) + clamp(i , 0, subdivision)];
var _h11 = heights[clamp(j + 1, 0, subdivision) * (subdivision + 1) + clamp(i - 1, 0, subdivision)];
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h1 - _h4;
var _nx1 = 0, _ny1 = st2, _nz1 = _h2 - _h5;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n0x = _cx / len;
var _n0y = _cy / len;
var _n0z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h7 - _h0;
var _nx1 = 0, _ny1 = st2, _nz1 = _h3 - _h6;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n1x = _cx / len;
var _n1y = _cy / len;
var _n1z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h3 - _h11;
var _nx1 = 0, _ny1 = st2, _nz1 = _h10 - _h0;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n2x = _cx / len;
var _n2y = _cy / len;
var _n2z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h8 - _h2;
var _nx1 = 0, _ny1 = st2, _nz1 = _h9 - _h1;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n3x = _cx / len;
var _n3y = _cy / len;
var _n3z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
_vt[_in + 0] = new __vertex(x0, y0, _h0).setNormal(_n0x, _n0y, _n0z).setUV(u0, v0);
_vt[_in + 1] = new __vertex(x1, y1, _h3).setNormal(_n3x, _n3y, _n3z).setUV(u1, v1);
_vt[_in + 2] = new __vertex(x1, y0, _h1).setNormal(_n1x, _n1y, _n1z).setUV(u1, v0);
_vt[_in + 3] = new __vertex(x0, y0, _h0).setNormal(_n0x, _n0y, _n0z).setUV(u0, v0);
_vt[_in + 4] = new __vertex(x0, y1, _h2).setNormal(_n2x, _n2y, _n2z).setUV(u0, v1);
_vt[_in + 5] = new __vertex(x1, y1, _h3).setNormal(_n3x, _n3y, _n3z).setUV(u1, v1);
} else {
var _nx0 = st;
var _ny0 = 0;
var _nz0 = _h1 - _h0;
var _nx1 = 0;
var _ny1 = st;
var _nz1 = _h2 - _h0;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _nx = _cx / len;
var _ny = _cy / len;
var _nz = _cz / len;
_vt[_in + 0] = new __vertex(x0, y0, _h0).setNormal(_nx, _ny, _nz).setUV(u0, v0);
_vt[_in + 1] = new __vertex(x1, y1, _h3).setNormal(_nx, _ny, _nz).setUV(u1, v1);
_vt[_in + 2] = new __vertex(x1, y0, _h1).setNormal(_nx, _ny, _nz).setUV(u1, v0);
_vt[_in + 3] = new __vertex(x0, y0, _h0).setNormal(_nx, _ny, _nz).setUV(u0, v0);
_vt[_in + 4] = new __vertex(x0, y1, _h2).setNormal(_nx, _ny, _nz).setUV(u0, v1);
_vt[_in + 5] = new __vertex(x1, y1, _h3).setNormal(_nx, _ny, _nz).setUV(u1, v1);
}
_in += 6;
}
}
vertex = [ _vt ];
VB = build();
} initModel();
static updateHeight = function(_h) {
heights = _h;
var _in = 0;
var _vt = vertex[0];
var sub = subdivision;
var sub1 = sub + 1;
var st = 1 / subdivision;
var st2 = st * 2;
if(VB[0]) vertex_delete_buffer(VB[0]);
VB[0] = vertex_create_buffer();
vertex_begin(VB[0], VF);
var vb = VB[0];
var n = 0, i = 0, j = 0;
if(smooth) {
repeat( sub * sub ) {
var _h0 = _h[ j * sub1 + i ];
var _h1 = _h[ j * sub1 + i + 1];
var _h2 = _h[(j + 1) * sub1 + i ];
var _h3 = _h[(j + 1) * sub1 + i + 1];
var _v0 = _vt[_in + 0];
var _v1 = _vt[_in + 1];
var _v2 = _vt[_in + 2];
var _v3 = _vt[_in + 3];
var _v4 = _vt[_in + 4];
var _v5 = _vt[_in + 5];
var _h4 = _h[ j * sub1 + max(i - 1, 0) ];
var _h5 = _h[ max(j - 1, 0) * sub1 + i ];
var _h6 = _h[ max(j - 1, 0) * sub1 + min(i + 1, sub) ];
var _h7 = _h[ j * sub1 + min(i + 2, sub) ];
var _h8 = _h[ min(j + 1, sub) * sub1 + min(i + 2, sub) ];
var _h9 = _h[ min(j + 2, sub) * sub1 + min(i + 1, sub) ];
var _h10 = _h[ min(j + 2, sub) * sub1 + i ];
var _h11 = _h[ min(j + 1, sub) * sub1 + max(i - 1, 0) ];
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h1 - _h4;
var _nx1 = 0, _ny1 = st2, _nz1 = _h2 - _h5;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n0x = _cx / len;
var _n0y = _cy / len;
var _n0z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h7 - _h0;
var _nx1 = 0, _ny1 = st2, _nz1 = _h3 - _h6;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n1x = _cx / len;
var _n1y = _cy / len;
var _n1z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h3 - _h11;
var _nx1 = 0, _ny1 = st2, _nz1 = _h10 - _h0;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n2x = _cx / len;
var _n2y = _cy / len;
var _n2z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
var _nx0 = st2, _ny0 = 0, _nz0 = _h8 - _h2;
var _nx1 = 0, _ny1 = st2, _nz1 = _h9 - _h1;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _n3x = _cx / len;
var _n3y = _cy / len;
var _n3z = _cz / len;
////////////////////////////////////////////////////////////////////////////////
_v0.z = _h0; _v0.nx = _n0x; _v0.ny = _n0y; _v0.nz = _n0z;
_v1.z = _h3; _v1.nx = _n3x; _v1.ny = _n3y; _v1.nz = _n3z;
_v2.z = _h1; _v2.nx = _n1x; _v2.ny = _n1y; _v2.nz = _n1z;
_v3.z = _h0; _v3.nx = _n0x; _v3.ny = _n0y; _v3.nz = _n0z;
_v4.z = _h2; _v4.nx = _n2x; _v4.ny = _n2y; _v4.nz = _n2z;
_v5.z = _h3; _v5.nx = _n3x; _v5.ny = _n3y; _v5.nz = _n3z;
vertex_position_3d(vb, _v0.x, _v0.y, _v0.z);
vertex_normal( vb, _v0.nx, _v0.ny, _v0.nz);
vertex_texcoord( vb, _v0.u, _v0.v);
vertex_color( vb, _v0.color, _v0.alpha);
vertex_float3( vb, 255, 0, 0);
vertex_position_3d(vb, _v1.x, _v1.y, _v1.z);
vertex_normal( vb, _v1.nx, _v1.ny, _v1.nz);
vertex_texcoord( vb, _v1.u, _v1.v);
vertex_color( vb, _v1.color, _v1.alpha);
vertex_float3( vb, 0, 255, 0);
vertex_position_3d(vb, _v2.x, _v2.y, _v2.z);
vertex_normal( vb, _v2.nx, _v2.ny, _v2.nz);
vertex_texcoord( vb, _v2.u, _v2.v);
vertex_color( vb, _v2.color, _v2.alpha);
vertex_float3( vb, 0, 0, 255);
vertex_position_3d(vb, _v3.x, _v3.y, _v3.z);
vertex_normal( vb, _v3.nx, _v3.ny, _v3.nz);
vertex_texcoord( vb, _v3.u, _v3.v);
vertex_color( vb, _v3.color, _v3.alpha);
vertex_float3( vb, 255, 0, 0);
vertex_position_3d(vb, _v4.x, _v4.y, _v4.z);
vertex_normal( vb, _v4.nx, _v4.ny, _v4.nz);
vertex_texcoord( vb, _v4.u, _v4.v);
vertex_color( vb, _v4.color, _v4.alpha);
vertex_float3( vb, 0, 255, 0);
vertex_position_3d(vb, _v5.x, _v5.y, _v5.z);
vertex_normal( vb, _v5.nx, _v5.ny, _v5.nz);
vertex_texcoord( vb, _v5.u, _v5.v);
vertex_color( vb, _v5.color, _v5.alpha);
vertex_float3( vb, 0, 0, 255);
_in += 6;
n++;
i = floor(n / sub);
j = n % sub;
}
} else {
repeat( sub * sub ) {
var _h0 = _h[ j * sub1 + i ];
var _h1 = _h[ j * sub1 + i + 1];
var _h2 = _h[(j + 1) * sub1 + i ];
var _h3 = _h[(j + 1) * sub1 + i + 1];
var _v0 = _vt[_in + 0];
var _v1 = _vt[_in + 1];
var _v2 = _vt[_in + 2];
var _v3 = _vt[_in + 3];
var _v4 = _vt[_in + 4];
var _v5 = _vt[_in + 5];
var _nx0 = st, _ny0 = 0, _nz0 = _h1 - _h0;
var _nx1 = 0, _ny1 = st, _nz1 = _h2 - _h0;
var _cx = _ny0 * _nz1 - _nz0 * _ny1;
var _cy = _nz0 * _nx1 - _nx0 * _nz1;
var _cz = _nx0 * _ny1 - _ny0 * _nx1;
var len = sqrt(_cx * _cx + _cy * _cy + _cz * _cz);
var _nx = _cx / len;
var _ny = _cy / len;
var _nz = _cz / len;
_v0.z = _h0; _v0.nx = _nx; _v0.ny = _ny; _v0.nz = _nz;
_v1.z = _h3; _v1.nx = _nx; _v1.ny = _ny; _v1.nz = _nz;
_v2.z = _h1; _v2.nx = _nx; _v2.ny = _ny; _v2.nz = _nz;
_v3.z = _h0; _v3.nx = _nx; _v3.ny = _ny; _v3.nz = _nz;
_v4.z = _h2; _v4.nx = _nx; _v4.ny = _ny; _v4.nz = _nz;
_v5.z = _h3; _v5.nx = _nx; _v5.ny = _ny; _v5.nz = _nz;
vertex_position_3d(vb, _v0.x, _v0.y, _v0.z);
vertex_normal( vb, _v0.nx, _v0.ny, _v0.nz);
vertex_texcoord( vb, _v0.u, _v0.v);
vertex_color( vb, _v0.color, _v0.alpha);
vertex_float3( vb, 255, 0, 0);
vertex_position_3d(vb, _v1.x, _v1.y, _v1.z);
vertex_normal( vb, _v1.nx, _v1.ny, _v1.nz);
vertex_texcoord( vb, _v1.u, _v1.v);
vertex_color( vb, _v1.color, _v1.alpha);
vertex_float3( vb, 0, 255, 0);
vertex_position_3d(vb, _v2.x, _v2.y, _v2.z);
vertex_normal( vb, _v2.nx, _v2.ny, _v2.nz);
vertex_texcoord( vb, _v2.u, _v2.v);
vertex_color( vb, _v2.color, _v2.alpha);
vertex_float3( vb, 0, 0, 255);
vertex_position_3d(vb, _v3.x, _v3.y, _v3.z);
vertex_normal( vb, _v3.nx, _v3.ny, _v3.nz);
vertex_texcoord( vb, _v3.u, _v3.v);
vertex_color( vb, _v3.color, _v3.alpha);
vertex_float3( vb, 255, 0, 0);
vertex_position_3d(vb, _v4.x, _v4.y, _v4.z);
vertex_normal( vb, _v4.nx, _v4.ny, _v4.nz);
vertex_texcoord( vb, _v4.u, _v4.v);
vertex_color( vb, _v4.color, _v4.alpha);
vertex_float3( vb, 0, 255, 0);
vertex_position_3d(vb, _v5.x, _v5.y, _v5.z);
vertex_normal( vb, _v5.nx, _v5.ny, _v5.nz);
vertex_texcoord( vb, _v5.u, _v5.v);
vertex_color( vb, _v5.color, _v5.alpha);
vertex_float3( vb, 0, 0, 255);
_in += 6;
n++;
i = floor(n / sub);
j = n % sub;
}
}
vertex_end(VB[0]);
}
onParameterUpdate = initModel;
}