- getsect(sp->shp_x, sp->shp_y, §);
- if (sect.sct_type != SCT_WATER)
- pr(" in a %s %s", cname(sect.sct_own),
- dchr[sect.sct_type].d_name);
- else
- pr(" at sea");
- break;
- case EF_LAND:
- lp = &tgp->lnd;
- tp->trd_owner = lp->lnd_own;
- pr("(%3d) tech %d %d%% %s [",
- tp->trd_owner,
- lp->lnd_tech,
- lp->lnd_effic,
- lchr[(int)lp->lnd_type].l_name);
- for (i = 0; i < lp->lnd_nv; i++) {
- pr("%c:%d ",
- ichr[lp->lnd_vtype[i] & ~VT_TYPE].i_mnem,
- lp->lnd_vamt[i]);
- }
- pr("] #%d", tp->trd_unitid);
- if (opt_SHOWPLANE) {
- snxtitem_all(&ni, EF_PLANE);
- while (nxtitem(&ni, (s_char *)&plane))
- {
- if (plane.pln_land == lp->lnd_uid &&
- plane.pln_own != 0)
- {
- pr("\n\t\t\t\t tech %3d %3d%% %s #%d",
- plane.pln_tech,
- plane.pln_effic,
- plchr[(int)plane.pln_type].pl_name,
- plane.pln_uid);
- if (plane.pln_nuketype != (s_char)-1)
- {
- pr("(%s)",
- nchr[(int)plane.pln_nuketype].n_name);
- }
- }
+ }
+ }
+ getsect(sp->shp_x, sp->shp_y, §);
+ if (sect.sct_type != SCT_WATER)
+ pr(" in a %s %s", cname(sect.sct_own),
+ dchr[sect.sct_type].d_name);
+ else
+ pr(" at sea");
+ break;
+ case EF_LAND:
+ lp = &tgp->lnd;
+ tp->trd_owner = lp->lnd_own;
+ pr("(%3d) tech %d %d%% %s [",
+ tp->trd_owner,
+ lp->lnd_tech, lp->lnd_effic, lchr[(int)lp->lnd_type].l_name);
+ for (i = 0; i < lp->lnd_nv; i++) {
+ pr("%c:%d ",
+ ichr[lp->lnd_vtype[i] & ~VT_TYPE].i_mnem, lp->lnd_vamt[i]);
+ }
+ pr("] #%d", tp->trd_unitid);
+ if (opt_SHOWPLANE) {
+ snxtitem_all(&ni, EF_PLANE);
+ while (nxtitem(&ni, (s_char *)&plane)) {
+ if (plane.pln_land == lp->lnd_uid && plane.pln_own != 0) {
+ pr("\n\t\t\t\t tech %3d %3d%% %s #%d",
+ plane.pln_tech,
+ plane.pln_effic,
+ plchr[(int)plane.pln_type].pl_name, plane.pln_uid);
+ if (plane.pln_nuketype != (s_char)-1) {
+ pr("(%s)", nchr[(int)plane.pln_nuketype].n_name);