/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2013, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Copyright (C) 1986-2020, Dave Pare, Jeff Bailey, Thomas Ruschak,
* Ken Stevens, Steve McClure, Markus Armbruster
*
* Empire is free software: you can redistribute it and/or modify
int
rela(void)
{
- struct natstr *natp;
struct natstr *np;
natid cn;
natid as;
return RET_SYN;
as = (natid)n;
}
- natp = getnatp(as);
pr("\t%s Diplomatic Relations Report\t", cname(as));
prdate();
pr("\n Formal Relations %5s theirs\n",
if (np->nat_stat < STAT_SANCT)
continue;
if (opt_HIDDEN) {
- if (!player->god && !getcontact(natp, cn))
+ if (!player->god && !in_contact(as, cn))
continue;
- if (!player->god && !getcontact(getnatp(player->cnum), cn))
+ if (!player->god && !in_contact(player->cnum, cn))
continue;
}
pr("%3d) %-20.20s ", cn, cname(cn));
- pr("%-10s %s\n", relatename(natp, cn), relatename(np, as));
+ pr("%-10s %s\n",
+ relations_string(relations_with(as, cn)),
+ relations_string(relations_with(cn, as)));
}
return RET_OK;
}