empire/empserver
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fairland: Show a more useful map

Browse source 
The map fairland shows has absolute 0,0 in the top-left corner, while
POGO's map * has it in the center.  Shift fairland's map to match
POGO's.

The map shows sea as '.', island sectors as '%', capitals as '#',
mountains as '^', and other continental sectors as a letter or digit
that encodes the continent number modulo 62.  When a continent has no
"other" sectors, its continent number is not shown.  Remove this
pathological case by using letter/digit for capitals, and '#' for
other continental sectors.

Signed-off-by: Markus Armbruster <armbru@pond.sub.org>
This commit is contained in:
Markus Armbruster 2020-08-17 12:39:04 +02:00
parent 1cc54f3625
commit c4441014e3
2 changed files with 45 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

23
src/util/fairland.c
View file

@ -29,7 +29,7 @@
* Known contributors to this file: * Known contributors to this file:
* Ken Stevens, 1995 * Ken Stevens, 1995
* Steve McClure, 1998 * Steve McClure, 1998
* Markus Armbruster, 2004-2013 * Markus Armbruster, 2004-2020
*/ */
#include <config.h> #include <config.h>
@ -1100,17 +1100,20 @@ write_sects(void)
static void static void
output(void) output(void)
{ {
int i, j; int sx, sy, x, y;
if (quiet == 0) { if (quiet == 0) {
for (i = 0; i < WORLD_Y; ++i) { for (sy = -WORLD_Y / 2; sy < WORLD_Y / 2; sy++) {
y = YNORM(sy);
puts(""); puts("");
if (i % 2) if (y % 2)
printf(" "); printf(" ");
for (j = i % 2; j < WORLD_X; j += 2) { for (sx = -WORLD_X / 2 + y % 2; sx < WORLD_X / 2; sx += 2) {
if (own[j][i] == -1) x = XNORM(sx);
if (own[x][y] == -1)
printf(". "); printf(". ");
else { else {
printf("%c ", map_symbol(j, i)); printf("%c ", map_symbol(x, y));
} }
} }
} }
@ -1124,16 +1127,16 @@ output(void)
static int static int
map_symbol(int x, int y) map_symbol(int x, int y)
{ {
int c, iscap = 0; int c;
for (c = 0; c < nc; ++c) for (c = 0; c < nc; ++c)
if ((x == capx[c] && y == capy[c]) if ((x == capx[c] && y == capy[c])
|| (x == new_x(capx[c] + 2) && y == capy[c])) || (x == new_x(capx[c] + 2) && y == capy[c]))
iscap = 1; return numletter[own[x][y] % 62];
if ((elev[x][y] >= HILLMIN && elev[x][y] < PLATMIN) if ((elev[x][y] >= HILLMIN && elev[x][y] < PLATMIN)
|| elev[x][y] >= HIGHMIN) || elev[x][y] >= HIGHMIN)
return '^'; return '^';
return own[x][y] >= nc ? '%' : iscap ? '#' : numletter[own[x][y] % 62]; return own[x][y] >= nc ? '%' : '#';
} }
/*************************************************************************** /***************************************************************************

64
tests/fairland/fairland.out
View file

@ -22,37 +22,37 @@ adding resources...
setting coastal flags... setting coastal flags...
writing to sectors file... writing to sectors file...
. e e e e e . % % % % . . # # i i . . . . . % % % % . . . % % . % % % . # # # d d # . . . . . . . # # # # # # . % % % % . . . .
. e e e . e . % % % % . i i i i . . . . . . % % . . . . . % % % % % % . # # # # # # . . . . . . # # # # # # . . % % % . . . . .
% . . . . . . % % % . . i i i i . . g g g . . . . . . . . % % % % . % % . # # # # # . . # # . . # # # j j # # # . . . . . . . .
% . % % % % . . . . . . i i i . . g g g g . . . . . . . % % % % . . % . . # . . # . . . # # . . # # # # # . . . . . # # . . . .
% . % % % % % % % % . . . i i . . g g g g g g . . . . % % % . . . . . . . . . . . . . . . # # . . # # # # . . . . . . # # # # #
. % % % . . . % . . . . i i . . g g g # # g g . % % . % % . b . . . . . . . . . . . . . . # # . . . . . . . . . # # # # # # # .
b . % % . . a . . a a . . . . % . g g g g g . . % % . . . . b b . . . # # . . . . . . . . # # # . . . . . . . . . . # # # # . .
b . . . . a a a a a . . . . % % . g g g g . . . . . . b b b b b . . . # # # # . . . . . h h # # # # # . . . . . . # # f f # . .
b b . . . a a # # . . . . . % % % . . . . g . . . . . b b # # b . . . . # # # . . . % % . # # # # . . . . . . . . . # # # # # .
b . . . a a a a a a . . . % % % % % % % . . . . . . b b b b b b . . # c c # . . . . % . # # # # . . . . . . . . . . . . . # # .
. . . . . . a a a a a a . . % % % % % % % % % . . . . b b b b . . . # # # # # # . % % % . # # # # . . . . . . . . . . . . . . .
. . . . . a a a a a a . . . % % % % % % % . . . . . . . b b . . . . # # # # # . . % % . . . . . . . . . # # . % % % . . . . . .
. . . . . . . . . . . . . . . . . . . . . . d . . . . . . . . . . . . # # # # . . . % % . % % . . . . # # # # . % % . . . . . .
. . . . . . . . . . . . . . . % % % % % . . d . . . . . . . . . . . . . # # . . . . % . % % % . . . # e e # . % % . . . . . # .
. . . . . . . . . . % % % % . . % % % % . d . d d d . . . . . . # . . . . . . . . . . . . . % % . . # # # # # . % % % . # # # #
. . j . . . . . % % % % % . . % % % % . d d d d d . . . . . . . # . . . . . . % % % . . % . . . # # # # # # . % % % % . # # # #
. j j j j j j . % % % % . . . . % % % . d d d # # d . . . . . . # . . . . . % % % % . . . % % . . # # # # # . % % % % . . i i #
j j j j j j . . % % % . . . . . % % % . d d d d d d . . . . . . . . . . . . % % . . . . . % % % . # # # . # . % % % % . # # # #
j j j # # j j j . . . . . . . . % . % % . d d d d d . . h h . . . . # # # . . . . . . . . % % % % . . . . . . % % % . . # # # #
j j j j j . . . . . f f . . . . . . % . . d . . d . . . h h . . . # # # # . . . . . . . % % % % % . % % % % . . . . . . # # # .
. j j j j . . . . . . f f f f f . . . . . . . . . . . . . h h . . # # # # # # . . . . % % % . . % . % % % % % % % % . . . # # .
. . . . . . . . f f f f f f f . . . . . . . . . . . . . . h h . # # # g g # # . % % . % % . # . . % % % . . . % . . . . # # . .
. . . . . . . . . . f f f f . . . . . c c . . . . . . . . h h h . # # # # # . . % % . . . . # # # . % % . . # . . # # . . . . %
h h h . . . . . . f f # # f . . . . . c c c c . . . . . # # h h . # # # # . . . . . . # # # # # # . . . . # # # # # . . . . % %
h . . . . . . . . . f f f f f . . . . . c c c . . . % % . h h h % . . . . # . . . . . # # b b # # # . . . # # a a . . . . . % %
. . . . . . . . . . . . . f f . . . c # # c . . . . % . h h h h % % % % . . . . . . # # # # # # # . . . # # # # # # . . . % % %
h . . . . . . . . . . . . . . . . . c c c c c c . % % % . h h h % % % % % % % . . . . # # # # . . . . . . . # # # # # # . . % %
. . . . e e . % % % . . . . . . . . c c c c c . . % % . . . . . % % % % % . . . . . . . # # . . . . . . . # # # # # # . . . % %
. . . e e e e . % % . . . . . . . . . c c c c . . . % % . % % . . . . . . . # . . . . . . . . . . . . . . . . . . . . . . . . .
. . e # # e . % % . . . . . i . . . . . c c . . . . % . % % % . % % % % . . # . . . . . . . . . . . . . . . . . . . . . . . . %
. . e e e e e . % % % . i i i i i . . . . . . . . . . . . . % % % % % % . # . # # # . . . . . . . . . . . . . . . . % % % % . .
e e e e e e . % % % % . i i i i i . . . . . . % % % . . % . . . % % % . # # # # # . . . . . . . . . # . . . . . % % % % % . . %
A script for adding all the countries can be found in "sandbox/newcap_script". A script for adding all the countries can be found in "sandbox/newcap_script".