2016-08-26 09:58:03 +00:00
|
|
|
// Hyperbolic Rogue -- cells
|
|
|
|
// Copyright (C) 2011-2016 Zeno Rogue, see 'hyper.cpp' for details
|
2015-08-08 13:57:52 +00:00
|
|
|
|
|
|
|
// cells the game is played on
|
|
|
|
|
|
|
|
int fix6(int a) { return (a+96)% 6; }
|
2016-01-02 10:09:13 +00:00
|
|
|
int fix7(int a) { return (a+84)% 7; }
|
2015-08-08 13:57:52 +00:00
|
|
|
|
2016-08-26 09:58:03 +00:00
|
|
|
int dirdiff(int dd, int t) {
|
|
|
|
dd %= t;
|
|
|
|
if(dd<0) dd += t;
|
|
|
|
if(t-dd < dd) dd = t-dd;
|
|
|
|
return dd;
|
|
|
|
}
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
struct cell : gcell {
|
|
|
|
char type; // 6 for hexagons, 7 for heptagons
|
|
|
|
unsigned char spn[7];
|
|
|
|
heptagon *master;
|
|
|
|
cell *mov[7]; // meaning very similar to heptagon::move
|
|
|
|
};
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
int fixdir(int a, cell *c) { a %= c->type; if(a<0) a += c->type; return a; }
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
int cellcount = 0;
|
|
|
|
|
|
|
|
void initcell(cell *c); // from game.cpp
|
|
|
|
|
|
|
|
cell *newCell(int type, heptagon *master) {
|
|
|
|
cell *c = new cell;
|
|
|
|
cellcount++;
|
|
|
|
c->type = type;
|
|
|
|
c->master = master;
|
|
|
|
for(int i=0; i<7; i++) c->mov[i] = NULL;
|
|
|
|
initcell(c);
|
|
|
|
return c;
|
|
|
|
}
|
|
|
|
|
|
|
|
void merge(cell *c, int d, cell *c2, int d2) {
|
|
|
|
c->mov[d] = c2;
|
|
|
|
c->spn[d] = d2;
|
|
|
|
c2->mov[d2] = c;
|
|
|
|
c2->spn[d2] = d;
|
|
|
|
}
|
|
|
|
|
|
|
|
typedef unsigned short eucoord;
|
|
|
|
|
2016-08-26 09:58:03 +00:00
|
|
|
#include <map>
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
cell*& euclideanAtCreate(eucoord x, eucoord y);
|
|
|
|
|
|
|
|
union heptacoder {
|
|
|
|
heptagon *h;
|
|
|
|
struct { eucoord x; eucoord y; } c;
|
|
|
|
};
|
|
|
|
|
|
|
|
void decodeMaster(heptagon *h, eucoord& x, eucoord& y) {
|
|
|
|
heptacoder u;
|
|
|
|
u.h = h; x = u.c.x; y = u.c.y;
|
|
|
|
}
|
|
|
|
|
|
|
|
heptagon* encodeMaster(eucoord x, eucoord y) {
|
|
|
|
heptacoder u;
|
|
|
|
u.c.x = x; u.c.y = y;
|
|
|
|
return u.h;
|
|
|
|
}
|
|
|
|
|
|
|
|
// very similar to createMove in heptagon.cpp
|
|
|
|
cell *createMov(cell *c, int d) {
|
|
|
|
|
|
|
|
if(euclid && !c->mov[d]) {
|
|
|
|
eucoord x, y;
|
|
|
|
decodeMaster(c->master, x, y);
|
|
|
|
for(int dx=-1; dx<=1; dx++)
|
|
|
|
for(int dy=-1; dy<=1; dy++)
|
|
|
|
euclideanAtCreate(x+dx, y+dy);
|
|
|
|
if(!c->mov[d]) { printf("fail!\n"); }
|
|
|
|
}
|
|
|
|
|
|
|
|
if(c->mov[d]) return c->mov[d];
|
2016-08-26 09:58:03 +00:00
|
|
|
else if(purehepta) {
|
|
|
|
heptagon *h2 = createStep(c->master, d);
|
|
|
|
c->mov[d] = h2->c7;
|
|
|
|
c->spn[d] = c->master->spin[d];
|
|
|
|
h2->c7->mov[c->spn[d]] = c;
|
|
|
|
h2->c7->spn[c->spn[d]] = d;
|
|
|
|
}
|
2015-08-08 13:57:52 +00:00
|
|
|
else if(c->type == 7) {
|
|
|
|
cell *n = newCell(6, c->master);
|
|
|
|
|
|
|
|
c->mov[d] = n; n->mov[0] = c;
|
|
|
|
c->spn[d] = 0; n->spn[0] = d;
|
|
|
|
|
|
|
|
heptspin hs; hs.h = c->master; hs.spin = d;
|
|
|
|
|
|
|
|
heptspin hs2 = hsstep(hsspin(hs, 3), 3);
|
|
|
|
|
|
|
|
// merge(hs2.h->c7, hs2.spin, n, 2);
|
|
|
|
|
|
|
|
hs2.h->c7->mov[hs2.spin] = n; n->mov[2] = hs2.h->c7;
|
|
|
|
hs2.h->c7->spn[hs2.spin] = 2; n->spn[2] = hs2.spin;
|
|
|
|
|
|
|
|
hs2 = hsstep(hsspin(hs, 4), 4);
|
|
|
|
// merge(hs2.h->c7, hs2.spin, n, 4);
|
|
|
|
hs2.h->c7->mov[hs2.spin] = n; n->mov[4] = hs2.h->c7;
|
|
|
|
hs2.h->c7->spn[hs2.spin] = 4; n->spn[4] = hs2.spin;
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
else if(d == 5) {
|
|
|
|
int di = fixrot(c->spn[0]+1);
|
|
|
|
cell *c2 = createMov(c->mov[0], di);
|
|
|
|
merge(c, 5, c2, fix6(c->mov[0]->spn[di] + 1));
|
|
|
|
|
|
|
|
// c->mov[5] = c->mov[0]->mov[fixrot(c->spn[0]+1)];
|
|
|
|
// c->spn[5] = fix6(c->mov[0]->spn[fixrot(c->spn[0]+1)] + 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
else if(d == 1) {
|
|
|
|
int di = fixrot(c->spn[0]-1);
|
|
|
|
cell *c2 = createMov(c->mov[0], di);
|
|
|
|
merge(c, 1, c2, fix6(c->mov[0]->spn[di] - 1));
|
|
|
|
|
|
|
|
// c->mov[1] = c->mov[0]->mov[fixrot(c->spn[0]-1)];
|
|
|
|
// c->spn[1] = fix6(c->mov[0]->spn[fixrot(c->spn[0]-1)] - 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
else if(d == 3) {
|
|
|
|
int di = fixrot(c->spn[2]-1);
|
|
|
|
cell *c2 = createMov(c->mov[2], di);
|
|
|
|
merge(c, 3, c2, fix6(c->mov[2]->spn[di] - 1));
|
|
|
|
// c->mov[3] = c->mov[2]->mov[fixrot(c->spn[2]-1)];
|
|
|
|
// c->spn[3] = fix6(c->mov[2]->spn[fixrot(c->spn[2]-1)] - 1);
|
|
|
|
}
|
|
|
|
return c->mov[d];
|
|
|
|
}
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
cell *createMovR(cell *c, int d) {
|
|
|
|
d %= 42; d += 42; d %= c->type;
|
|
|
|
return createMov(c, d);
|
|
|
|
}
|
|
|
|
|
|
|
|
cell *getMovR(cell *c, int d) {
|
|
|
|
d %= 42; d += 42; d %= c->type;
|
|
|
|
return c->mov[d];
|
|
|
|
}
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
// similar to heptspin from heptagon.cpp
|
|
|
|
struct cellwalker {
|
|
|
|
cell *c;
|
|
|
|
int spin;
|
|
|
|
cellwalker(cell *c, int spin) : c(c), spin(spin) {}
|
|
|
|
cellwalker() {}
|
|
|
|
};
|
|
|
|
|
|
|
|
void cwspin(cellwalker& cw, int d) {
|
|
|
|
cw.spin = (cw.spin+d + 42) % cw.c->type;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool cwstepcreates(cellwalker& cw) {
|
|
|
|
return cw.c->mov[cw.spin] == NULL;
|
|
|
|
}
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
cell *cwpeek(cellwalker cw, int dir) {
|
|
|
|
return createMov(cw.c, (cw.spin+42+dir) % cw.c->type);
|
|
|
|
}
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
void cwstep(cellwalker& cw) {
|
|
|
|
createMov(cw.c, cw.spin);
|
|
|
|
int nspin = cw.c->spn[cw.spin];
|
|
|
|
cw.c = cw.c->mov[cw.spin];
|
|
|
|
cw.spin = nspin;
|
|
|
|
}
|
|
|
|
|
|
|
|
void eumerge(cell* c1, cell *c2, int s1, int s2) {
|
|
|
|
if(!c2) return;
|
|
|
|
c1->mov[s1] = c2; c1->spn[s1] = s2;
|
|
|
|
c2->mov[s2] = c1; c2->spn[s2] = s1;
|
|
|
|
}
|
|
|
|
|
|
|
|
struct euclideanSlab {
|
|
|
|
cell* a[256][256];
|
|
|
|
euclideanSlab() {
|
|
|
|
for(int y=0; y<256; y++) for(int x=0; x<256; x++)
|
|
|
|
a[y][x] = NULL;
|
|
|
|
}
|
|
|
|
~euclideanSlab() {
|
|
|
|
for(int y=0; y<256; y++) for(int x=0; x<256; x++)
|
|
|
|
if(a[y][x]) delete a[y][x];
|
|
|
|
}
|
|
|
|
};
|
|
|
|
|
|
|
|
euclideanSlab* euclidean[256][256];
|
|
|
|
|
|
|
|
// map<pair<eucoord, eucoord>, cell*> euclidean;
|
|
|
|
|
|
|
|
cell*& euclideanAt(eucoord x, eucoord y) {
|
|
|
|
euclideanSlab*& slab(euclidean[y>>8][x>>8]);
|
|
|
|
if(!slab) slab = new euclideanSlab;
|
|
|
|
return slab->a[y&255][x&255];
|
|
|
|
}
|
|
|
|
|
|
|
|
cell*& euclideanAtCreate(eucoord x, eucoord y) {
|
|
|
|
cell*& c ( euclideanAt(x,y) );
|
|
|
|
if(!c) {
|
|
|
|
c = newCell(6, &origin);
|
|
|
|
c->master = encodeMaster(x,y);
|
|
|
|
euclideanAt(x,y) = c;
|
|
|
|
eumerge(c, euclideanAt(x+1,y), 0, 3);
|
|
|
|
eumerge(c, euclideanAt(x,y+1), 1, 4);
|
|
|
|
eumerge(c, euclideanAt(x-1,y+1), 2, 5);
|
|
|
|
eumerge(c, euclideanAt(x-1,y), 3, 0);
|
|
|
|
eumerge(c, euclideanAt(x,y-1), 4, 1);
|
|
|
|
eumerge(c, euclideanAt(x+1,y-1), 5, 2);
|
|
|
|
}
|
|
|
|
return c;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// initializer (also inits origin from heptagon.cpp)
|
|
|
|
void initcells() {
|
2016-08-26 09:58:03 +00:00
|
|
|
DEBB(DF_INIT, (debugfile,"initcells\n"));
|
2015-08-08 13:57:52 +00:00
|
|
|
|
|
|
|
origin.s = hsOrigin;
|
2016-01-02 10:09:13 +00:00
|
|
|
origin.emeraldval = 98;
|
|
|
|
origin.zebraval = 40;
|
|
|
|
origin.fiftyval = 0;
|
2016-08-26 09:58:03 +00:00
|
|
|
#ifdef CDATA
|
|
|
|
origin.rval0 = origin.rval1 = 0;
|
|
|
|
origin.cdata = NULL;
|
|
|
|
#endif
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
for(int i=0; i<7; i++) origin.move[i] = NULL;
|
|
|
|
origin.alt = NULL;
|
|
|
|
origin.distance = 0;
|
|
|
|
if(euclid)
|
|
|
|
origin.c7 = euclideanAtCreate(0,0);
|
|
|
|
else
|
|
|
|
origin.c7 = newCell(7, &origin);
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
// origin.emeraldval =
|
2015-08-08 13:57:52 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
#define DEBMEM(x) // { x fflush(stdout); }
|
|
|
|
|
|
|
|
void clearcell(cell *c) {
|
|
|
|
if(!c) return;
|
|
|
|
DEBMEM ( printf("c%d %p\n", c->type, c); )
|
|
|
|
for(int t=0; t<c->type; t++) if(c->mov[t]) {
|
|
|
|
DEBMEM ( printf("mov %p [%p] S%d\n", c->mov[t], c->mov[t]->mov[c->spn[t]], c->spn[t]); )
|
|
|
|
if(c->mov[t]->mov[c->spn[t]] != NULL &&
|
|
|
|
c->mov[t]->mov[c->spn[t]] != c) {
|
|
|
|
printf("cell error\n");
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
c->mov[t]->mov[c->spn[t]] = NULL;
|
|
|
|
}
|
|
|
|
DEBMEM ( printf("DEL %p\n", c); )
|
|
|
|
delete c;
|
|
|
|
}
|
|
|
|
|
|
|
|
heptagon deletion_marker;
|
|
|
|
|
|
|
|
#include <queue>
|
|
|
|
void clearfrom(heptagon *at) {
|
|
|
|
queue<heptagon*> q;
|
|
|
|
q.push(at);
|
|
|
|
at->alt = &deletion_marker;
|
|
|
|
//int maxq = 0;
|
|
|
|
while(!q.empty()) {
|
|
|
|
at = q.front();
|
|
|
|
// if(q.size() > maxq) maxq = q.size();
|
|
|
|
q.pop();
|
|
|
|
DEBMEM ( printf("from %p\n", at); )
|
|
|
|
for(int i=0; i<7; i++) if(at->move[i]) {
|
|
|
|
if(at->move[i]->alt != &deletion_marker)
|
|
|
|
q.push(at->move[i]);
|
|
|
|
at->move[i]->alt = &deletion_marker;
|
|
|
|
DEBMEM ( printf("!mov %p [%p]\n", at->move[i], at->move[i]->move[at->spin[i]]); )
|
|
|
|
if(at->move[i]->move[at->spin[i]] != NULL &&
|
|
|
|
at->move[i]->move[at->spin[i]] != at) {
|
|
|
|
printf("hept error\n");
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
at->move[i]->move[at->spin[i]] = NULL;
|
|
|
|
at->move[i] = NULL;
|
|
|
|
}
|
|
|
|
DEBMEM ( printf("at %p\n", at); )
|
|
|
|
if(at->c7) {
|
2016-08-26 09:58:03 +00:00
|
|
|
if(!purehepta) for(int i=0; i<7; i++)
|
2015-08-08 13:57:52 +00:00
|
|
|
clearcell(at->c7->mov[i]);
|
|
|
|
clearcell(at->c7);
|
|
|
|
}
|
|
|
|
DEBMEM ( printf("!DEL %p\n", at); )
|
|
|
|
if(at != &origin) delete at;
|
|
|
|
}
|
|
|
|
//printf("maxq = %d\n", maxq);
|
|
|
|
}
|
|
|
|
|
|
|
|
void verifycell(cell *c) {
|
|
|
|
int t = c->type;
|
|
|
|
for(int i=0; i<t; i++) {
|
|
|
|
cell *c2 = c->mov[i];
|
|
|
|
if(c2) {
|
2016-08-26 09:58:03 +00:00
|
|
|
if(t == 7 && !purehepta) verifycell(c2);
|
2015-08-08 13:57:52 +00:00
|
|
|
if(c2->mov[c->spn[i]] && c2->mov[c->spn[i]] != c)
|
|
|
|
printf("cell error %p %p\n", c, c2);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void verifycells(heptagon *at) {
|
|
|
|
for(int i=0; i<7; i++) if(at->move[i] && at->spin[i] == 0 && at->move[i] != &origin)
|
|
|
|
verifycells(at->move[i]);
|
|
|
|
for(int i=0; i<7; i++) if(at->move[i] && at->move[i]->move[at->spin[i]] && at->move[i]->move[at->spin[i]] != at) {
|
|
|
|
printf("hexmix error %p %p %p\n", at, at->move[i], at->move[i]->move[at->spin[i]]);
|
|
|
|
}
|
|
|
|
verifycell(at->c7);
|
|
|
|
}
|
|
|
|
|
|
|
|
bool ishept(cell *c) {
|
|
|
|
// EUCLIDEAN
|
|
|
|
if(euclid) {
|
|
|
|
eucoord x, y;
|
|
|
|
decodeMaster(c->master, x, y);
|
|
|
|
return (short(y+2*x))%3 == 0;
|
|
|
|
}
|
|
|
|
else return c->type == 7;
|
|
|
|
}
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
bool ishex1(cell *c) {
|
|
|
|
// EUCLIDEAN
|
|
|
|
if(euclid) {
|
|
|
|
eucoord x, y;
|
|
|
|
decodeMaster(c->master, x, y);
|
|
|
|
short z = (short(y+2*x))%3;
|
|
|
|
if(z<0) z += 3;
|
|
|
|
return z == 1;
|
|
|
|
}
|
|
|
|
else return c->type == 7;
|
|
|
|
}
|
|
|
|
|
|
|
|
int emeraldval(cell *c) {
|
2015-08-08 13:57:52 +00:00
|
|
|
if(euclid) return 0;
|
|
|
|
if(c->type == 7)
|
2016-01-02 10:09:13 +00:00
|
|
|
return c->master->emeraldval >> 3;
|
2015-08-08 13:57:52 +00:00
|
|
|
else {
|
2016-01-02 10:09:13 +00:00
|
|
|
return emerald_hexagon(
|
|
|
|
emeraldval(createMov(c,0)),
|
|
|
|
emeraldval(createMov(c,2)),
|
|
|
|
emeraldval(createMov(c,4))
|
2015-08-08 13:57:52 +00:00
|
|
|
);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int eudist(short sx, short sy) {
|
|
|
|
int z0 = abs(sx);
|
|
|
|
int z1 = abs(sy);
|
|
|
|
int z2 = abs(sx+sy);
|
|
|
|
return max(max(z0,z1), z2);
|
|
|
|
}
|
|
|
|
|
|
|
|
int celldist(cell *c) {
|
|
|
|
if(euclid) {
|
|
|
|
eucoord x, y;
|
|
|
|
decodeMaster(c->master, x, y);
|
|
|
|
return eudist(x, y);
|
|
|
|
}
|
|
|
|
if(c->type == 7) return c->master->distance;
|
|
|
|
int dx[3];
|
|
|
|
for(int u=0; u<3; u++)
|
|
|
|
dx[u] = createMov(c, u+u)->master->distance;
|
|
|
|
int mi = min(min(dx[0], dx[1]), dx[2]);
|
|
|
|
if(dx[0] > mi+2 || dx[1] > mi+2 || dx[2] > mi+2)
|
|
|
|
return -1; // { printf("cycle error!\n"); exit(1); }
|
|
|
|
if(dx[0] == mi+2 || dx[1] == mi+2 || dx[2] == mi+2)
|
|
|
|
return mi+1;
|
|
|
|
return mi;
|
|
|
|
}
|
|
|
|
|
|
|
|
#define ALTDIST_BOUNDARY 99999
|
|
|
|
#define ALTDIST_UNKNOWN 99998
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
#define ALTDIST_ERROR 90000
|
|
|
|
|
2015-08-08 13:57:52 +00:00
|
|
|
// defined in 'game'
|
|
|
|
int euclidAlt(short x, short y);
|
|
|
|
|
|
|
|
int celldistAlt(cell *c) {
|
|
|
|
if(euclid) {
|
|
|
|
eucoord x, y;
|
|
|
|
decodeMaster(c->master, x, y);
|
|
|
|
return euclidAlt(x, y);
|
|
|
|
}
|
|
|
|
if(c->type == 7) return c->master->alt->distance;
|
|
|
|
int dx[3];
|
|
|
|
for(int u=0; u<3; u++) if(createMov(c, u+u)->master->alt == NULL)
|
|
|
|
return ALTDIST_UNKNOWN;
|
|
|
|
for(int u=0; u<3; u++)
|
|
|
|
dx[u] = createMov(c, u+u)->master->alt->distance;
|
|
|
|
int mi = min(min(dx[0], dx[1]), dx[2]);
|
|
|
|
if(dx[0] > mi+2 || dx[1] > mi+2 || dx[2] > mi+2)
|
|
|
|
return ALTDIST_BOUNDARY; // { printf("cycle error!\n"); exit(1); }
|
|
|
|
if(dx[0] == mi+2 || dx[1] == mi+2 || dx[2] == mi+2)
|
|
|
|
return mi+1;
|
|
|
|
return mi;
|
|
|
|
}
|
|
|
|
|
|
|
|
#define GRAIL_FOUND 0x4000
|
|
|
|
#define GRAIL_RADIUS_MASK 0x3FFF
|
2016-01-02 10:09:13 +00:00
|
|
|
|
|
|
|
int dirfromto(cell *cfrom, cell *cto) {
|
|
|
|
for(int i=0; i<cfrom->type; i++) if(cfrom->mov[i] == cto) return i;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
// === FIFTYVALS ===
|
|
|
|
|
|
|
|
unsigned bitmajority(unsigned a, unsigned b, unsigned c) {
|
|
|
|
return (a&b) | ((a^b)&c);
|
|
|
|
}
|
|
|
|
|
|
|
|
int fiftyval(cell *c) {
|
|
|
|
if(euclid) return 0;
|
|
|
|
if(c->type == 7)
|
|
|
|
return c->master->fiftyval;
|
|
|
|
else {
|
|
|
|
return bitmajority(
|
|
|
|
fiftyval(createMov(c,0)),
|
|
|
|
fiftyval(createMov(c,2)),
|
|
|
|
fiftyval(createMov(c,4))) + 512;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int cdist50(cell *c) {
|
|
|
|
if(euclid) {
|
|
|
|
eucoord x, y;
|
|
|
|
decodeMaster(c->master, x, y);
|
|
|
|
int ix = short(x) + 99999 + short(y);
|
|
|
|
int iy = short(y) + 99999;
|
2016-08-26 09:58:03 +00:00
|
|
|
if(c->land == laPalace) {
|
|
|
|
char palacemap[3][10] = {
|
|
|
|
"012333321",
|
|
|
|
"112322232",
|
|
|
|
"222321123"
|
|
|
|
};
|
|
|
|
ix += (iy/3) * 3;
|
|
|
|
iy %= 3; ix %= 9;
|
|
|
|
return palacemap[iy][ix] - '0';
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
const char *westmap = "0123333332112332223322233211233333322";
|
|
|
|
int id = ix + iy * 26 + 28;
|
|
|
|
return westmap[id % 37] - '0';
|
|
|
|
}
|
2016-01-02 10:09:13 +00:00
|
|
|
}
|
|
|
|
if(c->type == 7) return cdist50(fiftyval(c));
|
|
|
|
int a0 = cdist50(createMov(c,0));
|
|
|
|
int a1 = cdist50(createMov(c,2));
|
|
|
|
int a2 = cdist50(createMov(c,4));
|
|
|
|
if(a0 == 0 || a1 == 0 || a2 == 0) return 1;
|
|
|
|
return a0+a1+a2-5;
|
|
|
|
}
|
|
|
|
|
|
|
|
int land50(cell *c) {
|
|
|
|
if(c->type == 7) return land50(fiftyval(c));
|
|
|
|
else {
|
|
|
|
if(cdist50(createMov(c,0)) < 3) return land50(createMov(c,0));
|
|
|
|
if(cdist50(createMov(c,2)) < 3) return land50(createMov(c,2));
|
|
|
|
if(cdist50(createMov(c,4)) < 3) return land50(createMov(c,4));
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int polara50(cell *c) {
|
|
|
|
if(c->type == 7) return polara50(fiftyval(c));
|
|
|
|
else {
|
|
|
|
if(cdist50(createMov(c,0)) < 3) return polara50(createMov(c,0));
|
|
|
|
if(cdist50(createMov(c,2)) < 3) return polara50(createMov(c,2));
|
|
|
|
if(cdist50(createMov(c,4)) < 3) return polara50(createMov(c,4));
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int polarb50(cell *c) {
|
|
|
|
if(euclid) return true;
|
|
|
|
if(c->type == 7) return polarb50(fiftyval(c));
|
|
|
|
else {
|
|
|
|
if(cdist50(createMov(c,0)) < 3) return polarb50(createMov(c,0));
|
|
|
|
if(cdist50(createMov(c,2)) < 3) return polarb50(createMov(c,2));
|
|
|
|
if(cdist50(createMov(c,4)) < 3) return polarb50(createMov(c,4));
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int elhextable[28][3] = {
|
|
|
|
{0,1,2}, {1,2,9}, {1,9,-1}, {1,8,-1}, {1,-1,-1}
|
|
|
|
};
|
|
|
|
|
|
|
|
int fiftyval049(cell *c) {
|
|
|
|
if(c->type == 7) return fiftyval(c) / 32;
|
|
|
|
else {
|
|
|
|
int a[3], qa=0;
|
|
|
|
int pa = polara50(c), pb = polarb50(c);
|
|
|
|
for(int i=0; i<6; i+=2) {
|
|
|
|
cell *c2 = c->mov[i];
|
|
|
|
if(polara50(c2) == pa && polarb50(c2) == pb)
|
|
|
|
a[qa++] = fiftyval049(c2);
|
|
|
|
}
|
|
|
|
// 0-1-2
|
|
|
|
sort(a, a+qa);
|
|
|
|
if(qa == 1) return 43+a[0]-1;
|
|
|
|
if(qa == 2 && a[1] == a[0]+7) return 36+a[0]-1;
|
|
|
|
if(qa == 2 && a[1] != a[0]+7) return 29+a[0]-1;
|
|
|
|
if(a[1] == 1 && a[2] == 7)
|
|
|
|
return 15 + 6;
|
|
|
|
if(a[2] >= 1 && a[2] <= 7)
|
|
|
|
return 15 + a[1]-1;
|
|
|
|
if(a[0] == 1 && a[1] == 7 && a[2] == 8)
|
|
|
|
return 22;
|
|
|
|
if(a[1] <= 7 && a[2] >= 8)
|
|
|
|
return 22 + a[1]-1;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
{0,1,2} 15+0..15+6
|
|
|
|
{1,2,9},22+0..22+6
|
|
|
|
{1,9} 29+0..29+6
|
|
|
|
{1,8} 36+0..36+6
|
|
|
|
{1} 43+0..43+6
|
|
|
|
*/
|
|
|
|
|
|
|
|
// zebraval
|
|
|
|
|
|
|
|
int zebra40(cell *c) {
|
|
|
|
if(c->type == 7) return (c->master->zebraval/10);
|
|
|
|
else {
|
|
|
|
int ii[3], z;
|
|
|
|
ii[0] = (c->mov[0]->master->zebraval/10);
|
|
|
|
ii[1] = (c->mov[2]->master->zebraval/10);
|
|
|
|
ii[2] = (c->mov[4]->master->zebraval/10);
|
|
|
|
for(int r=0; r<2; r++)
|
|
|
|
if(ii[1] < ii[0] || ii[2] < ii[0])
|
|
|
|
z = ii[0], ii[0] = ii[1], ii[1] = ii[2], ii[2] = z;
|
|
|
|
for(int i=0; i<28; i++)
|
|
|
|
if(zebratable6[i][0] == ii[0] && zebratable6[i][1] == ii[1] &&
|
|
|
|
zebratable6[i][2] == ii[2]) {
|
|
|
|
int ans = 16+i;
|
|
|
|
// if(ans >= 40) ans ^= 2;
|
|
|
|
// if(ans >= 4 && ans < 16) ans ^= 2;
|
|
|
|
return ans;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int zebra3(cell *c) {
|
|
|
|
if(c->type == 7) return (c->master->zebraval/10)/4;
|
|
|
|
else {
|
|
|
|
int ii[3];
|
|
|
|
ii[0] = (c->mov[0]->master->zebraval/10)/4;
|
|
|
|
ii[1] = (c->mov[2]->master->zebraval/10)/4;
|
|
|
|
ii[2] = (c->mov[4]->master->zebraval/10)/4;
|
|
|
|
if(ii[0] == ii[1]) return ii[0];
|
|
|
|
if(ii[1] == ii[2]) return ii[1];
|
|
|
|
if(ii[2] == ii[0]) return ii[2];
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2016-08-26 09:58:03 +00:00
|
|
|
#define RPV_MODULO 5
|
|
|
|
|
|
|
|
#define RPV_RAND 0
|
|
|
|
#define RPV_ZEBRA 1
|
|
|
|
#define RPV_EMERALD 2
|
|
|
|
#define RPV_PALACE 3
|
|
|
|
#define RPV_CYCLE 4
|
|
|
|
|
|
|
|
int getCdata(cell *c, int j);
|
|
|
|
|
|
|
|
// x mod 5 = pattern type
|
|
|
|
// x mod (powers of 2) = pattern type specific
|
|
|
|
// (x/5) mod 15 = picture for drawing floors
|
|
|
|
// x mod 7 = chance of pattern-specific pic
|
|
|
|
// whole = randomization
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
bool randpattern(cell *c, int rval) {
|
|
|
|
int i, sw=0;
|
2016-08-26 09:58:03 +00:00
|
|
|
switch(rval%5) {
|
2016-01-02 10:09:13 +00:00
|
|
|
case 0:
|
2016-08-26 09:58:03 +00:00
|
|
|
if(rval&1) {
|
|
|
|
return hrandpos() < rval;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
int cd = getCdata(c, 0);
|
|
|
|
return !((cd/(((rval/2)&15)+1))&1);
|
|
|
|
}
|
2016-01-02 10:09:13 +00:00
|
|
|
case 1:
|
|
|
|
i = zebra40(c);
|
|
|
|
if(i&1) { if(rval&4) sw^=1; i &= ~1; }
|
|
|
|
if(i&2) { if(rval&8) sw^=1; i &= ~2; }
|
|
|
|
i >>= 2;
|
|
|
|
i--; i /= 3;
|
|
|
|
if(rval & (16<<i)) sw^=1;
|
|
|
|
return sw;
|
|
|
|
case 2:
|
|
|
|
i = emeraldval(c);
|
|
|
|
if(i&1) { if(rval&4) sw^=1; i &= ~1; }
|
|
|
|
if(i&2) { if(rval&8) sw^=1; i &= ~2; }
|
2016-08-26 09:58:03 +00:00
|
|
|
i >>= 2; i--;
|
2016-01-02 10:09:13 +00:00
|
|
|
if(rval & (16<<i)) sw^=1;
|
|
|
|
return sw;
|
|
|
|
case 3:
|
|
|
|
if(polara50(c)) { if(rval&4) sw^=1; }
|
|
|
|
if(polarb50(c)) { if(rval&8) sw^=1; }
|
2016-08-26 09:58:03 +00:00
|
|
|
i = fiftyval049(c); i += 6; i /= 7;
|
2016-01-02 10:09:13 +00:00
|
|
|
if(rval & (16<<i)) sw^=1;
|
|
|
|
return sw;
|
2016-08-26 09:58:03 +00:00
|
|
|
case 4:
|
|
|
|
i = (rval&3);
|
|
|
|
if(i == 1 && (celldist(c)&1)) sw ^= 1;
|
|
|
|
if(i == 2 && (celldist(c)&2)) sw ^= 1;
|
|
|
|
if(i == 3 && ((celldist(c)/3)&1)) sw ^= 1;
|
|
|
|
if(rval & (4<<towerval(c, celldist))) sw ^= 1;
|
|
|
|
return sw;
|
2016-01-02 10:09:13 +00:00
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2016-08-26 09:58:03 +00:00
|
|
|
extern int randompattern[landtypes];
|
|
|
|
|
|
|
|
string describeRPM(eLand l) {
|
|
|
|
int rval = randompattern[l];
|
|
|
|
switch(rval%5) {
|
|
|
|
case 0:
|
|
|
|
if(rval&1)
|
|
|
|
return "R:"+its(rval/(HRANDMAX/100))+"%";
|
|
|
|
else
|
|
|
|
return "Landscape/"+its(((rval/2)&15)+1);
|
|
|
|
case 1:
|
|
|
|
return "Z/"+its((rval>>2)&3)+"/"+its((rval>>4)&15);
|
|
|
|
case 2:
|
|
|
|
return "E/"+its((rval>>2)&3)+"/"+its((rval>>4)&2047);
|
|
|
|
case 3:
|
|
|
|
return "P/"+its((rval>>2)&3)+"/"+its((rval>>4)&255);
|
|
|
|
case 4:
|
|
|
|
return "C/"+its(rval&3)+"/"+its((rval>>2)&65535);
|
|
|
|
}
|
|
|
|
return "?";
|
|
|
|
}
|
|
|
|
|
2016-01-02 10:09:13 +00:00
|
|
|
int randpatternCode(cell *c, int rval) {
|
2016-08-26 09:58:03 +00:00
|
|
|
switch(rval % RPV_MODULO) {
|
2016-01-02 10:09:13 +00:00
|
|
|
case 1:
|
|
|
|
return zebra40(c);
|
|
|
|
case 2:
|
|
|
|
return emeraldval(c);
|
|
|
|
case 3:
|
|
|
|
return fiftyval049(c) + (polara50(c)?50:0) + (polarb50(c)?1000:0);
|
2016-08-26 09:58:03 +00:00
|
|
|
case 4:
|
|
|
|
return towerval(c, celldist) * 6 + celldist(c) % 6;
|
2016-01-02 10:09:13 +00:00
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
#define RANDITER 31
|
|
|
|
|
|
|
|
char rpm_memoize[3][256][RANDITER+1];
|
|
|
|
|
|
|
|
void clearMemoRPM() {
|
|
|
|
for(int a=0; a<3; a++) for(int b=0; b<256; b++) for(int i=0; i<RANDITER+1; i++)
|
|
|
|
rpm_memoize[a][b][i] = 2;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool randpatternMajority(cell *c, int ival, int iterations) {
|
|
|
|
int rval = 0;
|
|
|
|
if(ival == 0) rval = randompattern[laCaves];
|
|
|
|
if(ival == 1) rval = randompattern[laLivefjord];
|
|
|
|
if(ival == 2) rval = randompattern[laEmerald];
|
2016-08-26 09:58:03 +00:00
|
|
|
if(rval%RPV_MODULO == RPV_RAND) return randpattern(c, rval);
|
2016-01-02 10:09:13 +00:00
|
|
|
int code = randpatternCode(c, rval);
|
|
|
|
char& memo(rpm_memoize[ival][code][iterations]);
|
|
|
|
if(memo < 2) return memo;
|
|
|
|
int z = 0;
|
|
|
|
if(iterations) for(int i=0; i<c->type; i++) {
|
|
|
|
if(randpatternMajority(createMov(c,i), ival, iterations-1))
|
|
|
|
z++;
|
|
|
|
else
|
|
|
|
z--;
|
|
|
|
}
|
|
|
|
if(z!=0) memo = (z>0);
|
|
|
|
else memo = randpattern(c, rval);
|
|
|
|
// printf("%p] rval = %X code = %d iterations = %d result = %d\n", c, rval, code, iterations, memo);
|
|
|
|
return memo;
|
|
|
|
}
|
2016-08-26 09:58:03 +00:00
|
|
|
|
|
|
|
#ifdef CDATA
|
|
|
|
|
|
|
|
#include <map>
|
|
|
|
map<heptagon*, int> spins;
|
|
|
|
|
|
|
|
#define RVAL_MASK 0x10000000
|
|
|
|
#define DATA_MASK 0x20000000
|
|
|
|
|
|
|
|
struct cdata {
|
|
|
|
int val[4];
|
|
|
|
int bits;
|
|
|
|
};
|
|
|
|
|
|
|
|
map<heptagon*, struct cdata> eucdata;
|
|
|
|
cdata orig_cdata;
|
|
|
|
|
|
|
|
void affect(cdata& d, short rv, signed char signum) {
|
|
|
|
if(rv&1) d.val[0]+=signum; else d.val[0]-=signum;
|
|
|
|
if(rv&2) d.val[1]+=signum; else d.val[1]-=signum;
|
|
|
|
if(rv&4) d.val[2]+=signum; else d.val[2]-=signum;
|
|
|
|
if(rv&8) d.val[3]+=signum; else d.val[3]-=signum;
|
|
|
|
int id = (rv>>4) & 63;
|
|
|
|
if(id < 32)
|
|
|
|
d.bits ^= (1 << id);
|
|
|
|
}
|
|
|
|
|
|
|
|
void setHeptagonRval(heptagon *h) {
|
|
|
|
if(!(h->rval0 || h->rval1)) {
|
|
|
|
h->rval0 = hrand(0x10000);
|
|
|
|
h->rval1 = hrand(0x10000);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
cdata *getHeptagonCdata(heptagon *h) {
|
|
|
|
if(h->cdata) return h->cdata;
|
|
|
|
|
|
|
|
if(h == &origin) {
|
|
|
|
return h->cdata = new cdata(orig_cdata);
|
|
|
|
}
|
|
|
|
|
|
|
|
cdata mydata = *getHeptagonCdata(h->move[0]);
|
|
|
|
|
|
|
|
for(int di=3; di<5; di++) {
|
|
|
|
heptspin hs; hs.h = h; hs.spin = di;
|
|
|
|
int signum = +1;
|
|
|
|
while(true) {
|
|
|
|
heptspin hstab[15];
|
|
|
|
hstab[7] = hs;
|
|
|
|
|
|
|
|
for(int i=8; i<12; i++) {
|
|
|
|
hstab[i] = hsspin(hstab[i-1], (i&1) ? 4 : 3);
|
|
|
|
hstab[i] = hsstep(hstab[i], 0);
|
|
|
|
hstab[i] = hsspin(hstab[i], (i&1) ? 3 : 4);
|
|
|
|
}
|
|
|
|
|
|
|
|
for(int i=6; i>=3; i--) {
|
|
|
|
hstab[i] = hsspin(hstab[i+1], (i&1) ? 3 : 4);
|
|
|
|
hstab[i] = hsstep(hstab[i], 0);
|
|
|
|
hstab[i] = hsspin(hstab[i], (i&1) ? 4 : 3);
|
|
|
|
}
|
|
|
|
|
|
|
|
if(hstab[3].h->distance < hstab[7].h->distance) {
|
|
|
|
hs = hstab[3]; continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
if(hstab[11].h->distance < hstab[7].h->distance) {
|
|
|
|
hs = hstab[11]; continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
int jj = 7;
|
|
|
|
for(int k=3; k<12; k++) if(hstab[k].h->distance < hstab[jj].h->distance) jj = k;
|
|
|
|
|
|
|
|
int ties = 0, tiespos = 0;
|
|
|
|
for(int k=3; k<12; k++) if(hstab[k].h->distance == hstab[jj].h->distance)
|
|
|
|
ties++, tiespos += (k-jj);
|
|
|
|
|
|
|
|
// printf("ties=%d tiespos=%d jj=%d\n", ties, tiespos, jj);
|
|
|
|
if(ties == 2) jj += tiespos/2;
|
|
|
|
|
|
|
|
if(jj&1) signum = -1;
|
|
|
|
hs = hstab[jj];
|
|
|
|
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
hs = hsstep(hsspin(hs, 3), 0);
|
|
|
|
setHeptagonRval(hs.h);
|
|
|
|
|
|
|
|
affect(mydata, hs.spin ? hs.h->rval0 : hs.h->rval1, signum);
|
|
|
|
|
|
|
|
/* if(!(spins[hs.h] & hs.spin)) {
|
|
|
|
spins[hs.h] |= (1<<hs.spin);
|
|
|
|
int t = 0;
|
|
|
|
for(int k=0; k<7; k++) if(spins[hs.h] & (1<<k)) t++;
|
|
|
|
static bool wast[256];
|
|
|
|
if(!wast[spins[hs.h]]) {
|
|
|
|
printf("%p %4x\n", hs.h, spins[hs.h]);
|
|
|
|
wast[spins[hs.h]] = true;
|
|
|
|
}
|
|
|
|
} */
|
|
|
|
}
|
|
|
|
|
|
|
|
return h->cdata = new cdata(mydata);
|
|
|
|
}
|
|
|
|
|
|
|
|
cdata *getEuclidCdata(heptagon *h) {
|
|
|
|
eucoord x, y;
|
|
|
|
if(eucdata.count(h)) return &(eucdata[h]);
|
|
|
|
decodeMaster(h, x, y);
|
|
|
|
|
|
|
|
if(x == 0 && y == 0) {
|
|
|
|
cdata xx;
|
|
|
|
for(int i=0; i<4; i++) xx.val[i] = 0;
|
|
|
|
xx.bits = 0;
|
|
|
|
return &(eucdata[h] = xx);
|
|
|
|
}
|
|
|
|
int ord = 1, bid = 0;
|
|
|
|
while(!((x|y)&ord)) ord <<= 1, bid++;
|
|
|
|
|
|
|
|
for(int k=0; k<3; k++) {
|
|
|
|
eucoord x1 = x + (k<2 ? ord : 0);
|
|
|
|
eucoord y1 = y - (k>0 ? ord : 0);
|
|
|
|
if((x1&ord) || (y1&ord)) continue;
|
|
|
|
eucoord x2 = x - (k<2 ? ord : 0);
|
|
|
|
eucoord y2 = y + (k>0 ? ord : 0);
|
|
|
|
|
|
|
|
cdata *d1 = getEuclidCdata(encodeMaster(x1,y1));
|
|
|
|
cdata *d2 = getEuclidCdata(encodeMaster(x2,y2));
|
|
|
|
cdata xx;
|
|
|
|
double disp = pow(2, bid/2.) * 6;
|
|
|
|
|
|
|
|
for(int i=0; i<4; i++) {
|
|
|
|
double dv = (d1->val[i] + d2->val[i])/2 + (hrand(1000) - hrand(1000))/1000. * disp;
|
|
|
|
xx.val[i] = floor(dv);
|
|
|
|
if(hrand(1000) / 1000. < dv - floor(dv)) xx.val[i]++;
|
|
|
|
}
|
|
|
|
xx.bits = 0;
|
|
|
|
|
|
|
|
for(int b=0; b<32; b++) {
|
|
|
|
bool gbit = ((hrand(2)?d1:d2)->bits >> b) & 1;
|
|
|
|
int flipchance = (1<<bid);
|
|
|
|
if(flipchance > 512) flipchance = 512;
|
|
|
|
if(hrand(1024) < flipchance) gbit = !gbit;
|
|
|
|
if(gbit) xx.bits |= (1<<b);
|
|
|
|
}
|
|
|
|
|
|
|
|
return &(eucdata[h] = xx);
|
|
|
|
}
|
|
|
|
|
|
|
|
// impossible!
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
int getCdata(cell *c, int j) {
|
|
|
|
if(euclid) return getEuclidCdata(c->master)->val[j];
|
|
|
|
else if(c->type == 7) return getHeptagonCdata(c->master)->val[j]*3;
|
|
|
|
else {
|
|
|
|
int jj = 0;
|
|
|
|
for(int k=0; k<6; k++) if(c->mov[k] && c->mov[k]->type == 7)
|
|
|
|
jj += getHeptagonCdata(c->mov[k]->master)->val[j];
|
|
|
|
return jj;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int getBits(cell *c) {
|
|
|
|
if(euclid) return getEuclidCdata(c->master)->bits;
|
|
|
|
else if(c->type == 7) return getHeptagonCdata(c->master)->bits;
|
|
|
|
else {
|
|
|
|
int b0 = getHeptagonCdata(createMov(c, 0)->master)->bits;
|
|
|
|
int b1 = getHeptagonCdata(createMov(c, 2)->master)->bits;
|
|
|
|
int b2 = getHeptagonCdata(createMov(c, 4)->master)->bits;
|
|
|
|
return (b0 & b1) | (b1 & b2) | (b2 & b0);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
eLand getCLand(cell *c) {
|
|
|
|
int b = getBits(c);
|
|
|
|
b = (b&31) ^ (b>>5);
|
|
|
|
return land_scape[b & 31];
|
|
|
|
}
|
|
|
|
|
|
|
|
int celldistance(cell *c1, cell *c2) {
|
|
|
|
int d = 0;
|
|
|
|
cell *cl1=c1, *cr1=c1, *cl2=c2, *cr2=c2;
|
|
|
|
while(true) {
|
|
|
|
if(cl1 == cl2) return d;
|
|
|
|
if(cl1 == cr2) return d;
|
|
|
|
if(cr1 == cl2) return d;
|
|
|
|
if(cr1 == cr2) return d;
|
|
|
|
|
|
|
|
if(isNeighbor(cl1, cl2)) return d+1;
|
|
|
|
if(isNeighbor(cl1, cr2)) return d+1;
|
|
|
|
if(isNeighbor(cr1, cl2)) return d+1;
|
|
|
|
if(isNeighbor(cr1, cr2)) return d+1;
|
|
|
|
|
|
|
|
forCellEx(c, cl2) if(isNeighbor(c, cr1)) return d+2;
|
|
|
|
forCellEx(c, cl1) if(isNeighbor(c, cr2)) return d+2;
|
|
|
|
|
|
|
|
int d1 = celldist(cl1), d2 = celldist(cl2);
|
|
|
|
|
|
|
|
if(d1 >= d2) {
|
|
|
|
cl1 = chosenDown(cl1, -1, 0, celldist);
|
|
|
|
// cl1->item = eItem(rand() % 10);
|
|
|
|
cr1 = chosenDown(cr1, 1, 0, celldist);
|
|
|
|
// cr1->item = eItem(rand() % 10);
|
|
|
|
d++;
|
|
|
|
}
|
|
|
|
if(d1 <= d2) {
|
|
|
|
cl2 = chosenDown(cl2, -1, 0, celldist);
|
|
|
|
// cl2->item = eItem(rand() % 10);
|
|
|
|
cr2 = chosenDown(cr2, 1, 0, celldist);
|
|
|
|
// cr2->item = eItem(rand() % 10);
|
|
|
|
d++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void clearMemory() {
|
|
|
|
extern void clearGameMemory();
|
|
|
|
clearGameMemory();
|
|
|
|
if(shmup::on) shmup::clearMemory();
|
|
|
|
cleargraphmemory();
|
|
|
|
#ifndef MOBILE
|
|
|
|
mapeditor::clearModelCells();
|
|
|
|
#endif
|
|
|
|
// EUCLIDEAN
|
|
|
|
if(euclid) {
|
|
|
|
for(int y=0; y<256; y++) for(int x=0; x<256; x++)
|
|
|
|
if(euclidean[y][x]) {
|
|
|
|
delete euclidean[y][x];
|
|
|
|
euclidean[y][x] = NULL;
|
|
|
|
}
|
|
|
|
eucdata.clear();
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
DEBMEM ( verifycells(&origin); )
|
|
|
|
clearfrom(&origin);
|
|
|
|
for(int i=0; i<size(allAlts); i++) clearfrom(allAlts[i]);
|
|
|
|
allAlts.clear();
|
|
|
|
}
|
|
|
|
DEBMEM ( printf("ok\n"); )
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif
|