-// used by GameCommand_radarmap()
-float FullTraceFraction(vector a, vector mi, vector ma, vector b)
-{
- vector c;
- float white, black;
-
- white = 0.001;
- black = 0.001;
-
- c = a;
-
- float n, m;
- n = m = 0;
-
- while(vlen(c - b) > 1)
- {
- ++m;
-
- tracebox(c, mi, ma, b, MOVE_WORLDONLY, world);
- ++n;
-
- if(!trace_startsolid)
- {
- black += vlen(trace_endpos - c);
- c = trace_endpos;
- }
-
- n += tracebox_inverted(c, mi, ma, b, MOVE_WORLDONLY, world);
-
- white += vlen(trace_endpos - c);
- c = trace_endpos;
- }
-
- if(n > 200)
- dprint("HOLY SHIT! FullTraceFraction: ", ftos(n), " total traces, ", ftos(m), " iterations\n");
-
- return white / (black + white);
-}
-float RadarMapAtPoint_Trace(float x, float y, float w, float h, float zmin, float zsize, float q)
-{
- vector a, b, mi, ma;
-
- mi = '0 0 0';
- ma = '1 0 0' * w + '0 1 0' * h;
- a = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
- b = '1 0 0' * x + '0 1 0' * y + '0 0 1' * (zsize + zmin);
-
- return FullTraceFraction(a, mi, ma, b);
-}
-float RadarMapAtPoint_LineBlock(float x, float y, float w, float h, float zmin, float zsize, float q)
-{
- vector o, mi, ma;
- float i, r;
- vector dz;
-
- q = 256 * q - 1;
- // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
-
- mi = '0 0 0';
- dz = (zsize / q) * '0 0 1';
- ma = '1 0 0' * w + '0 1 0' * h + dz;
- o = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
-
- if(x < world.absmin_x - w)
- return 0;
- if(y < world.absmin_y - h)
- return 0;
- if(x > world.absmax_x)
- return 0;
- if(y > world.absmax_y)
- return 0;
-
- r = 0;
- for(i = 0; i < q; ++i)
- {
- vector v1, v2;
- v1 = v2 = o + dz * i + mi;
- v1_x += random() * (ma_x - mi_x);
- v1_y += random() * (ma_y - mi_y);
- v1_z += random() * (ma_z - mi_z);
- v2_x += random() * (ma_x - mi_x);
- v2_y += random() * (ma_y - mi_y);
- v2_z += random() * (ma_z - mi_z);
- traceline(v1, v2, MOVE_WORLDONLY, world);
- if(trace_startsolid || trace_fraction < 1)
- ++r;
- }
- return r / q;
-}
-float RadarMapAtPoint_Block(float x, float y, float w, float h, float zmin, float zsize, float q)
-{
- vector o, mi, ma;
- float i, r;
- vector dz;
-
- q = 256 * q - 1;
- // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
-
- mi = '0 0 0';
- dz = (zsize / q) * '0 0 1';
- ma = '1 0 0' * w + '0 1 0' * h + dz;
- o = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
-
- if(x < world.absmin_x - w)
- return 0;
- if(y < world.absmin_y - h)
- return 0;
- if(x > world.absmax_x)
- return 0;
- if(y > world.absmax_y)
- return 0;
-
- r = 0;
- for(i = 0; i < q; ++i)
- {
- tracebox(o + dz * i, mi, ma, o + dz * i, MOVE_WORLDONLY, world);
- if(trace_startsolid)
- ++r;
- }
- return r / q;
-}
-float RadarMapAtPoint_Sample(float x, float y, float w, float h, float zmin, float zsize, float q)
-{
- vector a, b, mi, ma;
-
- q *= 4; // choose q so it matches the regular algorithm in speed
-
- q = 256 * q - 1;
- // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
-
- mi = '0 0 0';
- ma = '1 0 0' * w + '0 1 0' * h;
- a = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
- b = '1 0 0' * w + '0 1 0' * h + '0 0 1' * zsize;
-
- float c, i;
- c = 0;
-
- for(i = 0; i < q; ++i)
- {
- vector v;
- v_x = a_x + random() * b_x;
- v_y = a_y + random() * b_y;
- v_z = a_z + random() * b_z;
- traceline(v, v, MOVE_WORLDONLY, world);
- if(trace_startsolid)
- ++c;
- }
-
- return c / q;
-}
-void sharpen_set(float x, float v)
-{
- sharpen_buffer[x + 2 * RADAR_WIDTH_MAX] = v;
-}
-float sharpen_getpixel(float x, float y)
-{
- if(x < 0)
- return 0;
- if(x >= RADAR_WIDTH_MAX)
- return 0;
- if(y < 0)
- return 0;
- if(y > 2)
- return 0;
- return sharpen_buffer[x + y * RADAR_WIDTH_MAX];
-}
-float sharpen_get(float x, float a)
-{
- float sum;
- sum = sharpen_getpixel(x, 1);
- if(a == 0)
- return sum;
- sum *= (8 + 1/a);
- sum -= sharpen_getpixel(x - 1, 0);
- sum -= sharpen_getpixel(x - 1, 1);
- sum -= sharpen_getpixel(x - 1, 2);
- sum -= sharpen_getpixel(x + 1, 0);
- sum -= sharpen_getpixel(x + 1, 1);
- sum -= sharpen_getpixel(x + 1, 2);
- sum -= sharpen_getpixel(x, 0);
- sum -= sharpen_getpixel(x, 2);
- return bound(0, sum * a, 1);
-}
-void sharpen_shift(float w)
-{
- float i;
- for(i = 0; i < w; ++i)
- {
- sharpen_buffer[i] = sharpen_buffer[i + RADAR_WIDTH_MAX];
- sharpen_buffer[i + RADAR_WIDTH_MAX] = sharpen_buffer[i + 2 * RADAR_WIDTH_MAX];
- sharpen_buffer[i + 2 * RADAR_WIDTH_MAX] = 0;
- }
-}
-void sharpen_init(float w)
-{
- float i;
- for(i = 0; i < w; ++i)
- {
- sharpen_buffer[i] = 0;
- sharpen_buffer[i + RADAR_WIDTH_MAX] = 0;
- sharpen_buffer[i + 2 * RADAR_WIDTH_MAX] = 0;
- }
-}
-void RadarMap_Next()
-{
- if(radarmapper.count & 4)
- {
- localcmd("quit\n");
- }
- else if(radarmapper.count & 2)
- {
- localcmd(strcat("defer 1 \"sv_cmd radarmap --flags ", ftos(radarmapper.count), strcat(" --res ", ftos(radarmapper.size_x), " ", ftos(radarmapper.size_y), " --sharpen ", ftos(radarmapper.ltime), " --qual ", ftos(radarmapper.size_z)), "\"\n"));
- GotoNextMap();
- }
- remove(radarmapper);
- radarmapper = world;
-}
-void RadarMap_Think()
-{
- // rough map entity
- // cnt: current line
- // size: pixel width/height
- // maxs: cell width/height
- // frame: counter
-
- float i, x, l;
- string si;
-
- if(self.frame == 0)
- {
- // initialize
- get_mi_min_max_texcoords(1);
- self.mins = mi_picmin;
- self.maxs_x = (mi_picmax_x - mi_picmin_x) / self.size_x;
- self.maxs_y = (mi_picmax_y - mi_picmin_y) / self.size_y;
- self.maxs_z = mi_max_z - mi_min_z;
- print("Picture mins/maxs: ", ftos(self.maxs_x), " and ", ftos(self.maxs_y), " should match\n");
- self.netname = strzone(strcat("gfx/", mi_shortname, "_radar.xpm"));
- if(!(self.count & 1))
- {
- self.cnt = fopen(self.netname, FILE_READ);
- if(self.cnt < 0)
- self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.tga"), FILE_READ);
- if(self.cnt < 0)
- self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.png"), FILE_READ);
- if(self.cnt < 0)
- self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.jpg"), FILE_READ);
- if(self.cnt < 0)
- self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.tga"), FILE_READ);
- if(self.cnt < 0)
- self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.png"), FILE_READ);
- if(self.cnt < 0)
- self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.jpg"), FILE_READ);
- if(self.cnt >= 0)
- {
- fclose(self.cnt);
-
- print(self.netname, " already exists, aborting (you may want to specify --force)\n");
- RadarMap_Next();
- return;
- }
- }
- self.cnt = fopen(self.netname, FILE_WRITE);
- if(self.cnt < 0)
- {
- print("Error writing ", self.netname, "\n");
- remove(self);
- radarmapper = world;
- return;
- }
- print("Writing to ", self.netname, "...\n");
- fputs(self.cnt, "/* XPM */\n");
- fputs(self.cnt, "static char *RadarMap[] = {\n");
- fputs(self.cnt, "/* columns rows colors chars-per-pixel */\n");
- fputs(self.cnt, strcat("\"", ftos(self.size_x), " ", ftos(self.size_y), " 256 2\",\n"));
- for(i = 0; i < 256; ++i)
- {
- si = substring(doublehex, i*2, 2);
- fputs(self.cnt, strcat("\"", si, " c #", si, si, si, "\",\n"));
- }
- self.frame += 1;
- self.nextthink = time;
- sharpen_init(self.size_x);
- }
- else if(self.frame <= self.size_y)
- {
- // fill the sharpen buffer with this line
- sharpen_shift(self.size_x);
- i = self.count & 24;
-
- switch(i)
- {
- case 0:
- default:
- for(x = 0; x < self.size_x; ++x)
- {
- l = RadarMapAtPoint_Block(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
- sharpen_set(x, l);
- }
- break;
- case 8:
- for(x = 0; x < self.size_x; ++x)
- {
- l = RadarMapAtPoint_Trace(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
- sharpen_set(x, l);
- }
- break;
- case 16:
- for(x = 0; x < self.size_x; ++x)
- {
- l = RadarMapAtPoint_Sample(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
- sharpen_set(x, l);
- }
- break;
- case 24:
- for(x = 0; x < self.size_x; ++x)
- {
- l = RadarMapAtPoint_LineBlock(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
- sharpen_set(x, l);
- }
- break;
- }
-
- // do we have enough lines?
- if(self.frame >= 2)
- {
- // write a pixel line
- fputs(self.cnt, "\"");
- for(x = 0; x < self.size_x; ++x)
- {
- l = sharpen_get(x, self.ltime);
- fputs(self.cnt, substring(doublehex, 2 * floor(l * 256.0), 2));
- }
- if(self.frame == self.size_y)
- fputs(self.cnt, "\"\n");
- else
- {
- fputs(self.cnt, "\",\n");
- print(ftos(self.size_y - self.frame), " lines left\n");
- }
- }
-
- // is this the last line? then write back the missing line
- if(self.frame == self.size_y)
- {
- sharpen_shift(self.size_x);
- // write a pixel line
- fputs(self.cnt, "\"");
- for(x = 0; x < self.size_x; ++x)
- {
- l = sharpen_get(x, self.ltime);
- fputs(self.cnt, substring(doublehex, 2 * floor(l * 256.0), 2));
- }
- if(self.frame == self.size_y)
- fputs(self.cnt, "\"\n");
- else
- {
- fputs(self.cnt, "\",\n");
- print(ftos(self.size_y - self.frame), " lines left\n");
- }
- }
-
- self.frame += 1;
- self.nextthink = time;
- }
- else
- {
- // close the file
- fputs(self.cnt, "};\n");
- fclose(self.cnt);
- print("Finished. Please edit data/", self.netname, " with an image editing application and place it in the TGA format in the gfx folder.\n");
- RadarMap_Next();
- }
-}
-