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:
* Ken Stevens, 1995
* Steve McClure, 1998
* Markus Armbruster, 2004-2013
* Markus Armbruster, 2004-2020
*/
#include <config.h>
@ -1100,17 +1100,20 @@ write_sects(void)
static void
output(void)
{
int i, j;
int sx, sy, x, y;
if (quiet == 0) {
for (i = 0; i < WORLD_Y; ++i) {
for (sy = -WORLD_Y / 2; sy < WORLD_Y / 2; sy++) {
y = YNORM(sy);
puts("");
if (i % 2)
if (y % 2)
printf(" ");
for (j = i % 2; j < WORLD_X; j += 2) {
if (own[j][i] == -1)
for (sx = -WORLD_X / 2 + y % 2; sx < WORLD_X / 2; sx += 2) {
x = XNORM(sx);
if (own[x][y] == -1)
printf(". ");
else {
printf("%c ", map_symbol(j, i));
printf("%c ", map_symbol(x, y));
}
}
}
@ -1124,16 +1127,16 @@ output(void)
static int
map_symbol(int x, int y)
{
int c, iscap = 0;
int c;
for (c = 0; c < nc; ++c)
if ((x == capx[c] && 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)
|| elev[x][y] >= HIGHMIN)
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...
writing to sectors file...
. e e e e e . % % % % . . # # i i . . . . . % % % % . . . % % .
. e e e . e . % % % % . i i i i . . . . . . % % . . . . . % % %
% . . . . . . % % % . . i i i i . . g g g . . . . . . . . % % %
% . % % % % . . . . . . 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
b b . . . a a # # . . . . . % % % . . . . g . . . . . b b # # b
b . . . a a a a a a . . . % % % % % % % . . . . . . b b b b b b
. . . . . . a a a a a a . . % % % % % % % % % . . . . b b b b .
. . . . . a a a a a a . . . % % % % % % % . . . . . . . b b . .
. . . . . . . . . . . . . . . . . . . . . . d . . . . . . . . .
. . . . . . . . . . . . . . . % % % % % . . d . . . . . . . . .
. . . . . . . . . . % % % % . . % % % % . d . d d d . . . . . .
. . j . . . . . % % % % % . . % % % % . d d d d d . . . . . . .
. j j j j j j . % % % % . . . . % % % . d d d # # d . . . . . .
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 .
. . . . . . . . . . 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
. . . . . . . . . . . . . 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 . . . . . . % % % . . % . . .
% % % . # # # d d # . . . . . . . # # # # # # . % % % % . . . .
% % % . # # # # # # . . . . . . # # # # # # . . % % % . . . . .
% . % % . # # # # # . . # # . . # # # j j # # # . . . . . . . .
. . % . . # . . # . . . # # . . # # # # # . . . . . # # . . . .
. . . . . . . . . . . . . # # . . # # # # . . . . . . # # # # #
. . . . . . . . . . . . . # # . . . . . . . . . # # # # # # # .
. . . # # . . . . . . . . # # # . . . . . . . . . . # # # # . .
. . . # # # # . . . . . h h # # # # # . . . . . . # # f f # . .
. . . . # # # . . . % % . # # # # . . . . . . . . . # # # # # .
. . # c c # . . . . % . # # # # . . . . . . . . . . . . . # # .
. . # # # # # # . % % % . # # # # . . . . . . . . . . . . . . .
. . # # # # # . . % % . . . . . . . . . # # . % % % . . . . . .
. . . # # # # . . . % % . % % . . . . # # # # . % % . . . . . .
. . . . # # . . . . % . % % % . . . # e e # . % % . . . . . # .
# . . . . . . . . . . . . . % % . . # # # # # . % % % . # # # #
# . . . . . . % % % . . % . . . # # # # # # . % % % % . # # # #
# . . . . . % % % % . . . % % . . # # # # # . % % % % . . i i #
. . . . . . % % . . . . . % % % . # # # . # . % % % % . # # # #
. . # # # . . . . . . . . % % % % . . . . . . % % % . . # # # #
. # # # # . . . . . . . % % % % % . % % % % . . . . . . # # # .
. # # # # # # . . . . % % % . . % . % % % % % % % % . . . # # .
# # # g g # # . % % . % % . # . . % % % . . . % . . . . # # . .
. # # # # # . . % % . . . . # # # . % % . . # . . # # . . . . %
. # # # # . . . . . . # # # # # # . . . . # # # # # . . . . % %
% . . . . # . . . . . # # b b # # # . . . # # a a . . . . . % %
% % % % . . . . . . # # # # # # # . . . # # # # # # . . . % % %
% % % % % % % . . . . # # # # . . . . . . . # # # # # # . . % %
% % % % % . . . . . . . # # . . . . . . . # # # # # # . . . % %
. . . . . . # . . . . . . . . . . . . . . . . . . . . . . . . .
% % % % . . # . . . . . . . . . . . . . . . . . . . . . . . . %
% % % % . # . # # # . . . . . . . . . . . . . . . . % % % % . .
% % % . # # # # # . . . . . . . . . # . . . . . % % % % % . . %
A script for adding all the countries can be found in "sandbox/newcap_script".