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

Indented with src/scripts/indent-emp.

Browse source
This commit is contained in:
Markus Armbruster 2003-09-02 20:48:48 +00:00
parent 5f263a7753
commit 9b7adfbecc
437 changed files with 52211 additions and 51052 deletions
Download patch file Download diff file Expand all files Collapse all files

116
src/lib/commands/nuke.c
View file

@ -46,65 +46,65 @@
int
nuke(void)
{
register int first_line = 0;
register int first_nuke;
register int show_comm;
register int i;
struct nstr_item nstr;
struct nukstr nuk;
struct sctstr sect;
int item[I_MAX+1];
register int first_line = 0;
register int first_nuke;
register int show_comm;
register int i;
struct nstr_item nstr;
struct nukstr nuk;
struct sctstr sect;
int item[I_MAX + 1];
if (!snxtitem(&nstr, EF_NUKE, player->argp[1]))
return RET_SYN;
if (!snxtitem(&nstr, EF_NUKE, player->argp[1]))
return RET_SYN;
while (nxtitem(&nstr, (s_char *)&nuk)) {
if (!player->god && !player->owner)
continue;
if (nuk.nuk_own == 0)
continue;
if (first_line++ == 0) {
if (player->god)
pr("own ");
pr(" sect eff num nuke-type lcm hcm oil rad avail\n");
}
getsect(nuk.nuk_x, nuk.nuk_y, &sect);
getvec(VT_ITEM, item, (s_char *)&sect, EF_SECTOR);
first_nuke = 1;
show_comm = 0;
if (sect.sct_type == SCT_NUKE && sect.sct_effic >= 60)
show_comm = 1;
for (i = 0; i < N_MAXNUKE; i++) {
if (nuk.nuk_types[i] > 0) {
if (first_nuke) {
if (player->god)
pr("%-3d ", nuk.nuk_own);
prxy("%4d,%-4d", sect.sct_x, sect.sct_y, player->cnum);
pr(" %c", dchr[sect.sct_type].d_mnem);
if (sect.sct_newtype != sect.sct_type)
pr("%c", dchr[sect.sct_newtype].d_mnem);
else
pr(" ");
pr("%4d%%", sect.sct_effic);
first_nuke = 0;
} else {
pr(" ");
}
pr("%3d ", nuk.nuk_types[i]);
pr("%-16.16s ", nchr[i].n_name);
if (show_comm) {
pr("%5d ", item[I_LCM]);
pr("%5d ", item[I_HCM]);
pr("%5d ", item[I_OIL]);
pr("%5d ", item[I_RAD]);
pr("%5d", sect.sct_avail);
show_comm = 0;
}
pr("\n");
}
}
while (nxtitem(&nstr, (s_char *)&nuk)) {
if (!player->god && !player->owner)
continue;
if (nuk.nuk_own == 0)
continue;
if (first_line++ == 0) {
if (player->god)
pr("own ");
pr(" sect eff num nuke-type lcm hcm oil rad avail\n");
}
return RET_OK;
getsect(nuk.nuk_x, nuk.nuk_y, &sect);
getvec(VT_ITEM, item, (s_char *)&sect, EF_SECTOR);
first_nuke = 1;
show_comm = 0;
if (sect.sct_type == SCT_NUKE && sect.sct_effic >= 60)
show_comm = 1;
for (i = 0; i < N_MAXNUKE; i++) {
if (nuk.nuk_types[i] > 0) {
if (first_nuke) {
if (player->god)
pr("%-3d ", nuk.nuk_own);
prxy("%4d,%-4d", sect.sct_x, sect.sct_y, player->cnum);
pr(" %c", dchr[sect.sct_type].d_mnem);
if (sect.sct_newtype != sect.sct_type)
pr("%c", dchr[sect.sct_newtype].d_mnem);
else
pr(" ");
pr("%4d%%", sect.sct_effic);
first_nuke = 0;
} else {
pr(" ");
}
pr("%3d ", nuk.nuk_types[i]);
pr("%-16.16s ", nchr[i].n_name);
if (show_comm) {
pr("%5d ", item[I_LCM]);
pr("%5d ", item[I_HCM]);
pr("%5d ", item[I_OIL]);
pr("%5d ", item[I_RAD]);
pr("%5d", sect.sct_avail);
show_comm = 0;
}
pr("\n");
}
}
}
return RET_OK;
}