mirror of
https://github.com/zenorogue/hyperrogue.git
synced 2024-11-15 17:54:48 +00:00
1530 lines
46 KiB
C++
1530 lines
46 KiB
C++
// Hyperbolic Rogue -- texture mode
|
|
// Copyright (C) 2011-2018 Zeno Rogue, see 'hyper.cpp' for details
|
|
|
|
#if CAP_SDL_IMG
|
|
#include <SDL/SDL_image.h>
|
|
#elif CAP_PNG
|
|
#include <png.h>
|
|
#endif
|
|
|
|
#if CAP_TEXTURE
|
|
namespace texture {
|
|
|
|
cpatterntype cgroup;
|
|
|
|
#if CAP_PNG
|
|
SDL_Surface *convertSurface(SDL_Surface* s) {
|
|
SDL_PixelFormat fmt;
|
|
// fmt.format = SDL_PIXELFORMAT_BGRA8888;
|
|
fmt.BitsPerPixel = 32;
|
|
fmt.BytesPerPixel = 4;
|
|
|
|
fmt.Ashift=24;
|
|
fmt.Rshift=16;
|
|
fmt.Gshift=8;
|
|
fmt.Bshift=0;
|
|
fmt.Amask=0xff<<24;
|
|
fmt.Rmask=0xff<<16;
|
|
fmt.Gmask=0xff<<8;
|
|
fmt.Bmask=0xff;
|
|
fmt.Aloss = fmt.Rloss = fmt.Gloss = fmt.Bloss = 0;
|
|
fmt.palette = NULL;
|
|
|
|
#ifndef SDL2
|
|
fmt.alpha = 0;
|
|
fmt.colorkey = 0x1ffffff;
|
|
#endif
|
|
|
|
return SDL_ConvertSurface(s, &fmt, SDL_SWSURFACE);
|
|
}
|
|
#endif
|
|
|
|
struct undo {
|
|
unsigned* pix;
|
|
unsigned last;
|
|
};
|
|
|
|
texture_config config;
|
|
|
|
bool saving = false;
|
|
|
|
template<class T, class U> void scale_colorarray(int origdim, int targetdim, const T& src, const U& dest) {
|
|
int ox = 0, tx = 0, partials[4];
|
|
int omissing = targetdim, tmissing = origdim;
|
|
for(int p=0; p<4; p++) partials[p] = 0;
|
|
|
|
while(tx < targetdim) {
|
|
int fv = min(omissing, tmissing);
|
|
int c = src(ox);
|
|
for(int p=0; p<4; p++)
|
|
partials[p] += part(c, p) * fv;
|
|
omissing -= fv; tmissing -= fv;
|
|
if(omissing == 0) {
|
|
ox++; omissing = targetdim;
|
|
}
|
|
if(tmissing == 0) {
|
|
int target;
|
|
for(int p=0; p<4; p++) {
|
|
part(target, p) = partials[p] / origdim;
|
|
partials[p] = 0;
|
|
}
|
|
dest(tx++, target);
|
|
tmissing = origdim;
|
|
}
|
|
}
|
|
}
|
|
|
|
bool texture_data::loadTextureGL() {
|
|
|
|
if(textureid == 0) glGenTextures(1, &textureid);
|
|
|
|
glBindTexture( GL_TEXTURE_2D, textureid);
|
|
glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_LINEAR);
|
|
glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_LINEAR);
|
|
|
|
glTexImage2D( GL_TEXTURE_2D, 0, GL_RGBA, twidth, twidth, 0,
|
|
GL_BGRA, GL_UNSIGNED_BYTE,
|
|
&texture_pixels[0] );
|
|
|
|
return true;
|
|
}
|
|
|
|
bool texture_data::whitetexture() {
|
|
undos.clear();
|
|
texture_pixels.resize(0);
|
|
texture_pixels.resize(twidth * twidth, 0xFFFFFFFF);
|
|
pixels_to_draw.clear();
|
|
return true;
|
|
}
|
|
|
|
bool texture_data::readtexture(string tn) {
|
|
|
|
#if CAP_SDL_IMG || CAP_PNG
|
|
undos.clear();
|
|
texture_pixels.resize(twidth * twidth);
|
|
|
|
#if CAP_SDL_IMG
|
|
SDL_Surface *txt = IMG_Load(tn.c_str());
|
|
if(!txt) {
|
|
addMessage(XLAT("Failed to load %1", texturename));
|
|
return false;
|
|
}
|
|
auto txt2 = convertSurface(txt);
|
|
SDL_FreeSurface(txt);
|
|
|
|
int tx = txt2->w, ty = txt2->h;
|
|
|
|
auto pix = [&] (int x, int y) { return qpixel(txt2, x, y); };
|
|
|
|
#elif CAP_PNG
|
|
|
|
FILE *f = fopen(tn.c_str(), "rb");
|
|
if(!f) { printf("failed to open file\n"); return false; }
|
|
png_structp png = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
|
|
if(!png) { printf("failed to create_read_struct\n"); return false; }
|
|
if(setjmp(png_jmpbuf(png))) {
|
|
printf("failed to read\n");
|
|
return false;
|
|
}
|
|
png_init_io(png, f);
|
|
|
|
// set the expected format
|
|
png_infop info = png_create_info_struct(png);
|
|
png_read_info(png, info);
|
|
int tx = png_get_image_width(png, info);
|
|
int ty = png_get_image_height(png, info);
|
|
png_byte color_type = png_get_color_type(png, info);
|
|
png_byte bit_depth = png_get_bit_depth(png, info);
|
|
if(bit_depth == 16) png_set_strip_16(png);
|
|
if(color_type == PNG_COLOR_TYPE_PALETTE) png_set_palette_to_rgb(png);
|
|
if(color_type == PNG_COLOR_TYPE_GRAY && bit_depth < 8) png_set_expand_gray_1_2_4_to_8(png);
|
|
if(png_get_valid(png, info, PNG_INFO_tRNS)) png_set_tRNS_to_alpha(png);
|
|
if(color_type == PNG_COLOR_TYPE_RGB ||
|
|
color_type == PNG_COLOR_TYPE_GRAY ||
|
|
color_type == PNG_COLOR_TYPE_PALETTE)
|
|
png_set_filler(png, 0xFF, PNG_FILLER_AFTER);
|
|
|
|
if(color_type == PNG_COLOR_TYPE_GRAY ||
|
|
color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
|
|
png_set_gray_to_rgb(png);
|
|
png_read_update_info(png, info);
|
|
|
|
// read png
|
|
vector<png_bytep> row_pointers(ty);
|
|
|
|
vector<int> origpixels(ty * tx);
|
|
|
|
for(int y = 0; y < ty; y++)
|
|
row_pointers[y] = (png_bytep) & origpixels[y * tx];
|
|
|
|
png_read_image(png, &row_pointers[0]);
|
|
fclose(f);
|
|
|
|
for(int i=0; i<ty*tx; i++)
|
|
swap(part(origpixels[i], 0), part(origpixels[i], 2));
|
|
|
|
auto pix = [&] (int x, int y) {
|
|
if(x<0 || y<0 || x >= tx || y >= ty) return 0;
|
|
return origpixels[y*tx + x];
|
|
};
|
|
|
|
printf("texture read OK\n");
|
|
|
|
#endif
|
|
|
|
if(tx == twidth && ty == twidth) {
|
|
int i = 0;
|
|
for(int y=0; y<ty; y++)
|
|
for(int x=0; x<tx; x++)
|
|
texture_pixels[i++] = pix(x, y);
|
|
}
|
|
|
|
else {
|
|
|
|
int origdim = max(tx, ty);
|
|
int base_x = tx/2 - origdim/2;
|
|
int base_y = ty/2 - origdim/2;
|
|
|
|
qpixel_pixel_outside = 0; // outside is black
|
|
|
|
vector<int> half_expanded(twidth * ty);
|
|
for(int y=0; y<ty; y++)
|
|
scale_colorarray(origdim, twidth,
|
|
[&] (int x) { return pix(base_x + x,y); },
|
|
[&] (int x, int v) { half_expanded[twidth * y + x] = v; }
|
|
);
|
|
|
|
for(int x=0; x<twidth; x++)
|
|
scale_colorarray(origdim, twidth,
|
|
[&] (int y) { return base_y+y < 0 || base_y+y >= ty ? 0 : half_expanded[x + (base_y + y) * twidth]; },
|
|
[&] (int y, int v) { get_texture_pixel(x, y) = v; }
|
|
);
|
|
|
|
}
|
|
|
|
#if CAP_SDL_IMG
|
|
SDL_FreeSurface(txt2);
|
|
#endif
|
|
|
|
return true;
|
|
#else
|
|
return false;
|
|
#endif
|
|
}
|
|
|
|
void texture_data::saveRawTexture(string tn) {
|
|
SDL_Surface *sraw = SDL_CreateRGBSurface(SDL_SWSURFACE,twidth,twidth,32,0,0,0,0);
|
|
for(int y=0; y<twidth; y++)
|
|
for(int x=0; x<twidth; x++)
|
|
qpixel(sraw,x,y) = get_texture_pixel(x, y);
|
|
IMAGESAVE(sraw, tn.c_str());
|
|
SDL_FreeSurface(sraw);
|
|
addMessage(XLAT("Saved the raw texture to %1", tn));
|
|
}
|
|
|
|
void texture_config::mapTextureTriangle(textureinfo &mi, const array<hyperpoint, 3>& v, const array<hyperpoint, 3>& tv, int splits) {
|
|
|
|
if(splits) {
|
|
array<hyperpoint, 3> v2 = make_array( mid(v[1], v[2]), mid(v[2], v[0]), mid(v[0], v[1]) );
|
|
array<hyperpoint, 3> tv2 = make_array( mid(tv[1], tv[2]), mid(tv[2], tv[0]), mid(tv[0], tv[1]) );
|
|
mapTextureTriangle(mi, make_array(v[0], v2[2], v2[1]), make_array(tv[0], tv2[2], tv2[1]), splits-1);
|
|
mapTextureTriangle(mi, make_array(v[1], v2[0], v2[2]), make_array(tv[1], tv2[0], tv2[2]), splits-1);
|
|
mapTextureTriangle(mi, make_array(v[2], v2[1], v2[0]), make_array(tv[2], tv2[1], tv2[0]), splits-1);
|
|
mapTextureTriangle(mi, make_array(v2[0], v2[1], v2[2]), make_array(tv2[0], tv2[1], tv2[2]), splits-1);
|
|
return;
|
|
}
|
|
|
|
for(int i=0; i<3; i++) {
|
|
mi.vertices.push_back(glhr::pointtogl(v[i]));
|
|
hyperpoint inmodel;
|
|
applymodel(tv[i], inmodel);
|
|
inmodel = itt * inmodel;
|
|
inmodel[0] *= vid.radius * 1. / vid.scrsize;
|
|
inmodel[1] *= vid.radius * 1. / vid.scrsize;
|
|
mi.tvertices.push_back(make_array<GLfloat>((inmodel[0]+1)/2, (inmodel[1]+1)/2, 0));
|
|
}
|
|
|
|
// when reading a spherical band in a cylindrical projection,
|
|
// take care that texture vertices are mapped not around the sphere
|
|
if(sphere && mdBandAny()) {
|
|
int s = size(mi.tvertices)-3;
|
|
ld xmin = min(mi.tvertices[s][0], min(mi.tvertices[s+1][0], mi.tvertices[s+2][0]));
|
|
ld xmax = max(mi.tvertices[s][0], max(mi.tvertices[s+1][0], mi.tvertices[s+2][0]));
|
|
if(xmax - xmin > .5) {
|
|
for(int ss=s; ss<s+3; ss++)
|
|
if(mi.tvertices[ss][0] < .5) mi.tvertices[ss][0] += 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
texture_triangle *edited_triangle;
|
|
textureinfo *edited_tinfo;
|
|
|
|
array<hyperpoint, 3> findTextureTriangle(cell *c, patterns::patterninfo& si, int i) {
|
|
// auto si = getpatterninfo0(c);
|
|
transmatrix M = shmup::ggmatrix(c) * applyPatterndir(c, si);
|
|
ld z = ctof(c) ? rhexf : hexvdist;
|
|
hyperpoint h1 = spin(M_PI + M_PI * (2*i -1) / c->type) * xpush(z) * C0;
|
|
hyperpoint h2 = spin(M_PI + M_PI * (2*i +1) / c->type) * xpush(z) * C0;
|
|
return make_array(M * C0, M * h1, M * h2);
|
|
}
|
|
|
|
// using: mouseh, mouseouver
|
|
int getTriangleID(cell *c, patterns::patterninfo& si, hyperpoint h) {
|
|
// auto si = getpatterninfo0(c);
|
|
ld quality = 1e10;
|
|
int best = 0;
|
|
for(int i=0; i<c->type; i++) {
|
|
auto t = findTextureTriangle(c, si, i);
|
|
ld q = intval(t[1], h) + intval(t[2], h);
|
|
if(q < quality) quality = q, best = i;
|
|
}
|
|
return best;
|
|
}
|
|
|
|
int goldbergcode(cell *c, const patterns::patterninfo& si) {
|
|
if(!gp::on) return 0;
|
|
else if(c == c->master->c7) return (fixdir(si.dir, c) << 8);
|
|
else return (get_code(gp::get_local_info(c)) << 16) | (fixdir(si.dir, c) << 8);
|
|
}
|
|
|
|
void mapTexture(cell *c, textureinfo& mi, patterns::patterninfo &si, const transmatrix& T, int shift = 0) {
|
|
mi.c = c;
|
|
mi.symmetries = si.symmetries;
|
|
mi.current_type = c->type;
|
|
|
|
if(gp::on) {
|
|
mi.M = T;
|
|
mi.triangles.clear();
|
|
for(int i=0; i<c->type; i++) {
|
|
int d = si.dir;
|
|
int i0 = fixdir(i + d + 0, c);
|
|
int i1 = fixdir(i + d + 1, c);
|
|
hyperpoint h1 = gp::get_corner_position(c, i0);
|
|
hyperpoint h2 = gp::get_corner_position(c, i1);
|
|
mi.triangles.emplace_back(make_array(C0, h1, h2), make_array(mi.M*C0, mi.M*h1, mi.M*h2));
|
|
}
|
|
}
|
|
|
|
else {
|
|
mi.M = T * applyPatterndir(c, si);
|
|
|
|
ld z = ctof(c) ? rhexf : hexvdist;
|
|
|
|
mi.triangles.clear();
|
|
for(int i=0; i<c->type; i++) {
|
|
int i2 = i+shift;
|
|
hyperpoint h1 = spin(M_PI + M_PI * (2*i2 -1) / c->type) * xpush(z) * C0;
|
|
hyperpoint h2 = spin(M_PI + M_PI * (2*i2 +1) / c->type) * xpush(z) * C0;
|
|
mi.triangles.emplace_back(make_array(C0, h1, h2), make_array(mi.M*C0, mi.M*h1, mi.M*h2));
|
|
}
|
|
}
|
|
}
|
|
|
|
void texture_config::mapTexture2(textureinfo& mi) {
|
|
mi.vertices.clear();
|
|
mi.tvertices.clear();
|
|
for(auto& t: mi.triangles)
|
|
mapTextureTriangle(mi, t.v, t.tv);
|
|
}
|
|
|
|
int texture_config::recolor(int col) {
|
|
if(color_alpha == 0) return col;
|
|
for(int i=1; i<4; i++)
|
|
part(col, i) = color_alpha + ((255-color_alpha) * part(col,i) + 127) / 255;
|
|
return col;
|
|
}
|
|
|
|
bool texture_config::apply(cell *c, const transmatrix &V, int col) {
|
|
if(config.tstate == tsOff) return false;
|
|
|
|
using namespace patterns;
|
|
auto si = getpatterninfo0(c);
|
|
|
|
if(config.tstate == tsAdjusting) {
|
|
queuepolyat(V, shFullCross[ctof(c)], 0, PPR_LINE);
|
|
lastptd().u.poly.outline = slave_color;
|
|
|
|
draw_floorshape(c, V, shFullFloor, 0, PPR_LINE);
|
|
lastptd().u.poly.outline = slave_color;
|
|
return false;
|
|
}
|
|
try {
|
|
auto& mi = texture_map.at(si.id + goldbergcode(c, si));
|
|
|
|
set_floor(shFullFloor);
|
|
qfi.tinf = &mi;
|
|
qfi.spin = gp::on ? Id : applyPatterndir(c, si);
|
|
|
|
if(grid_color) {
|
|
draw_floorshape(c, V, shFullFloor, 0, PPR_FLOOR);
|
|
lastptd().u.poly.outline = grid_color;
|
|
}
|
|
|
|
if(texture::saving) {
|
|
// create a nicer aura for saved texture
|
|
for(int i=0; i<size(mi.tvertices); i += 3) {
|
|
ld p[3];
|
|
while(true) {
|
|
p[0] = hrandf();
|
|
p[1] = hrandf();
|
|
p[2] = 1 - p[0] - p[1];
|
|
if(p[2] >= 0) break;
|
|
}
|
|
ld v[2] = {0,0};
|
|
for(int j=0; j<2; j++) for(int k=0; k<3; k++)
|
|
v[j] += mi.tvertices[i+k][j] * p[k];
|
|
|
|
int vi[2] = {int(v[0] * config.data.twidth), int(v[1] * config.data.twidth)};
|
|
|
|
col = config.data.get_texture_pixel(vi[0], vi[1]);
|
|
hyperpoint h = glhr::gltopoint(mi.vertices[i]);
|
|
addaura(V*h, col, 0);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
catch(out_of_range&) {
|
|
// printf("Ignoring tile #%d / %08x: not mapped\n", si.id, goldbergcode(c, si));
|
|
return false;
|
|
}
|
|
}
|
|
|
|
void texture_config::mark_triangles() {
|
|
if(config.tstate == tsAdjusting)
|
|
for(auto& mi: texture_map) {
|
|
for(auto& t: mi.second.triangles) {
|
|
vector<hyperpoint> t2;
|
|
for(int i=0; i<3; i++)
|
|
t2.push_back(t.tv[i]);
|
|
prettypoly(t2, master_color, master_color, gsplits);
|
|
}
|
|
}
|
|
}
|
|
|
|
static const auto current_texture_parameters = tie(geometry, nonbitrunc, patterns::whichPattern, patterns::subpattern_flags, pmodel, vid.scale, vid.alpha);
|
|
|
|
void texture_config::clear_texture_map() {
|
|
texture_map.clear();
|
|
edited_triangle = nullptr;
|
|
edited_tinfo = nullptr;
|
|
tuned_vertices.clear();
|
|
models.clear();
|
|
texture_tuned = false;
|
|
texture_tuner = "";
|
|
}
|
|
|
|
void texture_config::perform_mapping() {
|
|
if(gsplits < 0) gsplits = 0;
|
|
if(gsplits > 4) gsplits = 4;
|
|
using namespace patterns;
|
|
|
|
clear_texture_map();
|
|
|
|
for(auto& p: gmatrix) {
|
|
cell *c = p.first;
|
|
auto si = getpatterninfo0(c);
|
|
bool replace = false;
|
|
|
|
// int sgn = sphere ? -1 : 1;
|
|
|
|
si.id += goldbergcode(c, si);
|
|
|
|
if(!texture_map.count(si.id))
|
|
replace = true;
|
|
else if(hdist0(p.second*sphereflip * C0) < hdist0(texture_map[si.id].M * sphereflip * C0))
|
|
replace = true;
|
|
|
|
if(replace) {
|
|
auto& mi = texture_map[si.id];
|
|
mapTexture(c, mi, si, p.second);
|
|
mi.texture_id = config.data.textureid;
|
|
}
|
|
}
|
|
|
|
for(auto& t: texture_map) models.insert(t.second.c);
|
|
|
|
for(auto& p: gmatrix) {
|
|
cell *c = p.first;
|
|
bool nearmodel = models.count(c);
|
|
forCellEx(c2, c)
|
|
if(models.count(c2))
|
|
nearmodel = true;
|
|
if(nearmodel) {
|
|
auto si = getpatterninfo0(c);
|
|
texture_map[si.id].matrices.push_back(p.second * applyPatterndir(c, si));
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
void texture_config::finish_mapping() {
|
|
if(config.tstate == tsActive)
|
|
for(auto& mi: texture_map)
|
|
mapTexture2(mi.second);
|
|
|
|
patterns::computeCgroup();
|
|
texture::cgroup = patterns::cgroup;
|
|
texture_map_orig = texture_map;
|
|
orig_texture_parameters = current_texture_parameters;
|
|
// printf("texture_map has %d elements (S%d)\n", size(texture_map), config.tstate);
|
|
}
|
|
|
|
void texture_config::saveFullTexture(string tn) {
|
|
addMessage(XLAT("Saving full texture to %1...", tn));
|
|
dynamicval<unsigned> dd(grid_color, 0);
|
|
dynamicval<unsigned> dm(mesh_color, 0);
|
|
dynamicval<ld> dx(vid.xposition, 0);
|
|
dynamicval<ld> dy(vid.yposition, 0);
|
|
dynamicval<ld> dvs(vid.scale, (pmodel == mdDisk && !euclid) ? 1 : vid.scale);
|
|
dynamicval<bool> dro(rug::rugged, false);
|
|
texture::saving = true;
|
|
drawscreen();
|
|
|
|
dynamicval<int> dv(pngres, data.twidth);
|
|
saveHighQualityShot(tn.c_str());
|
|
texture::saving = false;
|
|
|
|
drawscreen();
|
|
if(data.readtexture(tn) && data.loadTextureGL()) {
|
|
itt = Id; // xyscale(Id, vid.scrsize * 1. / vid.radius);
|
|
perform_mapping();
|
|
finish_mapping();
|
|
}
|
|
}
|
|
|
|
bool newmove = false;
|
|
|
|
vector<glhr::textured_vertex> rtver(4);
|
|
|
|
void texture_config::drawRawTexture() {
|
|
glhr::be_textured();
|
|
glhr::color2(0xFFFFFF20);
|
|
glBindTexture(GL_TEXTURE_2D, config.data.textureid);
|
|
for(int i=0; i<4; i++) {
|
|
int cx[4] = {2, -2, -2, 2};
|
|
int cy[4] = {2, 2, -2, -2};
|
|
int x = cx[i];
|
|
int y = cy[i];
|
|
hyperpoint inmodel = hpxyz(x, y, 1);
|
|
inmodel = itt * inmodel;
|
|
rtver[i].texture[0] = (inmodel[0]+1)/2;
|
|
rtver[i].texture[1] = (inmodel[1]+1)/2;
|
|
rtver[i].coords[0] = x * vid.scrsize;
|
|
rtver[i].coords[1] = y * vid.scrsize;
|
|
}
|
|
glhr::set_modelview(glhr::translate(0, 0, stereo::scrdist));
|
|
glhr::prepare(rtver);
|
|
glhr::set_depthtest(false);
|
|
glDrawArrays(GL_TRIANGLE_FAN, 0, 4);
|
|
}
|
|
|
|
struct magicmapper_point {
|
|
cell *c;
|
|
hyperpoint cell_relative;
|
|
hyperpoint texture_coords;
|
|
};
|
|
|
|
vector<magicmapper_point> amp;
|
|
|
|
enum eMagicParameter {
|
|
mpScale,
|
|
mpProjection,
|
|
mpMove,
|
|
mpRotate,
|
|
mpSlant,
|
|
mpStretch,
|
|
mpTexPosX,
|
|
mpTexPosY,
|
|
mpMAX
|
|
};
|
|
|
|
vector<string> mpnames = {
|
|
"affect model scale",
|
|
"affect model projection",
|
|
"affect model central point",
|
|
"affect model rotation",
|
|
"affect texture slanting",
|
|
"affect texture stretching",
|
|
"affect texture position X",
|
|
"affect texture position Y"
|
|
};
|
|
|
|
flagtype current_magic = 15;
|
|
|
|
bool have_mp(eMagicParameter i) { return (current_magic >> i) & 1; }
|
|
|
|
struct magic_param {
|
|
bool do_spin;
|
|
int texmode;
|
|
ld spinangle, scale, proj, moveangle, shift, slant, stretch, tx, ty;
|
|
|
|
void shuffle() {
|
|
do_spin = hrand(2);
|
|
spinangle = hrandf() - hrandf();
|
|
moveangle = hrandf() * 2 * M_PI;
|
|
shift = hrandf() - hrandf();
|
|
scale = hrandf() - hrandf();
|
|
proj = hrandf() - hrandf();
|
|
texmode = hrand(3);
|
|
slant = have_mp(mpSlant) ? hrandf() - hrandf() : 0;
|
|
stretch = have_mp(mpStretch) ? hrandf() - hrandf() : 0;
|
|
tx = have_mp(mpTexPosX) ? hrandf() - hrandf() : 0;
|
|
ty = have_mp(mpTexPosY) ? hrandf() - hrandf() : 0;
|
|
}
|
|
|
|
void affect_itt(const transmatrix& T) {
|
|
transmatrix Ti = inverse(T);
|
|
for(auto& p: amp)
|
|
p.texture_coords = Ti * p.texture_coords;
|
|
config.itt = config.itt * T;
|
|
}
|
|
|
|
void apply(ld delta) {
|
|
if(have_mp(mpProjection))
|
|
vid.alpha *= exp(delta * proj);
|
|
if(have_mp(mpScale))
|
|
vid.scale *= exp(delta * scale);
|
|
|
|
if(do_spin) {
|
|
if(have_mp(mpRotate))
|
|
View = spin(delta * spinangle) * View;
|
|
}
|
|
else {
|
|
if(have_mp(mpMove))
|
|
View = spin(moveangle) * xpush(delta*shift) * spin(-moveangle) * View;
|
|
}
|
|
|
|
if(texmode == 0 && have_mp(mpStretch))
|
|
affect_itt(euaffine(hpxyz(0, delta * stretch, 0)));
|
|
|
|
if(texmode == 1 && have_mp(mpSlant))
|
|
affect_itt(euaffine(hpxyz(delta * slant, 0, 0)));
|
|
|
|
if(texmode == 2 && (have_mp(mpTexPosX) || have_mp(mpTexPosY)))
|
|
affect_itt(eupush(delta * tx, delta * ty));
|
|
|
|
fixmatrix(View);
|
|
}
|
|
};
|
|
|
|
ld magic_quality() {
|
|
gmatrix.clear();
|
|
calcparam();
|
|
|
|
ld q = 0;
|
|
for(auto& p: amp) {
|
|
hyperpoint inmodel;
|
|
applymodel(shmup::ggmatrix(p.c) * p.cell_relative, inmodel);
|
|
inmodel[0] *= vid.radius * 1. / vid.scrsize;
|
|
inmodel[1] *= vid.radius * 1. / vid.scrsize;
|
|
q += intvalxy(inmodel, p.texture_coords);
|
|
}
|
|
return q;
|
|
}
|
|
|
|
void applyMagic() {
|
|
ld cq = magic_quality();
|
|
|
|
int last_success = 0;
|
|
|
|
for(int s=0; s<50000 && s<last_success + 1000; s++) {
|
|
magic_param p;
|
|
p.shuffle();
|
|
|
|
bool failed = false;
|
|
|
|
for(ld delta = 1; abs(delta) > 1e-9; delta *= (failed ? -.7 : 1.2)) {
|
|
p.apply(delta);
|
|
ld nq = magic_quality();
|
|
if(nq < cq) {
|
|
cq = nq;
|
|
last_success = s;
|
|
}
|
|
else {
|
|
p.apply(-delta);
|
|
failed = true;
|
|
}
|
|
}
|
|
}
|
|
config.perform_mapping();
|
|
}
|
|
|
|
enum eTexturePanstate {tpsModel, tpsMove, tpsScale, tpsAffine, tpsZoom, tpsProjection, tpsCell, tpsTriangle, tpsTune};
|
|
eTexturePanstate panstate;
|
|
|
|
void mousemovement() {
|
|
static hyperpoint lastmouse;
|
|
|
|
hyperpoint mouseeu = hpxyz((mousex - vid.xcenter + .0) / vid.scrsize, (mousey - vid.ycenter + .0) / vid.scrsize, 1);
|
|
bool nonzero = mouseeu[0] || mouseeu[1];
|
|
|
|
switch(panstate) {
|
|
case tpsModel:
|
|
if(!newmove && mouseh[2] < 50 && lastmouse[2] < 50) {
|
|
panning(lastmouse, mouseh);
|
|
config.perform_mapping();
|
|
}
|
|
lastmouse = mouseh; newmove = false;
|
|
break;
|
|
|
|
case tpsMove: {
|
|
if(!newmove)
|
|
config.itt = config.itt * inverse(eupush(mouseeu)) * eupush(lastmouse);
|
|
lastmouse = mouseeu; newmove = false;
|
|
break;
|
|
}
|
|
|
|
case tpsScale: {
|
|
if(nonzero && !newmove)
|
|
config.itt = config.itt * inverse(euscalezoom(mouseeu)) * euscalezoom(lastmouse);
|
|
if(nonzero) lastmouse = mouseeu;
|
|
newmove = false;
|
|
break;
|
|
}
|
|
|
|
case tpsAffine: {
|
|
if(!newmove)
|
|
config.itt = config.itt * inverse(euaffine(mouseeu)) * euaffine(lastmouse);
|
|
lastmouse = mouseeu; newmove = false;
|
|
break;
|
|
}
|
|
|
|
case tpsZoom: {
|
|
// do not zoom in portrait!
|
|
if(nonzero && !newmove) {
|
|
View = inverse(spintox(mouseeu)) * spintox(lastmouse) * View;
|
|
vid.scale = vid.scale * sqrt(intvalxy(C0, mouseeu)) / sqrt(intvalxy(C0, lastmouse));
|
|
config.perform_mapping();
|
|
}
|
|
if(nonzero) lastmouse = mouseeu;
|
|
newmove = false;
|
|
break;
|
|
}
|
|
|
|
case tpsProjection: {
|
|
if(nonzero && !newmove) {
|
|
vid.alpha = vid.alpha * sqrt(intvalxy(C0, mouseeu)) / sqrt(intvalxy(C0, lastmouse));
|
|
}
|
|
if(nonzero) lastmouse = mouseeu;
|
|
newmove = false;
|
|
break;
|
|
}
|
|
|
|
case tpsCell: {
|
|
cell *c = mouseover;
|
|
if(!c) break;
|
|
auto si = patterns::getpatterninfo0(c);
|
|
if(newmove) {
|
|
edited_tinfo = NULL;
|
|
if(config.texture_map.count(si.id)) {
|
|
edited_tinfo = &config.texture_map[si.id];
|
|
newmove = false;
|
|
}
|
|
}
|
|
if(edited_tinfo && size(edited_tinfo->triangles) == c->type) {
|
|
for(int i=0; i<c->type; i++)
|
|
edited_tinfo->triangles[i].tv = findTextureTriangle(c, si, i);
|
|
config.texture_tuned = true;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case tpsTriangle: {
|
|
cell *c = mouseover;
|
|
if(!c) break;
|
|
auto si = patterns::getpatterninfo0(c);
|
|
int i = getTriangleID(c, si, mouseh);
|
|
if(newmove) {
|
|
edited_triangle = NULL;
|
|
if(config.texture_map.count(si.id)) {
|
|
edited_triangle = &config.texture_map[si.id].triangles[i];
|
|
newmove = false;
|
|
}
|
|
}
|
|
if(edited_triangle) {
|
|
edited_triangle->tv = findTextureTriangle(c, si, i);
|
|
config.texture_tuned = true;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case tpsTune: {
|
|
ld tdist = 1e20;
|
|
if(newmove) {
|
|
config.tuned_vertices.clear();
|
|
for(auto& a: config.texture_map)
|
|
for(auto& t: a.second.triangles)
|
|
for(auto& v: t.tv)
|
|
if(intval(v, mouseh) < tdist)
|
|
tdist = intval(v, mouseh);
|
|
for(auto& a: config.texture_map)
|
|
for(auto& t: a.second.triangles)
|
|
for(auto& v: t.tv)
|
|
if(intval(v, mouseh) < tdist * (1.000001))
|
|
config.tuned_vertices.push_back(&v);
|
|
newmove = false;
|
|
}
|
|
for(auto v: config.tuned_vertices) {
|
|
*v = mouseh;
|
|
config.texture_tuned = true;
|
|
}
|
|
break;
|
|
}
|
|
|
|
default: break;
|
|
}
|
|
}
|
|
|
|
patterns::patterninfo si_save;
|
|
|
|
saverlist texturesavers;
|
|
|
|
bool target_nonbitru;
|
|
|
|
void init_textureconfig() {
|
|
#if CAP_CONFIG
|
|
texturesavers = move(savers);
|
|
for(int i=0; i<3; i++)
|
|
for(int j=0; j<3; j++)
|
|
addsaver(config.itt[i][j], "texturematrix_" + its(i) + its(j), i==j ? 1 : 0);
|
|
|
|
for(int i=0; i<3; i++)
|
|
for(int j=0; j<3; j++)
|
|
addsaver(View[i][j], "viewmatrix_" + its(i) + its(j), i==j ? 1 : 0);
|
|
|
|
addsaverenum(targetgeometry, "geometry", gNormal);
|
|
addsaverenum(pmodel, "used model", mdDisk);
|
|
addsaver(vid.yshift, "Y shift", 0);
|
|
addsaver(vid.yposition, "Y position", 0);
|
|
addsaver(vid.xposition, "X position", 0);
|
|
addsaver(vid.camera_angle, "camera angle", 0);
|
|
addsaverenum(target_nonbitru, "bitruncated", false);
|
|
// ... geometry parameters
|
|
|
|
addsaver(patterns::whichPattern, "pattern", 0);
|
|
addsaver(patterns::subpattern_flags, "pattern flags", 0);
|
|
|
|
cell *ctr = euclid ? centerover.c : viewctr.h->c7;
|
|
si_save = patterns::getpatterninfo0(ctr);
|
|
|
|
addsaver(si_save.id, "center type", 1);
|
|
addsaver(si_save.dir, "center direction", 0);
|
|
addsaver(si_save.reflect, "center reflection", false);
|
|
addsaver(viewctr.spin, "center spin", 0);
|
|
addsaver(config.data.twidth, "texture resolution", 2048);
|
|
addsaver(config.gsplits, "precision", 1);
|
|
|
|
addsaver(config.grid_color, "grid color", 0);
|
|
addsaver(config.color_alpha, "alpha color", 0);
|
|
addsaver(config.mesh_color, "mesh color", 0);
|
|
|
|
addsaver(vid.alpha, "projection", 1);
|
|
addsaver(vid.scale, "scale", 1);
|
|
|
|
addsaver(config.texturename, "texture filename", "");
|
|
addsaver(config.texture_tuner, "texture tuning", "");
|
|
|
|
swap(texturesavers, savers);
|
|
#endif
|
|
}
|
|
|
|
bool texture_config::save() {
|
|
#if CAP_CONFIG
|
|
init_textureconfig();
|
|
FILE *f = fopen(configname.c_str(), "wt");
|
|
if(!f) return false;
|
|
|
|
if(texture_tuned) {
|
|
texture_tuner = "";
|
|
for(auto& a: config.texture_map)
|
|
for(auto& t: a.second.triangles)
|
|
for(auto& v: t.tv)
|
|
for(int i=0; i<3; i++) {
|
|
texture_tuner += ftssmart(v[i]);
|
|
texture_tuner += ';';
|
|
}
|
|
}
|
|
|
|
targetgeometry = geometry;
|
|
target_nonbitru = nonbitrunc;
|
|
|
|
for(auto s: texturesavers) if(s->dosave())
|
|
fprintf(f, "%s=%s\n", s->name.c_str(), s->save().c_str());
|
|
|
|
fclose(f);
|
|
#endif
|
|
return true;
|
|
}
|
|
|
|
bool texture_config::load() {
|
|
#if CAP_CONFIG
|
|
init_textureconfig();
|
|
|
|
FILE *f = fopen(configname.c_str(), "rt");
|
|
if(!f) return false;
|
|
swap(texturesavers, savers);
|
|
for(auto s: savers) s->reset();
|
|
loadNewConfig(f);
|
|
swap(texturesavers, savers);
|
|
fclose(f);
|
|
|
|
if(1) {
|
|
dynamicval<char> d1(patterns::whichPattern, patterns::whichPattern);
|
|
dynamicval<int> d2(patterns::subpattern_flags, patterns::subpattern_flags);
|
|
|
|
if(targetgeometry != geometry) {
|
|
restartGame(rg::geometry);
|
|
return config.load();
|
|
}
|
|
|
|
if(nonbitrunc != target_nonbitru) {
|
|
restartGame(rg::bitrunc);
|
|
}
|
|
}
|
|
|
|
if(true) {
|
|
celllister cl(currentmap->gamestart(), 20, 10000, NULL);
|
|
bool found = false;
|
|
for(cell *c: cl.lst) if(euclid || ctof(c)) {
|
|
cell *ctr = euclid ? centerover.c : viewctr.h->c7;
|
|
auto si_here = patterns::getpatterninfo0(c);
|
|
if(si_here.id == si_save.id && si_here.reflect == si_save.reflect && si_here.dir == si_save.dir) {
|
|
if(euclid) centerover.c = ctr;
|
|
else viewctr.h = ctr->master;
|
|
found = true;
|
|
break;
|
|
}
|
|
}
|
|
if(!found)
|
|
addMessage(XLAT("warning: unable to find the center"));
|
|
}
|
|
|
|
if(!data.readtexture(texturename)) return false;
|
|
if(!data.loadTextureGL()) return false;
|
|
calcparam();
|
|
drawthemap();
|
|
config.tstate = config.tstate_max = tsActive;
|
|
string s = move(texture_tuner);
|
|
perform_mapping();
|
|
|
|
texture_tuner = move(s);
|
|
|
|
if(texture_tuner != "") {
|
|
texture_tuned = true;
|
|
vector<ld*> coords;
|
|
for(auto& a: config.texture_map)
|
|
for(auto& t: a.second.triangles)
|
|
for(auto& v: t.tv)
|
|
for(int i=0; i<3; i++)
|
|
coords.push_back(&v[i]);
|
|
int semicounter = 0;
|
|
for(char c: texture_tuner) if(c == ';') semicounter++;
|
|
if(semicounter != size(coords))
|
|
addMessage("Tuning error: wrong number");
|
|
else {
|
|
string cur = "";
|
|
int index = 0;
|
|
for(char c: texture_tuner)
|
|
if(c == ';') {
|
|
*(coords[index++]) = atof(cur.c_str());
|
|
cur = "";
|
|
}
|
|
else cur += c;
|
|
printf("index = %d semi = %d sc = %d\n", index, semicounter, size(coords));
|
|
}
|
|
}
|
|
|
|
finish_mapping();
|
|
#endif
|
|
return true;
|
|
}
|
|
|
|
void showMagicMenu() {
|
|
cmode = sm::SIDE | sm::MAYDARK | sm::DIALOG_STRICT_X;
|
|
gamescreen(0);
|
|
|
|
dialog::init(XLAT("texture auto-adjustment"));
|
|
|
|
dialog::addInfo(XLAT("drag from the model to the texture"));
|
|
|
|
for(int i=0; i<mpMAX; i++)
|
|
dialog::addBoolItem(XLAT(mpnames[i]), have_mp(eMagicParameter(i)), 'a'+i);
|
|
|
|
dialog::addSelItem(XLAT("delete markers"), its(size(amp)), 'D');
|
|
dialog::addItem(XLAT("perform auto-adjustment"), 'R');
|
|
dialog::addItem(XLAT("back"), '0');
|
|
|
|
getcstat = '-';
|
|
|
|
dialog::display();
|
|
|
|
if(holdmouse) {
|
|
hyperpoint mouseeu = hpxyz((mousex - vid.xcenter + .0) / vid.scrsize, (mousey - vid.ycenter + .0) / vid.scrsize, 1);
|
|
if(newmove) {
|
|
magicmapper_point newpoint;
|
|
newpoint.c = mouseover;
|
|
newpoint.cell_relative = inverse(gmatrix[mouseover]) * mouseh;
|
|
amp.push_back(newpoint);
|
|
newmove = false;
|
|
}
|
|
amp.back().texture_coords = mouseeu;
|
|
}
|
|
|
|
if(config.tstate == tsAdjusting) {
|
|
initquickqueue();
|
|
char letter = 'A';
|
|
for(auto& am: amp) {
|
|
hyperpoint h = shmup::ggmatrix(am.c) * am.cell_relative;
|
|
display(h);
|
|
queuechr(h, vid.fsize, letter, 0xC00000, 1);
|
|
|
|
hyperpoint inmodel;
|
|
applymodel(h, inmodel);
|
|
inmodel[0] *= vid.radius * 1. / vid.scrsize;
|
|
inmodel[1] *= vid.radius * 1. / vid.scrsize;
|
|
|
|
queuechr(
|
|
vid.xcenter + vid.scrsize * am.texture_coords[0],
|
|
vid.ycenter + vid.scrsize * am.texture_coords[1],
|
|
0, vid.fsize, letter, 0x00C000, 1);
|
|
|
|
letter++;
|
|
}
|
|
quickqueue();
|
|
}
|
|
|
|
keyhandler = [] (int sym, int uni) {
|
|
// handlePanning(sym, uni);
|
|
dialog::handleNavigation(sym, uni);
|
|
|
|
if(uni == '-' && config.tstate == tsAdjusting) {
|
|
if(!holdmouse) {
|
|
holdmouse = true;
|
|
newmove = true;
|
|
}
|
|
}
|
|
else if(uni >= 'a' && uni < 'a' + mpMAX)
|
|
current_magic ^= 1<<(uni - 'a');
|
|
|
|
else if(uni == 'D') amp.clear();
|
|
else if(uni == 'R') applyMagic();
|
|
else if(doexiton(sym, uni))
|
|
popScreen();
|
|
};
|
|
}
|
|
|
|
string texturehelp =
|
|
"This mode lets you to change the floor tesselation easily -- "
|
|
"select 'paint a new texture' and draw like in a Paint program. "
|
|
"The obtained pattern can then be easily changed to another geometry, "
|
|
"or saved.\n\n"
|
|
"Instead of drawing, it is also possible to use an arbitrary image "
|
|
"as a texture. "
|
|
"Works best with spherical/Euclidean/hyperbolic tesselations "
|
|
"(e.g., a photo of a soccerball, or one of the tesselations by M. C. "
|
|
"Escher), but it can be also used on arbitrary photos to make them periodic "
|
|
"(these probably work best with the 'large picture' setting in geometry selection). "
|
|
"Again, tesselations can have their geometry changed.\n\n";
|
|
|
|
void showMenu() {
|
|
cmode = sm::SIDE | sm::MAYDARK | sm::DIALOG_STRICT_X;
|
|
gamescreen(0);
|
|
if(config.tstate == tsAdjusting) {
|
|
ptds.clear();
|
|
config.mark_triangles();
|
|
drawqueue();
|
|
}
|
|
|
|
if(config.tstate == tsOff) {
|
|
dialog::init(XLAT("texture mode (off)"));
|
|
dialog::addItem(XLAT("select geometry/pattern"), 'r');
|
|
if(config.tstate_max == tsAdjusting || config.tstate_max == tsActive)
|
|
dialog::addItem(XLAT("reactivate the texture"), 't');
|
|
dialog::addItem(XLAT("open PNG as texture"), 'o');
|
|
dialog::addItem(XLAT("load texture config"), 'l');
|
|
dialog::addSelItem(XLAT("texture size"), its(config.data.twidth), 'w');
|
|
#if CAP_EDIT
|
|
dialog::addItem(XLAT("paint a new texture"), 'n');
|
|
#endif
|
|
dialog::addSelItem(XLAT("precision"), its(config.gsplits), 'P');
|
|
}
|
|
|
|
if(config.tstate == tsAdjusting) {
|
|
dialog::init(XLAT("texture mode (overlay)"));
|
|
dialog::addItem(XLAT("select the texture's pattern"), 'r');
|
|
dialog::addItem(XLAT("enable the texture"), 't');
|
|
dialog::addItem(XLAT("cancel the texture"), 'T');
|
|
dialog::addBoolItem(XLAT("move the model"), panstate == tpsModel, 'm');
|
|
dialog::addBoolItem(XLAT("move the texture"), panstate == tpsMove, 'a');
|
|
dialog::addBoolItem(XLAT("zoom/scale the texture"), panstate == tpsScale, 'x');
|
|
dialog::addBoolItem(XLAT("zoom/scale the model"), panstate == tpsZoom, 'z');
|
|
dialog::addBoolItem(XLAT("projection"), panstate == tpsProjection, 'p');
|
|
dialog::addBoolItem(XLAT("affine transformations"), panstate == tpsAffine, 'y');
|
|
dialog::addBoolItem(XLAT("magic"), false, 'A');
|
|
|
|
dialog::addBreak(50);
|
|
|
|
dialog::addBoolItem(XLAT("select master cells"), panstate == tpsCell, 'C');
|
|
dialog::addBoolItem(XLAT("select master triangles"), panstate == tpsTriangle, 'X');
|
|
dialog::addBoolItem(XLAT("fine tune vertices"), panstate == tpsTune, 'F');
|
|
|
|
dialog::addColorItem(XLAT("grid color (master)"), config.master_color, 'M');
|
|
dialog::addColorItem(XLAT("grid color (copy)"), config.slave_color, 'K');
|
|
|
|
dialog::addBreak(50);
|
|
|
|
dialog::addSelItem(XLAT("precision"), its(config.gsplits), 'P');
|
|
dialog::addItem(XLAT("save the raw texture"), 'S');
|
|
}
|
|
|
|
if(config.tstate == tsActive) {
|
|
dialog::init(XLAT("texture mode (active)"));
|
|
/* dialog::addSelItem(XLAT("texture scale"), fts(iscale), 's');
|
|
dialog::addSelItem(XLAT("texture angle"), fts(irotate), 'a');
|
|
dialog::addSelItem(XLAT("texture position X"), fts(ix), 'x');
|
|
dialog::addSelItem(XLAT("texture position Y"), fts(iy), 'y'); */
|
|
dialog::addItem(XLAT("deactivate the texture"), 't');
|
|
dialog::addItem(XLAT("back to overlay mode"), 'T');
|
|
dialog::addItem(XLAT("change the geometry"), 'r');
|
|
dialog::addColorItem(XLAT("grid color"), config.grid_color, 'g');
|
|
dialog::addColorItem(XLAT("mesh color"), config.mesh_color, 'm');
|
|
dialog::addSelItem(XLAT("color alpha"), its(config.color_alpha), 'c');
|
|
dialog::addSelItem(XLAT("precision"), its(config.gsplits), 'P');
|
|
#if CAP_EDIT
|
|
dialog::addItem(XLAT("edit the texture"), 'e');
|
|
#endif
|
|
dialog::addItem(XLAT("save the full texture image"), 'S');
|
|
dialog::addItem(XLAT("save texture config"), 's');
|
|
}
|
|
|
|
dialog::addItem(XLAT("help"), SDLK_F1);
|
|
dialog::addItem(XLAT("back"), '0');
|
|
|
|
getcstat = '-';
|
|
|
|
dialog::display();
|
|
|
|
if(holdmouse) mousemovement();
|
|
|
|
keyhandler = [] (int sym, int uni) {
|
|
// handlePanning(sym, uni);
|
|
dialog::handleNavigation(sym, uni);
|
|
|
|
if(uni == '-' && config.tstate == tsAdjusting) {
|
|
if(!holdmouse) {
|
|
holdmouse = true;
|
|
newmove = true;
|
|
}
|
|
}
|
|
|
|
else if(uni == 'm' && config.tstate == tsAdjusting) panstate = tpsModel;
|
|
else if(uni == 'a' && config.tstate == tsAdjusting) panstate = tpsMove;
|
|
else if(uni == 'x' && config.tstate == tsAdjusting) panstate = tpsScale;
|
|
else if(uni == 'y' && config.tstate == tsAdjusting) panstate = tpsAffine;
|
|
else if(uni == 'z' && config.tstate == tsAdjusting) panstate = tpsZoom;
|
|
else if(uni == 'p' && config.tstate == tsAdjusting) panstate = tpsProjection;
|
|
else if(uni == 'C' && config.tstate == tsAdjusting) panstate = tpsCell;
|
|
else if(uni == 'X' && config.tstate == tsAdjusting) panstate = tpsTriangle;
|
|
else if(uni == 'F' && config.tstate == tsAdjusting) panstate = tpsTune;
|
|
else if(uni == 'A' && config.tstate == tsAdjusting)
|
|
pushScreen(showMagicMenu);
|
|
|
|
else if(uni == 's' && config.tstate == tsActive)
|
|
dialog::openFileDialog(config.configname, XLAT("save texture config"), ".txc",
|
|
[] () {
|
|
return config.save();
|
|
});
|
|
|
|
else if(uni == 'l' && config.tstate == tsOff)
|
|
dialog::openFileDialog(config.configname, XLAT("load texture config"), ".txc",
|
|
[] () {
|
|
return config.load();
|
|
});
|
|
|
|
else if(uni == 'r')
|
|
patterns::pushChangeablePatterns();
|
|
|
|
else if(uni == 'o' && config.tstate == tsOff)
|
|
dialog::openFileDialog(config.texturename, XLAT("open PNG as texture"), ".png",
|
|
[] () {
|
|
if(config.data.readtexture(config.texturename) && config.data.loadTextureGL()) {
|
|
if(config.tstate_max == tsOff) config.tstate_max = tsAdjusting;
|
|
config.tstate = config.tstate_max;
|
|
config.perform_mapping();
|
|
config.finish_mapping();
|
|
return true;
|
|
}
|
|
else return false;
|
|
});
|
|
|
|
else if(uni == 'w' && config.tstate == tsOff) {
|
|
config.data.twidth *= 2;
|
|
if(config.data.twidth > 9000) config.data.twidth = 256;
|
|
config.tstate_max = tsOff;
|
|
}
|
|
|
|
#if CAP_EDIT
|
|
else if(uni == 'e' && config.tstate == tsActive) {
|
|
mapeditor::initdraw(cwt.c);
|
|
pushScreen(mapeditor::showDrawEditor);
|
|
}
|
|
|
|
else if(uni == 'n' && config.tstate == tsOff) {
|
|
addMessage("white");
|
|
if(config.data.whitetexture() && config.data.loadTextureGL()) {
|
|
config.tstate = config.tstate_max = tsActive;
|
|
config.perform_mapping();
|
|
config.finish_mapping();
|
|
mapeditor::initdraw(cwt.c);
|
|
pushScreen(mapeditor::showDrawEditor);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
else if(uni == 't' && config.tstate == tsOff)
|
|
config.tstate = config.tstate_max;
|
|
|
|
else if(uni == 't' && config.tstate == tsAdjusting) {
|
|
config.tstate = config.tstate_max = tsActive;
|
|
config.finish_mapping();
|
|
}
|
|
|
|
else if(uni == 't' && config.tstate == tsActive)
|
|
config.tstate = tsOff;
|
|
|
|
else if(uni == 'T' && config.tstate == tsAdjusting) {
|
|
config.tstate = tsOff;
|
|
config.tstate_max = tsOff;
|
|
}
|
|
|
|
else if(uni == 'T' && config.tstate == tsActive)
|
|
config.tstate = tsAdjusting;
|
|
|
|
else if(uni == 'g' && config.tstate == tsActive)
|
|
dialog::openColorDialog(config.grid_color, NULL);
|
|
else if(uni == 'm' && config.tstate == tsActive)
|
|
dialog::openColorDialog(config.mesh_color, NULL);
|
|
|
|
else if(uni == 'M' && config.tstate == tsAdjusting)
|
|
dialog::openColorDialog(config.master_color, NULL);
|
|
else if(uni == 'K' && config.tstate == tsAdjusting)
|
|
dialog::openColorDialog(config.slave_color, NULL);
|
|
|
|
else if(uni == 'c' && config.tstate == tsActive) {
|
|
dialog::editNumber(config.color_alpha, 0, 255, 15, 0, XLAT("color alpha"),
|
|
XLAT("The higher the value, the less important the color of underlying terrain is."));
|
|
}
|
|
else if(uni == 'P') {
|
|
dialog::editNumber(config.gsplits, 0, 4, 1, 1, XLAT("precision"),
|
|
XLAT("precision"));
|
|
if(config.tstate == tsActive) dialog::reaction = [] () { config.finish_mapping();
|
|
};
|
|
}
|
|
else if(uni == 'S' && config.tstate == tsAdjusting)
|
|
dialog::openFileDialog(config.texturename, XLAT("save the raw texture"), ".png",
|
|
[] () {
|
|
config.data.saveRawTexture(config.texturename); return true;
|
|
});
|
|
else if(uni == 'S' && config.tstate == tsActive)
|
|
dialog::openFileDialog(config.texturename, XLAT("save the full texture image"), ".png",
|
|
[] () {
|
|
config.saveFullTexture(config.texturename);
|
|
return true;
|
|
});
|
|
else if(uni == SDLK_F1)
|
|
gotoHelp(texturehelp);
|
|
else if(doexiton(sym, uni))
|
|
popScreen();
|
|
};
|
|
}
|
|
|
|
typedef pair<int,int> point;
|
|
|
|
point ptc(hyperpoint h) {
|
|
hyperpoint inmodel;
|
|
applymodel(h, inmodel);
|
|
inmodel = config.itt * inmodel;
|
|
inmodel[0] *= vid.radius * 1. / vid.scrsize;
|
|
inmodel[1] *= vid.radius * 1. / vid.scrsize;
|
|
int x = (1 + inmodel[0]) * config.data.twidth / 2;
|
|
int y = (1 + inmodel[1]) * config.data.twidth / 2;
|
|
return make_pair(x,y);
|
|
}
|
|
|
|
array<point, 3> ptc(const array<hyperpoint, 3>& h) {
|
|
return make_array(ptc(h[0]), ptc(h[1]), ptc(h[2]));
|
|
}
|
|
|
|
ld penwidth = .02;
|
|
|
|
int texture_distance(pair<int, int> p1, pair<int, int> p2) {
|
|
return max(abs(p1.first-p2.first), abs(p1.second - p2.second));
|
|
}
|
|
|
|
void fillpixel(int x, int y, unsigned col) {
|
|
if(x<0 || y<0 || x >= config.data.twidth || y >= config.data.twidth) return;
|
|
auto& pix = config.data.get_texture_pixel(x, y);
|
|
if(pix != col) {
|
|
config.data.undos.emplace_back(&pix, pix);
|
|
pix = col;
|
|
}
|
|
}
|
|
|
|
void texture_data::undo() {
|
|
while(!undos.empty()) {
|
|
auto p = undos.back();
|
|
undos.pop_back();
|
|
if(!p.first) {
|
|
loadTextureGL();
|
|
return;
|
|
}
|
|
*p.first = p.second;
|
|
}
|
|
}
|
|
|
|
void texture_data::undoLock() {
|
|
printf("undos size = %d\n", size(undos));
|
|
if(size(undos) > 2000000) {
|
|
// limit undo memory
|
|
int moveto = 0;
|
|
for(int i=0; i < size(undos) - 1000000; i++)
|
|
if(!undos[i].first) moveto = i;
|
|
if(moveto) {
|
|
for(int i=0; i+moveto < size(undos); i++)
|
|
undos[i] = undos[i+moveto];
|
|
undos.resize(size(undos) - moveto);
|
|
printf("undos sized to = %d\n", size(undos));
|
|
}
|
|
}
|
|
|
|
undos.emplace_back(nullptr, 1);
|
|
}
|
|
|
|
void filltriangle(const array<hyperpoint, 3>& v, const array<point, 3>& p, int col, int lev) {
|
|
|
|
int d2 = texture_distance(p[0], p[1]), d1 = texture_distance(p[0], p[2]), d0 = texture_distance(p[1], p[2]);
|
|
|
|
int a, b, c;
|
|
|
|
if((d0 <= 1 && d1 <= 1 && d2 <= 1) || lev >= 20) {
|
|
for(int i=0; i<3; i++)
|
|
fillpixel(p[i].first, p[i].second, col);
|
|
return;
|
|
}
|
|
else if(d1 >= d0 && d1 >= d2)
|
|
a = 0, b = 2, c = 1;
|
|
else if(d2 >= d0 && d2 >= d1)
|
|
a = 0, b = 1, c = 2;
|
|
else
|
|
a = 1, b = 2, c = 0;
|
|
|
|
hyperpoint v3 = mid(v[a], v[b]);
|
|
point p3 = ptc(v3);
|
|
filltriangle(make_array(v[c], v[a], v3), make_array(p[c], p[a], p3), col, lev+1);
|
|
filltriangle(make_array(v[c], v[b], v3), make_array(p[c], p[b], p3), col, lev+1);
|
|
}
|
|
|
|
void splitseg(const transmatrix& A, const array<ld, 2>& angles, const array<hyperpoint, 2>& h, const array<point, 2>& p, int col, int lev) {
|
|
ld newangle = (angles[0] + angles[1]) / 2;
|
|
hyperpoint nh = A * spin(newangle) * xpush(penwidth) * C0;
|
|
auto np = ptc(nh);
|
|
|
|
filltriangle(make_array(h[0],h[1],nh), make_array(p[0],p[1],np), col, lev);
|
|
if(lev < 10) {
|
|
if(texture_distance(p[0],np) > 1)
|
|
splitseg(A, make_array(angles[0], newangle), make_array(h[0], nh), make_array(p[0], np), col, lev+1);
|
|
if(texture_distance(np,p[1]) > 1)
|
|
splitseg(A, make_array(newangle, angles[1]), make_array(nh, h[1]), make_array(np, p[1]), col, lev+1);
|
|
}
|
|
}
|
|
|
|
void fillcircle(hyperpoint h, int col) {
|
|
transmatrix A = rgpushxto0(h);
|
|
|
|
ld step = M_PI * 2/3;
|
|
|
|
array<hyperpoint, 3> mh = make_array(A * xpush(penwidth) * C0, A * spin(step) * xpush(penwidth) * C0, A * spin(-step) * xpush(penwidth) * C0);
|
|
auto mp = ptc(mh);
|
|
|
|
filltriangle(mh, mp, col, 0);
|
|
|
|
for(int i=0; i<3; i++) {
|
|
int j = (i+1) % 3;
|
|
if(texture_distance(mp[i], mp[j]) > 1)
|
|
splitseg(A, make_array(step*i, step*(i+1)), make_array(mh[i], mh[j]), make_array(mp[i], mp[j]), col, 1);
|
|
}
|
|
}
|
|
|
|
bool texturesym = false;
|
|
|
|
void actDrawPixel(cell *c, hyperpoint h, int col) {
|
|
try {
|
|
transmatrix M = gmatrix.at(c);
|
|
auto si = patterns::getpatterninfo0(c);
|
|
h = inverse(M * applyPatterndir(c, si)) * h;
|
|
auto& tinf = config.texture_map[si.id];
|
|
for(auto& M2: tinf.matrices) for(int i = 0; i<c->type; i += si.symmetries) {
|
|
fillcircle(M2 * spin(2 * M_PI * i / c->type) * h, col);
|
|
if(texturesym)
|
|
fillcircle(M2 * spin(2 * M_PI * i / c->type) * Mirror * h, col);
|
|
}
|
|
}
|
|
catch(out_of_range&) {}
|
|
}
|
|
|
|
void drawPixel(cell *c, hyperpoint h, int col) {
|
|
config.data.pixels_to_draw.emplace_back(c, h, col);
|
|
}
|
|
|
|
cell *where;
|
|
|
|
void drawPixel(hyperpoint h, int col) {
|
|
try {
|
|
again:
|
|
transmatrix g0 = gmatrix[where];
|
|
ld cdist0 = hdist(tC0(g0), h);
|
|
|
|
forCellEx(c, where)
|
|
try {
|
|
transmatrix g = gmatrix[c];
|
|
ld cdist = hdist(tC0(g), h);
|
|
if(cdist < cdist0) {
|
|
cdist0 = cdist;
|
|
where = c; g0 = g;
|
|
goto again;
|
|
}
|
|
}
|
|
catch(out_of_range&) {}
|
|
drawPixel(where, h, col);
|
|
}
|
|
catch(out_of_range&) {}
|
|
}
|
|
|
|
void drawLine(hyperpoint h1, hyperpoint h2, int col, int steps) {
|
|
if(steps > 0 && hdist(h1, h2) > penwidth / 3) {
|
|
hyperpoint h3 = mid(h1, h2);
|
|
drawLine(h1, h3, col, steps-1);
|
|
drawLine(h3, h2, col, steps-1);
|
|
}
|
|
else
|
|
drawPixel(h2, col);
|
|
}
|
|
|
|
void texture_config::remap(eTextureState old_tstate, eTextureState old_tstate_max) {
|
|
drawthemap();
|
|
clear_texture_map();
|
|
if(old_tstate == tsActive && patterns::compatible(texture::cgroup, patterns::cgroup)) {
|
|
|
|
config.tstate = old_tstate;
|
|
config.tstate_max = old_tstate_max;
|
|
for(cell *c: dcal) {
|
|
auto si = patterns::getpatterninfo0(c);
|
|
int oldid = si.id;
|
|
|
|
si.id += goldbergcode(c, si);
|
|
|
|
if(texture_map.count(si.id)) continue;
|
|
|
|
int pshift = 0;
|
|
if(texture::cgroup == cpSingle) oldid = 1;
|
|
if(texture::cgroup == cpFootball && patterns::cgroup == cpThree) {
|
|
if(si.id == 4) pshift = 1;
|
|
oldid = !si.id;
|
|
}
|
|
|
|
try {
|
|
|
|
auto& mi = texture_map_orig.at(oldid);
|
|
int ncurr = size(mi.tvertices);
|
|
int ntarget = ncurr * c->type / mi.current_type;
|
|
vector<glvertex> new_tvertices = mi.tvertices;
|
|
new_tvertices.resize(ntarget);
|
|
for(int i=ncurr; i<ntarget; i++) {
|
|
new_tvertices[i] = new_tvertices[i - ncurr];
|
|
}
|
|
|
|
auto& mi2 = texture_map[si.id];
|
|
mi2 = mi;
|
|
mapTexture(c, mi2, si, shmup::ggmatrix(c), pshift);
|
|
mapTexture2(mi2);
|
|
mi2.tvertices = move(new_tvertices);
|
|
// printf("%08x remapping %d vertices to %d vertices\n", si.id, size(mi.tvertices), size(mi2.tvertices));
|
|
}
|
|
catch(out_of_range&) {
|
|
printf("Unexpected missing cell #%d/%d", si.id, oldid);
|
|
addMessage(XLAT("Unexpected missing cell #%d/%d", its(si.id), its(oldid)));
|
|
config.tstate_max = config.tstate = tsAdjusting;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
else if(old_tstate >= tsAdjusting || old_tstate_max >= tsAdjusting) {
|
|
printf("perform_mapping %d/%d\n", config.tstate, config.tstate_max);
|
|
calcparam();
|
|
drawthemap();
|
|
perform_mapping();
|
|
finish_mapping();
|
|
printf("texture_map size = %d\n", size(texture_map));
|
|
}
|
|
}
|
|
|
|
eTextureState old_tstate_cl, old_tstate_max_cl;
|
|
|
|
int textureArgs() {
|
|
using namespace arg;
|
|
|
|
if(0) ;
|
|
else if(argis("-txpic")) {
|
|
shift(); config.texturename = args();
|
|
}
|
|
|
|
else if(argis("-txp")) {
|
|
shift(); config.gsplits = argf();
|
|
}
|
|
|
|
else if(argis("-txc")) {
|
|
shift(); config.configname = args();
|
|
}
|
|
|
|
else if(argis("-txc")) {
|
|
shift(); config.configname = args();
|
|
}
|
|
|
|
else if(argis("-txcl")) {
|
|
PHASE(3); drawscreen();
|
|
config.load();
|
|
old_tstate_cl = texture::config.tstate;
|
|
old_tstate_max_cl = texture::config.tstate_max;
|
|
}
|
|
|
|
else if(argis("-txremap")) {
|
|
texture::config.remap(old_tstate_cl, old_tstate_max_cl);
|
|
}
|
|
|
|
else return 1;
|
|
return 0;
|
|
}
|
|
|
|
auto texture_hook =
|
|
addHook(hooks_args, 100, textureArgs)
|
|
+ addHook(clearmemory, 100, [] () { config.data.pixels_to_draw.clear(); });
|
|
|
|
int lastupdate;
|
|
|
|
void texture_data::update() {
|
|
if(!pixels_to_draw.empty()) {
|
|
auto t = SDL_GetTicks();
|
|
while(SDL_GetTicks() < t + 75 && !pixels_to_draw.empty()) {
|
|
auto p = pixels_to_draw.back();
|
|
actDrawPixel(get<0>(p), get<1>(p), get<2>(p));
|
|
pixels_to_draw.pop_back();
|
|
}
|
|
loadTextureGL();
|
|
}
|
|
}
|
|
|
|
}
|
|
#endif
|